Skyforever

Olá, galerinha do TibiaKing essa é minha primeira função *-* function getNumeroInAlfabeto(letra) local T = {"a", "b", "c", "d", "e", "f", "g", "h", "i", "j", "k", "l", "m", "n", "o", "p", "q", "r", "s", "t", "u", "v", "w", "x", "y", "z"} for x, i in ipairs(T) do if tostring(i) == tostring(letra) then return x end end end Exemplo de print: É isso até mais. Créditos: Eu Vodkart( arrumou a talk e uma parte da função ) Exemplo de uso:

Quem tem dor no pancreas tbm n pod

Bv's não podem fazer

LOL if doCreatureSetDropLoot(cid, false) then wtf???????????? ussase com storage e checava quando ele morre lol <talkaction words="!loot" event="script" value="loot.lua"/> /data/creaturescripts/scripts antiDrop coloque isso dentro: <event type="death" name="noDrop" script="antiDrop.lua"/> login.lua registerCreatureEvent(cid, "noDrop") creaturescripts.xml

/data/creaturescripts/scripts crie um arquivo e adicione isso dentro: function onLogin(cid) local pos = { x = 123, y = 123, z = 7} if getCreatureName(cid) == "Account Manager" then doTeleportThing(cid, pos) end return true end creaturescripts.xml <event type="login" name="tpAcc" event="script" value="nome_do_script.lua"/> login.lua registerCreatureEvent(cid, "tpAcc")

Olá galerinha do tibia king, vim trazer um script de level recover primeiramente vá em /data/talkactions/scripts crie um arquivo chamado createRecover.lua e adicione isso dentro agora crie outro chamado recover.lua e adicione isso dentro Talkactions.xml <talkaction words="!createrecover" access="0" event="script" value="createRecover.lua"/> <talkaction words="!recover" access="0" event="script" value="recover.lua"/> agora em /data/creaturescripts/scripts crie um arquivo chamado loginRecover.lua e adicione isso dentro <event type="login" name="recoverLogin" event="script" value="recoverLogin.lua"/> <event type="login" name="loginRecover" event="script" value="loginRecover.lua"/> <event type="death" name="recoverDeath" event="script" value="recoverDeath.lua"/> agora em login.lua registerCreatureEvent(cid, "recoverLogin") registerCreatureEvent(cid, "loginRecover") registerCreatureEvent(cid, "recoverDeath") agora antes do ultimo return true if getPlayerStorageValue(cid, 12347) == -1 then setPlayerStorageValue(cid, 12347, 0) end então é isso pessoal espero que aproveitem se não funcionar avise no tópico Como Usar? bom você fala !createrecover ai se você morrer você podera recuperar seu level perdido falando !recover PS: Se você morrer 2 x com o comando você não podera mais recuperar agora crie outro chamado recoverLogin.lua e adicione isso dentro agora crie outro chamado deathRecover.lua e adicione isso dentro creaturescripts.xml

Olha, encontrei 1 e fiz outro toma ai o que eu encontrei testei e funciona local i = { ["20:14"] = {nome = "The Demon Invasion", pos = {x=32369, y=32167, z=7}, monster = {"50 Demon", "1 The Imperor"}}, ["14:35"] = {nome = "The Massive Dragon Invasion", pos = {x=32368, y=32188, z=8}, monster = {"200 Dragon"}}, } function onThink(interval, lastExecution) hours = tostring(os.date("%X")):sub(1, 5) tb = i[hours] if tb then doBroadcastMessage(hours .. " - " .. tb.nome .. " iníciou.") for _,x in pairs(tb.monster) do for s = 1, tonumber(x:match("%d+")) do doSummonCreature(x:match("%s(.+)"), tb.pos) end end end return true end tag globalevents.xml <globalevent name="invasion" interval="60" event="script" value="invasion.lua"/> agora oque eu fiz é simples porem funciona function onThink(interval, lastExecution) local table = { {"Demon", {x = 164, y = 312, z = 7}}, {"Demon", {x = 164, y = 312, z = 7}}, {"Demon", {x = 164, y = 312, z = 7}} } for i = 1, #table do doSummonCreature(table[i][1], table[i][2]) end return true end

