Oneshot

Isso é uma talkaction ou uma action, colega?

Aliás, Mr. Sabedoria, 00 é igual a 1. E lá se vai sua teoria de garoto de 8º série de descobrir o resultado de 0 dividido por 0. 0³/0³ = 0³-³ = 00 = 1 Pitágoras e toda a matemática manda abraços.

O erro está na falta de um parênteses que esqueci de fechar. function onSay(cid, words, param) if not isInArray({1, 2, 5, 6}, getPlayerVocation(cid)) then doPlayerSendCancel(cid, "Desculpe, apenas Mages podem usar esse item.") doSendMagicEffect(fromPosition, CONST_ME_POFF) return true end if not doPlayerRemoveItem(cid, 8201, 1) then doPlayerSendCancel(cid, "Desculpe, você não possui mais ".. getItemNameById(8302)) doSendMagicEffect(fromPosition, CONST_ME_POFF) return true end if getCreatureMaxMana(cid) > 1807735400 then doPlayerSendCancel(cid, "Desculpe, você já atingiu o máximo de pontos de mana.") doSendMagicEffect(fromPosition, CONST_ME_POFF) return true end setCreatureMaxMana(cid, getCreatureMaxMana(cid) + 500) doSendMagicEffect(getPlayerPosition(cid), 12) doSendAnimatedText(getPlayerPosition(cid), "+500 Mana!", TEXTCOLOR_BLUE) return true end

Sério, eu até suporto a desorganização dessa área, o monte de pedidos repetidos e entre outros. Mas o que eu não suporto é a falsa moderação, são usuários como você, que fazem questão de postar um aviso, para apenas ganhar posts. Não ligo que você queira fazer sua parte na organização do fórum, mas se algo está errado, clique no botão Denuncie, envie o seu aviso a moderação e pare de ficar postando eles nos tópicos, porque você não está ajudando desse jeito. Um grande abraço.

Sobre o problema do Diogo passado anteriormente: A única solução para o problema acima é 2, por causa do Teorema de Pitágoras que todos (acho eu) aprenderam em meados da quinta série. "O quadrado da hipotenusa é igual à soma dos quadrados dos catetos" O Teorema de Pitágoras é meio que uma consequência da aplicação de semelhança de triângulos, da aplicação daquelas relações métricas. a² = c . m b² = c . n Somando as duas equações, temos: a² + b² = c . m + c . n a² + b² = c . (m + n) c = m + n a² + b² = c . c => a² . b² = c² Assim como o triângulo retângulo de lados 3, 4 e 5, é chamado de triângulo pitagórico, porque além de respeitar o teorema, os lados são consecutivos. Ele aparece muito na Fuvest. Não sei, acho que é isso '-'

