kmmyrawr

Tem sim. O que voce deve fazer:
 
Escolher o item que ao ser uzado adicione os dias de vip.
Depois voce tera que criar uma action com o id do item que ao clicar vai adicionar a vip.
 
no momento eu to usando um celular mas assim que possivel e se voce nao conseguir eu edito aqui e coloco o script pra voce. Boa sorte.

Só esqueceu de arrumar a linha 38 .-.
 

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 creatureSayCallback(cid, type, msg) if(not npcHandler:isFocused(cid)) then return false end --------------------------------------------------------------------------------- ATÉ AQUI NÃO MODIFIQUE local talkUser = NPCHANDLER_CONVbehavior == CONVERSATION_DEFAULT and 0 or cid if msgcontains(msg, 'dragon scale mail') then ---------------------- NOME DO ITEM QUE VOCE QUER VENDER selfSay('Do you want to buy a Dragon Scale Mail from me?', cid) --- PERGUNTA talkState[talkUser] = 1 elseif msgcontains(msg, 'yes') and talkState[talkUser] == 1 then local qntd = XXX ------------------------------------------------- QUANTIDADE DO DETERMINADO ITEM local itemid = XXXX ---------------------------------------------- ID DO ITEM if getPlayerItemCount(cid, itemid) >= qnt then selfSay('Voce comprou TAL item!', cid) ----------- CONFIRMAÇAO DA COMPRA doPlayerRemoveItem(cid, itemid, qntd) doPlayerAddItem(cid, YYYY, 1) -------------------- ID DO ITEM QUE RECEBERA talkState[talkUser] = 0 else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você precisa de "..qnt.." "..getItemNameById(itemid).." para comprar.") end end return TRUE end npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback)

Não sei se funciona no seu HEX editor, mas eu sempre fiz assim:
 
>> 1B8864 <<
 
Mas se precisar, é claro, mude o prefixo.
 
 
03 1C é para port 7171
 
Mas como voce quer 7172:
 
04 1C é para port 7172

Bom, vamos começar. Creio que você ja tenha todos os arquivos do Sistema Vip.
 
Então no arquivo vipaccplayer.lua:
 

function onSay(cid, words, param, channel) if words == "/buyvip" then local price = 1000000 local days = 0 if doPlayerRemoveMoney(cid, price) then doPlayerAddItem(cid, XXXX, 1) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Voce comprou o VIP Item!") else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você precisa de "..price.." para adicionar "..days.." dia(s) de vip.") end elseif words == "/vipdays" then local duration = getVipDate(cid) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você possui "..getVipDays(cid).." dia(s) de vip."..(duration and (" Ela irá durar até "..duration..".") or "")) end return TRUE end
 
Mude o "XXXX" para o ID do item que ao ser usado vai adicionar o numero de dias de VIP.
 
 
Em data\actions\actions.xml adicione em algum lugar:
 

<action itemid="XXXX" event="script" value="itemvip.lua"/>
 
Mude o "XXXX" para o ID do item que ao ser usado vai adicionar o numero de dias de VIP.
 
 
E por último, crie um arquivo com o nome itemvip.lua em data\actions\scripts\
 

function onUse(cid, words, param, channel) if doPlayerRemoveItem(cid,XXXX,1) then addVipDays(cid, days) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você adicionou "..days.." dia(s) de vip, agora você possui "..getVipDays(cid).." dia(s) de vip.") end return TRUE end
 
Mude o "XXXX" para o ID do item que ao ser usado vai adicionar o numero de dias de VIP.

A ultima solução é abrir a pasta data\talkactions\scripts e ver se os arquivos correspondentes aos comandos de CM e GM estão lá.
 
 
 
Pra adicionar Monsters do zero, voce vai precisar das Sprites deles. Então voce usa um Sprite Editor pra colocar as sprites do Pokemon la que voce pode até substituir por outro monstro.
 
Depois voce vai precisar fazer o script do monstro, sugiro que copie um já existente e arrume o Outfit ID, HP, e essas coisas.
 
Se os Sprites ja á estiverem feitos e no Tibia.spr, voce só precisa fazer os scripts.
 
 
Como não sou scripter de Poketibia não posso te ajudar muito nisso, mas o nescessário a fazer está ai.

Já existe um tópico aqui no tibia com a solução para seu problema, mas olhando a idéia, decidi melhorar ela:
 
Primeiro crie um arquivo do Bloco de Notas na pasta seuot\actions\scripts com o nome teleportrune.lua
 
Nele escreva:
 

function onUse(cid, item, frompos, item2, topos) if item2.itemid == 0 then doPlayerSendCancel(cid,"Voce nao pode faser isso.") else playerpos = getPlayerPosition(cid) doTeleportThing(cid,topos) doSendMagicEffect(playerpos,2) doSendMagicEffect(topos,10) end end
 
Depois em seuot\actions no actions.xml adicione:
 

<action itemid="XXXXX" script="teleportrune.lua" /> --- No XXXXX É O ID DA RUNA
 
 
Creditos: -------ArThUr-------

Closed.