Ir para conteúdo

PedroSTT

Banido
  • Registro em

  • Última visita

Tudo que PedroSTT postou

  1. PedroSTT postou uma resposta no tópico em Suporte Tibia OTServer
    Script da spell Agora vá em creaturescripts Creaturescripts.xml e registre a tag <event type="think" name="Paralize" event="script" value="paralize.lua"/> Crie um arquivo.lua na pasta creaturescrips/scripts e cole isso dentro function onThink(cid, interval) local storage = 23432 -- deixe a mesma que na script da spell if getPlayerStorageValue(cid, storage) == 1 then doCreatureSetNoMove(cid, true) doPlayerSendTextMessage(cid, 22, "voce esta paralisado") return true end end Abra o login.lua na msm pasta e registre a tag. registerCreatureEvent(cid, "Paralize") Não testei a script , sei que tem como fazer pela condition paralyze , mas não sei usar condition . Se der algum erro me avise.
  2. PedroSTT postou uma resposta no tópico em Suporte Tibia OTServer
    @gutalo Fiz uma edição na script por um erro que eu cometi , atualize.
  3. PedroSTT postou uma resposta no tópico em Suporte Tibia OTServer
    -------------- Config by PedroSTT ---------- local storage = 6452 local time = 1 -- quantos minutos para pisar no tile e restaurar novamente ---------- Script by: Adriano Swatt -------- local maxstamina = 2520 -- quantidade máxima de Stamina (Não sei se é este valor mesmo) local qtdd = 1 -- quantidade de Stamina é adicionada local tempo = 270 -- em segundos para cada regeneração local tileid, action = 3182, 12129 -- ID do Piso de Stamina, ActionID usada no Piso ----------- FIM DAS CONFIGURAÇÕES ----------- function onStepIn(cid, item, position, fromPosition) local getpos = getPlayerPosition(cid) local tilepos = getTileItemById(getpos, tileid).actionid local getsta = getPlayerStamina(cid) if getsta < maxstamina and isPlayer(cid) then addEvent(GetStamina, 100, cid) else doTeleportThing(cid, fromPosition) doPlayerSendCancel(cid, "Sua stamina já está cheia.") end return true end function onStepOut(cid, item, position, fromPosition) local dura = time * 60000 stopEvent(GetStamina) setPlayerStorageValue(cid, storage+ os.time+ dura, 1) return true end function GetStamina(cid) local getpos = getPlayerPosition(cid) local dura = time * 60000 local tilepos = getTileItemById(getpos, tileid).actionid local getsta = getPlayerStamina(cid) if tilepos == action then if getsta < maxstamina and isPlayer(cid) then if getPlayerStorageValue(cid, storage) == -1 then doPlayerSendCancel(cid, "Sua stamina está subindo.") setPlayerStamina(cid, getsta + qtdd) addEvent(GetStamina, tempo * 1000, cid) else doTeleportThing(cid, fromPosition) doPlayerSendCancel(cid, "aguarde") end else doTeleportThing(cid, fromPosition) doPlayerSendCancel(cid, "Sua stamina já está cheia.") end end return true end
  4. function onUse(cid, item, frompos, item2, topos) pos = {x=547, y=332, z=7} local storage = 3425 -- storage if item.itemid == 4852 then doPlayerSendCancel(cid,"Parabéns! Você ganhou acesso a VIP 1.") doTeleportThing(cid,pos) setPlayerStorageValue(cid, storage, 1) doRemoveItem(item.uid,1) else doPlayerSendCancel(cid,"Fail !") end return 1 end
  5. Acho que não é possivel retirar então.
  6. No caso , esse broadcast envia uma mensagem aonde ? No PV de cada player online ? se sim , não é possivel retirar.
  7. function onSay(player, words, param) if not getPlayerFlagValue(player, PlayerFlag_CanBroadcast) then return true end print(" " .. param .. ".") for _, targetPlayer in ipairs(Game.getPlayers()) do targetPlayer:sendPrivateMessage(player, param, TALKTYPE_BROADCAST) end return false end Pode testar novamente ?
  8. function onSay(player, words, param) if not getPlayerFlagValue(player, PlayerFlag_CanBroadcast) then return true end print("/ " .. param .. "\.") for _, targetPlayer in ipairs(Game.getPlayers()) do targetPlayer:sendPrivateMessage(player, param, TALKTYPE_BROADCAST) end return false end Pode testar ?
  9. PedroSTT postou uma resposta no tópico em Suporte Tibia OTServer
    Se vc n configurar as posicoes n vai mesmo Enviado de meu SM-J120H usando Tapatalk
  10. PedroSTT postou uma resposta no tópico em Suporte Tibia OTServer
    Substitua e configure as spells que vc nao queira que possa usar no castle. Enviado de meu SM-J120H usando Tapatalk Cara , é so vc configurar a pos do castle ali que elas nao funcionarao no castle , mas em outros locais sim Enviado de meu SM-J120H usando Tapatalk
  11. PedroSTT postou uma resposta no tópico em Suporte Tibia OTServer
    É a script da spell em area. Enviado de meu SM-J120H usando Tapatalk
  12. PedroSTT postou uma resposta no tópico em Suporte Tibia OTServer
    -- config do local q n pode usar function onSay(cid, words, param, channel) local from,to = {x=1001, y=705, z=7},{x=1031, y=737, z=7} -- começo e final do local local from2,to2 = {x=1011, y=705, z=6},{x=1031, y=738, z=6} -- começo e final do local local from3,to3 = {x=1012, y=706, z=5},{x=1032, y=739, z=5} -- começo e final do local local from4,to4 = {x=985, y=598, z=7},{x=1044, y=652, z=7} -- começo e final do local local from5,to5 = {x=986, y=615, z=6},{x=1039, y=647, z=7} -- começo e final do local local from6,to6 = {x=990, y=616, z=5},{x=1040, y=647, z=5} -- começo e final do local --- config da spell local combat1 = createCombatObject() setCombatParam(combat1, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE) setCombatParam(combat1, COMBAT_PARAM_EFFECT, 16) setCombatFormula(combat1, COMBAT_FORMULA_LEVELMAGIC, -5.2, -0 , -4.2, -0) arr1 = { {0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0}, {0, 0, 1, 1, 1, 0, 0}, {0, 0, 1, 3, 1, 0, 0}, {0, 0, 1, 1, 1, 0, 0}, {0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0} } local area1 = createCombatArea(arr1) setCombatArea(combat1, area1) local function onCastSpell1(parameters) return isPlayer(parameters.cid) and doCombat(parameters.cid, combat1, parameters.var) end --- function onCastSpell(cid, var) local parameters = { cid = cid, var = var} if isInRange(getCreaturePosition(cid), from, to) or isInRange(getCreaturePosition(cid), from2, to2) or isInRange(getCreaturePosition(cid), from3, to3) or isInRange(getCreaturePosition(cid), from4, to4) or isInRange(getCreaturePosition(cid), from5, to5) or isInRange(getCreaturePosition(cid), from6, to6) then doPlayerSendCancel(cid, "Você não pode se Transformar nesta área!") else addEvent(onCastSpell1, 100, parameters) return TRUE end end end Teste.
  13. O sistema eu faço , mas preciso de especificações. No caso , o sistema q eu iria fazer seria o player escolher in-game se vai ser Horda ou Aliança , e logo apos sua classe(vocation) . Isso seria de que modo ? um comando ?
  14. Só colocar na tag no spells.xml aggressive="1"
  15. Movements local storage = 23432 -- storage local eff = 2 -- efeito se n tiver a storage local ef = 3 -- efeito se tiver a storage function onStepIn(cid, item, position, fromPosition) local pos = {x=752, y=1036, z=2} -- onde sera teleportado se n tiver a storage local pid = getCreaturePosition(cid) if getPlayerStorageValue(cid, storage) == 1 then doPlayerSendTextMessage(cid, 20, "voce entrou") doSendMagicEffect(pid , ef) else doTeleportThing(cid, pos) doPlayerSendTextMessage(cid, 20, "complete a quest antes" ) doSendMagicEffect(pid, eff) end end Movements.xml <movevent type="StepIn" actionid="28530" event="script" value="tiler.lua"/> Não esqueça de colocar a action id 28530 no map editor.
  16. PedroSTT postou uma resposta no tópico em Suporte Tibia OTServer
    Script -- Coloque em moveMents local summon = "Paradox" -- Nome do monstro que irá ser summonado. local ef = 21 -- Efeito que mandará quando equipar o ring local eff = 2 -- efeito que mandará quando desequipar o ring function onEquip(cid, item, slot) local pos = getCreaturePosition(cid) if getCreatureSummons(cid) == -1 then doSummonMonster(summon, pos) doSendMagicEffect(ef, pos) else doPlayerSendTextMessage(cid, MessageClasses, "voce ja tem um summon vivo") end end function onDeEquip(cid, item, slot) local pos = getCreaturePosition(cid) local pet = getCreatureSummons(cid) if getCreatureSummons(cid) == 1 then for _, k in ipairs(pet)do doRemoveCreature(k) doSendMagicEffect(eff, pos) return true end end end XML <movevent type="Equip" itemid="2202" slot="ring" event="script" value="ring.lua"/> <movevent type="DeEquip" itemid="2202" slot="ring" event="script" value="ring.lua"/>
  17. Sim , é C++ . Há um problema , não existem sourcers do old client , então só é possivel editar via dll's que são feitas no Visual Basic em C se não me engano.
  18. Troquei o client e a distro.
  19. doPlayerAddItem(item, 100) A callback acima precisa do ID de um item ... mas olha a tabela que você fez , ela tem 3 Id's diferentes. Sendo assim, a script não sabe o que você escolheu. item = {11832,12639,11829} A script é sempre exata , se a callback pede UM item , então você deve dar apenas UM item. Se quiser a script corrigida : function onUse (cid,item, itemEx, toPosition, fromPosition) local item1 = 11832 local item2 = 12639 local item3 = 11829 doPlayerAddItem(item1, 100) doPlayerAddItem(item2, 100) doPlayerAddItem(item3, 100) return true end
  20. Isso é um erro no qual desconheço , essa distro é a do Fir3element , várias pessoas ja colocaram ela online por VPS e etc ... não sei te responder o que é.
  21. O nome dela é Diana Zambrowski ( algo assim ) CNB HyperX Druid.
  22. Atualizado dia 06/07 . Acrescentado o client para editar o mapa e items.otb.
  23. haha , obrigado!!
  24. ATUALIZADO DIA 06/07 Hey guys , suave ? Hoje vim trazer o rework da base Nto B&W , sendo refeita por mim , Segue as informações Se achar algum bug comente no tópico. Scan acusando vírus , já passei Nod32 e Norton e não encontrou vírus , apenas dll's necessárias para funcionar Informações Erros e bugs Prints Downloads and Scan Créditos
  25. Tópico atualizado dia 04/07. Removi as bases de narutibia , já que o tópico do Nto Rox saiu do ar ....

Informação Importante

Confirmação de Termo