Sim, Isso é uma talkaction ou uma action? No caso eu arrumei todo o script dos dois jeitos. function onSay(cid, words, param) if not isInArray({1, 2, 5, 6}, getPlayerVocation(cid) then doPlayerSendCancel(cid, "Desculpe, apenas Mages podem usar esse item.") doSendMagicEffect(fromPosition, CONST_ME_POFF) return true end if not doPlayerRemoveItem(cid, 8201, 1) then doPlayerSendCancel(cid, "Desculpe, você não possui mais ".. getItemNameById(8302)) doSendMagicEffect(fromPosition, CONST_ME_POFF) return true end if getCreatureMaxMana(cid) > 1807735400 then doPlayerSendCancel(cid, "Desculpe, você já atingiu o máximo de pontos de mana.") doSendMagicEffect(fromPosition, CONST_ME_POFF) return true end setCreatureMaxMana(cid, getCreatureMaxMana(cid) + 500) doSendMagicEffect(getPlayerPosition(cid), 12) doSendAnimatedText(getPlayerPosition(cid), "+500 Mana!", TEXTCOLOR_BLUE) return true end

local ip = "127.0.0.1" local players = {1, 2, 3, 4} function onLogin(cid) if doConvertIntegerToIp(getPlayerIp(cid)) ~= ip and isInArray(getPlayerGUID(cid)) then return false end return true end

Tente assim local config = { loginMessage = getConfigValue('loginMessage'), useFragHandler = getBooleanFromString(getConfigValue('useFragHandler')) } function onLogin(cid) doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, 0) doPlayerSetLossPercent(cid, PLAYERLOSS_MANA, 0) doPlayerSetLossPercent(cid, PLAYERLOSS_SKILLS, 0) local accountManager = getPlayerAccountManager(cid) if(accountManager == MANAGER_NONE) then local lastLogin, str = getPlayerLastLoginSaved(cid), config.loginMessage if(lastLogin > 0) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str) str = "Your last visit was on " .. os.date("%a %b %d %X %Y", lastLogin) .. "." else str = str .. " Please choose your outfit." doPlayerSendOutfitWindow(cid) end doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str) elseif(accountManager == MANAGER_NAMELOCK) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, it appears that your character has been namelocked, what would you like as your new name?") elseif(accountManager == MANAGER_ACCOUNT) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to manage your account and if you want to start over then type 'cancel'.") else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to create an account or type 'recover' to recover an account.") end if(not isPlayerGhost(cid)) then doSendMagicEffect(getCreaturePosition(cid), CONST_ME_TELEPORT) end registerCreatureEvent(cid, "kill") registerCreatureEvent(cid, "onPrepareDeath") registerCreatureEvent(cid, "PlayerLogout") registerCreatureEvent(cid, "Slot") registerCreatureEvent(cid, "zombieevent") registerCreatureEvent(cid, "onPrepareDeath") registerCreatureEvent(cid, "deathBroadcast") registerCreatureEvent(cid, "DeathBroadcast") registerCreatureEvent(cid, "Idle") if(config.useFragHandler) then registerCreatureEvent(cid, "SkullCheck") end registerCreatureEvent(cid, "ReportBug") registerCreatureEvent(cid, "onkill2") registerCreatureEvent(cid, "DeathC") registerCreatureEvent(cid, "ProtectLevel") registerCreatureEvent(cid, "WarLoss") registerCreatureEvent(cid, "Ranking") registerCreatureEvent(cid, "Hitmsg") registerCreatureEvent(cid, "Slot") return true end

local keywordHandler = KeywordHandler:new() local npcHandler = NpcHandler:new(keywordHandler) NpcSystem.parseParameters(npcHandler) local talkState = {} local position = {x=936, y=1093, z=10} -- Posição que o jogador será teleportado. local itemId = 11328 -- ID do item que será removido do jogador. local chance = 75 -- Porcentagem de sucesso function onCreatureAppear(cid) npcHandler:onCreatureAppear(cid) end function onCreatureDisappear(cid) npcHandler:onCreatureDisappear(cid) end function onCreatureSay(cid, type, msg) npcHandler:onCreatureSay(cid, type, msg) end function onThink() npcHandler:onThink() end function onCreatureSayCallback(cid, type, msg) if(not npcHandler:isFocused(cid)) then return false end if msgcontains(msg, "Marte") then selfSay("Basta agora você me dar uma {"..getItemNameById(itemId).."} e mais 1000 gps que eu te levarei.", cid) talkState[cid] = 0 elseif msgcontains(msg, 'mandibulas') then chance = (tonumber(chance) and tonumber(chance) * 100 or 100000) if doPlayerRemoveItem(cid, itemId, 1) then if chance > math.random(1, 100000) then doTeleportThing(cid, position) else selfSay("Desculpe, mas {".. getItemNameById(itemId) .."} quebrou no processo.", cid) end else selfSay("É necessário uma {"..getItemNameById(itemId).."} pra que eu possa abrir o teleporte.", cid) end end return true end npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, onCreatureSayCallback) npcHandler:addModule(FocusModule:new())

No caso o tópico está pedindo um script e não levantando uma discussão sobre conexão de internet e seus tipos. Bom, existe um modo que "barra" o login nos personagens, mas não na conta. local ip = "127.0.0.1" local accountId = "god" function onLogin(cid) if doConvertIntegerToIp(getPlayerIp(cid)) ~= ip and getPlayerAccount(cid) == accountId then return false end return true end <event type="login" name="accProtection" event="script" value="nome_do_arquivo.lua"/>

