meubk

briga, por causa de créditos... #Créditos : Nome: Pokedex (Básica) Autor: Wantedzin (Perdigues) Versão Testada: TFS 0.3.6 (Nescessário ter o OTAL) Agradecimentos ao: MaXwEllDeN - Pela idéa de criar uma pasta pokedex pra ler os scripts. rd_caldas - Pelas ajudas com alguns scripts que me prporcionaram o conehcimento pra fazer este script. crimm - Da otland pela base do script. Script do forum.otserv...

Qndo num kerer da catch, é por que tá sem article.... vai aparecer tipow um que da bug eh o gaslty, vai tar dead gastly, sendo certo a dead gastly.... espero ki tenha ajudado.. ---------------------------------- só vow usar esse server, qndo o fly e ride naum for + por items.... e tirar esses skills, mto paia horrivel, os pokemons usam mesmas magias -.-

Do OT do pokelypse , antes da thalia hospeda o server, eu ja tinha, o dono do server pokelypse mto inteligente hospedou o server com o nome de USAR_ESSE.rar , eu e um amigo pegou... a thalia só editou os scripts...

Venho Postar Algumas Spells De Direção que muitas pessoas não conseguem achar. #Créditos : Eu não sei quem fez por isso não vou postar créditos. Solarbeam : local combat, effect, area, words, dir = {}, {94, 93, 95, 86, 88, 87, 91, 93, 92, 89, 88, 90}, { { {2}, {1} }, { {2}, {0}, {1}, {1} }, { {2}, {0}, {0}, {0}, {1} }, { {1, 2} }, { {1, 1, 1, 0, 2} }, { {1, 0, 0, 0, 0, 2} }, { {1}, {2} }, { {1}, {1}, {0}, {2} }, { {1}, {0}, {0}, {0}, {2} }, { {2, 1} }, { {2, 0, 1, 1, 1} }, { {2, 0, 0, 0, 0, 1} } }, {'Solarbeam'}, { [0] = {1, 3}, [1] = {4, 6}, [2] = {7, 9}, [3] = {10, 12} } for i = 1, 12 do table.insert(combat, createCombatObject()) setCombatParam(combat[i], COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE) setCombatParam(combat[i], COMBAT_PARAM_EFFECT, effect[i]) setCombatFormula(combat[i], COMBAT_FORMULA_LEVELMAGIC, -7, 0, -8, 0) setCombatArea(combat[i], createCombatArea(area[i])) end function onCastSpell(cid, var) for i = 1, #words do doCreatureSay(cid, words[i], TALKTYPE_SAY) end local d = getCreatureLookDirection(cid) for i = dir[d][1], dir[d][2] do doCombat(cid, combat[i], numberToVariant(cid)) end return true end As outras são iguais só muda effects : Water Gun : {74, 75, 76, 69, 70, 71, 77, 75, 78, 72, 70, 73} Ice Beam : {99, 105, 103, 96, 104, 100, 98, 105, 102, 97, 104, 101} E vocês Sabem aquela magia que cai pedras do céu , também vou postar : #Créditos : Jovial --Spell by Jovial local water = {490, 491, 492, 493, 4608, 4609, 4610, 4611, 4612, 4613, 4614, 4615, 4616, 4617, 4618, 4619, 4620, 4621, 4622, 4623, 4624, 4625} local combat = createCombatObject() local meteor = createCombatObject() setCombatParam(meteor, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE) setCombatParam(meteor, COMBAT_PARAM_EFFECT, 34) setCombatFormula(meteor, COMBAT_FORMULA_LEVELMAGIC, -4.6, -200, -4.2, -200) local stun = createConditionObject(CONDITION_PARALYZE) setConditionParam(stun, CONDITION_PARAM_TICKS, 5000) setConditionFormula(stun, -0.8, 0, -0.9, 0) setCombatCondition(meteor, stun) local meteor_water = createCombatObject() setCombatParam(meteor_water, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE) setCombatParam(meteor_water, COMBAT_PARAM_EFFECT, CONST_ME_LOSEENERGY) setCombatFormula(meteor_water, COMBAT_FORMULA_LEVELMAGIC, -4.6, -200, -4.2, -200) combat_arr = { {0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0}, {0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0}, {0, 0, 1, 1, 1, 1, 1, 1, 1, 0, 0}, {0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0}, {1, 1, 1, 1, 1, 3, 1, 1, 1, 1, 1}, {0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0}, {0, 0, 1, 1, 1, 1, 1, 1, 1, 0, 0}, {0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0}, {0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0} } local combat_area = createCombatArea(combat_arr) setCombatArea(combat, combat_area) local function meteorCast(p) doCombat(p.cid, p.combat, positionToVariant(p.pos)) end local function stunEffect(cid) doSendMagicEffect(getThingPos(cid), CONST_ME_STUN) end function onTargetTile(cid, pos) if (math.random(0, 1) == 1) then local ground = getThingfromPos({x = pos.x, y = pos.y, z = pos.z, stackpos = 0}) if (isInArray(water, ground.itemid) == TRUE) then local newpos = {x = pos.x - 7, y = pos.y - 6, z = pos.z} doSendDistanceShoot(newpos, pos, 11) addEvent(meteorCast, 200, {cid = cid, pos = pos, combat = meteor_water}) else local newpos = {x = pos.x - 7, y = pos.y - 6, z = pos.z} doSendDistanceShoot(newpos, pos, 11) addEvent(meteorCast, 200, {cid = cid,pos = pos, combat = meteor}) end end end setCombatCallback(combat, CALLBACK_PARAM_TARGETTILE, "onTargetTile") function onCastSpell(cid, var) return doCombat(cid, combat, var) end Por Favor , Agradeçam

