Wakon

Fiz esse script a bastante tempo a pedido de um membro e resolvi postar para vocês . Versão testada: 8.60 TFS: 0.4 / 0.3.6 Função: Ao sair de uma zona de proteção, caso o player esteja sem bless, ele manda uma mensagem na tela avisando que está sem bless. Em "Data/creaturescripts/scripts", copie e cole um arquivo.LUA e renomeie para checkBless.lua, apague tudo e cole: function onThink(cid, lastExecution, thinkInterval) if(getTilePzInfo(getCreaturePosition(cid))) == false and getPlayerStorageValue(cid, 23333) <= 0 then for b = 1,5 do if getPlayerBlessing(cid, b) == false then setPlayerStorageValue(cid, 23333, 1) return doPlayerSendTextMessage(cid, 22, "Você não tem todas as bless, tome cuidado.") end end elseif (getTilePzInfo(getCreaturePosition(cid))) == true and getPlayerStorageValue(cid, 23333) == 1 then setPlayerStorageValue(cid, 23333, -1) end return true end Em "Data/creaturescripts", abra o creaturescripts.xml e adicione: <event type="think" name="checkBless" event="script" value="checkBless.lua"/> Novamente em "Data/creaturescripts/scripts", abra o arquivo login.lua e adicione: registerCreatureEvent(cid, "checkBless") Espero que gostem , caso dê algum erro, me avise! Créditos: Wakon - Script ScythePanthom -- Pela idéia.

local storage = {50010, 1, 0} -- Storage, valor após equipar, valor após retirar. local IDHEAD = 2496 local IDARMOR = 8889 local IDLEGS = 2648 local IDFEET = 2645 local IDSHIELD = 6433 local THETEXT = "Demonrage" local look = 253 local regeneration = createConditionObject(CONDITION_REGENERATION) setConditionParam(regeneration, CONDITION_PARAM_HEALTHGAIN, 2500000) setConditionParam(regeneration, CONDITION_PARAM_HEALTHTICKS, 250) setConditionParam(regeneration, CONDITION_PARAM_MANAGAIN, 2500000) setConditionParam(regeneration, CONDITION_PARAM_MANATICKS, 250) local condition = createConditionObject(CONDITION_ATTRIBUTES) setConditionParam(condition, CONDITION_PARAM_TICKS, -1) setConditionParam(condition, CONDITION_PARAM_SKILL_SWORD, 75) setConditionParam(condition, CONDITION_PARAM_SKILL_AXE, 75) setConditionParam(condition, CONDITION_PARAM_SKILL_CLUB, 75) setConditionParam(condition, CONDITION_PARAM_SKILL_SHIELD, 75) setConditionParam(condition, CONDITION_PARAM_STAT_MAGICLEVELPERCENT,550) setConditionParam(condition, CONDITION_PARAM_ABSORBPERCENTALL, 550) function onDeEquip(cid, item, slot) doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You have just lost the bonus for wearing a full set of equipment. please equipped the item you remove to get the bonus again.") doRemoveCondition(cid, CONDITION_REGENERATION) setPlayerStorageValue(cid, storage[1], storage[3]) doRemoveCondition(cid, CONDITION_ATTRIBUTES) doRemoveCondition(cid, CONDITION_OUTFIT) end function onEquip(cid, item, slot) local vocation = getPlayerVocation(cid) if vocation == 4 or vocation == 8 then if getPlayerSlotItem(cid, CONST_SLOT_HEAD).itemid == IDHEAD and getPlayerSlotItem(cid, CONST_SLOT_ARMOR).itemid == IDARMOR and getPlayerSlotItem(cid, CONST_SLOT_LEGS).itemid == IDLEGS and getPlayerSlotItem(cid, CONST_SLOT_FEET).itemid == IDFEET and getPlayerSlotItem(cid, CONST_SLOT_RIGHT).itemid == IDSHIELD then setPlayerStorageValue(cid, storage[1], storage[2]) doSendAnimatedText(getCreaturePosition(cid), THETEXT, 129) doSetCreatureOutfit(cid, {lookType = look}, -1) doAddCondition(cid, condition) local spot = getThingPosition(cid) doSendDistanceShoot(spot, {x = spot.x + 3, y = spot.y + 3, z = spot.z}, CONST_ANI_WHIRLWINDSWORD) doSendDistanceShoot(spot, {x = spot.x - 3, y = spot.y - 3, z = spot.z}, CONST_ANI_WHIRLWINDSWORD) doSendDistanceShoot(spot, {x = spot.x + 3, y = spot.y - 3, z = spot.z}, CONST_ANI_WHIRLWINDSWORD) doSendDistanceShoot(spot, {x = spot.x - 3, y = spot.y + 3, z = spot.z}, CONST_ANI_WHIRLWINDSWORD) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "the attributes of that item only works for Knights.") end end return true end