Desculpe, não sou o Vodkart, mas creio que posso te ajudar. Abra o arquivo login.lua em data/creaturescripts/scripts, procure por isso: local loss = getConfigValue('deathLostPercent') if(loss ~= nil) then doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, loss * 10) end Apague, substituindo por isso: doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, 0) doPlayerSetLossPercent(cid, PLAYERLOSS_MANA, 0) doPlayerSetLossPercent(cid, PLAYERLOSS_SKILLS, 0)

Eu fiz para o criador do tópico, ele quis apenas para uma vocação, então o fiz assim. Abraços.

TFS 0.2 ou TFS 0.3.6 <globalevent name = "teamBattleStart" interval="3600" event="script"> TFS 0.4 <globalevent name = "teamBattleStart" interval="3600000" event="script"> Teste.

Para o NPC local keywordHandler = KeywordHandler:new() local npcHandler = NpcHandler:new(keywordHandler) NpcSystem.parseParameters(npcHandler) local talkState = {} local NPC_NEED_ITEMS = {{9971, 1}} -- Itens, caso o modo de promotion seja "items" local NPC_NEED_LEVEL = 200 local NPC_NEED_PROMOTION = 1 function onCreatureAppear(cid) npcHandler:onCreatureAppear(cid) end function onCreatureDisappear(cid) npcHandler:onCreatureDisappear(cid) end function onCreatureSay(cid, type, msg) npcHandler:onCreatureSay(cid, type, msg) end function onThink() npcHandler:onThink() end local function ordinalprefix(n) local ordinal = {[1] = "st", [2] = "nd", [3] = "rd"} return n .. (ordinal[n] or "th") end function onCreatureSayCallback(cid, type, msg) if(not npcHandler:isFocused(cid)) then return false end local talkUser = NPCHANDLER_CONVBEHAVIOR == CONVERSATION_DEFAULT and 0 or cid if msgcontains(msg, "promotion") then if getPlayerLevel(cid) < NPC_NEED_LEVEL then selfSay("Sorry, but you need level ".. NPC_NEED_LEVEL .." to be promoted.", cid) return end if getPlayerPromotionLevel(cid) ~= NPC_NEED_PROMOTION then selfSay("Sorry, but you need to have {".. ordinalprefix(NPC_NEED_PROMOTION) .."} promotion.", cid) return end local say = "So do you want to be promoted, heh? I need" for n = 1, #NPC_NEED_ITEMS do local sep = (n == 1 and " " or (n == #NPC_NEED_ITEMS and " and " or ", ")) say = say .. sep .. math.max(1, NPC_NEED_ITEMS[n][2]) .." ".. getItemNameById(NPC_NEED_ITEMS[n][1]) end selfSay(say, cid) talkSate[talkUser] = 1 end if talkState[talkUser] == 1 then if msgcontains(msg, "yes") then local ret = {} for _, item in ipairs(NPC_NEED_ITEMS) do local g = getPlayerItemById(cid, true, item[1]) if g.uid > 0 and math.max(1, g.type) > item[2] then table.insert(ret, {g.uid, item[2]}) else ret = {} break end end if #ret > 0 then for _, item in ipairs(ret) do doRemoveItem(item[1], item[2]) end selfSay("May the Gods bless you. You are now promoted.", cid) doPlayerSetPromotionLevel(cid, getPlayerPromotionLevel(cid) + 1) else selfSay("You do not have all the items I need", cid) npcHandler:releaseFocus(cid) end elseif msgcontains(msg, "no") then selfSay("Alright.") npcHandler:releaseFocus(cid) end end return true end npcHandler:setMessage(MESSAGE_GREET, "Hello, |PLAYERNAME|. Do you want the {promotion}?") npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, onCreatureSayCallback) npcHandler:setCallback(CALLBACK_GREET, onGreetCallback) npcHandler:addModule(FocusModule:new()) Para que o NPC apareça e suma globalevents/scripts/nome_do_arquivo.lua local npc_name = "The Promotion King" local npc_position = {x = 160, y = 54, z = 7} function onThink(interval) local NPC = doCreateNpc(npc_name, position) addEvent(doRemoveCreature, 60 * 60 * 1000, NPC) return true end globalevents.xml <globalevent name="promotionnpc" time="00:00:00" event="script" value="save.lua"/> Não esqueça de configurar os itens aqui: local NPC_NEED_ITEMS = {{9971, 1}} local NPC_NEED_ITEMS = {{ITEM1, COUNT1}, {ITEM2, COUNT2}, {ITEM3, COUNT3}, ..., {ITEM999, COUNT999}} Abraços.

