Novo Sistema De Vip , Via Npc!

6543210
em Actions e Talkactions

6543210

Z3R0
avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 11/10/08Posts: 26Char no Tibia: Ron Arka

Hoje estarei aqui postando um novo sistema de vip , via npc.

Eu já postei este tópico na seção de npcs , porém percebi ke o lugar exato para este tópico seria aki.

 

Bem hoje estou aki postando um npc ke vende vip!

Ele está funcionando corretamente e espero que gostem , realmente não foi flood , eu que fiz.

 

Primeiramente vá em data/npc e crie uma pasta chamada vip.xml.

 

nela cole isto :

 

<?xml version="1.0" encoding="UTF-8"?>

<npc name="Vip" script="data/npc/scripts/vip.lua" walkinterval="3000" floorchange="0" access="5" >

<health now="150" max="150"/>

<look type="332" head="78" body="86" legs="114" feet="116" addons="0" corpse="2212"/>

<parameters>

<parameter key="message_greet" value="Oi |PLAYERNAME|. Eu vendo { Vip }."/>

<parameter key="message_farewell" value="Volte Sempre."/>

</parameters>

</npc>

 

 

 

 

Depois vá em scripts e crie uma pasta chamada vip.lua , nela cole isto :

 

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

local node1 = keywordHandler:addKeyword({'vip'}, StdModule.say, {npcHandler = npcHandler, onlyFocus = true, text = 'Se Você Quise Compra Vip So Fala { days } .'})

function creatureSayCallback(cid, type, msg)

p = 10000 -- Valor Da Premium account Em GP

if(not npcHandler:isFocused(cid)) then

return false

end

local talkUser = NPCHANDLER_CONVbehavior == CONVERSATION_DEFAULT and 0 or cid

---------- MSGs ----------

if msgcontains(msg, 'premium') or msgcontains(msg, 'Premium') or msgcontains(msg, 'premium') or msgcontains(msg, 'Premium Accounts') or msgcontains(msg, 'days') then

selfSay('Pois Bem , Cada Dia De Vip Custa '..p..' GPs, Quantos Dias Você Deseja Comprar?', cid)

talkState[talkUser] = 1

---== compra por GPs ==---

elseif talkState[talkUser] == 1 then

if getNumber(msg) < 350 then

n = getNumber(msg)

if n ~= 0 then

if getPlayerMoney(cid) > p*n then

selfSay('Dias de Vip: {'..n..'} por {'..n*(p)..'} GPs?', cid)

talkState[talkUser] = 3

else

selfSay('Você Nao Tem Gold Suficientes Para Comprar {'..n..'} Dias De Vip.', cid)

talkState[talkUser] = 0

end

else

selfSay('Escolha Um Numero Acima De Zero.', cid)

talkState[talkUser] = 0

end

else

selfSay('Você Nao Pode Comprar Mais Que 350 Dias De Vip.', cid)

talkState[talkUser] = 0

end

elseif talkState[talkUser] == 3 then ---== GPs ==---

if msgcontains(msg, 'yes') or msgcontains(msg, 'sim') or msgcontains(msg, 'SIM') or msgcontains(msg, 'YES') then

if getPlayerPremiumDays(cid)+n <= 350 then

if (doPlayerRemoveMoney(cid, p*n) ~= TRUE) then

npcHandler:say('Voce Nao Tem Gold Suficientes!', cid)

talkState[talkUser] = 0

else

doPlayerAddPremiumDays(cid, n)

selfSay('Compra Efetuada Com Sucesso , Dias De Vip:{ '..n..' }.', cid)

talkState[talkUser] = 0

end

else

npcHandler:say('Voce Nao Pode Ter Mais Que 350 Dias De Vip!', cid)

talkState[talkUser] = 0

end

end

elseif msgcontains(msg, 'no') or msgcontains(msg, 'nao') or msgcontains(msg, 'não') or msgcontains(msg, 'NO') or msgcontains(msg, 'NAO') or msgcontains(msg, 'NÃO')then

selfSay('Tudo Bem.', cid)

talkState[talkUser] = 0

end

end

npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback)

npcHandler:addModule(FocusModule:new())

-- function maded by Gesior--

function getNumber(txt) --return number if its number and is > 0, else return 0

x = string.gsub(txt,"%a","")

x = tonumber(x)

if x ~= nill and x > 0 then

return x

else

return 0

end

end

 

 

 

 

Assim estará feito o npc , mas enquanto ao lugar que será vip?

 

