ViitinG

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 → WebSites → Tutoriais de Websites"
Para: "OTServ → Suporte OTServ → Suporte de WebSites"

Bom para quem não sabe como funciona é o seguinte,quando o player usar X item ele vai ganhar X dias de premium points.
 
• Adicionando o script •
 
Em "data/lib" crie um arquivo chamado "048-ppoints.lua" e adicione esse script dentro :
function getAccountPoints(cid) local res = db.getResult('select `premium_points` from accounts where name = \''..getPlayerAccount(cid)..'\'') if(res:getID() == -1) then return false end local ret = res:getDataInt("premium_points") res:free() return tonumber(ret) end function doAccountAddPoints(cid, count) return db.executeQuery("UPDATE `accounts` SET `premium_points` = '".. getAccountPoints(cid) + count .."' WHERE `name` ='"..getPlayerAccount(cid).."'") end function doAccountRemovePoints(cid, count) return db.executeQuery("UPDATE `accounts` SET `premium_points` = '".. getAccountPoints(cid) - count .."' WHERE `name` ='"..getPlayerAccount(cid).."'") end Em "data/actions/actions.xml" adicione está tag :
<action itemid="5952" event="script" value="points.lua"/> Em "data/actions/scripts" crie um arquivo lua chamado "points" e cole isso dentro :
local cfg = { amount = 10 } function onUse(cid, item, fromPosition, itemEx, toPosition) if getPlayerLevel(cid) > 8 then doAccountAddPoints(cid, cfg.amount) doCreatureSay(cid, "Parabéns! Você recebeu 10 Premium Points! ", TALKTYPE_ORANGE_1) doSendMagicEffect(getCreaturePosition(cid), 28) doRemoveItem(item.uid,1) else doPlayerSendCancel(cid,"Você precisa de level 8 para usar este item.") end return TRUE end • Configurando •
 
 

Provavelmente você deve está fazendo errado,eu estava com o mesmo problema um dia desses,tente exatamente assim : /addskill Joaozinho, level

Testa ae,eu não testei :
"data/creaturescripts/scripts/tirabattle.lua" :
function onThink(cid, interval) if(getTilePzInfo(getCreaturePosition(cid))) then doRemoveCondition(cid, CONDITION_INFIGHT) end end "data/creaturescripts/creaturescripts.xml" :
<event type="think" name="TiraBattle" event="script" value="tirabattle.lua"/> "data/creaturescripts/scripts/login.lua" :
registerCreatureEvent(cid, "TiraBattle")

Bom para quem não sabe como funciona o script,é basicamente uma senha para conseguir abrir uma porta e após um tempo a porta se fecha automaticamente,podendo ser configurado o tempo/senha/porta.
 
• Adicionando o script •
 
Em "data/creaturescripts/creaturescripts.xml" adicione está tag :
<event type="textoparaporta" name="Senha" event="script" value="senhaporta.lua"/> Em "data/creaturescripts/scripts/login.lua" adicione está tag no final do script :
registerCreatureEvent(cid, "Senha") Em "data/creaturescripts/scripts/senhaporta.lua" adicione este script :
local uniqueids = {8049, 8050} local passwords = { ["TibiaKing"] = {doorpos = {x = 163, y = 36, z = 7}, doorid = 6257, blackboardpos = {x = 162, y = 36, z = 7}, blackboardid = 1811, uniqueid = 8049, doorclosetime = 10}, ["TK"] = {doorpos = {x = 1000, y = 1000, z = 7}, doorid = 1213, blackboardpos = {x = 1000, y = 1000, z = 7}, blackboardid = 1811, uniqueid = 8050, doorclosetime = 10} } function onTextEdit(cid, item, newText) local x = passwords[newText] local function onCloseDoor() if(getTileItemById(x.doorpos,x.doorid+1).uid) > 0 then doTransformItem(getTileItemById(x.doorpos,x.doorid+1).uid, x.doorid) doSendMagicEffect(x.doorpos, CONST_ME_MAGIC_RED) end end for _, check in pairs(uniqueids) do if item.uid == check then if x and item.uid == x.uniqueid then if(getTileItemById(x.doorpos,x.doorid).uid) > 0 then doTransformItem(getTileItemById(x.doorpos,x.doorid).uid, x.doorid + 1) doSendMagicEffect(getThingPos(cid), CONST_ME_MAGIC_GREEN) doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, 'Sua Senha "'..newText..'" esta correta, voce pode entrar.') addEvent(onCloseDoor,x.doorclosetime*1000) doRemoveItem(item.uid, 1) local blackboard = doCreateItem(x.blackboardid,1,x.blackboardpos) doItemSetAttribute(blackboard, "uid", x.uniqueid) else doRemoveItem(item.uid, 1) local blackboard = doCreateItem(x.blackboardid,1,x.blackboardpos) doItemSetAttribute(blackboard, "uid", x.uniqueid) doPlayerSendCancel(cid, 'A porta ja esta aberta, feche-a ou espera ela se fechar.') end else doSendMagicEffect(getThingPos(cid), CONST_ME_POFF) doPlayerSendCancel(cid, 'Sua senha "'..newText..'" esta incorreta.') end end end return true end • Configurando •
 
 
Creditos : Limos
 