Primeiramente, obrigado pela contribuição, continue a estudar a linguagem Lua e melhorar seus scripts. Mas, sinceramente, você não fez nada aí, simplesmente se utilizou de um "bug", ou melhor, de uma verificação interna dos servidores relacionado ao sistema de promotion. Quando você configura duas vocações X e Y, onde o fromvoc de Y é X e usa a função doPlayerSetVocation(cid, Y), ao sair do jogo, o sistema verifica outra variável do jogador, o promotionLevel, se esse é menor que o necessário para ser a vocação Y, então ele automaticamente retorna a vocação para X. Para exemplificar melhor, tomaremos como exemplo, Sorcerer e Master Sorcerer <vocation id="1" name="Sorcerer" description="a sorcerer" needpremium="0" gaincap="10" gainhp="5" gainmana="30" gainhpticks="12" gainhpamount="1" gainmanaticks="3" gainmanaamount="2" manamultiplier="1.1" attackspeed="2000" soulmax="100" gainsoulticks="120" fromvoc="1"> <formula meleeDamage="1.0" distDamage="1.0" wandDamage="1.0" magDamage="1.0" magHealingDamage="1.0" defense="1.0" magDefense="1.0" armor="1.0"/> <skill fist="1.5" club="2.0" sword="2.0" axe="2.0" distance="2.0" shielding="1.5" fishing="1.1" experience="1.0"/> </vocation> <vocation id="5" name="Master Sorcerer" description="a master sorcerer" needpremium="1" gaincap="10" gainhp="5" gainmana="30" gainhpticks="12" gainhpamount="1" gainmanaticks="2" gainmanaamount="2" manamultiplier="1.1" attackspeed="2000" soulmax="200" gainsoulticks="15" fromvoc="1" lessloss="30"> <formula meleeDamage="1.0" distDamage="1.0" wandDamage="1.0" magDamage="1.0" magHealingDamage="1.0" defense="1.0" magDefense="1.0" armor="1.0"/> <skill fist="1.5" club="2.0" sword="2.0" axe="2.0" distance="2.0" shielding="1.5" fishing="1.1" experience="1.0"/> </vocation> Veja, como dito anteriormente, o fromvoc da vocação Master Sorcerer (ID 5) é o Sorcerer (ID 1). Ao, equivocadamente, usar a função doPlayerSetVocation(cid, 5) sem usar antes doPlayerSetPromotionLevel(cid, 1), você está "bugando" o sistema, fazendo com que a vocação não seja permanente. Mas, mesmo assim, belo artifício usado. Abraços.