Vá em data/movements e abra o arquivo movements.xml , depois cole esta tag :

 

<movevent type="StepIn" uniqueid="13700" event="script" value="vipe.lua"/>

 

Oque está em vermelho , é o UniqueId que vc colocará nos "chao" que somente vips poderam passar.

Logo em seguida vá em scripts e crie uma pasta chamada vipe.lua.

 

Nela cole isto :

 

-- Vip System by Zero

function onStepIn(cid, item, position, fromPosition)

 

local config = {

msgDenied = "Vc nao e vip , compre no npc vip.",

msgWelcome = "Seja Bem Vindo a Area vip."

}

 

if getPlayerPremiumDays(cid) <= 0 then

doTeleportThing(cid, fromPosition, true)

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, config.msgDenied)

doSendMagicEffect(getThingPos(cid), CONST_ME_MAGIC_BLUE)

return true

end

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, config.msgWelcome)

return true

end

 

 

 

Obrigado , espero que gostem.

@ZERO
@Z3R0
@ZER0
@Z3RO
@DRZ3R0
@DRZ3RO
@DRZER0
@DRZERO
@Z3R0MAN
@ZEROMAN
@Z3R0M4N

lolzot

ADM LOLZ OU DANIEL CHIA
avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 13/03/09Posts: 42Char no Tibia: casco chia

Olá eu gostei do script mais gostaria de saber pra que versão de ot ele eh?

30lgvmh.gif

wck1u0.gif

6543210

Z3R0
avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 11/10/08Posts: 26Char no Tibia: Ron Arka

Olá eu gostei do script mais gostaria de saber pra que versão de ot ele eh?

 

8.54

@ZERO
@Z3R0
@ZER0
@Z3RO
@DRZ3R0
@DRZ3RO
@DRZER0
@DRZERO
@Z3R0MAN
@ZEROMAN
@Z3R0M4N

satan666

Antichrist Superstar
avatar
Conde
Conde

INFOS

Grupo: CondeRegistrado: 07/05/08Posts: 612Char no Tibia: leviana luciferiana

isto ta mais pra premium account do que pra vip account.

creationb.jpg

"Um Deus que usasse seu poder para criar seres humanos que de antemão sabia que seriam atormentados eternamente, e que os predestinasse a isso,



não poderia ser sábio, nem justo e tampouco amoroso.

Além de nos submeter a isso vim a nos julgar e condenar por nossos atos aos tormentos do inferno.

pra minha pessoa isso não é um Deus Pai amoroso e bondoso como o chaman, seu padrão seria muito mais inferior do que o de muitos homens."

Mafagafox

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 13/09/09Posts: 5Char no Tibia: GOD MafagafoX

Simplesmente perfeito, ficou bom e eu coloquei no meu ot e testei, funcionou certinho, sem nenhum erro

 

Obrigado aew

Sou Fãn de:

ubd8101of9vd0bp5.jpg

 

userbarjv6wv.gif

 

#######################----------------Mafagafox--------------------#######################

mosca.gif

 

Aposto que pensou que era uma mosca na sua tela... XD tbm pensei.

hackscom

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 20/12/06Posts: 4

bem na verdade o q ele fez foi copiar o sistema de premiun acocunt e so mudo o nome para vip

 

se a pessoa do seu ot for premium ela passará de qualquer jeito , ainda nao fizeram um sitema de vip q diferencia premium da account

Felltate

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 11/01/10Posts: 10

serve pra TFS 0.3.4 ? 8.5 ?

00:26 Demon Blackr [9]: VC NEM PEGO SHILD

00:26 Demon Blackr [9]: NB

00:27 Ferrllock [33]: shield?

00:29 Demon Blackr [9]: ESQUESI

00:29 Demon Blackr [9]: TENHO SHILD NAO

Crazyskezi

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 07/10/12Posts: 31Char no Tibia: Thuuko Bigowa

Esse Sistema De Vip Não Foi Ele quem Criou !

No Ot X-dream Ou Friday Naquele Ot, A esse sistema de vip "exclusivo", Você O Pegou, Por tanto Não deveria estar recebendo "parabens" Por copiar uma coisa que não é sua, Nesse Caso Esse Topico é iregular, não deveria continuar..

Download Do Mapa. Vá em "Nomedapasta/data/npc/ Irá tem vip lá, Calcule e veja se esta tudo igual "PS : Nesse OT Tem um flood de pastas,

+Rep o que custa Colega ? =)