Eskylo

Aprovado :button_ok: Depois da uma procurada sobre tabelas, elas iriam reduzir um tantinho bom do script

é uma coisa muito complexa, tipo vc tem q fazer alguma coisa verificar os sqms livres, ou seja sem parede e tals, depois fazer o poke chegar a destino, por um certo caminha desviando destes obstaculos

Bem lembrado falto o return true, ficando assim, tipo a outfit vai ser altera somente na 1ª q o player loga após acabar sua premium function onLogin(cid) if getPlayerPremiumDays(cid) > 0 then setPlayerStorageValue(cid, 19237, 1) elseif getPlayerPremiumDays <= 0 and getPlayerStorageValue(cid, 19237) == 1 then local outfit = {lookType=160, lookHead=0, lookAddons=0, lookLegs=0, lookBody=0, lookFeet=0} doCreatureChangeOutfit(cid, outfit) setPlayerStorageValue(cid, 19237, -1) end return true end se o player nuca foi premium n vai alterar

Tipo isso acontece porque o monstro demon não é convencível. Você teria que abrir o arquivo xml do Demon procurar esse linha: <flag convinceable="0"/> e deixar assim: <flag convinceable="1"/>

Tem sim, vc pode fazer assim: Abra o xml do monstro que quer colocar e ponha antes de </monster> isso: <script> <event name="NomeDoEvento"/> </script>

criei um arquivo lua chamado freeoutfit em creaturescripts/scripts e coloque function onLogin(cid) if getPlayerPremiumDays(cid) > 0 then setPlayerStorageValue(cid, 19237, 1) elseif getPlayerPremiumDays == 0 and getPlayerStorageValue(cid, 19237) == 1 then local outfit = {lookType=160, lookHead=0, lookAddons=0, lookLegs=0, lookBody=0, lookFeet=0} doCreatureChangeOutfit(cid, outfit) setPlayerStorageValue(cid, 19237, -1) end end abra o creaturescripts.xml com e bloco de notas e abaixo de <creaturescripts> ponha <event type="login" name="Outfitfree" script="freeoutfit.lua"/>

o script postado acima vai evoluir seu pokemon, quando vc chamar o poke pra pokebola, depois mandar o poke pra fora denovo vai sair o antigo pokemon não evoluído. é necessário q vc poste seu catch, pois esses script não são padronizados. flws

Fico feliz em ter ajudado ! ^^ se aparecer qualquer bug manda mensagem

1º erro Errado: Query = db.getResult("SELECT `value`, `player_id`, `key` FROM `player_storage` WHERE `player_storage`.`player_id` = ".. getPlayerGUID(cid) ..";") Certo: Query = db.getResult("SELECT `value` FROM `player_storage` WHERE `player_id` = " .. getPlayerGUID(cid) .. " AND `key` = " .. 13194 .. ";") 2º Errado: db.executeQuery("DELETE FROM `player_storage` WHERE `player_storage`.`player_id` = "..getPlayerGUID(cid).." AND `player_storage`.`key` = 13194 ;") Correto: db.executeQuery("DELETE FROM `player_storage` WHERE `player_id` = " .. getPlayerGUID(cid) .. " AND `key` = 13194;") Isso realmente deleta da database, mas na minha idéia eu só mudei o storage pra -1, pois qualquer storage de qualquer player sem alteração é -1

tenta assim <vocation id="9" name="Mixed Assasin" description="a mixed assassin" needpremium="1" gaincap="25" gainhp="30" gainmana="35" gainhpticks="2" gainhpamount="170" gainmanaticks="4" gainmanaamount="80" manamultiplier="3.0" attackspeed="300" soulmax="200" gainsoulticks="15" fromvoc="9"> <formula meleeDamage="7.5" distDamage="10.0" wandDamage="1.0" magDamage="7.5" magHealingDamage="2.0" defense="1.0" magDefense="1.0" armor="1.0"/> <skill fist="1.1" club="0" sword="1.1" axe="1.1" distance="1.1" shielding="1.1" fishing="1.1" experience="1.0"/> </vocation>

eu coloquei o doPlayerSetVocation(cid, 9) então vc errou na configuração da vocação