Fiz um aqui. local keywordHandler = KeywordHandler:new() local npcHandler = NpcHandler:new(keywordHandler) NpcSystem.parseParameters(npcHandler) local talkState = {} local NPC_PROMOTION_MODE = "items" -- "money" or "items" local NPC_NEED_VOCATION = 4 -- Vocação necessária local NPC_NEED_LEVEL = 200 -- Level necessário local NPC_NEED_PROMOTION = 0 -- Promotion necessária local NPC_PROMOTION_MONEY = 10000 -- Dinheiro (Todos os tipos: Crystal coins, Platinum Coins e Gold coins) local NPC_PROMOTION_ITEMS = {{9971, 1}} -- Itens, caso o modo de promotion seja "items" function onCreatureAppear(cid) npcHandler:onCreatureAppear(cid) end function onCreatureDisappear(cid) npcHandler:onCreatureDisappear(cid) end function onCreatureSay(cid, type, msg) npcHandler:onCreatureSay(cid, type, msg) end function onThink() npcHandler:onThink() end function onGreetCallback(cid) local talkUser = NPCHANDLER_CONVBEHAVIOR == CONVERSATION_DEFAULT and 0 or cid if getPlayerVocation(cid) == NPC_NEED_VOCATION and getPlayerLevel(cid) >= NPC_NEED_LEVEL and getPlayerPromotionLevel(cid) == NPC_NEED_PROMOTION then npcHandler:setMessage(MESSAGE_GREET, "Hello, |PLAYERNAME|. Do you want the {promotion}?") talkState[talkUser] = 1 return true end if getPlayerVocation(cid) ~= NPC_NEED_VOCATION then selfSay("I do not want to talk with you", cid) return false elseif getPlayerLevel(cid) < NPC_NEED_LEVEL or getPlayerPromotionLevel(cid) < NPC_NEED_PROMOTION then selfSay("Sorry, you are not strong enough.", cid) return false elseif getPlayerPromotionLevel(cid) > NPC_NEED_PROMOTION then selfSay("Sorry, but you are already promoted.", cid) return false end npcHandler:setMessage(MESSAGE_GREET, "Do you want the {promotion}, |PLAYERNAME|?", cid) return true end function onCreatureSayCallback(cid, type, msg) if(not npcHandler:isFocused(cid)) then return false end local talkUser = NPCHANDLER_CONVBEHAVIOR == CONVERSATION_DEFAULT and 0 or cid if talkState[talkUser] == 1 then if msgcontains(msg, "promotion") then if NPC_PROMOTION_MODE == "money" then selfSay("So do you want to be promoted, heh? I need ".. NPC_PROMOTION_MONEY .." gold pieces to promote you. Agreed?", cid) talkState[talkUser] = 2 else local say = "So do you want to be promoted, heh? I need" for n = 1, #NPC_PROMOTION_ITEMS do local sep = (n == 1 and " " or (n == #NPC_PROMOTION_ITEMS and " and " or ", ")) say = say .. sep .. math.max(1, NPC_PROMOTION_ITEMS[n][2]) .." ".. getItemNameById(NPC_PROMOTION_ITEMS[n][1]) end selfSay(say, cid) talkSate[talkUser] = 3 end end elseif talkState[talkUser] == 2 then if msgcontains(msg, "yes") then if doPlayerRemoveMoney(cid, NPC_PROMOTION_MONEY) then selfSay("May the Gods bless you. You are now promoted.", cid) doPlayerSetPromotionLevel(cid, getPlayerPromotionLevel(cid) + 1) else selfSay("You do not have all the money I need.", cid) npcHandler:releaseFocus(cid) end elseif msgcontains(msg, "no") then selfSay("Alright.") npcHandler:releaseFocus(cid) end elseif talkState[talkUser] == 3 then if msgcontains(msg, "yes") then local ret = {} for _, item in ipairs(NPC_PROMOTION_ITEMS) do local g = getPlayerItemById(cid, true, item[1]) if g.uid > 0 and math.max(1, g.type) > item[2] then table.insert(ret, {g.uid, item[2]}) else ret = {} break end end if #ret > 0 then for _, item in ipairs(ret) do doRemoveItem(item[1], item[2]) end selfSay("May the Gods bless you. You are now promoted.", cid) doPlayerSetPromotionLevel(cid, getPlayerPromotionLevel(cid) + 1) else selfSay("You do not have all the items I need", cid) npcHandler:releaseFocus(cid) end elseif msgcontains(msg, "no") then selfSay("Alright.") npcHandler:releaseFocus(cid) end end return true end npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, onCreatureSayCallback) npcHandler:setCallback(CALLBACK_GREET, onGreetCallback) npcHandler:addModule(FocusModule:new()) Só mudar a vocação necessária nessa linha: NPC_NEED_VOCATION = 4

Se não me engano, eu coloquei para que o comando /biohazard close só fosse executado se fossem contados mais de dois jogadores. E o sistema não conta GODs no evento, mesmo que eles entrem pelo portal, eles não irão ser contados, por isso você não consegue iniciar o evento com o comando. Mesmo assim, estou adicionando várias coisas sugeridas no tópico e logo, logo uma nova versão sairá.

É, infelizmente. O máximo que você pode fazer é uma gambiarra desse tipo. function onSay(cid, words, param, channel) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "É proibido a divulgação de outros servidores.") return true end <talkaction words="pokeice.servegame.com;pokedigimon.no-ip.org" event="script" value="nome_do_arquivo.lua"/>

