180319mu

local pos = {x = 1096, y = 1062, z = 7} local lv = 140 function onStepIn(cid, item, position, lastPosition, fromPosition) if not isPlayer(cid) then return true end if getPlayerLevel(cid) >= lv then return doTeleportThing(cid, fromPosition) and doPlayerSendCancel(cid, "You can't pass here.") else doTeleportThing(cid, pos) doPlayerSendTextMessage(cid, 27, "Welcome.") end return true end

Abre o script da ctrl+f procura if_trofeis e substitui por id_trofeis foi um erro de digitação.
 
Essa coisa de ganhar menos eu mudo qd chegar em casa

Use assim mas preste atenção, vc deve configurar a tabela id_trofeis corretamente:
local config = { playerCount = 2001, -- Global storage for counting the players left/entered in the event goblet = 5805, -- id of the gold goblet you'll get when finishing the event. rewards = {2159}, -- You will get this + a gold goblet with your name on. -- {moneyId, count, using? 1 for using moneyReward, 0 for not using.} moneyReward = {2159, 10, 1}, -- Should be same as in the globalevent! -- The zombies will spawn randomly inside this area fromPosition = {x = 1150, y = 1024, z = 7}, -- top left cornor of the playground toPosition = {x = 1178, y = 1040, z = 7}, -- bottom right cornor of the playground id_trofeis = {5805} -- Bote os 3 id dos trofeis, separados por vírgula. Tem que ser em order (primeiro o de ouro, dps prata e dps bronze) } function onStatsChange(cid, attacker, type, combat, value) if isPlayer(cid) and isMonster(attacker) then if isInArea(getPlayerPosition(cid), config.fromPosition, config.toPosition) then if getGlobalStorageValue(config.playerCount) >= 4 then doBroadcastMessage(getPlayerName(cid) .. " have been eated by Zombies!", MESSAGE_STATUS_CONSOLE_RED) local corpse = doCreateItem(3058, 1, getPlayerPosition(cid)) doItemSetAttribute(corpse, "description", "You recognize " .. getCreatureName(cid) .. ". He was killed by "..(isMonster(attacker) and "a "..string.lower(getCreatureName(attacker)) or isCreature(attacker) and getCreatureName(attacker) or "a field item")..".") doSendMagicEffect(getPlayerPosition(cid), CONST_ME_POFF) doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)), false) doSendMagicEffect(getPlayerPosition(cid), CONST_ME_TELEPORT) setGlobalStorageValue(config.playerCount, getGlobalStorageValue(config.playerCount)-1) elseif getGlobalStorageValue(config.playerCount) <= 3 then if isInArea(getPlayerPosition(cid), config.fromPosition, config.toPosition) then doBroadcastMessage(getPlayerName(cid) .. " won the Zombie event! Congratulations!", MESSAGE_STATUS_WARNING) local desc_ = getGlobalStorageValue(config.playerCount) == 3 and 2 or 3 if getGlobalStorageValue(config.playerCount) == 1 then local goblet = doPlayerAddItem(cid, config.id_trofeis[1], 1) doItemSetAttribute(goblet, "description", "Awarded to " .. getPlayerName(cid) .. " for winning the Zombie event.") else local goblet = doPlayerAddItem(cid, if_trofeis[desc_], 1) local corpse = doCreateItem(3058, 1, getPlayerPosition(cid)) doItemSetAttribute(goblet, "description", "Awarded to " .. getPlayerName(cid) .. " for winning the Zombie event.") end doItemSetAttribute(corpse, "description", "You recognize " .. getCreatureName(cid) .. ". He was killed by "..(isMonster(attacker) and "a "..string.lower(getCreatureName(attacker)) or isCreature(attacker) and getCreatureName(attacker) or "a field item")..".") doSendMagicEffect(getPlayerPosition(cid), CONST_ME_POFF) doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)), false) doSendMagicEffect(getPlayerPosition(cid), CONST_ME_TELEPORT) for _,items in ipairs(config.rewards) do doPlayerAddItem(cid, items, 1) end if config.moneyReward[3] == 1 then doPlayerAddItem(cid, config.moneyReward[1], math.random(10, 14)) end end for x = config.fromPosition.x, config.toPosition.x do for y = config.fromPosition.y, config.toPosition.y do for z = config.fromPosition.z, config.toPosition.z do areapos = {x = x, y = y, z = z, stackpos = 253} getMonsters = getThingfromPos(areapos) if isMonster(getMonsters.uid) then doRemoveCreature(getMonsters.uid) end end end end end return false end end return true end

Vc sabe fazer a tag né?
function onUse(cid, item, fromPosition, itemEx, toPosition) if item.itemid == 8303 and isKnight(cid) then setCreatureMaxHealth(cid, getCreatureMaxHealth(cid) + 1000) doSendAnimatedText(getThingPos(cid), "+1000hp", 93) elseif item.iteimd == 8301 and isPaladin(cid) then setCreatureMaxHealth(cid, getCreatureMaxHealth(cid) + 500) setCreatureMaxMana(cid, getCreatureMaxMana(cid) + 500) doSendAnimatedText(getThingPos(Cid), "+500mp", 90) elseif item.itemid == 8302 then if isSorcerer(cid) or isDruid(cid) then setCreatureMaxMana(cid, getCreatureMaxMana(cid) + 2000) doSendAnimatedText(cid, "+2000mp", 93) end end return true end PS: n sei os id das cores, coloquei qualquer um.

Olá a todos, hoje é terça, portanto venho trazer mais um script. Esse é bem simples, mas é legal... Fiz ele baseando-me em um pedido: http://www.xtibia.com/forum/topic/229539-sistema-de-pesca-de-itens/#entry1619129. Para ver os outros scripts de terça, clique aqui.

O que ele faz? É um simples sistema de pesca (com efeitos bem legais), onde se pode configurar tudo a seu gosto. Quando se usa a vara na água aparece um efeito, espera-se um tempo (3 segundos) e começam a aparecer vários efeitos na água. Nesse momento, você pode ou não conseguir um peixe.

Para instalar, crie Killua Fishing System.lua em data/actions/scripts e coloque:
local waterIDs = {493, 4608, 4609, 4610, 4611, 4612, 4613, 4614, 4615, 4616, 4617, 4618, 4619, 4620, 4621, 4622, 4623, 4624, 4625} local config = { {level = {10,19}, fishes = {2667}, maxFish = 1, chance = 50}, -- {level = {Do level, Até o level}, fishes = {id dos peixes que podem vir}, maxFish = quantidade máxima de peixes que podem vir, chance = chance em % {level = {20,29}, fishes = {2667, 2669}, maxFish = 2, chance = 60}, {level = {30,39}, fishes = {2667, 2669}, maxFish = 3, chance = 70}, {level = {40,49}, fishes = {2667, 2669, 2668}, maxFish = 4, chance = 80}, {level = {50,59}, fishes = {2667, 2669, 2668}, maxFish = 5, chance = 80}, {level = {60,69}, fishes = {2667, 2669, 2668, 2670}, maxFish = 6, chance = 80}, {level = {70,79}, fishes = {2667, 2669, 2668, 2670, 2160}, maxFish = 6, chance = 80}, {level = {80,math.huge}, fishes = {2667, 2669, 2668, 2670, 2160, 2157}, maxFish = 7, chance = 90} } function onUse(cid, item, fromPosition, itemEx, toPosition) local worms = math.random(1, 5) if getPlayerStorageValue(cid, 381921) < os.time() then if isInArray(waterIDs, itemEx.itemid) then if getPlayerItemCount(cid, 3976) >= worms then doPlayerRemoveItem(cid, 3976, worms) doSendMagicEffect(toPosition, 1) local times = {2900, 3100, 3300, 3500, 3700, 3900, 4000} for i = 1, #times do addEvent(doSendMagicEffect, times[i], toPosition, 1) end addEvent(function() local random = math.random(1, 100) for _, fishing in pairs(config) do if random <= fishing.chance then if getPlayerSkillLevel(cid, 6) >= fishing.level[1] and getPlayerSkillLevel(cid, 6) <= fishing.level[2] then doPlayerAddItem(cid, fishing.fishes[math.random(1, #fishing.fishes)], math.random(1, fishing.maxFish)) doPlayerAddSkillTry(cid, 6, 6) doSendMagicEffect(toPosition, 53) break end else doSendMagicEffect(toPosition, 25) doPlayerAddSkillTry(cid, 6, 1) end end end, 4000) doPlayerSetStorageValue(cid, 381921, os.time() + 5) else doPlayerSendCancel(cid, "Voce precisa de mais minhocas!") end else doPlayerSendCancel(cid, "Voce nao pode pescar aqui") end else doPlayerSendCancel(cid, "Sua isca ainda esta na agua!") end return true end Em actions.xml, coloque essa tag:
<action itemid="2580" script="Killua Fishing System.lua" allowfaruse="1"/> ATENÇAO: para evitar problemas, remova a seguinte tag do actions.xml
<action itemid="2580" event="script" value="tools/fishing.lua" allowfaruse="1"/> Configure a tabela config a seu gosto (siga o comentário no script).

porra hein cara -.-

function onUse(cid, item, fromPosition, itemEx, toPosition) local tppos = {x=1089,y=1057,z=7} local default = {9693,6570,6571} local vocs = {8302,8302,8301,8303,8302,8302,8301,8303} for x,i in pairs(default) do doPlayerAddItem(cid,i) end local bp = doPlayerAddItem(cid,9774,1) local gala = math.random(1,3) for x = 1, gala do doAddContainerItem(bp, 2160, 100) end local add = math.random(1,100) doAddContainerItem(bp, 2160, add) doPlayerAddItem(cid,vocs[getPlayerVocation(cid)],5) local ret = "" for x,i in pairs(default) do if x == 1 then ret = "1 " .. getItemNameById(i) else ret = ret .. ", 1 " ..getItemNameById(i) end end for x,i in pairs(getPlayersOnline()) do doPlayerSendTextMessage(i,19,getPlayerName(cid).." completou a Arcana Fortress e ganhou "..ret..", 5 "..getItemNameById(vocs[getPlayerVocation(cid)]).."s e uma backpack com "..gala.."."..string.sub(add,0,1).."kk!") end doTeleportThing(cid,tppos) doSendMagicEffect(tppos,10) return true end
quer um boquetinho tbm?

UP!

UP!

function onUse(cid, item, fromPosition, itemEx, toPosition) local tppos = {x=1089,y=1057,z=7} local default = {9693,6570,6571} local vocs = {8302,8302,8301,8303,8302,8302,8301,8303} for x,i in pairs(default) do doPlayerAddItem(cid,i) end local gotten = math.random(50,80) doPlayerAddItem(cid,vocs[getPlayerVocation(cid)],5) local bp = doPlayerAddItem(cid,9774,1) doAddContainerItem(bp, 2160, gotten) local ret = "" for x,i in pairs(default) do if x == 1 then ret = "1 " .. getItemNameById(i) else ret = ret .. ", 1 " ..getItemNameById(i) end end doBroadcastMessage(getPlayerName(cid).." completou a Arcana Fortress e ganhou "..ret.." e uma backpack com "..(string.sub(gotten,0,1).."."..string.sub(gotten,2)).."kk!") doTeleportThing(cid,tppos) doSendMagicEffect(tppos,10) return true end
 
Só configura a posição pra onde o jogador irá (na segunda linha), o resto tá tudo correto.
"23:51 Sativa completou a Arcana Fortress e ganhou 1 jester doll, 1 surprise bag, 1 surprise bag e uma backpack com 6.8kk!"

globalevents/scripts/
 
 
 
tag:

<globalevent name="gates" interval="3600" event="script" value="yyyy.lua"/>
 
yyyy.lua = nome do arquivo .lua ...

Oi galera do xtibia, alguns já me conhece , posto scripts na seção de actions/talk/move!

Aqui está a versão 3.0 do PokeServer TFS 0.3.6pl1,

~~( O que contém na versão 3.0? ) ~~

~~>Fly System - Bug corrigido
~~>Ride System- Bug corrigido
~~>Catch System- Bug corrigido
~~>Go/back System- Bug corrigido
~~>Stones System - Bug corrigido
~~>Npc Heal - Bug arrumano
~~>Todos os 151 pokemons (50% configurados)
~~>Skill System - Para cada tipo de pokemon é um poder difirente!
~~>Mapa Svke 70%
~~>Todas as outfits

Stones,Go/back,Npc,Fly,Ride,Skill, foram testados, então não venha encher o saco falando merda


<--! Download !-->
Server 3.0
Client (È extremamento necessario para poder entrar no server!)

Versão 3.0 do server de pokemon

Faça você mesmo!




Créditos ao Drakylucas por me ajuda a fazer os scripts!

Não se esqueça de clicar ali no icone verde