tenta esse aki entao function onSay(cid, words, param) if getPlayerVocation(cid) > 8 or getPlayerStorageValue(cid, 1020) > 0 then doPlayerSendTextMessage(cid, 24, "voce não pode resetar.") return true end local config = { level = 40000, -- level para resetar RemainingLvl = 8, -- level que ficara depois do reset exper = 4200, -- Experiência que ficara depois do Reset pid = getPlayerGUID(cid), -- Não Mecha skull = "yes", -- Players com Skull podem resetar "yes" para sim e "no" para não redskull = "yes",-- Players com Red Skull podem resetar "yes" para sim e "no" para não prot = "yes", -- precisa estar em area pz para resetar "yes" para sim e "no" para não bat = "yes", -- player com fight pode resetar "yes para sim e "no" para não voc = getPlayerVocation(cid), -- Não mecha mana = 35, -- mana que ficara após o reset health = 185 -- Health que ficara após o reset } function getResets(cid) reset = getPlayerStorageValue(cid,1020) if reset < 0 then reset = 0 end return reset end if(config.skull == "no") and (getCreatureSkullType(cid) == 3) then doPlayerSendTextMessage(cid, 24, "apenas players sem white skull podem resetar.") return TRUE end if(config.redskull == "no") and (getCreatureSkullType(cid) == 4) then doPlayerSendTextMessage(cid, MESSAGE_EVENT_DEFAULT,"apenas player sem red skull podem resetar.") return TRUE end if(config.prot == "yes") and (getTilePzInfo(getCreaturePosition(cid)) == FALSE) then doPlayerSendTextMessage(cid, MESSAGE_EVENT_DEFAULT,"você precisa estar em protection zone pra poder resetar.") return TRUE end if(config.bat == "yes") and (getCreatureCondition(cid, CONDITION_INFIGHT) == TRUE) then doPlayerSendTextMessage(cid, MESSAGE_EVENT_DEFAULT, "Você precisa estar sem battler pra poder resetar.") return TRUE end if getPlayerLevel(cid) < config.level then doPlayerSendCancel(cid, "Você precisa do level "..config.level.." ou mais para resetar.") doPlayerSendCancel(cid, "Você precisa da vocation"..config.vocation.."") doSendMagicEffect(getPlayerPosition(cid), CONST_ME_POFF) return TRUE end setPlayerStorageValue(cid,1020,getResets(cid)+1) doPlayerPopupFYI(cid,"you now was reset, you have "..getResets(cid)+(1).." reset\'s.") doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid))) doPlayerSetVocation(cid, 9) doRemoveCreature(cid) db.executeQuery("UPDATE `players` SET `level` = "..config.RemainingLvl..", `experience` = "..config.exper..",`manamax` = "..config.mana..",`healthmax` = "..config.health..",`health` = "..config.health..",`mana` = "..config.mana.." WHERE `id` = "..config.pid) end

se eu falar "vai tomar no cu" n acontece nada

Você complicou o negócio function onUse(cid, item, frompos, item2, topos) if item.itemid == 2626 and getPlayerStorageValue(cid, 13195) == -1 then doRemoveItem(item.uid,1) setPlayerStorageValue(cid, 13195, 1) setPlayerStorageValue(cid, 13194, -1) doSendMagicEffect(frompos, 13) doBroadcastMessage("The ".. getPlayerName(cid) .." found a new key to Spret Room.", 22) doRemoveCreature(cid) else doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You already use it.") end end vê se assim n funfa

function onSay(cid, words, param) if getPlayerVocation(cid) > 8 or getPlayerStorageValue(cid, 1020) > 0 then doPlayerSendTextMessage(cid, 24, "voce não pode resetar.") return true end local config = { level= 40000, -- level para resetar RemainingLvl=8, -- level que ficara depois do reset exper=4200, -- Experiência que ficara depois do Reset pid=getPlayerGUID(cid), -- Não Mecha skull="yes", -- Players com Skull podem resetar "yes" para sim e "no" para não redskull="yes",-- Players com Red Skull podem resetar "yes" para sim e "no" para não prot="yes", -- precisa estar em area pz para resetar "yes" para sim e "no" para não bat="yes", -- player com fight pode resetar "yes para sim e "no" para não voc = getPlayerVocation(cid), -- Não mecha mana = 35, -- mana que ficara após o reset health = 185 -- Health que ficara após o reset } function getResets(cid) reset = getPlayerStorageValue(cid,1020) if reset < 0 then reset = 0 end return reset end if(config.skull == "no") and (getCreatureSkullType(cid) == 3) then doPlayerSendTextMessage(cid, 24, "apenas players sem white skull podem resetar.") return TRUE end if(config.redskull == "no") and (getCreatureSkullType(cid) == 4) then doPlayerSendTextMessage(cid, MESSAGE_EVENT_DEFAULT,"apenas player sem red skull podem resetar.") return TRUE end if(config.prot == "yes") and (getTilePzInfo(getCreaturePosition(cid)) == FALSE) then doPlayerSendTextMessage(cid, MESSAGE_EVENT_DEFAULT,"você precisa estar em protection zone pra poder resetar.") return TRUE end if(config.bat == "yes") and (getCreatureCondition(cid, CONDITION_INFIGHT) == TRUE) then doPlayerSendTextMessage(cid, MESSAGE_EVENT_DEFAULT, "Você precisa estar sem battler pra poder resetar.") return TRUE end if not getPlayerLevel(cid) >= config.level then doPlayerSendCancel(cid, "Você precisa do level "..config.level.." ou mais para resetar.") doPlayerSendCancel(cid, "Você precisa da vocation"..config.vocation.."") doSendMagicEffect(getPlayerPosition(cid), CONST_ME_POFF) return TRUE end setPlayerStorageValue(cid,1020,getResets(cid)+1) doPlayerPopupFYI(cid,"you now was reset, you have "..getResets(cid)+(1).." reset\'s.") doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid))) doPlayerSetVocation(cid, 9) doRemoveCreature(cid) db.executeQuery("UPDATE `players` SET `level` = "..config.RemainingLvl..", `experience` = "..config.exper..",`manamax` = "..config.mana..",`healthmax` = "..config.health..",`health` = "..config.health..",`mana` = "..config.mana.." WHERE `id` = "..config.pid) end

function onSay(cid, words, param) if getPlayerStorageValue(cid, 1020) > 0 then doPlayerSendTextMessage(cid, 24, "voce ja resetou.") return true end config = { level= 40000, -- level para resetar RemainingLvl=8, -- level que ficara depois do reset exper=4200, -- Experiência que ficara depois do Reset pid=getPlayerGUID(cid), -- Não Mecha skull="yes", -- Players com Skull podem resetar "yes" para sim e "no" para não redskull="yes",-- Players com Red Skull podem resetar "yes" para sim e "no" para não prot="yes", -- precisa estar em area pz para resetar "yes" para sim e "no" para não bat="yes", -- player com fight pode resetar "yes para sim e "no" para não voc = getPlayerVocation(cid), -- Não mecha mana = 35, -- mana que ficara após o reset health = 185 -- Health que ficara após o reset } function getResets(cid) reset = getPlayerStorageValue(cid,1020) if reset < 0 then reset = 0 end return reset end if(config.skull == "no") and (getCreatureSkullType(cid) == 3) then doPlayerSendTextMessage(cid, 24, "apenas players sem white skull podem resetar.") return TRUE end if(config.redskull == "no") and (getCreatureSkullType(cid) == 4) then doPlayerSendTextMessage(cid, MESSAGE_EVENT_DEFAULT,"apenas player sem red skull podem resetar.") return TRUE end if(config.prot == "yes") and (getTilePzInfo(getCreaturePosition(cid)) == FALSE) then doPlayerSendTextMessage(cid, MESSAGE_EVENT_DEFAULT,"você precisa estar em protection zone pra poder resetar.") return TRUE end if(config.bat == "yes") and (getCreatureCondition(cid, CONDITION_INFIGHT) == TRUE) then doPlayerSendTextMessage(cid, MESSAGE_EVENT_DEFAULT, "Você precisa estar sem battler pra poder resetar.") return TRUE end if getPlayerLevel(cid) >= config.level then setPlayerStorageValue(cid,1020,getResets(cid)+1) doPlayerPopupFYI(cid,"you now was reset, you have "..getResets(cid)+(1).." reset\'s.") doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid))) if getPlayerVocation(cid) == 5 then -- Vocação que o player precisa ter doPlayerSetVocation(cid, 1) -- Vocação que o player ficara após o reset end if getPlayerLevel(cid) >= config.level then setPlayerStorageValue(cid,1020,getResets(cid)+1) doPlayerPopupFYI(cid,"you now was reset, you have "..getResets(cid)+(1).." reset\'s.") doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid))) if getPlayerVocation(cid) == 9 then -- Vocação que o player precisa ter doPlayerSetVocation(cid, 2) -- Vocação que o player ficara após o reset end if getPlayerLevel(cid) >= config.level then setPlayerStorageValue(cid,1020,getResets(cid)+1) doPlayerPopupFYI(cid,"you now was reset, you have "..getResets(cid)+(1).." reset\'s.") doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid))) if getPlayerVocation(cid) == 9 then -- Vocação que o player precisa ter doPlayerSetVocation(cid, 3) -- Vocação que o player ficara após o reset end if getPlayerLevel(cid) >= config.level then setPlayerStorageValue(cid,1020,getResets(cid)+1) doPlayerPopupFYI(cid,"you now was reset, you have "..getResets(cid)+(1).." reset\'s.") doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid))) if getPlayerVocation(cid) == 9 then -- Vocação que o player precisa ter doPlayerSetVocation(cid, 4) -- Vocação que o player ficara após o reset end doRemoveCreature(cid) db.executeQuery("UPDATE `players` SET `level` = "..config.RemainingLvl..", `experience` = "..config.exper..",`manamax` = "..config.mana..",`healthmax` = "..config.health..",`health` = "..config.health..",`mana` = "..config.mana.." WHERE `id` = "..config.pid) else doPlayerSendCancel(cid, "Você precisa do level "..config.level.." ou mais para resetar.") doPlayerSendCancel(cid, "Você precisa da vocation"..config.vocation.."") doSendMagicEffect(getPlayerPosition(cid), CONST_ME_POFF) end end end end end

local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_MAGIC_BLUE) setCombatParam(combat, COMBAT_PARAM_TARGETCASTERORTOPMOST, 1) setCombatParam(combat, COMBAT_PARAM_AGGRESSIVE, 0) function onCastSpell(cid, var) local lvl = getPlayerLevel(cid) local mlvl = getPlayerMagLevel(cid) local min = Coloque Aqui a Fórmula para o Minimo local max = Coloque Aqui a Fórmula para o Máximo local n = math.random(min, max) doPlayerAddMana(cid, n) return doCombat(cid, combat, var) end

function onUse(cid, item, frompos, item2, topos) if getPlayerStorageValue(cid, 1615) == -1 then doCreatureSay(cid, "Morra!") setPlayerStorageValue(cid, 1615, 1) else doCreatureSay(cid, "Se fudeu!") end return true end

Script do Item function onUse(cid, item, frompos, item2, topos) pid = doSummonCreature("Demon", getThingPos(cid)) doConvinceCreature(cid, pid) end

Tenta isso function onUse(cid, item, frompos, item2, topos) pid = doSummonCreature("Demon", {x=, y=, z=}) addevent(doRemoveCreature, 45*60*1000, pid) end Se o monstro for auxiliar o player function onUse(cid, item, frompos, item2, topos) pid = doSummonCreature("Demon", getThingPos(cid)) doConvinceCreature(cid, pid) addevent(doRemoveCreature, 45*60*1000, pid) end

Vou tentar explicar de uma forma simples aqui: Como você citou runa, vou fazer uma action que você da use na runa, depois da use em alguém, ai quem usou vai falar "Morra [Nome da pessoa que foi usada]!" function onUse(cid, item, frompos, item2, topos) if not isPlayer(item2.uid) return doPlayerSendCancel(cid, "Use em jogadores.") end doCreatureSay(cid, "Morra "..getCreatureName(item2.uid).."!", 1) return true end No actions.xml? <action itemid="IDdaRUNA" event="script" value="nomedoscript.lua"/>

local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_MAGIC_BLUE) setCombatParam(combat, COMBAT_PARAM_TARGETCASTERORTOPMOST, 1) setCombatParam(combat, COMBAT_PARAM_AGGRESSIVE, 0) function onCastSpell(cid, var) local n = math.random(2750, 3250) doPlayerAddMana(cid, n) return doCombat(cid, combat, var) end

o mar ta um poco marron

<outfit id="iddoultimo+1" default="0" storage="1009"> <list gender="0-3" lookType="Poeaki" name="Nome"/> </outfit> tento assim?