A maioria dos sistemas de anti-divulgação existentes são feitos nas sources, e aposto que você provavelmente não as tem, por ser poketibia. Ps: Sistema é com I e não com Y

local config = { [2153] = { [CONDITION_ATTRIBUTES] = { [CONDITION_PARAM_STAT_MAXHEALTH] = 150, [CONDITION_PARAM_SUBID] = 10 } }, [2154] = { [CONDITION_ATTRIBUTES] = { [CONDITION_PARAM_STAT_MAXMANA] = 150, [CONDITION_PARAM_SUBID] = 20 } }, [2155] = { [CONDITION_ATTRIBUTES] = { [CONDITION_PARAM_SKILL_MELEE] = 3, [CONDITION_PARAM_SKILL_DISTANCE] = 3, [CONDITION_PARAM_SUBID] = 30 } }, [2156] = { [CONDITION_ATTRIBUTES] = { [CONDITION_PARAM_STAT_MAGICLEVEL] = 2, [CONDITION_PARAM_SUBID] = 40 } } } local tmp = {} for itemid, conditions in pairs(config) do tmp[itemid] = {} for i = 1, 3 do for condition, parameters in pairs(conditions) do local obj = createConditionObject(condition) setConditionParam(obj, CONDITION_PARAM_TICKS, -1) for parameter, value in pairs(parameters) do setConditionParam(obj, parameter, value) end setConditionParam(obj, CONDITION_PARAM_SUBID, config[itemid][condition][CONDITION_PARAM_SUBID] + i) setConditionParam(obj, CONDITION_PARAM_BUFF, true) tmp[itemid][i] = obj end end end local storage = 30001 function onUse(cid, item, fromPosition, itemEx, toPosition) local status = getCreatureStorage(cid, storage) if status < 0 then doCreatureSetStorage(cid, storage, 0) end if item.itemid == 2158 then doRemoveConditions(cid, false) doCreatureSetStorage(cid, storage, 0) doSendMagicEffect(fromPosition, CONST_ME_MAGIC_BLUE) return true end if not tmp[item.itemid] then doPlayerSendDefaultCancel(cid, RETURNVALUE_NOTPOSSIBLE) return true end if status == 3 then doPlayerSendCancel(cid, "You cannot use support runes anymore.") return true end doAddCondition(cid, tmp[item.itemid][status + 1]) doCreatureSetStorage(cid, storage, status + 1) doRemoveItem(item.uid, 1) return true end

LuckOake, para que um for com pairs percorrendo toda uma tabela, se você pode simplesmente acessar diretamente o index que você quer? Veja abaixo: local efeitos = { [62] = 75, [63] = 75, [72] = 75, [73] = 75, [74] = 75, [75] = 75, [76] = 75, [77] = 75, [79] = 75, [80] = 75, [78] = 13, [81] = 13 } function castEffect(cid, effect) if isCreature(cid) then doSendMagicEffect(getThingPosition(cid), effect) addEvent(castEffect, 1 * 1000, cid, effect) end end function onLogin(cid) if not efeitos[getPlayerVocation(cid)] then return true end castEffect(cid, efeitos[getPlayerVocation(cid)]) return true end