Alguém poderia fazer para mim , uma spell que use 4 efeitos cada efeito seria para 1 direção , tipo para cima, para baixo, esquerda , direita, e que ataque somente um quadrado na frente, eu tenho uma aqui mais ela era do raio solar, ai não sai certa : local combat, effect, area, words, dir = {}, {80, 83, 81, 82}, { { {2}, {1} }, { {2}, {0}, {1}, {1} }, { {2}, {0}, {0}, {0}, {1} }, { {1, 2} }, { {1, 1, 1, 0, 2} }, { {1, 0, 0, 0, 0, 2} }, { {1}, {2} }, { {1}, {1}, {0}, {2} }, { {1}, {0}, {0}, {0}, {2} }, { {2, 1} }, { {2, 0, 1, 1, 1} }, { {2, 0, 0, 0, 0, 1} } }, {'Vine Whip'}, { [0] = {1, 3}, [1] = {4, 6}, [2] = {7, 9}, [3] = {10, 12} } for i = 1, 12 do table.insert(combat, createCombatObject()) setCombatParam(combat[i], COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE) setCombatParam(combat[i], COMBAT_PARAM_EFFECT, effect[i]) setCombatFormula(combat[i], COMBAT_FORMULA_LEVELMAGIC, -7, 0, -8, 0) setCombatArea(combat[i], createCombatArea(area[i])) end function onCastSpell(cid, var) for i = 1, #words do doCreatureSay(cid, words[i], TALKTYPE_ORANGE_1) end local d = getCreatureLookDirection(cid) for i = dir[d][1], dir[d][2] do doCombat(cid, combat[i], numberToVariant(cid)) end return true end Quem puder ajuda eu agradeço mto..

eu tenhu... miiller_gpes_2009@hotmail.com

thalia, coloque uma função de naum precisar fica ponhando os corpse pra ele procurar no monster sozim, pq edita todos corpse de todos pokemons do meu serv vai demora mto , faiz isso ai ki vai melhorar o script ... REP +

Vc tem ki ser por editor de item é uma coisa meio complicada, mais se estiver com paciencia eh mais facil vc pegar um item ki tenha o cross, e editar a sprite dele.

Num Funfa, esse script eu ja tinha ah mto tempo, eu tenho fly, surf, desse mesmo sistema, mais ele só funciona com um outro script de catch e go/back, se vc tenta usar em oto script ele buga, cara... num adianta ter só isso, se tem ki postar o catch e o go/back desse script.. se naum ele eh inutil...

