
Tudo que PedroSTT postou
-
Atordoar em habilidade
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.
-
Stamina sqm
@gutalo Fiz uma edição na script por um erro que eu cometi , atualize.
-
Stamina sqm
-------------- 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
-
(Resolvido)Update em script teleport
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
-
[Ajuda] Script para Broadcast tibia 10.98
Acho que não é possivel retirar então.
-
[Ajuda] Script para Broadcast tibia 10.98
No caso , esse broadcast envia uma mensagem aonde ? No PV de cada player online ? se sim , não é possivel retirar.
-
[Ajuda] Script para Broadcast tibia 10.98
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 ?
-
[Ajuda] Script para Broadcast tibia 10.98
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 ?
-
Spell em area
Se vc n configurar as posicoes n vai mesmo Enviado de meu SM-J120H usando Tapatalk
-
Spell em area
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
-
Spell em area
É a script da spell em area. Enviado de meu SM-J120H usando Tapatalk
-
Spell em area
-- 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.
-
Sistema de FACÇÕES
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 ?
-
Spell pra nao usar em local protect zone
Só colocar na tag no spells.xml aggressive="1"
-
Mensagem e Efeito ao passar por um Tile e não ter o storage
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.
-
Anel de Summon
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"/>
-
(Resolvido)Algumas dúvidas sobre o(s) server(s)
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.
-
[REWORK] Naruto B&W Open Source !! Att 06/07
Troquei o client e a distro.
-
Duvida em tabelas
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
-
[REWORK] Naruto B&W Open Source !! Att 06/07
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 é.
-
[REWORK] Naruto B&W Open Source !! Att 06/07
O nome dela é Diana Zambrowski ( algo assim ) CNB HyperX Druid.
-
[REWORK] Naruto B&W Open Source !! Att 06/07
Atualizado dia 06/07 . Acrescentado o client para editar o mapa e items.otb.
-
[REWORK] Naruto B&W Open Source !! Att 06/07
haha , obrigado!!
-
[REWORK] Naruto B&W Open Source !! Att 06/07
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
-
[LISTA] Os melhores servidores derivados!! Att 04/07
Tópico atualizado dia 04/07. Removi as bases de narutibia , já que o tópico do Nto Rox saiu do ar ....