Amigo, eu já sei qual é a sua base, quero uma foto do erro que está aparecendo na distro (executável do servidor).

Script: local healMana = {25000, 30000} local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_MAGIC_BLUE) setCombatParam(combat, COMBAT_PARAM_AGGRESSIVE, FALSE) setCombatParam(combat, COMBAT_PARAM_TARGETCASTERORTOPMOST, TRUE) function onCastSpell(cid, var) doCreatureAddMana(cid, math.random(healMana[1], healMana[2])) doCreatureSay(cid,"Aaaah...", TALKTYPE_ORANGE_1) return doCombat(cid, combat, var) end TAG: <rune name="Mana Rune" id="2276" allowfaruse="1" charges="1" lvl="15000" maglv="1" exhaustion="1000" aggressive="0" needtarget="1" blocktype="solid" event="script" value="healing/WR.lua"/>

Amigo, não há necessidade de criar outro tópico para dizer que o script está com erro, poderia ter dito no outro tópico. Qual o erro que dá? Mande uma foto da distro. Eu testei o script e está funcionando normalmente.

Por nada, acontece .

Quando você clica em Copy fica assim mesmo, abre as categorias e olha o ultimo item, provavelmente o item que você copiou vai estar lá.

Em "Data/movements/scripts", copie e cole um arquivo.lua e renomeie para equipstor.lua, apague tudo e cole: local storage = {50010, 1, 0} -- Storage, valor após equipar, valor após retirar. function onEquip(cid) return setPlayerStorageValue(cid, storage[1], storage[2]) end function onDeEquip(cid) return setPlayerStorageValue(cid, storage[1], storage[3]) end Em "Data/movements", abra o arquivo movements.xml e adicione as tags: <movevent type="Equip" itemid="item_id" slot="slot_type" event="script" value="equipstor.lua"/> <movevent type="DeEquip" itemid="item_id" slot="slot_type" event="script" value="equipstor.lua"/> Em itemid você coloca o id do item que deve ser equipado para ganhar storage e no slot você coloca em qual parte deve ser equipado. Slots:

Em "Data/creaturescripts/scripts", copie e cole um arquivo.lua e renomeie para deathTP.lua, apague tudo e cole: local t = { tpId = 1387, -- ID do teleport. tpNew = {x = 1057, y = 1057, z = 7}, -- Local onde irá aparecer o teleport. tpPos = {x = 1059, y = 1059, z = 7}, -- Local para onde o teleport irá levar. monster = "rattata", -- Nome do monstro(pokémon/normal), coloque em letra minúscula. timeRemove = 5 -- Tempo para remover o teleport em segundos. } function onKill(cid, target) local function removeTeleport(position) position.stackpos = 1 if (getThingfromPos(position).itemid == t.tpId) then doRemoveItem(getThingfromPos(position).uid) doSendMagicEffect(t.tpNew, 13) end return true end if (ehMonstro(target) and string.lower(getCreatureName(target)) == t.monster) then doCreateTeleport(t.tpId, t.tpPos, t.tpNew) doCreatureSay(target, "Você tem ".. t.timeRemove .." segundos para entrar no teleport.", TALKTYPE_ORANGE_1, 0, 0, t.tpNew) addEvent(removeTeleport, t.timeRemove * 1000, t.tpNew) end return true end Agora em "Data/creaturescripts", abra o arquivo creaturescripts.xml e adicione a tag: <event type="kill" name="deathTP" script="deathTP.lua"/> Novamente em "Data/creaturescripts/scripts", abra o arquivo login.lua e registre: registerCreatureEvent(cid, "deathTP") Configure ao seu gosto, se der algum problema, me avise!

Explique melhor sua dúvida, aparece algum erro na distro? Poste o script que está com erro. O tópico foi movido para a área correta, preste mais atenção da próxima vez! Leia as regras do fórum: http://tibiaking.com/forum/topic/1281-regras-gerais/?p=7680 Este tópico foi movido: De: "OTServ → Suporte OTServ → Suporte de Scripts → Servidores normais" Para: "OTServ → Suporte OTServ → Suporte de Scripts → Servidores derivados"

Diz que não está encontrando a função onUse nos scripts citados nas tags, a callback deveria ser: function onUse(cid, item, fromPos, itemEx, toPos) Apenas o terceiro erro que é diferente, você provavelmente colocou uma tag do actions no creaturescripts.xml! Ao invés de criar scripts vazios, basta retirar as tags dos locais citados, procure a linha de cada script e remove .

