[Encerrado] Npc bless

mateus900
em Tópicos Sem Resposta

mateus900

Fé Em Deus
avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 06/12/13Posts: 25

1° tem algum script de npc de bless , pra pda, que se paga com diamond?

2° se tiver tem como passa?

3° rep pra quem ajuda.

                                                                          Obstáculos e dificuldades fazem parte da vida. E a vida é a arte de superá-los.

                                                               Bulbassauro_Raio_Solar.gif

 

                                                   [ADM]50cent.....

FlamesAdmin

avatar
Infante
Infante

INFOS

Grupo: InfanteRegistrado: 28/01/12Posts: 1550Gênero: Masculino

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

function creatureSayCallback(cid, type, msg)
if(not npcHandler:isFocused(cid)) then
return false
end

local talkUser = NPCHANDLER_CONVbehavior == CONVERSATION_DEFAULT and 0 or cid

-- Conversa Jogador/NPC
if(msgcontains(msg, 'offer') or msgcontains(msg, 'trade')) then
selfSay('Eu vendo: Premium Account, Change Sex e Change Hometown.', cid)
elseif(msgcontains(msg, 'premium account') or msgcontains(msg, 'Premium Account')) then
selfSay('Os usuarios de contas VIP sao capazes de usar as habilidades exclusivos para seus pokemon como: teleport, ride, fly e outras coisas, bem, esse serviço custa 10 Diamonds, voce quer atualizar a sua conta?', cid)
talkState[talkUser] = 1
elseif(msgcontains(msg, 'bless') or msgcontains(msg, 'Bless')) then
selfSay('Para comprar bless, são necessárias 3 Diamonds, voce gostaria de ir em frente?', cid)
talkState[talkUser] = 2
elseif(msgcontains(msg, 'Change Sex') or msgcontains(msg, 'change sex')) then
selfSay('To change sex 5 diamonds are necessary, would you like to go on?', cid)
talkState[talkUser] = 3
elseif(msgcontains(msg, 'Change Hometown') or msgcontains(msg, 'change hometown')) then
selfSay('To change your hometown five diamonds are needed, what the city wants to choose?', cid)
talkState[talkUser] = 4