Imagens :

Para quem não sabe como funciona o script : Ao dar use em um item writable no caso 1949(configurável),você pode escrever o local que deseja ser teleportado e clicar em OK para ser teleportado para o local,ao ser teleportado o player deve esperar 30 segundos(configurável) para usar novamente o Teleport Scroll.
(Testado em 0.3.6 [8.54] e ultima REV da TFS [9.1])
 


Exemplo :
Para você ser teleportado para o trainers,basta escrever Trainers e clicar em OK.

Clicando em OK você será teleportado para os trainers e terá que esperar 30 segundos para usar o Teleport Scroll novamente.
 

•   Adicionando o script   •
 
"data/creaturescripts/scripts/tsviiting.lua" :
local t = { ["Temple"] = {pos = {x = 1000, y = 1000, z = 7}, storage = 79402, time = 30}, ["Teleports"] = {pos = {x = 2000, y = 2000, z = 7}, storage = 79402, time = 30}, ["Trainers"] = {pos = {x = 3000, y = 3000, z = 7}, storage = 79403, time = 30} } function onTextEdit(cid, item, newText) if item.itemid == 1949 then if isPlayerPzLocked(cid) then doCreatureSay(cid, "Voce esta com battle!", TALKTYPE_MONSTER) return false end if isInArray({'locations', 'places', 'place'}, newText) then local i = '' for text, x in pairs(t) do i = i .. "\n[" .. text .. "]" end doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Locais de teleportes: " .. i) else local p = t[newText] if not p then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Local invalido") return false end local st = p.storage if getCreatureStorage(cid, st) > os.time() then doCreatureSay(cid, "Voce precisa esperar " .. getCreatureStorage(cid, st) - os.time() .. ' segundo(s)' .. (getCreatureStorage(cid, st) - os.time() == 1 and "" or "s") .. " para teleportar novamente.", TALKTYPE_MONSTER) return true end local ti = p.time local pos = p.pos doTeleportThing(cid, pos, true) doSendMagicEffect(pos, CONST_ME_TELEPORT) doCreatureSetStorage(cid, st, os.time() + ti) doCreatureSay(cid, "Voce foi teleportado!", TALKTYPE_MONSTER) end end return true end  
"data/creaturescripts/creaturescripts.xml" :
<event type="textedit" name="TSViitinG" event="script" value="tsviiting.lua"/> "data/creaturescripts/scripts/login.lua" :

registerCreatureEvent(cid, "TSViitinG") Creditos : J.Dre / Sonik / Fallen / Shinmaru / ViitinG
 
• Configurando •
 

Este é o mapa do FireStorm Event.O link para o tópico do evento estará no final do tópico,espero que gostem do mapa !
 
Abra o spoiler caso queira ver a imagem do mapa :



 
OBS : Coloque No Logout  Tool em toda a area do mapa !!
 
Download Mapa : http://www.mediafire.com/download/cbmkd2s1pqi0wgy/FireStorm+Event.rar
Link para o tópico do evento : http://www.tibiaking.com/forum/topic/34805-firestorm-event-chuva-de-fogos-desespero-on/
 
Creditos :
ViitinG.
Absolute.