function onSay(cid, words, param) local pos = getPlayerPosition(cid) local table_pos = { {x = pos.x + 1, y = pos.y, z = pos.z}, {x = pos.x - 1, y = pos.y, z = pos.z}, {x = pos.x, y = pos.y + 1, z = pos.z}, {x = pos.x, y = pos.y - 1, z = pos.z}, {x = pos.x + 1, y = pos.y + 1, z = pos.z}, {x = pos.x - 1, y = pos.y - 1, z = pos.z}, {x = pos.x + 1, y = pos.y - 1, z = pos.z}, {x = pos.x - 1, y = pos.y + 1, z = pos.z} } for i = 1, #table_pos do doSendMagicEffect(table_pos[i], math.random(28, 30)) end if getPlayerLevel(cid) >= 50 and getPlayerTown(cid) ~= 1 then doPlayerSendTextMessage(cid, 27, "Agora você foi para a cidade " .. getTownName(1) .. ".") doTeleportThing(cid, getTownTemplePosition(1), true) doPlayerSetTown(cid, 1) else doPlayerSendTextMessage(cid, 28, getPlayerLevel(cid) < 50 and "Você precisa ser level maior que 50 para mudar de cidade." or getPlayerTown(cid) == 1 and "Você já está na cidade de " .. getTownName(1) .. ".") end return true end

Desculpe, erro meu esqueci de uma virgula copie denovo

Ué só mudar if is Summon(cid) then por if isSummon(cid) then

Parabéns ao TK! senãofoceeuotknãoserianada

/\ Está errado ai são os multiplicadores do skill quanto mais alto ai mais ira hitar para almentar o maximo de skill creio que é somente nas sources

Cantada infalivel Você: Oi Éla: Oi Você: Sabia que seus ólhos são da cor da minha BMW. Éla: Na sua casa ou na minha? outra infalivel Você: Sabia que eu sou expert em programação .lua Éla: Vamos fazer 1 sex system?

/data/talkactions/scripts cria um arquivo renomeia para blocking com a extensão .lua e adicione isso dentro: talkactions.xml <talkaction log="yes" access="5" words="!block" event="script" value="blocking.lua"/> coloquei somente para god usar se quiser muda, coloque outro acess access="5" nessa parte

Recomendo este bem confiavel http://otservprodutos.webnode.com/

@ UP ! Bom para o tópico PS:Testado e agora está 100%

Nem a pal tudo bugado saspora mano não compra

/data/weapons/ weapons.xml <wand id="xxx" level="50" mana="13" min="0" max="0" type="earth" event="script" value="wand1.lua"> <!-- wand of effects --> <vocation id="1"/> <vocation id="2"/> <vocation id="5"/> <vocation id="6"/> /data/weapons/scripts cria 1 arquivo chamado wand1.lua e adiciona isso dentro: function onUseWeapon(cid, var) min, max = 300, 300 -- dano minimo e maximo local sh = 12 -- efeito distance local efe = 12 -- efeito no player local dmg = COMBAT_HOLYDAMAGE target = getCreatureTarget(cid) if target ~= 0 then if isPlayer(target) then doSendDistanceShoot(getThingPos(cid), getThingPos(target), sh) addEvent(doAreaCombatHealth, 100, cid, dmg, getThingPos(target), 0, -min, -max, efe) elseif isMonster(target) then doSendDistanceShoot(getThingPos(cid), getThingPos(target), sh) addEvent(doAreaCombatHealth, 100, cid, dmg, getThingPos(target), 0, -min, -max, efe) end end return true end

/data/creaturescripts/scripts creaturescripts.xml <event type="statschange" name="notGuildAttack" event="script" value="nome_do_script.lua"/> login.lua registerCreatureEvent(cid, "notGuildAttack")

Uma hunt de Grim Ripa andares: 2 detalhes: 8

Somente use à função getPlayerPremiumDays(cid) ficando assim

Formulario: Nome:João Nick:Para que isso? Idade:12 Cargo:Scripter Tempo no Cargo:4 mês Tempo Online:de 6 a 10 horas por dia MSN:joao_nome do fórum [email protected] Skype: (Se não tiver não precisa preencher)

doPlayerSetMaxCapacity(cid, cap) Função para setar a capacidade do player ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ para mandar mensagem desculpe mais só consegui fazer por broadCast :S va em /data/creaturescripts/scripts crie um arquivo chamado deathGuildBroad.lua e adicione isso dentro: function onPrepareDeath(cid, deathList) if getPlayerGuildId(cid) ~= 0 then if isPlayer(cid) and isPlayer(deathList[1]) then doBroadcastMessage("Info Death:O Player ".. getCreatureName(deathList[1]) .. " da guild ".. getPlayerGuildName(deathList[1]) .." acaba de matar o player ".. getCreatureName(cid) .. " da guild " .. getPlayerGuildName(cid) .. ".", 25) else doBroadcastMessage("Info Death:O Player ".. getCreatureName(deathList[1]) .. " acaba de matar o player ".. getCreatureName(cid) .. ".", 25) end end return true end creaturescripts.xml <event type="PrepareDeath" name="guildBroad" script="deathGuildBroad.lua"/> login.lua registerCreatureEvent(cid, "guildBroad") irei estudar mais a função para ver se consigo faze até.

Chaos, faça isso também ai você perdera o BV beijando a rua

An?que sign? não sei fazer sign