-- Confirmação da Compra
elseif(msgcontains(msg, 'yes') and talkState[talkUser] == 1) then
if(doPlayerRemoveItem(cid, 2145, 10) == true) then
selfSay('Foi adicionado 30 dias de VIP na sua conta!', cid)
doPlayerAddPremiumDays(cid, 30)
talkState[talkUser] = 0
else
selfSay('You do not have enough diamonds.', cid)
talkState[talkUser] = 0
end
elseif(msgcontains(msg, 'yes') and talkState[talkUser] == 2) then
if getPlayerBlessing(cid, 1) and getPlayerBlessing(cid, 2) and getPlayerBlessing(cid, 3) and getPlayerBlessing(cid, 4) and getPlayerBlessing(cid, 5) then
selfSay('You have already got one or more blessings!', cid)
else
if(doPlayerRemoveItem(cid, 2145, 3) == true) then
selfSay('You have been blessed.', cid)
doPlayerAddBlessing(cid, 1)
doPlayerAddBlessing(cid, 2)
doPlayerAddBlessing(cid, 3)
doPlayerAddBlessing(cid, 4)
doPlayerAddBlessing(cid, 5)
talkState[talkUser] = 0
else
selfSay('You do not have enough diamonds.', cid)
talkState[talkUser] = 0
end
end
elseif(msgcontains(msg, 'yes') and talkState[talkUser] == 3) then
if(doPlayerRemoveItem(cid, 2145, 5) == true) then
selfSay('I changex your sex, enjoy ur new life', cid)
if(getPlayerSex(cid) == PLAYERSEX_FEMALE) then
doPlayerSetSex(cid, PLAYERSEX_MALE)
else
doPlayerSetSex(cid, PLAYERSEX_FEMALE)
end
talkState[talkUser] = 0
else
selfSay('You do not have enough diamonds.', cid)
talkState[talkUser] = 0
end
----------------------------------------------------------------------------------------------------------------------
elseif(msgcontains(msg, 'saffron') and talkState[talkUser] == 4) then
if(doPlayerRemoveItem(cid, 2145, 5) == true) then
selfSay('You now live on Saffron!', cid)
doPlayerSetTown(cid, 1)
doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)))
talkState[talkUser] = 0
else
selfSay('You do not have enough diamonds.', cid)
talkState[talkUser] = 0
end
----------------------------------------------------------------------------------------------------------------------
elseif(msgcontains(msg, 'cerulean') and talkState[talkUser] == 4) then
if(doPlayerRemoveItem(cid, 2145, 5) == true) then
selfSay('You now live on Cerulean!', cid)
doPlayerSetTown(cid, 2)
doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)))
talkState[talkUser] = 0
else
selfSay('You do not have enough diamonds.', cid)
talkState[talkUser] = 0
end
----------------------------------------------------------------------------------------------------------------------
elseif(msgcontains(msg, 'cinnabar') and talkState[talkUser] == 4) then
if(doPlayerRemoveItem(cid, 2145, 5) == true) then
selfSay('You now live on Cinnabar!', cid)
doPlayerSetTown(cid, 3)
doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)))
talkState[talkUser] = 0
else
selfSay('You do not have enough diamonds.', cid)
talkState[talkUser] = 0
end
----------------------------------------------------------------------------------------------------------------------
elseif(msgcontains(msg, 'vermilion') and talkState[talkUser] == 4) then
if(doPlayerRemoveItem(cid, 2145, 5) == true) then
selfSay('You now live on Vermilion!', cid)
doPlayerSetTown(cid, 4)
doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)))
talkState[talkUser] = 0
else
selfSay('You do not have enough diamonds.', cid)
talkState[talkUser] = 0
end
----------------------------------------------------------------------------------------------------------------------
elseif(msgcontains(msg, 'fuchsia') and talkState[talkUser] == 4) then
if(doPlayerRemoveItem(cid, 2145, 5) == true) then
selfSay('You now live on Fuchsia!', cid)
doPlayerSetTown(cid, 5)
doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)))
talkState[talkUser] = 0
else
selfSay('You do not have enough diamonds.', cid)
talkState[talkUser] = 0
end
----------------------------------------------------------------------------------------------------------------------
elseif(msgcontains(msg, 'celadon') and talkState[talkUser] == 4) then
if(doPlayerRemoveItem(cid, 2145, 5) == true) then
selfSay('You now live on Celadon!', cid)
doPlayerSetTown(cid, 6)
doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)))
talkState[talkUser] = 0
else
selfSay('You do not have enough diamonds.', cid)
talkState[talkUser] = 0
end
----------------------------------------------------------------------------------------------------------------------
elseif(msgcontains(msg, 'pewter') and talkState[talkUser] == 4) then
if(doPlayerRemoveItem(cid, 2145, 5) == true) then
selfSay('You now live on Pewter!', cid)
doPlayerSetTown(cid, 7)
doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)))
talkState[talkUser] = 0
else
selfSay('You do not have enough diamonds.', cid)
talkState[talkUser] = 0
end
----------------------------------------------------------------------------------------------------------------------
elseif(msgcontains(msg, 'viridian') and talkState[talkUser] == 4) then
if(doPlayerRemoveItem(cid, 2145, 5) == true) then
selfSay('You now live on Viridian!', cid)
doPlayerSetTown(cid, 9)
doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)))
talkState[talkUser] = 0
else
selfSay('You do not have enough diamonds.', cid)
talkState[talkUser] = 0
end
----------------------------------------------------------------------------------------------------------------------
elseif(msgcontains(msg, 'lavender') and talkState[talkUser] == 4) then
if(doPlayerRemoveItem(cid, 2145, 5) == true) then
selfSay('You now live on Lavender!', cid)
doPlayerSetTown(cid, 10)
doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)))
talkState[talkUser] = 0
else
selfSay('You do not have enough diamonds.', cid)
talkState[talkUser] = 0
----------------------------------------------------------------------------------------------------------------------
end
end
return TRUE
end

npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback)
npcHandler:addModule(FocusModule:new())

Para comprar os itens:

premium account <- 10 Diamonds
bless <- 3 Diamonds
change sex <- 5 Diamonds
change hometown <- Trocar de cidade <- 5 Diamonds

[Show off] Mapping Pokémon (OLD)

[PDA] Pokeball Icon System

 

 

[Mapping] Mapinha Johto = Para conferir, clique Aqui
[Mapping] Outland RockPara conferir, clique Aqui
[Mapping] Centro Pokémon de Cinnabar e cidade de Hamlin(PxG) Para conferir, clique Aqui
[Mapping] Antigo Trade Center(PvP) do PxG Para conferir, clique Aqui
[PDA] Reformulação do level das magias e level dos Pokemons Para conferir, clique Aqui
[PDA] Comando de Clan sem task = Para conferir, clique Aqui
[Utilitário] OT Restarter by: Gabrielbsales(Featzen) Para conferir, clique Aqui
[Database] Descriptografia MD5 & SHA1 = Para conferir, clique Aqui
[Scripting] Level Máximo = Para conferir, clique Aqui

 

mateus900

Fé Em Deus
avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 06/12/13Posts: 25

 

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

 

function creatureSayCallback(cid, type, msg)

if(not npcHandler:isFocused(cid)) then

return false

end

 

