scripts Clan's Poketibia

[ThePnK 0]

E ai Galera Do TK

bom meu servidor tem o comando de add clan

 

"/clan orebound,5 "

 

queria editar ele mais ou menos assim

 

/clan orebound,1 requer lvl 100 + 10 diamond

/clan orebound,2 requer lvl 100 + 10 diamond

 

 

 

 

arquivo talkactions:

function onSay(cid, words, param, channel)

if param == "" then
return sendMsgToPlayer(cid, 20, "Estao faltam os parametros! [clan name], [rank]")
end
local t = string.explode(param, ",")
local clans = {'Volcanic', 'Seavell', 'Orebound', 'Wingeon', 'Malefic', 'Gardestrike', 'Psycraft', 'Naturia', 'Raibolt'}
if not isInArray(clans, t[1]) then
   return sendMsgToPlayer(cid, 20, t[1].." nao é uma clan valido!")
elseif not tonumber(t[2]) then
   return sendMsgToPlayer(cid, 20, "Parametros errados! [clan name], [rank].")
end

local rank = tonumber(t[2])
local clan = t[1]

    if getPlayerStorageValue(cid, 92823) < 1 then -- 7575 -- 92823
        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_RED, "Essa é sua primeira vez mudando de clan. Nas próximas, terá o custo de 10 diamonds.")
        doPlayerSendTextMessage(cid, 27, "Agora você pertence ao clan "..clan..", rank: "..rank.."")
        setPlayerClan(cid, clan)
        setPlayerClanRank(cid, rank)
    else
        if getPlayerItemCount(cid, 2145) < 10 then
            return doPlayerSendCancel(cid, "Você precisa de 10 diamonds para mudar de clan.")
        else
            return doPlayerSendCancel(cid, "Sorry, not possible.")
        end
        if(getPlayerLevel(cid) < 120) then
            return doPlayerSendCancel(cid, "Você estar no level 120.")
        else
            return doPlayerSendCancel(cid, "Sorry, not possible.")
        end
        doPlayerSendTextMessage(cid, 27, "Agora você pertence ao clan "..clan..", rank: "..rank.."")
        doPlayerRemoveItem(cid, 2145, 10)
        setPlayerClan(cid, clan)
        setPlayerClanRank(cid, rank)
    end
    return true

end

alguem pode me ajudar.

Editado Janeiro 29, 2015 por ThePnK (veja o histórico de edições)

[Danihcv 607]

O tópico foi movido para a área correta, preste mais atenção da próxima vez!

Leia as regras do fórum: http://tibiaking.com/forum/topic/1281-regras-gerais/?p=7680

Este tópico foi movido:

De: "OTServ → Scripting → Tutoriais de Scripting"

Para: "OTServ → Suporte OTServ → Suporte de Servidores Derivados"