Tópico aprovado e movido a área correta, obrigado por compartilhar. Você recebeu um REP pela contribuição!

O tópico foi movido para a área correta, preste mais atenção da próxima vez! Leia as regras do fórum: http://tibiaking.com/forum/topic/1281-regras-gerais/?p=7680 Este tópico foi movido: De: "Tibia King → Atendimento Geral" Para: "OTServ → Suporte OTServ → Suporte de OTServ Geral"

O tópico foi movido para a área correta, preste mais atenção da próxima vez! Leia as regras do fórum: http://tibiaking.com/forum/topic/1281-regras-gerais/?p=7680 Este tópico foi movido: De: "Tibia King → Atendimento Geral" Para: "OTServ → Suporte OTServ → Suporte de OTServ Geral"

O tópico foi movido para a área correta, preste mais atenção da próxima vez! Leia as regras do fórum: http://tibiaking.com/forum/topic/1281-regras-gerais/?p=7680 Este tópico foi movido: De: "Tibia King → Atendimento Geral" Para: "OTServ → Suporte OTServ → Suporte de Servidores Derivados"

O tópico foi movido para a área correta, preste mais atenção da próxima vez! Leia as regras do fórum: http://tibiaking.com/forum/topic/1281-regras-gerais/?p=7680 Este tópico foi movido: De: "Tibia King → Atendimento Geral" Para: "OTServ → Suporte OTServ → Suporte de OTServ Geral"

Bem legal, explicado e organizado , tópico aprovado e movido a área correta. Você recebeu um REP pela contribuição.

O tópico foi movido para a área correta, preste mais atenção da próxima vez! Leia as regras do fórum: http://tibiaking.com/forum/topic/1281-regras-gerais/?p=7680 Este tópico foi movido: De: "OTServ → Anuncie seu Servidor" Para: "OTServ → Suporte OTServ → Suporte de Spriting"

local t = { level = 10, pz = true, battle = true } function onSay(cid, words) if t.pz == true and getTilePzInfo(getCreaturePosition(cid)) == false then doPlayerSendCancel(cid, "Você não pode usar fora da zona de proteção.") return true end if t.battle == true and getCreatureCondition(cid, CONDITION_INFIGHT) == true then doPlayerSendCancel(cid, "Você não pode utilizar em batalha.") return true end if getPlayerLevel(cid) >= t.level then doPlayerSetMaxCapacity(cid, 1000) doRemoveCreature(cid) else doPlayerSendCancel(cid, "Você não pode utilizar este comando!") end return true end

O tópico foi movido para a área correta, preste mais atenção da próxima vez! Leia as regras do fórum: http://tibiaking.com/forum/topic/1281-regras-gerais/?p=7680 Este tópico foi movido: De: "OTServ → Scripting → Geral" Para: "OTServ → Suporte OTServ → Suporte de Scripts"

O tópico foi movido para a área correta, preste mais atenção da próxima vez! Leia as regras do fórum: http://tibiaking.com/forum/topic/1281-regras-gerais/?p=7680 Este tópico foi movido: De: "OTServ → Scripting → Geral" Para: "OTServ → Suporte OTServ → Suporte de Servidores Derivados"

Não tenho certeza, mas acho que é só alterar o items.otb e o items.xml do remere's, pega os arquivos da pasta "Data/items" do seu servidor e coloca na pasta "Data/versao" localizada na pasta do RME.

Siga esse tutorial:http://www.tibiaking.com/forum/topic/15337-criando-dois-items-com-a-mesma-sprite/ E sim, pode entrar normalmente com o cliente padrão do Tibia, irá mudar o ID mas irá usar a mesma sprite, então não tem problema . O tópico foi movido para a área correta, preste mais atenção da próxima vez! Leia as regras do fórum: http://tibiaking.com/forum/topic/1281-regras-gerais/?p=7680 Este tópico foi movido: De: "OTServ → Suporte OTServ → Suporte de Scripts" Para: "OTServ → Suporte OTServ → Suporte de OTServ Geral"

Olha, fiz um novo aqui pra você ( se não se importar ), testei ele aqui na base de testes e está normal conforme meus testes, caso apresente algum erro, me avise! http://hastebin.com/etegodexun.coffee Troquei as config para testar, ai você altera do jeito que você quiser .

Sim, mas não afeta em nada, funciona com ou sem vírgula . Como o amigo acima disse, você provavelmente copiou errado, testei aqui e está normal.