local talkUser = NPCHANDLER_CONVbehavior == CONVERSATION_DEFAULT and 0 or cid

 

-- Conversa Jogador/NPC

if(msgcontains(msg, 'offer') or msgcontains(msg, 'trade')) then

selfSay('Eu vendo: Premium Account, Change Sex e Change Hometown.', cid)

elseif(msgcontains(msg, 'premium account') or msgcontains(msg, 'Premium Account')) then

selfSay('Os usuarios de contas VIP sao capazes de usar as habilidades exclusivos para seus pokemon como: teleport, ride, fly e outras coisas, bem, esse serviço custa 10 Diamonds, voce quer atualizar a sua conta?', cid)

talkState[talkUser] = 1

elseif(msgcontains(msg, 'bless') or msgcontains(msg, 'Bless')) then

selfSay('Para comprar bless, são necessárias 3 Diamonds, voce gostaria de ir em frente?', cid)

talkState[talkUser] = 2

elseif(msgcontains(msg, 'Change Sex') or msgcontains(msg, 'change sex')) then

selfSay('To change sex 5 diamonds are necessary, would you like to go on?', cid)

talkState[talkUser] = 3

elseif(msgcontains(msg, 'Change Hometown') or msgcontains(msg, 'change hometown')) then

selfSay('To change your hometown five diamonds are needed, what the city wants to choose?', cid)

talkState[talkUser] = 4

 

-- Confirmação da Compra

elseif(msgcontains(msg, 'yes') and talkState[talkUser] == 1) then

if(doPlayerRemoveItem(cid, 2145, 10) == true) then

selfSay('Foi adicionado 30 dias de VIP na sua conta!', cid)

doPlayerAddPremiumDays(cid, 30)

talkState[talkUser] = 0

else

selfSay('You do not have enough diamonds.', cid)

talkState[talkUser] = 0

end

elseif(msgcontains(msg, 'yes') and talkState[talkUser] == 2) then

if getPlayerBlessing(cid, 1) and getPlayerBlessing(cid, 2) and getPlayerBlessing(cid, 3) and getPlayerBlessing(cid, 4) and getPlayerBlessing(cid, 5) then

selfSay('You have already got one or more blessings!', cid)

else

if(doPlayerRemoveItem(cid, 2145, 3) == true) then

selfSay('You have been blessed.', cid)

doPlayerAddBlessing(cid, 1)

doPlayerAddBlessing(cid, 2)

doPlayerAddBlessing(cid, 3)

doPlayerAddBlessing(cid, 4)

doPlayerAddBlessing(cid, 5)

talkState[talkUser] = 0

else

selfSay('You do not have enough diamonds.', cid)

talkState[talkUser] = 0

end

end

elseif(msgcontains(msg, 'yes') and talkState[talkUser] == 3) then

if(doPlayerRemoveItem(cid, 2145, 5) == true) then

selfSay('I changex your sex, enjoy ur new life', cid)

if(getPlayerSex(cid) == PLAYERSEX_FEMALE) then

doPlayerSetSex(cid, PLAYERSEX_MALE)

else

doPlayerSetSex(cid, PLAYERSEX_FEMALE)

end

talkState[talkUser] = 0

else

selfSay('You do not have enough diamonds.', cid)

talkState[talkUser] = 0

end

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

elseif(msgcontains(msg, 'saffron') and talkState[talkUser] == 4) then

if(doPlayerRemoveItem(cid, 2145, 5) == true) then

selfSay('You now live on Saffron!', cid)

doPlayerSetTown(cid, 1)

doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)))

talkState[talkUser] = 0

else

selfSay('You do not have enough diamonds.', cid)

talkState[talkUser] = 0

end

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

elseif(msgcontains(msg, 'cerulean') and talkState[talkUser] == 4) then

if(doPlayerRemoveItem(cid, 2145, 5) == true) then

selfSay('You now live on Cerulean!', cid)

doPlayerSetTown(cid, 2)

doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)))

talkState[talkUser] = 0

else

selfSay('You do not have enough diamonds.', cid)

talkState[talkUser] = 0

end

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

elseif(msgcontains(msg, 'cinnabar') and talkState[talkUser] == 4) then

if(doPlayerRemoveItem(cid, 2145, 5) == true) then

selfSay('You now live on Cinnabar!', cid)

doPlayerSetTown(cid, 3)

doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)))

talkState[talkUser] = 0

else

selfSay('You do not have enough diamonds.', cid)

talkState[talkUser] = 0

end

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

elseif(msgcontains(msg, 'vermilion') and talkState[talkUser] == 4) then

if(doPlayerRemoveItem(cid, 2145, 5) == true) then

selfSay('You now live on Vermilion!', cid)

doPlayerSetTown(cid, 4)

doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)))

