Ir para conteúdo

Bodak Reborn

Membro
  • Registro em

  • Última visita

Tudo que Bodak Reborn postou

  1. Bodak Reborn postou uma resposta no tópico em Suporte Tibia OTServer
    Tu tem que dar um ovo pro NPC? Tu fala o nome do ovo pra ele e ele remove, é isso?
  2. Bodak Reborn postou uma resposta no tópico em Suporte Tibia OTServer
    local tb = tables[item.itemid] A variável "item" não existe nesta função, não entendi o que você quis fazer. Se tu me explicar, posso tentar ajudar.
  3. local voc = {1, 2, 3, 4, 5, 6, 7, 8} arr = { {0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0, 0}, {0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0}, {0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0}, {0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0}, {0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0}, {1, 1, 1, 1, 1, 1, 3, 1, 1, 1, 1, 1, 1}, {0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0}, {0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0}, {0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0}, {0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0}, {0, 0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0}, } local area = createCombatArea(arr) local combat = createCombatObject() setCombatArea(combat, area) function onTargetTile(cid, pos) local creatureTable = {} local n, i = getTileInfo({x=pos.x, y=pos.y, z=pos.z}).creatures, 1 if n ~= 0 then local v = getThingfromPos({x=pos.x, y=pos.y, z=pos.z, stackpos=i}).uid while v ~= 0 do if isCreature(v) == true then table.insert(creatureTable, v) if n == #creatureTable then break end end i = i + 1 v = getThingfromPos({x=pos.x, y=pos.y, z=pos.z, stackpos=i}).uid end end if #creatureTable ~= nil and #creatureTable > 0 then for r = 1, #creatureTable do if creatureTable[r] ~= cid then local min = 30000 local max = 30000 if isPlayer(creatureTable[r]) == true and isInArray(voc, getPlayerVocation(creatureTable[r])) == true then doTargetCombatHealth(cid, creatureTable[r], COMBAT_ENERGYDAMAGE, -min, -max, CONST_ME_NONE) elseif isMonster(creatureTable[r]) == true then doTargetCombatHealth(cid, creatureTable[r], COMBAT_ENERGYDAMAGE, -min, -max, CONST_ME_NONE) end end end end doSendMagicEffect(pos, CONST_ME_PURPLEENERGY) return true end setCombatCallback(combat, CALLBACK_PARAM_TARGETTILE, "onTargetTile") local function delayedCastSpell(cid) if isCreature(cid) == true then doCombat(cid, combat, positionToVariant(getCreaturePosition(cid))) doCreatureSay(cid, "Gaz'haragoth calls down: DEATH AND DOOM!", TALKTYPE_ORANGE_2) end end function onCastSpell(cid, var) doCreatureSay(cid, "Gaz'haragoth begins to channel DEATH AND DOOM into the area! RUN!", TALKTYPE_ORANGE_2) addEvent(delayedCastSpell, 5000, cid) return true end
  4. Acho que tu não entendeu. Seguinte, tu tem que criar um arquivo.lua com o código que eu te passei, depois, em talkactions/scripts tu cria um arquivo de TEXTO com o que você quer que seja informado ao usar o comando, e no código que eu passei, colocar o nome deste arquivo de texto. Eu testei aqui e está funcionando.
  5. Tu colocou o arquivo de texto dentro de talkactions/scripts? Tem que estar lá, do contrário, não vai funcionar.
  6. --- Criado por Absolute/Bodak --- function onSay(cid, words, param) file = io.open('data/talkactions/scripts/NOME_DO_ARQUIVO.txt','r') notice = file:read(-1) doShowTextDialog(cid, 7528, notice) file:close() end
  7. function onAdvance(cid, skill, oldLevel, newLevel) local storage, lvl, pos = 789654, 141, {x=160,y=54,z=7} local from = {x = 1050, y = 1505, z = 7} -- canto superior esquerdo. local to = {x = 1050, y = 1635, z = 7} -- canto inferior direito. if isInRange (getThingPos (cid), from, to) then if skill == SKILL__LEVEL and newLevel >= lvl and getPlayerStorageValue(cid, storage) <= 0 then doTeleportThing(cid, pos) doPlayerSendTextMessage(cid,22,"Você foi teleportado por ter atingido o level 141.") setPlayerStorageValue(cid, storage, 1) end end return true end
  8. Cara, como tu quer que a gente arrume um erro em um script, sem o script?
  9. "ball = {11826, 11737}" Você conferiu se estão certos?
  10. local outfit = {lookType = 368} -- Looktype escolhido function onEquip(cid, item, slot) doSetCreatureOutfit(cid, outfit, -1) doSendMagicEffect(getCreaturePosition(cid), 34) doChangeSpeed(cid, 500) -- Velocidade que mudará setPlayerStorageValue(cid,32001,1) return true end function onDeEquip(cid, item, slot) if getPlayerStorageValue(cid,32001) == 1 then setPlayerStorageValue(cid,32001,0) doRemoveCondition(cid, CONDITION_OUTFIT) doRegainSpeed (cid) doSendMagicEffect(getCreaturePosition(cid), 34) end return true end
  11. Ué, passa o script..
  12. DELETE FROM `player_storage` WHERE `key` >= 10000000 and `name` = 'NOME_DO_PLAYER'; ou UPDATE `players` SET `lookaddons` = '0' WHERE `name` = 'NOME_DO_PLAYER'; Pra deletar um específico eu não tenho certeza, mas assim é suposto remover todos os addons do player.
  13. Do exiva, ué
  14. Bodak Reborn postou uma resposta no tópico em Suporte Tibia OTServer
    No XML do monstro, na pasta monster...
  15. É o mesmo esquema, doCreatureAddMana
  16. Se tu quer remover o storage: setPlayerStorageValue(cid, 9006, -1)
  17. function onUse(cid, item, frompos, item2, topos) local orsh1pos = {x=32493, y=32524, z=5} local demon2pos = {x=32491, y=32509, z=6} local demon3pos = {x=32491, y=32517, z=6} local demon4pos = {x=32498, y=32519, z=6} local firelemental5pos = {x=32490, y=32524, z=6} local firelemental6pos = {x=32491, y=32516, z=7} if item.uid == 9006 then queststatus = getPlayerStorageValue(cid,9006) if queststatus == -1 or queststatus == 0 then doPlayerSendTextMessage(cid,22,"o Player "..getCreatureName(cid).." Acaba De entrar no Navio Do King.") player2pos = {x=32490, y=32508, z=7} doTeleportThing(cid,player2pos) doSummonCreature("pirate corsair II", orsh1pos) doSummonCreature("pirate marauder II", demon2pos) doSummonCreature("pirate ghost II", demon3pos) doSummonCreature("pirate buccaneer II", demon4pos) doSummonCreature("pirate skeleton II", firelemental5pos) doSummonCreature("pirate cutthroat II", firelemental6pos) doSendMagicEffect(topos,12) setPlayerStorageValue(cid,9006,1000) else doPlayerSendTextMessage(cid,22,"Nothing happens.") end return 0 end return 1 end
  18. Remova "doTeleportThing(cid,playerpos)"
  19. Está escrito "demond4pos", o que justifica um monstro não aparecer. Apenas troque para "demon4pos" que um monstro voltará a aparecer. Os outros dois, caso o nome esteja correto, pode ser pelo fato de que a maioria dos monstros estão na camada z = 6, sendo que tem um na z = 5 e outro na z = 7.
  20. Bodak Reborn postou uma resposta no tópico em Suporte Tibia OTServer
    actions/scripts nome_arquivo.lua local bpRandom = { [1] = {item = 2160, qnt = 5} [2] = {item = 2150, qnt = 2} [3] = {item = 2140, qnt = 10} --[um número maior que o anterior] = {ID do item, quantidade} } local config = { bpID = 1988, randomItem = math.random (#bpRandom), effect = 27 } function onUse(cid, item, frompos, item2, topos) bp = doPlayerAddItem (cid, config.bpID, 1) doAddContainerItem (bp, bpRandom[config.randomItem].item, bpRandom[config.randomItem].qnt) doPlayerSendTextMessage (cid, 19, "Você ganhou um "..getItemNameById(bpRandom[config.randomItem].item).."!") doSendAnimatedText (getThingPos (cid), "MSG em cima do player.", math.random (1, 255)) doRemoveItem (item.uid, 1) doSendMagicEffect (getThingPos (cid), config.effect) return true end XML: <action itemid="5905" script="nome_arquivo.lua" />
  21. Troca doPlayerSendTextMessage(cid,22,"MENSAGEM COM O NOME DO PLAYER!.") por doPlayerSendTextMessage(cid,22,"blablablabla "..getCreatureName(cid).." blablabla") Sobre os monstros: a posição está errada ou o nome está errado.
  22. Bodak Reborn postou uma resposta no tópico em Suporte Tibia OTServer
    Tá faltando a área da spell e um end
  23. Bodak Reborn postou uma resposta no tópico em Suporte Tibia OTServer
    Troca setCombatArea(combat1, area1) por setCombatArea(combat, area1)
  24. creaturescripts/scripts nome_arquivo.lua local monster = {"Demon"} function onKill(cid, target, lastHit) if isInArray(monster, getCreatureName(target)) then doBroadcastMessage("O jogador "..getCreatureName(cid).." matou o monstro "..getCreatureName(target).."!", 25) end return true end XML: <event type="kill" name="killMonsterBroadcast" event="script" value="nome_arquivo.lua"/> em login.lua, registre o evento. registerCreatureEvent(cid, "killMonsterBroadcast")

Informação Importante

Confirmação de Termo