Vip's

[Felltate 0]

Gente me pelo amor d deus mermu eu presiso d um sitema vip 0.3.4, 8.5 e urgente ja to aguardando faz mt tempo gnt proucuro isso na net todos os dias e n acho... por favor um filho de deus me ajudee fikarei mt gratoo mermu..

Datalhes: Sistema vip Automatico d 30 dias ou + q fassa tudo quando a vip acabar ele voltar dp e um lugar q so vip passe.. mais c n tiver essas coisas n inporto pelo menos tendo o sitema vip tbom... vlwsssss Obrigado desd jah..

 

add:largatofg@hotmail.com

Editado Fevereiro 28, 2010 por Felltate

[Kerooker 7]

isso não seria na seção de scripting?

Moderação, favor mover o topico...

Felltate

reportei o topico para que seja movido...

[helinholima 13]

Tópico Movido para a seção "Pedidos de Scripts."

[caosfast 1]

Coloca em data/npc/script, salve como vip.lua

 

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 = 300000 -- 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

 

coloque em data/npc, salve como Mayron VIP Seller.xml

 

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

<npc name="Mayron VIP Seller" 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>

 

coloque em data/movements.xml

 

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

 

coloque em data/movements/script com nome de vipe.lua

 

-- 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

 

ESPERO QUE TENHA TE AJUDADO !!! CREDITOS ZERO

coloque o UID 13700 nos sqm que quiser ser só para vip... (300k por dia pode ser configurado) e coloque o npc tmb...

 

Podiam colocar um fixo de algum sistema vip (nao sei se ja tem) muitos usuários procuram por isso.

Editado Fevereiro 22, 2010 por fastfast

[Felltate 0]

Ehh e pra 8.5

TSF 0.3.4 ? Vlwws

 

N funfou add aew largatofg@hotmail.com

[caosfast 1]

Ehh e pra 8.5

TSF 0.3.4 ? Vlwws

 

N funfou add aew largatofg@hotmail.com

 

qual o erro que da? voce colocou o npc ? falou hi,vip,days,1,yes ? vc tinha 300k ? vc boto o unique id no chao 13700 pelo map editor? ... se fez isso era pra dar certo

[Felltate 0]

Tipow eu fiz tudooooooooooo Mais quando eu coloko o NPC no Server e abro ele o NPC n tah lah mais no Mapa editor ele Fika la..

add aew e me ajuda

largatofg@hotmail.com

Editado Fevereiro 23, 2010 por Felltate