talkState[talkUser] = 0

else

selfSay('You do not have enough diamonds.', cid)

talkState[talkUser] = 0

end

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

elseif(msgcontains(msg, 'fuchsia') and talkState[talkUser] == 4) then

if(doPlayerRemoveItem(cid, 2145, 5) == true) then

selfSay('You now live on Fuchsia!', cid)

doPlayerSetTown(cid, 5)

doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)))

talkState[talkUser] = 0

else

selfSay('You do not have enough diamonds.', cid)

talkState[talkUser] = 0

end

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

elseif(msgcontains(msg, 'celadon') and talkState[talkUser] == 4) then

if(doPlayerRemoveItem(cid, 2145, 5) == true) then

selfSay('You now live on Celadon!', cid)

doPlayerSetTown(cid, 6)

doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)))

talkState[talkUser] = 0

else

selfSay('You do not have enough diamonds.', cid)

talkState[talkUser] = 0

end

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

elseif(msgcontains(msg, 'pewter') and talkState[talkUser] == 4) then

if(doPlayerRemoveItem(cid, 2145, 5) == true) then

selfSay('You now live on Pewter!', cid)

doPlayerSetTown(cid, 7)

doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)))

talkState[talkUser] = 0

else

selfSay('You do not have enough diamonds.', cid)

talkState[talkUser] = 0

end

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

elseif(msgcontains(msg, 'viridian') and talkState[talkUser] == 4) then

if(doPlayerRemoveItem(cid, 2145, 5) == true) then

selfSay('You now live on Viridian!', cid)

doPlayerSetTown(cid, 9)

doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)))

talkState[talkUser] = 0

else

selfSay('You do not have enough diamonds.', cid)

talkState[talkUser] = 0

end

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

elseif(msgcontains(msg, 'lavender') and talkState[talkUser] == 4) then

if(doPlayerRemoveItem(cid, 2145, 5) == true) then

selfSay('You now live on Lavender!', cid)

doPlayerSetTown(cid, 10)

doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)))

talkState[talkUser] = 0

else

selfSay('You do not have enough diamonds.', cid)

talkState[talkUser] = 0

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

end

end

return TRUE

end

 

npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback)

npcHandler:addModule(FocusModule:new())

Para comprar os itens:

premium account <- 10 Diamonds
bless <- 3 Diamonds
change sex <- 5 Diamonds
change hometown <- Trocar de cidade <- 5 Diamonds

vlw

                                                                          Obstáculos e dificuldades fazem parte da vida. E a vida é a arte de superá-los.

                                                               Bulbassauro_Raio_Solar.gif

 

                                                   [ADM]50cent.....

FlamesAdmin

avatar
Infante
Infante

INFOS

Grupo: InfanteRegistrado: 28/01/12Posts: 1550Gênero: Masculino

Por nada.

[Show off] Mapping Pokémon (OLD)

[PDA] Pokeball Icon System

 

 

[Mapping] Mapinha Johto = Para conferir, clique Aqui
[Mapping] Outland RockPara conferir, clique Aqui
[Mapping] Centro Pokémon de Cinnabar e cidade de Hamlin(PxG) Para conferir, clique Aqui
[Mapping] Antigo Trade Center(PvP) do PxG Para conferir, clique Aqui
[PDA] Reformulação do level das magias e level dos Pokemons Para conferir, clique Aqui
[PDA] Comando de Clan sem task = Para conferir, clique Aqui
[Utilitário] OT Restarter by: Gabrielbsales(Featzen) Para conferir, clique Aqui
[Database] Descriptografia MD5 & SHA1 = Para conferir, clique Aqui
[Scripting] Level Máximo = Para conferir, clique Aqui

 

zipter98

avatar
Herói
Herói

INFOS

Grupo: HeróiRegistrado: 20/09/12Posts: 2553Gênero: Masculino

Tópico movido para a seção de dúvidas e pedidos resolvidos.

Não respondo PMs solicitando suporte. Já existem seções no fórum para isto.

Stigal

don't ever stop...
avatar
Herói
Herói

INFOS

Grupo: HeróiRegistrado: 28/11/10Posts: 3402Gênero: Masculino
A questão neste tópico de suporte foi encerrada por falta de respostas. Este tópico está fechado e foi movido para Suporte - Tópicos Sem Resposta.

+ Caso a dúvida não tenha sido resolvida você poderá criar outro tópico solicitando ajuda.
* Lembre-se que é permitido dar UP no tópico a cada 24 horas para assim o destacar e manter movimentado.

VI6MDIG.png

 

"O fracasso é a oportunidade de se começar de novo inteligentemente"

Minhas Redes Sociais: Youtube | Página & Grupo | Steam  | Discord Xtibia | Skype: @mrooger

 

OTpanel