Nome: Fire Aura Autor: Oneshot Tipo: Magia Faz tempo que eu não faço magias, então eu resolvi escrever qualquer coisa e deu nisso, uma aura que fica circundando o jogador por X tempo causando dano. Crie um arquivo chamado fire aura.lua, e coloque o conteúdo abaixo: local offsets = { [0] = {{0, 0}, {1, 0}, {1, 1}, {1, 2}, {0, 2}, {-1, 2}, {-1, 1}, {-1, 0}}, [1] = {{0, 0}, {0, 1}, {-1, 1}, {-2, 1}, {-2, 0}, {-2, -1}, {-1, -1}, {0, -1}}, [2] = {{0, 0}, {-1, 0}, {-1, -1}, {-1, -2}, {0, -2}, {1, -2}, {1, -1}, {1, 0}}, [3] = {{0, 0}, {0, -1}, {1, -1}, {2, -1}, {2, 0}, {2, 1}, {1, 1}, {0, 1}} } local storage = 88888 local k = 1 local duration = 30 local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_FIREDAMAGE) setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_FIREATTACK) setCombatFormula(combat, COMBAT_FORMULA_LEVELMAGIC, -1, -10, -1, -20, 10, 10, 2.4, 2.4) function onCastAura(cid, lastDirection) local position = getPositionByDirection(getThingPosition(cid), lastDirection, 1) local offset = offsets[lastDirection][(k > #offsets[lastDirection] and ((k % #offsets[lastDirection]) == 0 and #offsets[lastDirection] or (k % #offsets[lastDirection])) or k)] local tmp = {x = position.x + offset[1], y = position.y + offset[2], z = position.z} doCombat(cid, combat, positionToVariant(tmp)) doCreatureSetLookDirection(cid, lastDirection) if os.time() < getCreatureStorage(cid, storage) then addEvent(onCastAura, 100, cid, getCreatureLookDirection(cid)) else doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, "Aura effect ended.") mayNotMove(cid, false) end k = k + 1 end function onCastSpell(cid, var) doCreatureSetStorage(cid, storage, os.time() + duration) mayNotMove(cid, true) onCastAura(cid, getCreatureLookDirection(cid)) return true end No spells.xml, adicione uma linha: <instant name="Fire Aura" words="fire aura" lvl="100" mana="550" needlearn="0" event="script" value="fire aura.lua"/> A magia tem uma duração de 30 segundos, porém essa duração é configurável. Como ainda não criei uma lógica relacionando o movimento do jogador com a aura, então resolvi travar o movimento do jogador enquanto a magia é executada. Abaixo a demonstração em GIF dela. O script está bem pogado, talvez eu consiga entender melhor o padrão e melhorar a construção do código. Mude aqui efeito e tipo de dano se quiser, para criar outras auras: local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_FIREDAMAGE) setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_FIREATTACK) setCombatFormula(combat, COMBAT_FORMULA_LEVELMAGIC, -1, -10, -1, -20, 10, 10, 2.4, 2.4) Abraços.

local i = { ["12:00"] = {nome = "Vip Coin Meio Dia", pos = {x=10159, y=10059, z=7}, monster = {"1 vip coin", "50 Fire Devil", "4 lord vampire"}}, ["00:00"] = {nome = "vip coin da meia noite", pos = {x=10159, y=1059, z=7}, monster = {"1 vip coin"}}, ["06:00"] = {nome = "Vip Coin da manha", pos = {x=10159, y=10059, z=7}, monster = {"1 vip coin", "50 Fire Devil", "4 lord vampire"}}, } function onThink(interval, lastExecution) hours = tostring(os.date("%X")):sub(1, 5) tb = i[hours] if tb then doBroadcastMessage(hours .. " - " .. tb.nome .. " Iníciou.") doBroadcastMessage(hours .. " - " .. tb.nome .. " está rolando venham templo!") for _,x in pairs(tb.monster) do for s = 1, tonumber(x:match("%d+")) do doSummonCreature(x:match("%s(.+)"), tb.pos) end end doBroadcastMessage("No-PVP ativado para o evento.") setWorldType(1) addEvent(setWorldType, 2 * 60 * 1000, 2) end return true end

Bela iniciativa. Acho que o nome do tutorial devia ser "Função - O que é ela e como usar?", pois o que você chama de libs é só um artificio de salvar suas funções em um arquivo .lua dentro da pasta data/lib para tornar o uso dessa, global. Você poderia também detalhar mais a construção de uma função, como, por exemplo, dizer: function doPlayerSendMsg(cid, msg) É um açúcar-de-sintaxe, syntax sugar, em outras palavras, algo que facilita a construção do código e deixa a leitura deste mais agradável aos olhos. Segundo o Manual de Referência, essa é a definição de uma função: doPlayerSendMsg = function(cid, msg) end Não curto muito o estilo corrido dos seus tutoriais, mas mesmo assim, está bem detalhado para os iniciantes no estudo da linguagem. Mas não deixe de detalhar mais o retorno de valores nas funções e a chamada delas em scripts. Abraços.