Ola Xtibianos,
Venho Postar o Sistema De CLANS Do "PokeXGames"...
Arrumei Uns Problemas Neles e Agora So Podem Entrar Nos Clan Level 80+
Vamos Ao Tutorial Então:
Vá a "Pasta Do Servidor > Data > Lib" Crie Um Um Arquivo.lua Nomeado Como "clan system"
Adicione Isso Dentro Dele:
local clansAtk = {
[1] = {
[FIREDAMAGE] = {
[1] = {atk = 1.17},
[2] = {atk = 1.22},
[3] = {atk = 1.27},
[4] = {atk = 1.32},
[5] = {atk = 1.37},
},
["null"] = {
},
},
[2] = {
[WATERDAMAGE] = {
[1] = {atk = 1.05},
[2] = {atk = 1.10},
[3] = {atk = 1.15},
[4] = {atk = 1.20},
[5] = {atk = 1.25},
},
[iCEDAMAGE] = {
[1] = {atk = 1.10},
[2] = {atk = 1.15},
[3] = {atk = 1.20},
[4] = {atk = 1.25},
[5] = {atk = 1.30},
},
},
[3] = {
[ROCKDAMAGE] = {
[1] = {atk = 1.05},
[2] = {atk = 1.10},
[3] = {atk = 1.15},
[4] = {atk = 1.20},
[5] = {atk = 1.25},
},
[GROUNDDAMAGE] = {
[1] = {atk = 1.05},
[2] = {atk = 1.10},
[3] = {atk = 1.15},
[4] = {atk = 1.20},
[5] = {atk = 1.25},
},
},
[4] = {
[FLYDAMAGE] = {
[1] = {atk = 1.15},
[2] = {atk = 1.20},
[3] = {atk = 1.25},
[4] = {atk = 1.30},
[5] = {atk = 1.35},
},
[DRAGONDAMAGE] = {
[1] = {atk = 1.10},
[2] = {atk = 1.15},
[3] = {atk = 1.20},
[4] = {atk = 1.25},
[5] = {atk = 1.30},
},
},
[5] = {
[GHOSTDAMAGE] = {
[1] = {atk = 1.05},
[2] = {atk = 1.10},
[3] = {atk = 1.15},
[4] = {atk = 1.20},
[5] = {atk = 1.25},
},
[POISONDAMAGE] = {
[1] = {atk = 1.08},
[2] = {atk = 1.13},
[3] = {atk = 1.18},
[4] = {atk = 1.23},
[5] = {atk = 1.28},
},
},
[6] = {
[FIGHTDAMAGE] = {
[1] = {atk = 1.05},
[2] = {atk = 1.10},
[3] = {atk = 1.15},
[4] = {atk = 1.20},
[5] = {atk = 1.25},
},
[NORMALDAMAGE] = {
[1] = {atk = 1.05},
[2] = {atk = 1.10},
[3] = {atk = 1.15},
[4] = {atk = 1.20},
[5] = {atk = 1.25},
},
},
[7] = {
[PSYCHICDAMAGE] = {
[1] = {atk = 1.10},
[2] = {atk = 1.15},
[3] = {atk = 1.20},
[4] = {atk = 1.25},
[5] = {atk = 1.30},
},
["null"] = {
},
},
[8] = {
[GRASSDAMAGE] = {
[1] = {atk = 1.05},
[2] = {atk = 1.10},
[3] = {atk = 1.15},
[4] = {atk = 1.20},
[5] = {atk = 1.25},
},
[bUGDAMAGE] = {
[1] = {atk = 1.05},
[2] = {atk = 1.10},
[3] = {atk = 1.15},
[4] = {atk = 1.20},
[5] = {atk = 1.25},
},
},
[9] = {
[ELECTRICDAMAGE] = {
[1] = {atk = 1.12},
[2] = {atk = 1.17},
[3] = {atk = 1.22},
[4] = {atk = 1.27},
[5] = {atk = 1.32},
},
["null"] = {
},
}
}
local clansDef = {
[1] = {
["fire"] = {
[1] = {def = 0.17},
[2] = {def = 0.22},
[3] = {def = 0.27},
[4] = {def = 0.32},
[5] = {def = 0.37},
},
["null"] = {
},
},
[2] = {
["water"] = {
[1] = {def = 0.05},
[2] = {def = 0.10},
[3] = {def = 0.15},
[4] = {def = 0.20},
[5] = {def = 0.25},
},
["ice"] = {
[1] = {def = 0.10},
[2] = {def = 0.15},
[3] = {def = 0.20},
[4] = {def = 0.25},
[5] = {def = 0.30},
},
},
[3] = {
["rock"] = {
[1] = {def = 0.05},
[2] = {def = 0.10},
[3] = {def = 0.15},
[4] = {def = 0.20},
[5] = {def = 0.25},
},
["ground"] = {
[1] = {def = 0.10},
[2] = {def = 0.15},
[3] = {def = 0.20},
[4] = {def = 0.25},
[5] = {def = 0.30},
},
},
[4] = {
["flying"] = {
[1] = {def = 0.15},
[2] = {def = 0.20},
[3] = {def = 0.25},
[4] = {def = 0.30},
[5] = {def = 0.35},
},
["dragon"] = {
[1] = {def = 0.10},
[2] = {def = 0.15},
[3] = {def = 0.20},
[4] = {def = 0.25},
[5] = {def = 0.30},
},
},
[5] = {
["ghost"] = {
[1] = {def = 0.05},
[2] = {def = 0.10},
[3] = {def = 0.15},
[4] = {def = 0.20},
[5] = {def = 0.25},
},
["poison"] = {
[1] = {def = 0.08},
[2] = {def = 0.13},
[3] = {def = 0.18},
[4] = {def = 0.23},
[5] = {def = 0.28},
},
},
[6] = {
["fighting"] = {
[1] = {def = 0.05},
[2] = {def = 0.10},
[3] = {def = 0.15},
[4] = {def = 0.20},
[5] = {def = 0.25},
},
["normal"] = {
[1] = {def = 0.05},
[2] = {def = 0.10},
[3] = {def = 0.15},
[4] = {def = 0.20},
[5] = {def = 0.25},
},
},
[7] = {
["psychic"] = {
[1] = {def = 0.10},
[2] = {def = 0.15},
[3] = {def = 0.20},
[4] = {def = 0.25},
[5] = {def = 0.30},
},
["null"] = {
},
},
[8] = {
["grass"] = {
[1] = {def = 0.05},
[2] = {def = 0.10},
[3] = {def = 0.15},
[4] = {def = 0.20},
[5] = {def = 0.25},
},
["bug"] = {
[1] = {def = 0.05},
[2] = {def = 0.10},
[3] = {def = 0.15},
[4] = {def = 0.20},
[5] = {def = 0.25},
},
},
[9] = {
["electric"] = {
[1] = {def = 0.12},
[2] = {def = 0.17},
[3] = {def = 0.22},
[4] = {def = 0.27},
[5] = {def = 0.32},
},
}
}
function getClanPorcent(master, combat, option, type, type2)
if getPlayerStorageValue(master, 86228) >= 1 then
local clanAtk = clansAtk[getPlayerStorageValue(master, 86228)]
local clanDef = clansDef[getPlayerStorageValue(master, 86228)]
for i = 1, 9 do
if getPlayerStorageValue(master, 86228) == i then
if option == "atk" and clanAtk[combat] then
return clanAtk[combat][getPlayerStorageValue(master, 862281)].atk
else
if option == "def" and clanDef[type] then --alterado v1.3
return clanDef[type][getPlayerStorageValue(master, 862281)].def
elseif option == "def" and clanDef[type2] then
return clanDef[type2][getPlayerStorageValue(master, 862281)].def
end
end
end
end
end
return option == "atk" and 1 or 0
end
Salve e Feche.
Agora Vá a Pasta "NPC" e Crie Os Seguintes Npc's:
Gardestrike Master
<?xml version="1.0" encoding="UTF-8"?>
<npc name="Gardestrike Master" script="gardestrike master.lua" walkinterval="0" floorchange="0" access="5" level="1" maglevel="1">
<health now="150" max="150"/>
<look type="1429" head="114" body="119" legs="114" feet="114" corpse="2212"/>
<parameters>
<parameter key="message_greet" value="Welcome |PLAYERNAME|, you want to join to my {clan}? Or you want to move up of {rank}? Or you want to transform you poke in a {shiny}?"/>
</parameters>
</npc>
Malefic Master
<?xml version="1.0" encoding="UTF-8"?>
<npc name="Malefic Master" script="malefic master.lua" walkinterval="0" floorchange="0" access="5" level="1" maglevel="1">
<health now="150" max="150"/>
<look type="1430" head="114" body="119" legs="114" feet="114" corpse="2212"/>
<parameters>
<parameter key="message_greet" value="Welcome |PLAYERNAME|, you want to join to my {clan}? Or you want to move up of {rank}? Or you want to transform you poke in a {shiny}?"/>
</parameters>
</npc>
Naturia Master
<?xml version="1.0" encoding="UTF-8"?>
<npc name="Naturia Master" script="naturia master.lua" walkinterval="0" floorchange="0" access="5" level="1" maglevel="1">
<health now="150" max="150"/>
<look type="1434" head="114" body="119" legs="114" feet="114" corpse="2212"/>
<parameters>
<parameter key="message_greet" value="Welcome |PLAYERNAME|, you want to join to my {clan}? Or you want to move up of {rank}? Or you want to transform you poke in a {shiny}?"/>
</parameters>
</npc>
Orebound Master
<?xml version="1.0" encoding="UTF-8"?>
<npc name="Orebound Master" script="orebound master.lua" walkinterval="0" floorchange="0" access="5" level="1" maglevel="1">
<health now="150" max="150"/>
<look type="1427" head="114" body="119" legs="114" feet="114" corpse="2212"/>
<parameters>
<parameter key="message_greet" value="Welcome |PLAYERNAME|, you want to join to my {clan}? Or you want to move up of {rank}? Or you want to transform you poke in a {shiny}?"/>
</parameters>
</npc>
Psycraft Master
<?xml version="1.0" encoding="UTF-8"?>
<npc name="Psycraft Master" script="psycraft master.lua" walkinterval="0" floorchange="0" access="5" level="1" maglevel="1">
<health now="150" max="150"/>
<look type="1426" head="114" body="119" legs="114" feet="114" corpse="2212"/>
<parameters>
<parameter key="message_greet" value="Welcome |PLAYERNAME|, you want to join to my {clan}? Or you want to move up of {rank}? Or you want to transform you poke in a {shiny}?"/>
</parameters>
</npc>
Raibolt Master
<?xml version="1.0" encoding="UTF-8"?>
<npc name="Raibolt Master" script="raibolt master.lua" walkinterval="0" floorchange="0" access="5" level="1" maglevel="1">
<health now="150" max="150"/>
<look type="1421" head="114" body="119" legs="114" feet="114" corpse="2212"/>
<parameters>
<parameter key="message_greet" value="Welcome |PLAYERNAME|, you want to join to my {clan}? Or you want to move up of {rank}? Or you want to transform you poke in a {shiny}?"/>
</parameters>
</npc>
Seavel Master
<?xml version="1.0" encoding="UTF-8"?>
<npc name="Seavel Master" script="seavel master.lua" walkinterval="0" floorchange="0" access="5" level="1" maglevel="1">
<health now="150" max="150"/>
<look type="1438" head="114" body="119" legs="114" feet="114" corpse="2212"/>
<parameters>
<parameter key="message_greet" value="Welcome |PLAYERNAME|, you want to join to my {clan}? Or you want to move up of {rank}? Or you want to transform you poke in a {shiny}?"/>
</parameters>
</npc>
Volcanic Master
<?xml version="1.0" encoding="UTF-8"?>
<npc name="Volcanic Master" script="volcanic master.lua" walkinterval="0" floorchange="0" access="5" level="1" maglevel="1">
<health now="150" max="150"/>
<look type="1425" head="114" body="119" legs="114" feet="114" corpse="2212"/>
<parameters>
<parameter key="message_greet" value="Welcome |PLAYERNAME|, you want to join to my {clan}? Or you want to move up of {rank}? Or you want to transform you poke in a {shiny}?"/>
</parameters>
</npc>
Wingeon Master
<?xml version="1.0" encoding="UTF-8"?>
<npc name="Wingeon Master" script="wingeon master.lua" walkinterval="0" floorchange="0" access="5" level="1" maglevel="1">
<health now="150" max="150"/>
<look type="1424" head="114" body="119" legs="114" feet="114" corpse="2212"/>
<parameters>
<parameter key="message_greet" value="Welcome |PLAYERNAME|, you want to join to my {clan}? Or you want to move up of {rank}? Or you want to transform you poke in a {shiny}?"/>
</parameters>
</npc>
Apos Criar Todos Feche e Salve.
Agora Va Na Pasta "NPC > Scripts" e Crie Esses Arquivos.lua
gardestrike master
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
rank = {"a Gardestrike Fist", "a Gardestrike Tamer","a Gardestrike Fighter","a Gardestrike DeathHand","a Gardestrike Champion"}
if msgcontains(msg, 'clan') or msgcontains(msg, 'Clan') then
if getPlayerStorageValue(cid, 86228) == 6 then
selfSay("You already are of the clan Gardestrike!", cid)
talkState[talkUser] = 0
return true
elseif getPlayerStorageValue(cid, 86228) >= 1 then
selfSay("You already are of another clan!", cid)
talkState[talkUser] = 0
return true
end
selfSay("So you want to join in my clan... Are you sure that?", cid)
talkState[talkUser] = 2
elseif (msgcontains(msg, 'yes') or msgcontains(msg, 'Yes')) and talkState[talkUser] == 2 then
if getPlayerLevel(cid) < 80 then
selfSay("You are too weak yet... You need to be atleast level 80 to enter in the clan!", cid)
talkState[talkUser] = 0
return true
end
selfSay("OK then... Now you are a great member of de clan Gardestrike!", cid)
setPlayerStorageValue(cid, 86228, 6)
setPlayerStorageValue(cid, 862281, 1)
setPlayerStorageValue(cid, 181614, 1)
talkState[talkUser] = 0
elseif msgcontains(msg, 'rank') or msgcontains(msg, 'rank') then
if getPlayerStorageValue(cid, 86228) == 6 then
selfSay("So.. you want to move up of rank?", cid)
talkState[talkUser] = 3
else
selfSay("You aren't of the clan gardestrike! Get out of here!", cid)
talkState[talkUser] = 0
return true
end
elseif (msgcontains(msg, 'yes') or msgcontains(msg, 'Yes')) and talkState[talkUser] == 3 then
level = 80
if (getPlayerStorageValue(cid, 862281)+1) == 2 then
level = 90
elseif (getPlayerStorageValue(cid, 862281)+1) == 3 then
level = 100
elseif (getPlayerStorageValue(cid, 862281)+1) == 4 then
level = 110
elseif (getPlayerStorageValue(cid, 862281)+1) == 5 then
level = 120
end
if getPlayerLevel(cid) < level then
selfSay("You are too weak yet... You need to be atleast level "..level.." to move up of rank!", cid)
talkState[talkUser] = 0
return true
end
if getPlayerStorageValue(cid, 862281) == 6 then
selfSay("You are already a master of our clan!", cid)
talkState[talkUser] = 0
return true
end
setPlayerStorageValue(cid, 862281, getPlayerStorageValue(cid, 862281)+1)
if getPlayerStorageValue(cid, 862281) == 6 then
setPlayerStorageValue(cid, 181628, 1)
end
selfSay("So here we are... You are now a "..rank[getPlayerStorageValue(cid, 862281)]..", rank "..getPlayerStorageValue(cid, 862281).." of our clan!", cid)
talkState[talkUser] = 0
elseif msgcontains(msg, 'shiny') or msgcontains(msg, 'Shiny') then
if getPlayerStorageValue(cid, 86228) ~= 6 then
selfSay("You aren't of the clan Gardestrike! Get out of here!", cid)
return true
else
selfSay("So you want to transform your Hitmonchan in a Shiny Hitmonchan? It will cost 500k!", cid)
talkState[talkUser] = 4
end
elseif (msgcontains(msg, 'yes') or msgcontains(msg, 'Yes')) and talkState[talkUser] == 4 then
if getPlayerSlotItem(cid, 6).uid <= 0 then
selfSay("Sorry, you don't have a pokemon in the main slot!", cid)
talkState[talkUser] = 0
return true
end
--alterado v1.2
if #getCreatureSummons(cid) >= 1 then
selfSay("Go back your pokemon!", cid)
talkState[talkUser] = 0
return true
end
local pb = getPlayerSlotItem(cid, 8).uid
if getItemAttribute(pb, "poke") ~= "Hitmonchan" then
selfSay("Put a Hitmonchan pokeball atleast +20 in main slot!", cid)
talkState[talkUser] = 0
return true
end
if not getItemAttribute(pb, "boost") or getItemAttribute(pb, "boost") < 20 then
selfSay("Sorry, your Vileplume is not boosted +20!", cid)
talkState[talkUser] = 0
return true
end
--100000 = 1k, 1000000 = 10k, 10000000 = 100k
if doPlayerRemoveMoney(cid, 50000000) == true then
selfSay("So there is it! Enjoy!", cid)
doItemSetAttribute(pb, "hp", 1)
doItemSetAttribute(pb, "poke", "Shiny Hitmonchan")
doItemSetAttribute(pb, "description", "Contains a Shiny Hitmonchan.")
doItemEraseAttribute(pb, "boost")
doTransformItem(getPlayerSlotItem(cid, 7).uid, fotos["Shiny Hitmonchan"])
if useKpdoDlls then
doCreatureExecuteTalkAction(cid, "/pokeread")
end
talkState[talkUser] = 0
return true
else
selfSay("You don't have enough money!", cid)
talkState[talkUser] = 0
return true
end
end
return true
end
npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback)
npcHandler:addModule(FocusModule:new())
malefic master
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
rank = {"a Malefic Troublemaker", "a Malefic Venomancer","a Malefic Spectre","a Malefic Nightwalker","a Malefic Master"}
if msgcontains(msg, 'clan') or msgcontains(msg, 'Clan') then
if getPlayerStorageValue(cid, 86228) == 5 then
selfSay("You already are of the clan malefic!", cid)
talkState[talkUser] = 0
return true
elseif getPlayerStorageValue(cid, 86228) >= 1 then
selfSay("You already are of another clan!", cid)
talkState[talkUser] = 0
return true
end
selfSay("So you want to join in my clan... Are you sure that?", cid)
talkState[talkUser] = 2
elseif (msgcontains(msg, 'yes') or msgcontains(msg, 'Yes')) and talkState[talkUser] == 2 then
if getPlayerLevel(cid) < 80 then
selfSay("You are too weak yet... You need to be atleast level 80 to enter in the clan!", cid)
talkState[talkUser] = 0
return true
end
selfSay("OK then... Now you are a great member of de clan malefic!", cid)
setPlayerStorageValue(cid, 86228, 5)
setPlayerStorageValue(cid, 862281, 1)
setPlayerStorageValue(cid, 181615, 1)
talkState[talkUser] = 0
elseif msgcontains(msg, 'rank') or msgcontains(msg, 'rank') then
if getPlayerStorageValue(cid, 86228) == 5 then
selfSay("So.. you want to move up of rank?", cid)
talkState[talkUser] = 3
else
selfSay("You aren't of the clan malefic! Get out of here!", cid)
talkState[talkUser] = 0
return true
end
elseif (msgcontains(msg, 'yes') or msgcontains(msg, 'Yes')) and talkState[talkUser] == 3 then
level = 80
if (getPlayerStorageValue(cid, 862281)+1) == 2 then
level = 90
elseif (getPlayerStorageValue(cid, 862281)+1) == 3 then
level = 100
elseif (getPlayerStorageValue(cid, 862281)+1) == 4 then
level = 110
elseif (getPlayerStorageValue(cid, 862281)+1) == 5 then
level = 120
end
if getPlayerLevel(cid) < level then
selfSay("You are too weak yet... You need to be atleast level "..level.." to move up of rank!", cid)
talkState[talkUser] = 0
return true
end
if getPlayerStorageValue(cid, 862281) == 5 then
selfSay("You are already a master of our clan!", cid)
talkState[talkUser] = 0
return true
end
setPlayerStorageValue(cid, 862281, getPlayerStorageValue(cid, 862281)+1)
if getPlayerStorageValue(cid, 862281) == 5 then
setPlayerStorageValue(cid, 181624, 1)
end
selfSay("So here we are... You are now a "..rank[getPlayerStorageValue(cid, 862281)]..", rank "..getPlayerStorageValue(cid, 862281).." of our clan!", cid)
talkState[talkUser] = 0
elseif msgcontains(msg, 'shiny') or msgcontains(msg, 'Shiny') then
if getPlayerStorageValue(cid, 86228) ~= 5 then
selfSay("You aren't of the clan Malefic! Get out of here!", cid)
return true
else
selfSay("So you want to transform your Nidoking in a Shiny Nidoking? It will cost 500k!", cid)
talkState[talkUser] = 4
end
elseif (msgcontains(msg, 'yes') or msgcontains(msg, 'Yes')) and talkState[talkUser] == 4 then
if getPlayerSlotItem(cid, 8).uid <= 0 then
selfSay("Sorry, you don't have a pokemon in the main slot!", cid)
talkState[talkUser] = 0
return true
end
--alterado v1.2
if #getCreatureSummons(cid) >= 1 then
selfSay("Go back your pokemon!", cid)
talkState[talkUser] = 0
return true
end
local pb = getPlayerSlotItem(cid, 8).uid
if getItemAttribute(pb, "poke") ~= "Nidoking" then
selfSay("Put a Nidoking's pokeball atleast +20 in main slot!", cid)
talkState[talkUser] = 0
return true
end
if not getItemAttribute(pb, "boost") or getItemAttribute(pb, "boost") < 20 then
selfSay("Sorry, your Nidoking is not boosted +20!", cid)
talkState[talkUser] = 0
return true
end
--100000 = 1k, 1000000 = 10k, 10000000 = 100k
if doPlayerRemoveMoney(cid, 50000000) == true then
selfSay("So there is it! Enjoy!", cid)
doItemSetAttribute(pb, "hp", 1)
doItemSetAttribute(pb, "poke", "Shiny Nidoking")
doItemSetAttribute(pb, "description", "Contains a Shiny Nidoking.")
doItemEraseAttribute(pb, "boost")
doTransformItem(getPlayerSlotItem(cid, 7).uid, fotos["Shiny Nidoking"])
if useKpdoDlls then
doCreatureExecuteTalkAction(cid, "/pokeread")
end
talkState[talkUser] = 0
return true
else
selfSay("You don't have enough money!", cid)
talkState[talkUser] = 0
return true
end
end
return true
end
npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback)
npcHandler:addModule(FocusModule:new())
naturia master
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
rank = {"a Naturia Seed", "a Naturia Sprout","a Naturia Webhead","a Naturia Woodtrunk","a Naturia Keeper"}
if msgcontains(msg, 'clan') or msgcontains(msg, 'Clan') then
if getPlayerStorageValue(cid, 86228) == 8 then
selfSay("You already are of the clan naturia!", cid)
talkState[talkUser] = 0
return true
elseif getPlayerStorageValue(cid, 86228) >= 1 then
selfSay("You already are of another clan!", cid)
talkState[talkUser] = 0
return true
end
selfSay("So you want to join in my clan... Are you sure that?", cid)
talkState[talkUser] = 2
elseif (msgcontains(msg, 'yes') or msgcontains(msg, 'Yes')) and talkState[talkUser] == 2 then
if getPlayerLevel(cid) < 80 then
selfSay("You are too weak yet... You need to be atleast level 80 to enter in the clan!", cid)
talkState[talkUser] = 0
return true
end
selfSay("OK then... Now you are a great member of de clan naturia!", cid)
setPlayerStorageValue(cid, 86228, 8)
setPlayerStorageValue(cid, 862281, 1)
setPlayerStorageValue(cid, 181612, 1)
talkState[talkUser] = 0
elseif msgcontains(msg, 'rank') or msgcontains(msg, 'rank') then
if getPlayerStorageValue(cid, 86228) == 8 then
selfSay("So.. you want to move up of rank?", cid)
talkState[talkUser] = 3
else
selfSay("You aren't of the clan naturia! Get out of here!", cid)
talkState[talkUser] = 0
return true
end
elseif (msgcontains(msg, 'yes') or msgcontains(msg, 'Yes')) and talkState[talkUser] == 3 then
level = 80
if (getPlayerStorageValue(cid, 862281)+1) == 2 then
level = 90
elseif (getPlayerStorageValue(cid, 862281)+1) == 3 then
level = 100
elseif (getPlayerStorageValue(cid, 862281)+1) == 4 then
level = 110
elseif (getPlayerStorageValue(cid, 862281)+1) == 5 then
level = 120
end
if getPlayerLevel(cid) < level then
selfSay("You are too weak yet... You need to be atleast level "..level.." to move up of rank!", cid)
talkState[talkUser] = 0
return true
end
if getPlayerStorageValue(cid, 862281) == 5 then
selfSay("You are already a master of our clan!", cid)
talkState[talkUser] = 0
return true
end
setPlayerStorageValue(cid, 862281, getPlayerStorageValue(cid, 862281)+1)
if getPlayerStorageValue(cid, 862281) == 5 then
setPlayerStorageValue(cid, 181623, 1)
end
selfSay("So here we are... You are now a "..rank[getPlayerStorageValue(cid, 862281)]..", rank "..getPlayerStorageValue(cid, 862281).." of our clan!", cid)
talkState[talkUser] = 0
elseif msgcontains(msg, 'shiny') or msgcontains(msg, 'Shiny') then
if getPlayerStorageValue(cid, 86228) ~= 8 then
selfSay("You aren't of the clan Naturia! Get out of here!", cid)
return true
else
selfSay("So you want to transform your Vileplume in a Shiny Vileplume? It will cost 500k!", cid)
talkState[talkUser] = 4
end
elseif (msgcontains(msg, 'yes') or msgcontains(msg, 'Yes')) and talkState[talkUser] == 4 then
if getPlayerSlotItem(cid, 8).uid <= 0 then
selfSay("Sorry, you don't have a pokemon in the main slot!", cid)
talkState[talkUser] = 0
return true
end
--alterado v1.2
if #getCreatureSummons(cid) >= 1 then
selfSay("Go back your pokemon!", cid)
talkState[talkUser] = 0
return true
end
local pb = getPlayerSlotItem(cid, 8).uid
if getItemAttribute(pb, "poke") ~= "Vileplume" then
selfSay("Put a Vileplume's pokeball atleast +20 in main slot!", cid)
talkState[talkUser] = 0
return true
end
if not getItemAttribute(pb, "boost") or getItemAttribute(pb, "boost") < 20 then
selfSay("Sorry, your Vileplume is not boosted +20!", cid)
talkState[talkUser] = 0
return true
end
--100000 = 1k, 1000000 = 10k, 10000000 = 100k
if doPlayerRemoveMoney(cid, 50000000) == true then
selfSay("So there is it! Enjoy!", cid)
doItemSetAttribute(pb, "hp", 1)
doItemSetAttribute(pb, "poke", "Shiny Vileplume")
doItemSetAttribute(pb, "description", "Contains a Shiny Vileplume.")
doItemEraseAttribute(pb, "boost")
doTransformItem(getPlayerSlotItem(cid, 7).uid, fotos["Shiny Vileplume"])
if useKpdoDlls then
doCreatureExecuteTalkAction(cid, "/pokeread")
end
talkState[talkUser] = 0
return true
else
selfSay("You don't have enough money!", cid)
talkState[talkUser] = 0
return true
end
end
return true
end
npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback)
npcHandler:addModule(FocusModule:new())
orebound master
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
rank = {"an Orebound Sand", "an Orebound Rock","an Orebound Solid","an Orebound Hardskin","an Orebound Hero"}
if msgcontains(msg, 'clan') or msgcontains(msg, 'Clan') then
if getPlayerStorageValue(cid, 86228) == 3 then
selfSay("You already are of the clan orebound!", cid)
talkState[talkUser] = 0
return true
elseif getPlayerStorageValue(cid, 86228) >= 1 then
selfSay("You already are of another clan!", cid)
talkState[talkUser] = 0
return true
end
selfSay("So you want to join in my clan... Are you sure that?", cid)
talkState[talkUser] = 2
elseif (msgcontains(msg, 'yes') or msgcontains(msg, 'Yes')) and talkState[talkUser] == 2 then
if getPlayerLevel(cid) < 80 then
selfSay("You are too weak yet... You need to be atleast level 80 to enter in the clan!", cid)
talkState[talkUser] = 0
return true
end
selfSay("OK then... Now you are a great member of de clan orebound!", cid)
setPlayerStorageValue(cid, 86228, 3)
setPlayerStorageValue(cid, 862281, 1)
setPlayerStorageValue(cid, 181620, 1)
talkState[talkUser] = 0
elseif msgcontains(msg, 'rank') or msgcontains(msg, 'rank') then
if getPlayerStorageValue(cid, 86228) == 3 then
selfSay("So.. you want to move up of rank?", cid)
talkState[talkUser] = 3
else
selfSay("You aren't of the clan orebound! Get out of here!", cid)
talkState[talkUser] = 0
return true
end
elseif (msgcontains(msg, 'yes') or msgcontains(msg, 'Yes')) and talkState[talkUser] == 3 then
level = 80
if (getPlayerStorageValue(cid, 862281)+1) == 2 then
level = 90
elseif (getPlayerStorageValue(cid, 862281)+1) == 3 then
level = 100
elseif (getPlayerStorageValue(cid, 862281)+1) == 4 then
level = 110
elseif (getPlayerStorageValue(cid, 862281)+1) == 5 then
level = 120
end
if getPlayerLevel(cid) < level then
selfSay("You are too weak yet... You need to be atleast level "..level.." to move up of rank!", cid)
talkState[talkUser] = 0
return true
end
if getPlayerStorageValue(cid, 862281) == 5 then
selfSay("You are already a master of our clan!", cid)
talkState[talkUser] = 0
return true
end
setPlayerStorageValue(cid, 862281, getPlayerStorageValue(cid, 862281)+1)
if getPlayerStorageValue(cid, 862281) == 5 then
setPlayerStorageValue(cid, 181627, 1)
end
selfSay("So here we are... You are now a "..rank[getPlayerStorageValue(cid, 862281)]..", rank "..getPlayerStorageValue(cid, 862281).." of our clan!", cid)
talkState[talkUser] = 0
elseif msgcontains(msg, 'shiny') or msgcontains(msg, 'Shiny') then
if getPlayerStorageValue(cid, 86228) ~= 3 then
selfSay("You aren't of the clan Orebound! Get out of here!", cid)
return true
else
selfSay("So you want to transform your Golem in a Shiny Golem? It will cost 500k!", cid)
talkState[talkUser] = 4
end
elseif (msgcontains(msg, 'yes') or msgcontains(msg, 'Yes')) and talkState[talkUser] == 4 then
if getPlayerSlotItem(cid, 8).uid <= 0 then
selfSay("Sorry, you don't have a pokemon in the main slot!", cid)
talkState[talkUser] = 0
return true
end
--alterado v1.2
if #getCreatureSummons(cid) >= 1 then
selfSay("Go back your pokemon!", cid)
talkState[talkUser] = 0
return true
end
local pb = getPlayerSlotItem(cid, 8).uid
if getItemAttribute(pb, "poke") ~= "Golem" then
selfSay("Put a Golem's pokeball atleast +20 in main slot!", cid)
talkState[talkUser] = 0
return true
end
if not getItemAttribute(pb, "boost") or getItemAttribute(pb, "boost") < 20 then
selfSay("Sorry, your Golem is not boosted +20!", cid)
talkState[talkUser] = 0
return true
end
--100000 = 1k, 1000000 = 10k, 10000000 = 100k
if doPlayerRemoveMoney(cid, 50000000) == true then
selfSay("So there is it! Enjoy!", cid)
doItemSetAttribute(pb, "hp", 1)
doItemSetAttribute(pb, "poke", "Shiny Golem")
doItemSetAttribute(pb, "description", "Contains a Shiny Golem.")
doItemEraseAttribute(pb, "boost")
doTransformItem(getPlayerSlotItem(cid, 7).uid, fotos["Shiny Golem"])
if useKpdoDlls then
doCreatureExecuteTalkAction(cid, "/pokeread")
end
talkState[talkUser] = 0
return true
else
selfSay("You don't have enough money!", cid)
talkState[talkUser] = 0
return true
end
end
return true
end
npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback)
npcHandler:addModule(FocusModule:new())
psycraft master
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
rank = {"a Psycraft Mind", "a Psycraft Brain","a Psycraft Scholar","a Psycraft Telepath","a Psycraft Medium"}
if msgcontains(msg, 'clan') or msgcontains(msg, 'Clan') then
if getPlayerStorageValue(cid, 86228) == 7 then
selfSay("You already are of the clan psycraft!", cid)
talkState[talkUser] = 0
return true
elseif getPlayerStorageValue(cid, 86228) >= 1 then
selfSay("You already are of another clan!", cid)
talkState[talkUser] = 0
return true
end
selfSay("So you want to join in my clan... Are you sure that?", cid)
talkState[talkUser] = 2
elseif (msgcontains(msg, 'yes') or msgcontains(msg, 'Yes')) and talkState[talkUser] == 2 then
if getPlayerLevel(cid) < 80 then
selfSay("You are too weak yet... You need to be atleast level 80 to enter in the clan!", cid)
talkState[talkUser] = 0
return true
end
selfSay("OK then... Now you are a great member of de clan psycraft!", cid)
setPlayerStorageValue(cid, 86228, 7)
setPlayerStorageValue(cid, 862281, 1)
setPlayerStorageValue(cid, 181618, 1)
talkState[talkUser] = 0
elseif msgcontains(msg, 'rank') or msgcontains(msg, 'rank') then
if getPlayerStorageValue(cid, 86228) == 7 then
selfSay("So.. you want to move up of rank?", cid)
talkState[talkUser] = 3
else
selfSay("You aren't of the clan psycraft! Get out of here!", cid)
talkState[talkUser] = 0
return true
end
elseif (msgcontains(msg, 'yes') or msgcontains(msg, 'Yes')) and talkState[talkUser] == 3 then
level = 80
if (getPlayerStorageValue(cid, 862281)+1) == 2 then
level = 90
elseif (getPlayerStorageValue(cid, 862281)+1) == 3 then
level = 100
elseif (getPlayerStorageValue(cid, 862281)+1) == 4 then
level = 110
elseif (getPlayerStorageValue(cid, 862281)+1) == 5 then
level = 120
end
if getPlayerLevel(cid) < level then
selfSay("You are too weak yet... You need to be atleast level "..level.." to move up of rank!", cid)
talkState[talkUser] = 0
return true
end
if getPlayerStorageValue(cid, 862281) == 5 then
selfSay("You are already a master of our clan!", cid)
talkState[talkUser] = 0
return true
end
setPlayerStorageValue(cid, 862281, getPlayerStorageValue(cid, 862281)+1)
if getPlayerStorageValue(cid, 862281) == 5 then
setPlayerStorageValue(cid, 181629, 1)
end
selfSay("So here we are... You are now a "..rank[getPlayerStorageValue(cid, 862281)]..", rank "..getPlayerStorageValue(cid, 862281).." of our clan!", cid)
talkState[talkUser] = 0
elseif msgcontains(msg, 'shiny') or msgcontains(msg, 'Shiny') then
if getPlayerStorageValue(cid, 86228) ~= 7 then
selfSay("You aren't of the clan Psycraft! Get out of here!", cid)
return true
else
selfSay("So you want to transform your Hypno in a Shiny Hypno? It will cost 500k!", cid)
talkState[talkUser] = 4
end
elseif (msgcontains(msg, 'yes') or msgcontains(msg, 'Yes')) and talkState[talkUser] == 4 then
if getPlayerSlotItem(cid, 8).uid <= 0 then
selfSay("Sorry, you don't have a pokemon in the main slot!", cid)
talkState[talkUser] = 0
return true
end
--alterado v1.2
if #getCreatureSummons(cid) >= 1 then
selfSay("Go back your pokemon!", cid)
talkState[talkUser] = 0
return true
end
local pb = getPlayerSlotItem(cid, 8).uid
if getItemAttribute(pb, "poke") ~= "Hypno" then
selfSay("Put a Hypno's pokeball atleast +20 in main slot!", cid)
talkState[talkUser] = 0
return true
end
if not getItemAttribute(pb, "boost") or getItemAttribute(pb, "boost") < 20 then
selfSay("Sorry, your Hypno is not boosted +20!", cid)
talkState[talkUser] = 0
return true
end
--100000 = 1k, 1000000 = 10k, 10000000 = 100k
if doPlayerRemoveMoney(cid, 50000000) == true then
selfSay("So there is it! Enjoy!", cid)
doItemSetAttribute(pb, "hp", 1)
doItemSetAttribute(pb, "poke", "Shiny Hypno")
doItemSetAttribute(pb, "description", "Contains a Shiny Hypno.")
doItemEraseAttribute(pb, "boost")
doTransformItem(getPlayerSlotItem(cid, 7).uid, fotos["Shiny Hypno"])
if useKpdoDlls then
doCreatureExecuteTalkAction(cid, "/pokeread")
end
talkState[talkUser] = 0
return true
else
selfSay("You don't have enough money!", cid)
talkState[talkUser] = 0
return true
end
end
return true
end
npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback)
npcHandler:addModule(FocusModule:new())
raibolt master
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
rank = {"a Raibolt Shock", "a Raibolt Watt","a Raibolt Electrician","a Raibolt Overcharged","a Raibolt Legend"}
if msgcontains(msg, 'clan') or msgcontains(msg, 'Clan') then
if getPlayerStorageValue(cid, 86228) == 9 then
selfSay("You already are of the clan raibolt!", cid)
talkState[talkUser] = 0
return true
elseif getPlayerStorageValue(cid, 86228) >= 1 then
selfSay("You already are of another clan!", cid)
talkState[talkUser] = 0
return true
end
selfSay("So you want to join in my clan... Are you sure that?", cid)
talkState[talkUser] = 2
elseif (msgcontains(msg, 'yes') or msgcontains(msg, 'Yes')) and talkState[talkUser] == 2 then
if getPlayerLevel(cid) < 80 then
selfSay("You are too weak yet... You need to be atleast level 80 to enter in the clan!", cid)
talkState[talkUser] = 0
return true
end
selfSay("OK then... Now you are a great member of de clan raibolt!", cid)
setPlayerStorageValue(cid, 86228, 9)
setPlayerStorageValue(cid, 862281, 1)
setPlayerStorageValue(cid, 181617, 1)
talkState[talkUser] = 0
elseif msgcontains(msg, 'rank') or msgcontains(msg, 'rank') then
if getPlayerStorageValue(cid, 86228) == 9 then
selfSay("So.. you want to move up of rank?", cid)
talkState[talkUser] = 3
else
selfSay("You aren't of the clan raibolt! Get out of here!", cid)
talkState[talkUser] = 0
return true
end
elseif (msgcontains(msg, 'yes') or msgcontains(msg, 'Yes')) and talkState[talkUser] == 3 then
level = 80
if (getPlayerStorageValue(cid, 862281)+1) == 2 then
level = 90
elseif (getPlayerStorageValue(cid, 862281)+1) == 3 then
level = 100
elseif (getPlayerStorageValue(cid, 862281)+1) == 4 then
level = 110
elseif (getPlayerStorageValue(cid, 862281)+1) == 5 then
level = 120
end
if getPlayerLevel(cid) < level then
selfSay("You are too weak yet... You need to be atleast level "..level.." to move up of rank!", cid)
talkState[talkUser] = 0
return true
end
if getPlayerStorageValue(cid, 862281) == 5 then
selfSay("You are already a master of our clan!", cid)
talkState[talkUser] = 0
return true
end
setPlayerStorageValue(cid, 862281, getPlayerStorageValue(cid, 862281)+1)
if getPlayerStorageValue(cid, 862281) == 5 then
setPlayerStorageValue(cid, 181621, 1)
end
selfSay("So here we are... You are now a "..rank[getPlayerStorageValue(cid, 862281)]..", rank "..getPlayerStorageValue(cid, 862281).." of our clan!", cid)
talkState[talkUser] = 0
elseif msgcontains(msg, 'shiny') or msgcontains(msg, 'Shiny') then
if getPlayerStorageValue(cid, 86228) ~= 9 then
selfSay("You aren't of the clan Raibolt! Get out of here!", cid)
return true
else
selfSay("So you want to transform your Jolteon in a Shiny Jolteon? It will cost 500k!", cid)
talkState[talkUser] = 4
end
elseif (msgcontains(msg, 'yes') or msgcontains(msg, 'Yes')) and talkState[talkUser] == 4 then
if getPlayerSlotItem(cid, 8).uid <= 0 then
selfSay("Sorry, you don't have a pokemon in the main slot!", cid)
talkState[talkUser] = 0
return true
end
--alterado v1.2
if #getCreatureSummons(cid) >= 1 then
selfSay("Go back your pokemon!", cid)
talkState[talkUser] = 0
return true
end
local pb = getPlayerSlotItem(cid, 8).uid
if getItemAttribute(pb, "poke") ~= "Jolteon" then
selfSay("Put a Jolteon's pokeball atleast +20 in main slot!", cid)
talkState[talkUser] = 0
return true
end
if not getItemAttribute(pb, "boost") or getItemAttribute(pb, "boost") < 20 then
selfSay("Sorry, your Jolteon is not boosted +20!", cid)
talkState[talkUser] = 0
return true
end
--100000 = 1k, 1000000 = 10k, 10000000 = 100k
if doPlayerRemoveMoney(cid, 50000000) == true then
selfSay("So there is it! Enjoy!", cid)
doItemSetAttribute(pb, "hp", 1)
doItemSetAttribute(pb, "poke", "Shiny Jolteon")
doItemSetAttribute(pb, "description", "Contains a Shiny Jolteon.")
doItemEraseAttribute(pb, "boost")
doTransformItem(getPlayerSlotItem(cid, 7).uid, fotos["Shiny Jolteon"])
if useKpdoDlls then
doCreatureExecuteTalkAction(cid, "/pokeread")
end
talkState[talkUser] = 0
return true
else
selfSay("You don't have enough money!", cid)
talkState[talkUser] = 0
return true
end
end
return true
end
npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback)
npcHandler:addModule(FocusModule:new())
seavel master
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
rank = {"a Seavell Drop", "a Seavell Icelake","a Seavell Waterfall","a Seavell Frost","a Seavell Master"}
if msgcontains(msg, 'clan') or msgcontains(msg, 'Clan') then
if getPlayerStorageValue(cid, 86228) == 2 then
selfSay("You already are of the clan seavel!", cid)
talkState[talkUser] = 0
return true
elseif getPlayerStorageValue(cid, 86228) >= 1 then
selfSay("You already are of another clan!", cid)
talkState[talkUser] = 0
return true
end
selfSay("So you want to join in my clan... Are you sure that?", cid)
talkState[talkUser] = 2
elseif (msgcontains(msg, 'yes') or msgcontains(msg, 'Yes')) and talkState[talkUser] == 2 then
if getPlayerLevel(cid) < 80 then
selfSay("You are too weak yet... You need to be atleast level 80 to enter in the clan!", cid)
talkState[talkUser] = 0
return true
end
selfSay("OK then... Now you are a great member of de clan seavel!", cid)
setPlayerStorageValue(cid, 86228, 2)
setPlayerStorageValue(cid, 862281, 1)
setPlayerStorageValue(cid, 181619, 1)
talkState[talkUser] = 0
elseif msgcontains(msg, 'rank') or msgcontains(msg, 'rank') then
if getPlayerStorageValue(cid, 86228) == 2 then
selfSay("So.. you want to move up of rank?", cid)
talkState[talkUser] = 3
else
selfSay("You aren't of the clan seavel! Get out of here!", cid)
talkState[talkUser] = 0
return true
end
elseif (msgcontains(msg, 'yes') or msgcontains(msg, 'Yes')) and talkState[talkUser] == 3 then
level = 80
if (getPlayerStorageValue(cid, 862281)+1) == 2 then
level = 90
elseif (getPlayerStorageValue(cid, 862281)+1) == 3 then
level = 100
elseif (getPlayerStorageValue(cid, 862281)+1) == 4 then
level = 110
elseif (getPlayerStorageValue(cid, 862281)+1) == 5 then
level = 120
end
if getPlayerLevel(cid) < level then
selfSay("You are too weak yet... You need to be atleast level "..level.." to move up of rank!", cid)
talkState[talkUser] = 0
return true
end
if getPlayerStorageValue(cid, 862281) == 5 then
selfSay("You are already a master of our clan!", cid)
talkState[talkUser] = 0
return true
end
setPlayerStorageValue(cid, 862281, getPlayerStorageValue(cid, 862281)+1)
if getPlayerStorageValue(cid, 862281) == 5 then
setPlayerStorageValue(cid, 181622, 1)
end
selfSay("So here we are... You are now a "..rank[getPlayerStorageValue(cid, 862281)]..", rank "..getPlayerStorageValue(cid, 862281).." of our clan!", cid)
talkState[talkUser] = 0
elseif msgcontains(msg, 'shiny') or msgcontains(msg, 'Shiny') then
if getPlayerStorageValue(cid, 86228) ~= 2 then
selfSay("You aren't of the clan Seavel! Get out of here!", cid)
return true
else
selfSay("So you want to transform your Vaporeon in a Shiny Vaporeon? It will cost 500k!", cid)
talkState[talkUser] = 4
end
elseif (msgcontains(msg, 'yes') or msgcontains(msg, 'Yes')) and talkState[talkUser] == 4 then
if getPlayerSlotItem(cid, 8).uid <= 0 then
selfSay("Sorry, you don't have a pokemon in the main slot!", cid)
talkState[talkUser] = 0
return true
end
--alterado v1.2
if #getCreatureSummons(cid) >= 1 then
selfSay("Go back your pokemon!", cid)
talkState[talkUser] = 0
return true
end
local pb = getPlayerSlotItem(cid, 8).uid
if getItemAttribute(pb, "poke") ~= "Vaporeon" then
selfSay("Put a Vaporeon's pokeball atleast +20 in main slot!", cid)
talkState[talkUser] = 0
return true
end
if not getItemAttribute(pb, "boost") or getItemAttribute(pb, "boost") < 20 then
selfSay("Sorry, your Vaporeon is not boosted +20!", cid)
talkState[talkUser] = 0
return true
end
--100000 = 1k, 1000000 = 10k, 10000000 = 100k
if doPlayerRemoveMoney(cid, 50000000) == true then
selfSay("So there is it! Enjoy!", cid)
doItemSetAttribute(pb, "hp", 1)
doItemSetAttribute(pb, "poke", "Shiny Vaporeon")
doItemSetAttribute(pb, "description", "Contains a Shiny Vaporeon.")
doItemEraseAttribute(pb, "boost")
doTransformItem(getPlayerSlotItem(cid, 7).uid, fotos["Shiny Vaporeon"])
if useKpdoDlls then
doCreatureExecuteTalkAction(cid, "/pokeread")
end
talkState[talkUser] = 0
return true
else
selfSay("You don't have enough money!", cid)
talkState[talkUser] = 0
return true
end
end
return true
end
npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback)
npcHandler:addModule(FocusModule:new())
volcanic master
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
rank = {"a Volcanic Spark", "a Volcanic Flame","a Volcanic Firetamer","a Volcanic Pyromancer","a Volcanic Master"}
if msgcontains(msg, 'clan') or msgcontains(msg, 'Clan') then
if getPlayerStorageValue(cid, 86228) == 1 then
selfSay("You already are of the clan volcanic!", cid)
talkState[talkUser] = 0
return true
elseif getPlayerStorageValue(cid, 86228) >= 1 then
selfSay("You already are of another clan!", cid)
talkState[talkUser] = 0
return true
end
selfSay("So you want to join in my clan... Are you sure that?", cid)
talkState[talkUser] = 2
elseif (msgcontains(msg, 'yes') or msgcontains(msg, 'Yes')) and talkState[talkUser] == 2 then
if getPlayerLevel(cid) < 80 then
selfSay("You are too weak yet... You need to be atleast level 80 to enter in the clan!", cid)
talkState[talkUser] = 0
return true
end
selfSay("OK then... Now you are a great member of de clan volcanic!", cid)
setPlayerStorageValue(cid, 86228, 1)
setPlayerStorageValue(cid, 862281, 1)
setPlayerStorageValue(cid, 181613, 1)
talkState[talkUser] = 0
elseif msgcontains(msg, 'rank') or msgcontains(msg, 'rank') then
if getPlayerStorageValue(cid, 86228) == 1 then
selfSay("So.. you want to move up of rank?", cid)
talkState[talkUser] = 3
else
selfSay("You aren't of the clan volcanic! Get out of here!", cid)
talkState[talkUser] = 0
return true
end
elseif (msgcontains(msg, 'yes') or msgcontains(msg, 'Yes')) and talkState[talkUser] == 3 then
level = 80
if (getPlayerStorageValue(cid, 862281)+1) == 2 then
level = 90
elseif (getPlayerStorageValue(cid, 862281)+1) == 3 then
level = 100
elseif (getPlayerStorageValue(cid, 862281)+1) == 4 then
level = 110
elseif (getPlayerStorageValue(cid, 862281)+1) == 5 then
level = 120
end
if getPlayerLevel(cid) < level then
selfSay("You are too weak yet... You need to be atleast level "..level.." to move up of rank!", cid)
talkState[talkUser] = 0
return true
end
if getPlayerStorageValue(cid, 862281) == 5 then
selfSay("You are already a master of our clan!", cid)
talkState[talkUser] = 0
return true
end
setPlayerStorageValue(cid, 862281, getPlayerStorageValue(cid, 862281)+1)
if getPlayerStorageValue(cid, 862281) == 5 then
setPlayerStorageValue(cid, 181625, 1)
end
selfSay("So here we are... You are now a "..rank[getPlayerStorageValue(cid, 862281)]..", rank "..getPlayerStorageValue(cid, 862281).." of our clan!", cid)
talkState[talkUser] = 0
elseif msgcontains(msg, 'shiny') or msgcontains(msg, 'Shiny') then
if getPlayerStorageValue(cid, 86228) ~= 1 then
selfSay("You aren't of the clan Volcanic! Get out of here!", cid)
return true
else
selfSay("So you want to transform your Flareon in a Shiny Flareon? It will cost 500k!", cid)
talkState[talkUser] = 4
end
elseif (msgcontains(msg, 'yes') or msgcontains(msg, 'Yes')) and talkState[talkUser] == 4 then
if getPlayerSlotItem(cid, 8).uid <= 0 then
selfSay("Sorry, you don't have a pokemon in the main slot!", cid)
talkState[talkUser] = 0
return true
end
--alterado v1.2
if #getCreatureSummons(cid) >= 1 then
selfSay("Go back your pokemon!", cid)
talkState[talkUser] = 0
return true
end
local pb = getPlayerSlotItem(cid, 8).uid
if getItemAttribute(pb, "poke") ~= "Flareon" then
selfSay("Put a Flareon's pokeball atleast +20 in main slot!", cid)
talkState[talkUser] = 0
return true
end
if not getItemAttribute(pb, "boost") or getItemAttribute(pb, "boost") < 20 then
selfSay("Sorry, your flareon is not boosted +20!", cid)
talkState[talkUser] = 0
return true
end
--100000 = 1k, 1000000 = 10k, 10000000 = 100k
if doPlayerRemoveMoney(cid, 50000000) == true then
selfSay("So there is it! Enjoy!", cid)
doItemSetAttribute(pb, "hp", 1)
doItemSetAttribute(pb, "poke", "Shiny Flareon")
doItemSetAttribute(pb, "description", "Contains a Shiny Flareon.")
doItemEraseAttribute(pb, "boost")
doTransformItem(getPlayerSlotItem(cid, 7).uid, fotos["Shiny Flareon"])
if useKpdoDlls then
doCreatureExecuteTalkAction(cid, "/pokeread")
end
talkState[talkUser] = 0
return true
else
selfSay("You don't have enough money!", cid)
talkState[talkUser] = 0
return true
end
end
return true
end
npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback)
npcHandler:addModule(FocusModule:new())
wingeon master
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
rank = {"a Wingeon Cloud", "a Wingeon Wind","a Wingeon Sky","a Wingeon Falcon","a Wingeon Dragon"}
if msgcontains(msg, 'clan') or msgcontains(msg, 'Clan') then
if getPlayerStorageValue(cid, 86228) == 4 then
selfSay("You already are of the clan wingeon!", cid)
talkState[talkUser] = 0
return true
elseif getPlayerStorageValue(cid, 86228) >= 1 then
selfSay("You already are of another clan!", cid)
talkState[talkUser] = 0
return true
end
selfSay("So you want to join in my clan... Are you sure that?", cid)
talkState[talkUser] = 2
elseif (msgcontains(msg, 'yes') or msgcontains(msg, 'Yes')) and talkState[talkUser] == 2 then
if getPlayerLevel(cid) < 80 then
selfSay("You are too weak yet... You need to be atleast level 80 to enter in the clan!", cid)
talkState[talkUser] = 0
return true
end
selfSay("OK then... Now you are a great member of de clan wingeon!", cid)
setPlayerStorageValue(cid, 86228, 4)
setPlayerStorageValue(cid, 862281, 1)
setPlayerStorageValue(cid, 181616, 1)
talkState[talkUser] = 0
elseif msgcontains(msg, 'rank') or msgcontains(msg, 'rank') then
if getPlayerStorageValue(cid, 86228) == 4 then
selfSay("So.. you want to move up of rank?", cid)
talkState[talkUser] = 3
else
selfSay("You aren't of the clan wingeon! Get out of here!", cid)
talkState[talkUser] = 0
return true
end
elseif (msgcontains(msg, 'yes') or msgcontains(msg, 'Yes')) and talkState[talkUser] == 3 then
level = 80
if (getPlayerStorageValue(cid, 862281)+1) == 2 then
level = 90
elseif (getPlayerStorageValue(cid, 862281)+1) == 3 then
level = 100
elseif (getPlayerStorageValue(cid, 862281)+1) == 4 then
level = 110
elseif (getPlayerStorageValue(cid, 862281)+1) == 5 then
level = 120
end
if getPlayerLevel(cid) < level then
selfSay("You are too weak yet... You need to be atleast level "..level.." to move up of rank!", cid)
talkState[talkUser] = 0
return true
end
if getPlayerStorageValue(cid, 862281) == 5 then
selfSay("You are already a master of our clan!", cid)
talkState[talkUser] = 0
return true
end
setPlayerStorageValue(cid, 862281, getPlayerStorageValue(cid, 862281)+1)
if getPlayerStorageValue(cid, 862281) == 5 then
setPlayerStorageValue(cid, 181626, 1)
end
selfSay("So here we are... You are now a "..rank[getPlayerStorageValue(cid, 862281)]..", rank "..getPlayerStorageValue(cid, 862281).." of our clan!", cid)
talkState[talkUser] = 0
elseif msgcontains(msg, 'shiny') or msgcontains(msg, 'Shiny') then
if getPlayerStorageValue(cid, 86228) ~= 4 then
selfSay("You aren't of the clan Wingeon! Get out of here!", cid)
return true
else
selfSay("So you want to transform your Fearow in a Shiny Fearow? It will cost 500k!", cid)
talkState[talkUser] = 4
end
elseif (msgcontains(msg, 'yes') or msgcontains(msg, 'Yes')) and talkState[talkUser] == 4 then
if getPlayerSlotItem(cid, 8).uid <= 0 then
selfSay("Sorry, you don't have a pokemon in the main slot!", cid)
talkState[talkUser] = 0
return true
end
--alterado v1.2
if #getCreatureSummons(cid) >= 1 then
selfSay("Go back your pokemon!", cid)
talkState[talkUser] = 0
return true
end
local pb = getPlayerSlotItem(cid, 8).uid
if getItemAttribute(pb, "poke") ~= "Fearow" then
selfSay("Put a fearow's pokeball atleast +20 in main slot!", cid)
talkState[talkUser] = 0
return true
end
if not getItemAttribute(pb, "boost") or getItemAttribute(pb, "boost") < 20 then
selfSay("Sorry, your fearow is not boosted +20!", cid)
talkState[talkUser] = 0
return true
end
--100000 = 1k, 1000000 = 10k, 10000000 = 100k
if doPlayerRemoveMoney(cid, 50000000) == true then
selfSay("So there is it! Enjoy!", cid)
doItemSetAttribute(pb, "hp", 1)
doItemSetAttribute(pb, "poke", "Shiny Fearow")
doItemSetAttribute(pb, "description", "Contains a Shiny Fearow.")
doItemEraseAttribute(pb, "boost")
doTransformItem(getPlayerSlotItem(cid, 7).uid, fotos["Shiny Fearow"])
if useKpdoDlls then
doCreatureExecuteTalkAction(cid, "/pokeread")
end
talkState[talkUser] = 0
return true
else
selfSay("You don't have enough money!", cid)
talkState[talkUser] = 0
return true
end
end
return true
end
npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback)
npcHandler:addModule(FocusModule:new())
Salve e Feche.
Agora Vá Na Pasta "XML" Abra o Outifits.xml
e Adicione Isso Nele:
<!-- PROMOTE --> <outfit id="14" quest="181612"> <list gender="0" lookType="1149" name="Naturia"/> <list gender="1" lookType="1159" name="Naturia"/> </outfit> <outfit id="15" quest="181613"> <list gender="0" lookType="1152" name="Volcanic"/> <list gender="1" lookType="1154" name="Volcanic"/> </outfit> <outfit id="16" quest="181614"> <list gender="0" lookType="1146" name="Gardestrike"/> <list gender="1" lookType="1155" name="Gardestrike"/> </outfit> <outfit id="17" quest="181615"> <list gender="0" lookType="1153" name="Malefic"/> <list gender="1" lookType="1157" name="Malefic"/> </outfit> <outfit id="18" quest="181616"> <list gender="0" lookType="1148" name="Wingeon"/> <list gender="1" lookType="1158" name="Wingeon"/> </outfit> <outfit id="19" quest="181617"> <list gender="0" lookType="1147" name="Raibolt"/> <list gender="1" lookType="1160" name="Raibolt"/> </outfit> <outfit id="20" quest="181618"> <list gender="0" lookType="1145" name="Psycraft"/> <list gender="1" lookType="1161" name="Psycraft"/> </outfit> <outfit id="21" quest="181619"> <list gender="0" lookType="1151" name="Seavell"/> <list gender="1" lookType="1162" name="Seavell"/> </outfit> <outfit id="22" quest="181620"> <list gender="0" lookType="1150" name="Orebound"/> <list gender="1" lookType="1156" name="Orebound"/> </outfit> <!-- PROMOTE RANK 5 --> <outfit id="23" quest="181621"> <list gender="0" lookType="1179" name="Raibolt Legend"/> <list gender="1" lookType="1164" name="Raibolt Legend"/> </outfit> <outfit id="24" quest="181622"> <list gender="0" lookType="1178" name="Seavell Queen"/> <list gender="1" lookType="1165" name="Seavell King"/> </outfit> <outfit id="25" quest="181623"> <list gender="0" lookType="1177" name="Naturia Keeper"/> <list gender="1" lookType="1166" name="Naturia Keeper"/> </outfit> <outfit id="26" quest="181624"> <list gender="0" lookType="1176" name="Malefic Lady"/> <list gender="1" lookType="1167" name="Malefic Lord"/> </outfit> <outfit id="27" quest="181625"> <list gender="0" lookType="1180" name="Volcanic Master"/> <list gender="1" lookType="1168" name="Volcanic Master"/> </outfit> <outfit id="28" quest="181626"> <list gender="0" lookType="1175" name="Wingeon Dragon"/> <list gender="1" lookType="1169" name="Wingeon Dragon"/> </outfit> <outfit id="29" quest="181627"> <list gender="0" lookType="1174" name="Orebound Hero"/> <list gender="1" lookType="1170" name="Orebound Hero"/> </outfit> <outfit id="30" quest="181628"> <list gender="0" lookType="1173" name="Gardestrike Lady"/> <list gender="1" lookType="1171" name="Gardestrike Champion"/> </outfit> <outfit id="31" quest="181629"> <list gender="0" lookType="1181" name="Psycraft Medium"/> <list gender="1" lookType="1172" name="Psycraft Medium"/> </outfit> <!-- PROMOTE MASTER --> <outfit id="32" quest="181630"> <list gender="0" lookType="1437" name="Raibolt Master"/> <list gender="1" lookType="1421" name="Raibolt Master"/> </outfit> <outfit id="33" quest="181631"> <list gender="0" lookType="1438" name="Seavell Master"/> <list gender="1" lookType="1422" name="Seavell Master"/> </outfit> <outfit id="34" quest="181632"> <list gender="0" lookType="1434" name="Naturia Master"/> <list gender="1" lookType="1423" name="Naturia Master"/> </outfit> <outfit id="35" quest="181633"> <list gender="0" lookType="1430" name="Malefic Master"/> <list gender="1" lookType="1428" name="Malefic Master"/> </outfit> <outfit id="36" quest="181634"> <list gender="0" lookType="1432" name="Volcanic Superior"/> <list gender="1" lookType="1425" name="Volcanic Superior"/> </outfit> <outfit id="37" quest="181635"> <list gender="0" lookType="1433" name="Wingeon Master"/> <list gender="1" lookType="1424" name="Wingeon Master"/> </outfit> <outfit id="38" quest="181636"> <list gender="0" lookType="1436" name="Orebound Master"/> <list gender="1" lookType="1427" name="Orebound Master"/> </outfit> <outfit id="39" quest="181637"> <list gender="0" lookType="1431" name="Gardestrike Master"/> <list gender="1" lookType="1429" name="Gardestrike Master"/> </outfit> <outfit id="40" quest="181638"> <list gender="0" lookType="1435" name="Psycraft Master"/> <list gender="1" lookType="1426" name="Psycraft Master"/> </outfit>
Aviso: Modiciar o Outifit Id Conforme o Seu Servidor!
Aviso2: Não Eskecer De Modificar os Looktypes Dos Clan e Dos Npc Conforme o Seu Client!
Bom Se Acharem Algum Erro Fatal, Avisar...
Mas Porinquanto é So Isso *-*
Abraço, Espero Que Tenhão Costados!
Esse TUTORIAL é Exclusivo Do Xtibia, NÃO DOU A PERMIÇÃO PARA COPIAREM OU PUBLICAREM EM OUTRO FORUM! Caso Aconteça Isso Será Considerado RIPP
Creditos Base:
Slicer. (Edição Inicial)
