IIG3N3S1SII

fiz rapidinho, vê se é isso que vc quer:


MODS:

Saffari.xml

<?xml version="1.0" encoding="UTF-8"?> <mod name="Saffari" version="1.0" author="Vodkart" contact="tibiaking.com" enabled="yes"> <config name="saffari_func"><![CDATA[ config = { Price = 2000, Premium = false, Level = 50, Saffari_Pos = {Enter = {x=189,y=53,z=7}, Exit = {x=195,y=53,z=7}}, Time = 30, AddPokeballs = {11445,30}, Blocked_pokeballs = {2146, 2147, 11437, 11441}, Storages = {874547,874548}, levelandskills = false, loot = false } ]]></config> <event type="login" name="SaffariRegister" event="script"><![CDATA[ function onLogin(cid) registerCreatureEvent(cid, "SaffariDeath") return true end]]></event> <talkaction words="/saffari;!saffari" event="buffer"><![CDATA[ domodlib('saffari_func') param = string.lower(param) if (param == "") then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE,"invalid command, for more information enter !saffari info") elseif(param == "info") then doShowTextDialog(cid,2160,"Saffari Info:\n\nLevel Minimum: "..config.Level.."\nSaffari Cost: "..config.Price.."\nTime Limit: "..config.Time.." minutes\n\nThe safari is home to rare creatures, some are dangerous and others not\n[*Warning*]\nis only allowed to enter with saffari balls.\n\nTo leave enter command:\n!saffari leave") elseif(param == "leave") then if getPlayerStorageValue(cid, config.Storages[1]) >= 1 then doTeleportThing(cid, config.Saffari_Pos.Exit) setPlayerStorageValue(cid, config.Storages[1], -1) setPlayerStorageValue(cid, config.Storages[2], -1) doPlayerSendTextMessage(cid,22,'you left the saffari zone.') else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE,"you are not in Saffari") end end return true ]]></talkaction> <globalevent name="SaffariCheck" interval="60" event="script"><![CDATA[ domodlib('saffari_func') function onThink(interval, lastExecution) local on = getPlayersOnline() if #on > 0 then for i = 1, #on do if getPlayerStorageValue(on[i], config.Storages[2]) <= os.time() and getPlayerStorageValue(on[i], config.Storages[1]) >= 1 then doTeleportThing(on[i], config.Saffari_Pos.Exit) setPlayerStorageValue(on[i], config.Storages[1], -1) setPlayerStorageValue(on[i], config.Storages[2], -1) doPlayerSendTextMessage(on[i],22,'you left the saffari zone.') end end end return true end ]]></globalevent> <event type="death" name="SaffariDeath" event="script"><![CDATA[ domodlib('saffari_func') function onDeath(cid, corpse, deathList) if isPlayer(cid) and getPlayerStorageValue(cid, config.Storages[1]) >= 1 then setPlayerStorageValue(cid, config.Storages[1], -1) setPlayerStorageValue(cid, config.Storages[2], -1) if config.loot == false then doCreatureSetDropLoot(cid, false) end if config.levelandskills == false then doPlayerSetLossSkill(cid, 0) end end return true end ]]></event> </mod> NPC/script SaffariNpc.lua domodlib('saffari_func') local keywordHandler = KeywordHandler:new() local npcHandler = NpcHandler:new(keywordHandler) NpcSystem.parseParameters(npcHandler) local talkState = {} function onCreatureAppear(cid) npcHandler:onCreatureAppear(cid) end function onCreatureDisappear(cid) npcHandler:onCreatureDisappear(cid) end function onCreatureSay(cid, type, msg) npcHandler:onCreatureSay(cid, type, msg) end function onThink() npcHandler:onThink() end function creatureSayCallback(cid, type, msg) if(not npcHandler:isFocused(cid)) then return false end local talkUser = NPCHANDLER_CONVbehavior == CONVERSATION_DEFAULT and 0 or cid local msg = string.lower(msg) if isInArray({"saffari","enter","entrar"}, msg) then npcHandler:say('you can stay in the Saffari zone by '..config.Time..' minutes, the price is '..config.Price..' gp(s), You want enter? {yes}', cid) talkState[talkUser] = 1 elseif msgcontains(msg, 'yes') and talkState[talkUser] == 1 then for i = 1, #config.Blocked_pokeballs do if getPlayerItemCount(cid, config.Blocked_pokeballs[i]) >= 1 then npcHandler:say('Keep your PokeBalls!', cid) return true end end if config.Premium == true and not isPremium(cid) then npcHandler:say('Sorry, you need to be premium!', cid) return true elseif getPlayerLevel(cid) < config.Level then npcHandler:say('Sorry, you must be at least level '..config.Level..' to enter the Saffari zone!', cid) return true elseif not doPlayerRemoveMoney(cid, config.Price) then npcHandler:say('Sorry, you do not have enough money!', cid) return true end doPlayerAddItem(cid, config.AddPokeballs[1], config.AddPokeballs[2]) selfSay("Thanks, you've been teleported to the Saffari zone and has "..config.Time.." minutes, if you want to leave enter {!saffari leave}.", cid) doTeleportThing(cid, config.Saffari_Pos.Enter) setPlayerStorageValue(cid, config.Storages[1], 1) setPlayerStorageValue(cid, config.Storages[2], os.time()+config.Time*60) elseif msg == "no" and talkState[talkUser] >= 1 then selfSay("tudo bem então.", cid) talkState[talkUser] = 0 npcHandler:releaseFocus(cid) end return TRUE end npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) npcHandler:addModule(FocusModule:new()) Saffari Hunter.xml <?xml version="1.0"?> <npc name="Saffari Hunter" script="data/npc/scripts/SaffariNpc.lua" walkinterval="50000" floorchange="0"> <health now="1000" max="1000"/> <look type="130" head="0" body="114" legs="114" feet="0" addons="0"/> <parameters> <parameter key="message_greet" value="Hello |PLAYERNAME|. I can take you to {saffari} zone. {enter}"/> </parameters> </npc>



-----------------------------

configurações


config = {
Price = 2000, -- qnto vai custar
Premium = false, -- se precisa ser premium
Level = 50, -- level minimo para entrar
Saffari_Pos = {Enter = {x=189,y=53,z=7}, Exit = {x=195,y=53,z=7}}, -- pos da safari, e pos pra onde ele vai dps que acaba o tempo
Time = 30, -- tempo maximo q ele pode ficar no saffari in minutes
AddPokeballs = {11445,30}, -- id da saffari ball e quantidade
Blocked_pokeballs = {2146, 2147, 11437, 11441}, -- pokeballs q ele n pode estar na bag
Storages = {874547,874548}, -- n mexa
levelandskills = false, -- se vai perder skills e exp ao morrer
loot = false -- se vai perder loot ao morrer
}


comandos extra:

!saffari info -- mostra em uma janela sobre o preço, lvl e o tempo que pode ficar lá

!saffari leave -- faz com que o player saia da saffari zone

Correto, altere a tag para:
<movevent type="StepIn" actionid="5552" script="portalSemItem.lua"/> E o teleport você deixa sem position, configure apenas no script.

Bom Galerinha várias pessoas estavam pedindo esse tutorial de como substituir sprites no client! então resolvi postar. Tutorial Super fácil ! vamos começar!
 
Programas Necessários! 
1° Spr editor feito pelo Cristofer Martins!.  (Download no Final do Tópico) 2° Spr do seu servidor e do Servidor que você quer pegar as Sprites.  
Bom Começando agora o Tutorial.
1° Selecione a versão do seu client no caso 8.54 o de Poketibia e Selecione onde está localizado sua SPR.
 



 
2° Clique em Extract para começar a abrir sua SPR. OBS: você Pode abrir 2 Programas ao mesmo tempo.
 



 
3° Espere carregar a barrinha verde. ai depois clique em Ok.
 



 
4° Agora vá na SPR do servidor que você quer copiar a Sprite e seleciona elas e depois clica em Export! OBS: Recomento criar uma pasta para as Sprites.
 



 
5° ficando assim na pasta que você selecionou para ficar as Sprites. 
 



 
6° Agora volte na sua SPR e Selecione a mesma quantia de Sprites que você exportou no meu caso 12 sprites sem contar a Sprite do corpo do pokemon. OBS: Recomendo selecionar Sprites dos monstros de tibia.
 



 
7° Agora você seleciona as 12 Sprites que você exportou do client que você queria pegar as Sprites.
 



 
8° Ficando assim na Sua SPR .
 



 
9° Agora para salvar só você clicar em compile e depois ir na sua SPR e salvar por cima.
 



 
Pronto galera é isso ai só esperar salvar e pronto você substituiu sprites no seu client. depois Se quiser criar ele no dat faço outro tutorial mais já tem um tutorial desse genero no tibiaking.
 
Créditos: 
PxG;;   Pelo client usado para pegar o Bulbasaur.
Cristofer Martins;;   pelo SPR editor usado.
Gabrieltxu::   por fazer o Tutorial
 
​ 
Download do SPR editor by: Cristofer Martins
Download: http://www.4shared.com/archive/BYQgxaDt/SprEditor.html

As tags do actions.xml   os  itemid você coloca de acordo com seu gosto  
 Script: boxB
Script: boxC
Script: boxS
Feito isso vá na pasta mods do seu servidor e abra o arquivo firstitems. 
aonde tiver assim >     storage = 30001,
            items = {1988, 1987, 2382, 2120, 2580, 2550, 7385, 2395, 2547}  vc coloca os numeros dos ids das box ex: ficaria assim >  items = {1988, 1987, 2382, 2120, 2580, 2550, 7385, 2395, 2547, 7884, 7885, 7886} 
Bom espero ter ajudado  

Pokemon Pyrus ot
   

Antes de tudo por favor, leia abaixo:
Leiam aqui plx
   

Olá Pessoal Sou Novo Aki Vim Traser Meu 1° Post De Base Lendaria, Editei Essa Base Não Sei De Quem é a Base,
Mais a Editei pra uma amigo mais ele não quis mais, dai eu resolvi pegar essa base so com megas de pokemons Bons vamos la. 
 

[Pokemons Adicionados]

Arch Heatran. [100%]
Hoopa Unbound. [100%]
Shiny Hoopa Unbound. [100%]
Genesect Star. [100%]
Fallen Jirachi. [100%]
Majestic Lugia. [100%]
Black Kyogre. [100%]
Black Groudon. [100%]
Zygarde. [100%]
Shiny Zygarde. [100%]
Power Charizard. [100%]
Shiny Power Charizard. [100%]
Power Raichu. [100%]
Shiny Power Raichu. [100%]
Power Arcanine. [100%]
Shiny Power Arcanine. [100%]
Power Venusaur. [100%]
Shiny Power Venusaur. [100%]
Power Blastoise. [100%]
Shiny Power Blastoise. [100%]
 
Fotos: http://prntscr.com/bg3e47

[Boxs Adicionadas]

Xerneas Box Level 6000. [100%]

Yveatal Box Level 4000. [100%]
 
 
 
[Sistemas Novos] 
 
Fotos: http://prntscr.com/bg3baw
 
NPC [SHOP] Donate. [100%]
 
Fotos: http://prntscr.com/bg3gzq
 
NPC [SHOP] Stone. [100%]
 
 
 
[Removidos Do Map]

Megas De Boxs Trocados Por Power Pra Tirar um Pouco Do Lag.
 
Retirado  Lag [70%]
 
[Removidos]
Removidos  Bugs [70%]
 
Removido Bug Que Dava Erro Ao Logar No Account manager [100%]
 
[Sprints De Todas Box Trocadas]
 
Box1 a Box19.

[Download] Servidor+Client: https://mega.nz/#!60EDlLiT!LnAvjmlPLZ_FDTHU3KG0pH0yVJ4md8BCM61s_ayIH4Y
 
[Scan] Servidor+Client:  https://www.virustotal.com/pt/file/5fc602ad54c6a668ca06daa96e24239c3c19b0c5e118e04af09abf9c31f16352/analysis/1466248383/
 
[Scan Avast] : Servidor+Client: http://prntscr.com/bhvydx
 
 
[Contato] Facebook: https://www.facebook.com/everton.jesus.54