1º Passo :
Abra o arquivo "Items.xml" (pasta Data / Items)
Com o editor de sua preferência, use o comando de busca (geralmente "Ctrl + F") e digite a ID "7697".
Vai achar o item "signet ring" que estará assim: (na maioria dos OTServ's)
<item id="7697" article="a" name="signet ring"> <attribute key="weight" value="80" /> <attribute key="slotType" value="ring" /> </item> Substitua isso por :
<item id="7697" article="a" name="experience ring"> <attribute key="weight" value="500" /> <attribute key="description" value="Este anel lhe da 2x mais experiencia (ativo)." /> <attribute key="slotType" value="ring" /> <attribute key="duration" value="4320" /> <attribute key="decayTo" value="0" /> <attribute key="showduration" value="1" /> <attribute key="transformDeEquipTo" value="7708" /> </item> Logo em seguida, procure pela ID "7708".
Encontrará o item "ring" que estará assim: (na maioria dos OTServ's)
<item id="7708" article="a" name="ring"> <attribute key="weight" value="40" /> <attribute key="slotType" value="ring" /> </item> Substitua isso por :
<item id="7708" article="a" name="ring experience"> <attribute key="weight" value="500" /> <attribute key="slotType" value="ring" /> <attribute key="stopduration" value="1" /> <attribute key="showduration" value="1" /> <attribute key="transformEquipTo" value="7697" /> </item> Pronto, em Items.xml não mexeremos mais.
 
2º Passo :
Abra o arquivo "Movements.xml" (pasta Data / Movements)
Adicione as tags abaixo:
<movevent type="Equip" itemid="7697" slot="ring" event="script" value="exp_ring.lua"/> <movevent type="DeEquip" itemid="7697" slot="ring" event="script" value="exp_ring.lua"/> <movevent type="Equip" itemid="7708" slot="ring" event="script" value="exp_ring.lua"/> <movevent type="DeEquip" itemid="7708" slot="ring" event="script" value="exp_ring.lua"/> Pronto, em "movements.xml" é só.
 
3º Passo :
Aqui, temos duas opções...
O Exp Ring Tradicional é para server com Experiência fixa, ou seja, a EXP é sempre a mesma..
Já o Exp Ring por Stages é para server que a Experiência varia de acordo com o level do player.
 
EXP RING Tradicional:
Abra a pasta (Data / Movements / Scripts) e crie um arquivo com o nome "exp_ring.lua" (pode copiar um arquivo existente e renomeá-lo).
Após fazer isto, abra este arquivo (exp_ring.lua) e cole o código abaixo dentro.
Obs: se tiver algo escrito do arquivo, apague-o e deixe somente o código abaixo.
function onEquip(cid, item, slot) doTransformItem(item.uid, 7697, 1) doPlayerSendTextMessage(cid, 22, 'Agora ganha 2x mais experiencia!') doPlayerSetExperienceRate(cid, getConfigValue("rateExperience")*0.2) return TRUE end function onDeEquip(cid, item, slot) doTransformItem(item.uid, 7708, 1) doPlayerSendTextMessage(cid, 22, 'Experiencia extra cancelada.') doPlayerSetExperienceRate(cid, 1) return TRUE end EXP RING por Stages:
Abra a pasta (Data / Movements / Scripts) e crie um arquivo com o nome "exp_ring.lua" (pode copiar um arquivo existente e renomeá-lo).
Após fazer isto, abra este arquivo (exp_ring.lua) e cole o código abaixo dentro.
Obs: se tiver algo escrito do arquivo, apague-o e deixe somente o código abaixo.
function onEquip(cid, item, slot) local rate = {} if getPlayerLevel(cid) <= 200 then rate = 1.3 elseif getPlayerLevel(cid) > 200 and getPlayerLevel(cid) <= 280 then rate = 1.15 elseif getPlayerLevel(cid) > 280 then rate = 1.05 end doTransformItem(item.uid, 7697, 1) doPlayerSendTextMessage(cid, 22, "Sua experiencia foi aumentada em "..((rate - 1)*100).." %.") doPlayerSetExperienceRate(cid, rate) return TRUE end function onDeEquip(cid, item, slot) doTransformItem(item.uid, 7708, 1) doPlayerSendTextMessage(cid, 22, "Sua experiencia esta de volta ao normal.") doPlayerSetExperienceRate(cid, 1.0) return TRUE end Creditos : 100% Adriano Swatt.
 
Ajudei = REP +

PastadoOT/data/globalevents/script Exclui o Shop.lua e retire a tag do PastadoOT/data/globalevents/globalevents.lua.

PastadoOT/data/globalevents/script Exclui o Shop.lua e retire a tag do PastadoOT/data/globalevents/globalevents.lua.

Para quem não sabe como funciona o script, quando o player logar no character ele vai receber uma mensagem no chat Default citando quais são as bless que ele está usando e as que não estão sendo utilizadas.

 
 
• Adicionando o script •
 
Em "data/creaturescripts/scripts/CheckBless.lua" adicione está tag :
function onLogin(cid) if(getPlayerBlessing(cid, 1)) then first = "sim" else first = "nao" end if(getPlayerBlessing(cid, 2)) then second = "sim" else second = "nao" end if(getPlayerBlessing(cid, 3)) then third = "sim" else third = "nao" end if(getPlayerBlessing(cid, 4)) then fourth = "sim" else fourth = "nao" end if(getPlayerBlessing(cid, 5)) then fifth = "sim" else fifth = "nao" end doPlayerSendTextMessage(cid,20,'Suas blessings: 1='.. first ..' 2='.. second ..' 3='.. third ..' 4='.. fourth ..' 5='.. fifth ..'') return true end Em "data/creaturescripts/creaturescripts.xml" adicione está tag :
<event type="login" name="BlessCheck" event="script" value="CheckBless.lua"/> Em "data/creaturescripts/scripts/login.lua" adicione está linha no fim do script :
registerCreatureEvent(cid, "BlessCheck") Creditos : Shadow Dan - ViitinG

Olá galera,vou disponibilizar o mapa para o evento War Castle feito pelo Absolute,espero que gostem !
Link para o tópico do script do evento : http://www.tibiaking.com/forum/topic/35731-castle-war-24h-conquiste-o-trono/
 
Imagens:
 
 
Coordenada do mapa : {x = 1000, y = 1000, z = 7}
Download : Link
Scan : https://www.virustotal.com/pt/url/ab5a9f73db53a3cac3b1e624ccf1e7fe95caf378ef374a0fa260a896cba7f9e6/analysis/1403050891/

PastadoOT/data/globalevents/script Exclui o Shop.lua e retire a tag do PastadoOT/data/globalevents/globalevents.lua.

Bom para quem não sabe como funciona o script,é basicamente uma senha para conseguir abrir uma porta e após um tempo a porta se fecha automaticamente,podendo ser configurado o tempo/senha/porta.
 
• Adicionando o script •
 
Em "data/creaturescripts/creaturescripts.xml" adicione está tag :
<event type="textoparaporta" name="Senha" event="script" value="senhaporta.lua"/> Em "data/creaturescripts/scripts/login.lua" adicione está tag no final do script :
registerCreatureEvent(cid, "Senha") Em "data/creaturescripts/scripts/senhaporta.lua" adicione este script :
local uniqueids = {8049, 8050} local passwords = { ["TibiaKing"] = {doorpos = {x = 163, y = 36, z = 7}, doorid = 6257, blackboardpos = {x = 162, y = 36, z = 7}, blackboardid = 1811, uniqueid = 8049, doorclosetime = 10}, ["TK"] = {doorpos = {x = 1000, y = 1000, z = 7}, doorid = 1213, blackboardpos = {x = 1000, y = 1000, z = 7}, blackboardid = 1811, uniqueid = 8050, doorclosetime = 10} } function onTextEdit(cid, item, newText) local x = passwords[newText] local function onCloseDoor() if(getTileItemById(x.doorpos,x.doorid+1).uid) > 0 then doTransformItem(getTileItemById(x.doorpos,x.doorid+1).uid, x.doorid) doSendMagicEffect(x.doorpos, CONST_ME_MAGIC_RED) end end for _, check in pairs(uniqueids) do if item.uid == check then if x and item.uid == x.uniqueid then if(getTileItemById(x.doorpos,x.doorid).uid) > 0 then doTransformItem(getTileItemById(x.doorpos,x.doorid).uid, x.doorid + 1) doSendMagicEffect(getThingPos(cid), CONST_ME_MAGIC_GREEN) doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, 'Sua Senha "'..newText..'" esta correta, voce pode entrar.') addEvent(onCloseDoor,x.doorclosetime*1000) doRemoveItem(item.uid, 1) local blackboard = doCreateItem(x.blackboardid,1,x.blackboardpos) doItemSetAttribute(blackboard, "uid", x.uniqueid) else doRemoveItem(item.uid, 1) local blackboard = doCreateItem(x.blackboardid,1,x.blackboardpos) doItemSetAttribute(blackboard, "uid", x.uniqueid) doPlayerSendCancel(cid, 'A porta ja esta aberta, feche-a ou espera ela se fechar.') end else doSendMagicEffect(getThingPos(cid), CONST_ME_POFF) doPlayerSendCancel(cid, 'Sua senha "'..newText..'" esta incorreta.') end end end return true end • Configurando •
 
 
Creditos : Limos
 
Imagens :

Bom para quem não sabe como funciona é o seguinte,quando o player usar X item ele vai ganhar X dias de premium points.
 
• Adicionando o script •
 
Em "data/lib" crie um arquivo chamado "048-ppoints.lua" e adicione esse script dentro :
function getAccountPoints(cid) local res = db.getResult('select `premium_points` from accounts where name = \''..getPlayerAccount(cid)..'\'') if(res:getID() == -1) then return false end local ret = res:getDataInt("premium_points") res:free() return tonumber(ret) end function doAccountAddPoints(cid, count) return db.executeQuery("UPDATE `accounts` SET `premium_points` = '".. getAccountPoints(cid) + count .."' WHERE `name` ='"..getPlayerAccount(cid).."'") end function doAccountRemovePoints(cid, count) return db.executeQuery("UPDATE `accounts` SET `premium_points` = '".. getAccountPoints(cid) - count .."' WHERE `name` ='"..getPlayerAccount(cid).."'") end Em "data/actions/actions.xml" adicione está tag :
<action itemid="5952" event="script" value="points.lua"/> Em "data/actions/scripts" crie um arquivo lua chamado "points" e cole isso dentro :
local cfg = { amount = 10 } function onUse(cid, item, fromPosition, itemEx, toPosition) if getPlayerLevel(cid) > 8 then doAccountAddPoints(cid, cfg.amount) doCreatureSay(cid, "Parabéns! Você recebeu 10 Premium Points! ", TALKTYPE_ORANGE_1) doSendMagicEffect(getCreaturePosition(cid), 28) doRemoveItem(item.uid,1) else doPlayerSendCancel(cid,"Você precisa de level 8 para usar este item.") end return TRUE end • Configurando •
 
 

Adicione este script :
"data/creaturescripts/creaturescripts.xml" :
<event type="kill" name="VGAntiMC" event="script" value="victorgantimc.lua"/> "data/creaturescripts/scripts/login.lua" :
registerCreatureEvent(cid, "VGAntiMC") "data/creaturescripts/scripts/victorgantimc.lua" :
local exp = 10000 local item,quant = 7369,1 function onKill(cid, target, damage, flags) if isPlayer(target) then if getPlayerIp(cid) == getPlayerIp(target) then doPlayerAddExp(cid, -exp) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Foi detectado o uso de MC você perderá "..exp.." de exp") return true end doPlayerAddItem(cid, item, quant) return true end return true end

Tenta assim :

Para quem não sabe como funciona o script : O player usa um certo item e se ele for dono de alguma house ele será teleportado para ela.
 
• Adicionando o script •
 
Em "data/actions/scripts/tphouse.lua" :
function onUse(cid, item, fromPosition, itemEx, toPosition)  if hasCondition(cid, CONDITION_INFIGHT) then     return doPlayerSendTextMessage(cid, MESSAGE_EVENT_ADVANCE, "Desculpe,voce esta em batalha.")  end    if getPlayerLevel(cid) < getConfigInfo("levelToBuyHouse") then   return doPlayerSendCancel(cid, "Sorry, not possible.")  end    if not getHouseByPlayerGUID(getPlayerGUID(cid)) then   return doPlayerSendTextMessage(cid, MESSAGE_EVENT_ADVANCE, "Desculpe voce nao tem house.")  end    doTeleportThing(cid, getHouseEntry(getHouseByPlayerGUID(getPlayerGUID(cid))))  doRemoveItem(item.uid, 1)  return true end Em "data/actions/actions.xml" :
<action itemid="7722" event="script" value="tphouse.lua"/> Créditos :
MaXwEllDeN por ajudar em algumas funções.
• Configurando •
 

Bom para quem não sabe,este é um script que faz o character andar em conjunto com a canoa.(você pode configurar a rota)
 
(Testado em TFS 0.3.6 e TFS 0.2.14)
 

 
Como criar :
Adicione a actionid 6901 no meio da canoa.
Onde a canoa deve ir você coloca o itemid 4820.
Você tem que usar as bordas com o mesmo ID que está nas configurações endborders.
 

 
"data/actions/actions.xml" :
(TFS 0.3/0.4)
<action actionid="6901" event="script" value="other/movingboat.lua"/> (TFS 0.2/1.0)
<action actionid="6901" script="other/movingboat.lua"/> "data/actions/scripts/movingboat.lua" :
local config = { endborders = {4644, 4646}, speed = 300, ignorefirstborders = 3 } local fight = createConditionObject(CONDITION_INFIGHT) setConditionParam(fight, CONDITION_PARAM_TICKS, -1) local function comparePos(poss, pos) return pos.x == poss.x and pos.y == poss.y end local n, s = 0, 0 local function getRightPos(poss, last) ps = { {x = poss.x, y = poss.y - 1, z = poss.z}, {x = poss.x + 1, y = poss.y, z = poss.z}, {x = poss.x, y = poss.y + 1, z = poss.z}, {x = poss.x - 1, y = poss.y, z = poss.z} } for _, pos in pairs(ps) do if(getTileItemById(pos, 4820).uid > 0) then if(not comparePos(last, pos)) then p = pos return p end else for b = 1, #config.endborders do if(getTileItemById(pos, config.endborders[b]).uid > 0 and s > config.ignorefirstborders) then n = n + 1 p = pos return p and n end end end end end local function doTravel(cid, poss, last) getRightPos(poss, last) travel = p.x > poss.x and "east" or (p.y < poss.y and "north" or (p.y > poss.y and "south" or (p.x < poss.x and "west" or "false"))) if n > 1 then p = poss end if(travel == "false") then if(getCreatureCondition(cid, CONDITION_INFIGHT)) then doRemoveCondition(cid, CONDITION_INFIGHT) end n = 0 s = 0 return false end local des = { ["north"] = {cPos = {{x = p.x, y = p.y - 1, z = p.z}, p, {x = p.x, y = p.y + 1, z = p.z}}, dir = 0, boat = {3587, 3589, 3591}}, ["east"] = {cPos = {{x = p.x + 1, y = p.y, z = p.z}, p, {x = p.x - 1, y = p.y, z = p.z}}, dir = 1, boat = {3596, 3594, 3592}}, ["south"] = {cPos = {{x = p.x, y = p.y + 1, z = p.z}, p, {x = p.x, y = p.y - 1, z = p.z}}, dir = 2, boat = {3591, 3589, 3587}}, ["west"] = {cPos = {{x = p.x - 1, y = p.y, z = p.z}, p, {x = p.x + 1, y = p.y, z = p.z}}, dir = 3, boat = {3592, 3594, 3596}} } local x = des[travel] if(x) then for x = p.x - 2, p.x + 2 do for y = p.y - 2, p.y + 2 do pos = {x = x, y = y, z = p.z} for id = 3587, 3596 do if(getTileItemById(pos, id).uid > 0) then doRemoveItem(getTileItemById(pos, id).uid, 1) end end end end for c = 1, #x.boat do its = doCreateItem(x.boat[c], 1, x.cPos[c]) if(n > 0 and c == 2) then doSetItemActionId(its, 6901) end end doTeleportThing(cid, x.cPos[2], false) doCreatureSetLookDir(cid, x.dir) if(n > 1) then if(getCreatureCondition(cid, CONDITION_INFIGHT)) then doRemoveCondition(cid, CONDITION_INFIGHT) end n = 0 s = 0 return false end s = s + 1 end return addEvent(doTravel, config.speed, cid, p, poss) end function onUse(cid, item, fromPosition, itemEx, toPosition) if(getCreatureCondition(cid, CONDITION_INFIGHT)) then return doPlayerSendCancel(cid, "You can't travel when you're in a fight.") end doTeleportThing(cid, toPosition) doAddCondition(cid, fight) doTravel(cid, getPlayerPosition(cid), getPlayerPosition(cid)) return true end "data/movements/movements.xml" :
(TFS 0.3/0.4)
<movevent type="StepIn" itemid="4820" event="script" value="water.lua"/> (TFS 0.2/1.0)
<movevent event="StepIn" itemid="4820" script="water.lua"/> "data/movements/scripts/water.lua" :
local boatids = {3589, 3594} function onStepIn(cid, item, position, fromPosition) for _, id in pairs(boatids) do if(getTileItemById(fromPosition, id).uid > 0) then return doTeleportThing(cid, fromPosition) end end return true end Se você usa TFS 0.3/0.4, adicione isto em "data/lib/050-function.lua" (se você ja não tiver).
function doSetItemActionId(uid, actionid) return doItemSetAttribute(uid, "aid", actionid) end Creditos :
99% - Limos o/.
1% - ViitinG.

É só trocar a função do PZ por battle,ficando assim :
pos = {x=1057, y=1046, z=7} function onSay(cid, words, param) if not getPlayerCondition(cid, CONDITION_INFIGHT) then doTeleportThing(cid,pos) doSendMagicEffect(getPlayerPosition(cid),19) doPlayerSendTextMessage(cid, 19, "Teleportado!") else doPlayerSendTextMessage(cid, 19, "Somente em PZ.") end end

Para quem não sabe como funciona o script é o seguinte o ADM pode usar o comando para adicionar um item para todos os players online no servidor.
 
• Adicionando o script •
 
Em "data/talkactions/talkactions.xml" adicione está tag :
<talkaction log="yes" words="/additem" access="5" event="script" value="additem.lua"/> Em "data/talkactions/scripts" crie um arquivo lua com o nome "additem" e adicione este script nele :
function onSay(cid, words, param, channel) local t = string.explode(param, ",") if t[1] ~= nil and t[2] ~= nil then local list = {} for i, tid in ipairs(getPlayersOnline()) do list[i] = tid end for i = 1, #list do doPlayerAddItem(list[i],t[1],t[2]) doBroadcastMessage(getPlayerName(cid) .. " Acabou de dar: " .. t[2] .." ".. getItemNameById(t[1]) .. " para todos os players online!") end else doPlayerPopupFYI(cid, "No parm...\nSend:\n /itemadd itemid,how_much_items\nexample:\n /itemadd 2160,10") end return true end • Configurando •
 
 

Para quem não sabe como funciona o script : O player usa um certo item e se ele for dono de alguma house ele será teleportado para ela.
 
• Adicionando o script •
 
Em "data/actions/scripts/tphouse.lua" :
function onUse(cid, item, fromPosition, itemEx, toPosition)  if hasCondition(cid, CONDITION_INFIGHT) then     return doPlayerSendTextMessage(cid, MESSAGE_EVENT_ADVANCE, "Desculpe,voce esta em batalha.")  end    if getPlayerLevel(cid) < getConfigInfo("levelToBuyHouse") then   return doPlayerSendCancel(cid, "Sorry, not possible.")  end    if not getHouseByPlayerGUID(getPlayerGUID(cid)) then   return doPlayerSendTextMessage(cid, MESSAGE_EVENT_ADVANCE, "Desculpe voce nao tem house.")  end    doTeleportThing(cid, getHouseEntry(getHouseByPlayerGUID(getPlayerGUID(cid))))  doRemoveItem(item.uid, 1)  return true end Em "data/actions/actions.xml" :
<action itemid="7722" event="script" value="tphouse.lua"/> Créditos :
MaXwEllDeN por ajudar em algumas funções.
• Configurando •
 

@lamina cuidado com double post amigo,se precisar acrescentar alguma coisa que esqueceu é só editar o ultimo post !
Leia as regras do fórum : http://www.tibiaking.com/forum/forum/23-regras-do-forum/

@Bueno1 tenha mais respeito com os membros do fórum amigo,ele só tentou te ajudar então não tem motivos para chingar!
Leia as regras do fórum : http://www.tibiaking.com/forum/forum/23-regras-do-forum/

Este é o mapa do FireStorm Event.O link para o tópico do evento estará no final do tópico,espero que gostem do mapa !
 
Abra o spoiler caso queira ver a imagem do mapa :



 
OBS : Coloque No Logout  Tool em toda a area do mapa !!
 
Download Mapa : http://www.mediafire.com/download/cbmkd2s1pqi0wgy/FireStorm+Event.rar
Link para o tópico do evento : http://www.tibiaking.com/forum/topic/34805-firestorm-event-chuva-de-fogos-desespero-on/
 
Creditos :
ViitinG.
Absolute.