Olá eu gostária da ajuda no script do forcera esse : -- !fly by Forcera -- -- Ideia by TheGODMaX -- function onSay(cid, words, param, channel) flypos = getCreaturePosition(cid) npos = {x=flypos.x, y=flypos.y, z=flypos.z - 7} pos = getCreaturePosition(cid) flyoutfit = {lookType = 239, lookHead = 0, lookBody = 0, lookLegs = 0, lookFeet = 0, lookTypeEx = 0, lookAddons = 0} if pos.z == 7 then if doTeleportThing(cid, npos) then doSendMagicEffect(npos, 14) doSetCreatureOutfit(cid, flyoutfit, -1) else return 0 end end return TRUE end Eu keria ki ele usasse um summon para poder voar sumisse com o ssumon e depois aparecesse, e dependendo de cada summon ki eu tenhu uma ouflit diferente. Pode basear nesse teleport , que só funciona se vc tiver tal monstro : function getTime(s) local n = math.floor(s / 60) s = s - (60 * n) return n, s end function onSay(cid, words, param) local configs = { needpa = false, needlvl = {true, level = 20}, } local cidades = { ["Holly"] = {x=481,y=474,z=7, pokenames = {"Abra", "Kadabra", "Alakazam"}, time = 1}, } teleport = false if configs.needpa and not isPremium(cid) then return doPlayerSendCancel(cid, "You need to be a premmium account to use teleport.") end if configs.needlvl[1] and getPlayerLevel(cid) < configs.needlvl.level then return doPlayerSendCancel(cid, "You need to be level "..configs.needlvl.level.." or higher to use teleport.") end if #getCreatureSummons(cid) <= 0 then return doPlayerSendCancel(cid, "You need to have a monster summoned.") end for i,x in pairs(cidades) do for _,z in pairs(getCreatureSummons(cid)) do if isInArray(x.pokenames, getCreatureName(z)) then if param:lower() == "\"" .. i:lower() then if os.time()-getPlayerStorageValue(cid, 64231) <= x.time*60 then minutes,seconds = getTime(x.time*60-(os.time()-getPlayerStorageValue(cid, 64231))) return doPlayerSendCancel(cid, "You need wait " .. minutes .. " minutes and " .. seconds .. " seconds.") else doTeleportThing(cid, x) doTeleportThing(z, x) setPlayerStorageValue(cid, 64231, os.time()) teleport = TRUE break end end end end end if not teleport then return doPlayerSendCancel(cid, "This city don't exists or not is able to go in there with teleport or this monster don't able to use teleport.") end return TRUE end Obrigado deis de já.

ainda ta bugando o char o meu ot derrepente o char num entra mais , eu peguei iisso na log... tenta ver oke é....

local config = { monsterName = "Abra", maxSummon = 1, storageHealth = 400, level = 20 } function onUse(cid, item, fromPosition, itemEx, toPosition) local summon = getCreatureSummons(cid) if getPlayerLevel(cid) < config.level then return doPlayerSendCancel(cid,"Você precisa de level "..config.level.." para invocar esse pokémon.") end if(table.maxn(summon) < config.maxSummon) then local p = doCreateMonster(config.monsterName, getThingPosition(cid)) doConvinceCreature(cid, p) doCreatureAddHealth(p, -(getCreatureMaxHealth(p)-getPlayerStorageValue(cid, config.storageHealth))) doCreatureSay(cid, "Go, ".. config.monsterName .."", TALKTYPE_SAY) doSendMagicEffect(getThingPosition(cid), 18) else for _, pid in pairs(summon) do doRemoveCreature(pid) setPlayerStorageValue(cid, config.storageHealth, getCreatureHealth(pid)) doCreatureSay(cid, "Back, ".. config.monsterName .."", TALKTYPE_SAY) end end return TRUE end Esse é o meu Go/Back , tem um desse para cada monstro , eu queria uma favor que alguem arrumasse pra quando o pokemon morrer o corpse sumir, por que se não dá para jogar ota pokebolla , ai ficaria 2 pokemons, eu axo que para faser tem que faser algo nos creaturescript mais eu num entendo , se alguem puder mi ajuda, se precisar do id do corpse do abra é 3000.

Vlw's , e eu tentei troca os ids do item num funfo mais , pq esses id ki vc coloko não eh pokebolla no meu sprite, se vc tiver um sprite pra 8.54... as pokebolla eu colokei 2501 e 2457 . obrigado.

Maniim axei 2 bugs , concerta ai pq o scrpit é otimo , vaiser otimo no meu ot ... 1 - Quando o pokemon morrre o loot fica, ai eu posso jogar ota pokebolla, e vow ter 2 pokemons, tem como colocar pro corpo sumir ? 2 - Derrepente do nada o poke parou de sair da pokebolla O_O , nem healando queria sair. E se der coloca um efeito no catch se pegow 24 , se não 23 . Vlw , eu ja tow usando ele aqui , só arruma isso.. ---------------------Edit----------------------- Se for possivel no go/back colocar lvl para usar o pokemon. Agradeço deis de já REP + .