Como Aumentar O Xp Dos Players Quando Eles Compram p.a

[luciano01 1]

Como aumentar o exp dos players quando eles compram premium account ?

[thiagobji 409]

Double EXP para Players PREMIUM

[Kimoszin 1160]

\data\lib\050-function.lua

function doPlayerSetPercentExperienceRate(cid, value)

    return doPlayerSetRate(cid, SKILL__LEVEL, getConfigValue("rateExperience") + (value / 100))

end

\data\creaturescripts\scripts\login.lua

			 registerCreatureEvent(cid, "extraExp")

\data\creaturescripts\creaturescripts.xml

 <event type="login" name="extraExp" event="script" value="extraExp.lua"/>

\data\creaturescripts\scripts\extraExp.lua

local config = {

    ExtraExpRate = 30,

}


function onLogin(cid)

    if not(isPremium(cid)) then

        return doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Voce nao possui premium time, compre ja sua premium time e ganhe "..config.ExtraExpRate.."% de experiencia adicional.")

    end


    doPlayerSetPercentExperienceRate(cid, config.ExtraExpRate)

    return doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Voce acaba de ganhar "..config.ExtraExpRate.."% de experiencia adicionais por ser premium account.")

end

[luciano01 1]

Double EXP para Players PREMIUM

ERROR: Unable to load CreatureEvents! =/

\data\lib\050-function.lua

function doPlayerSetPercentExperienceRate(cid, value)

return doPlayerSetRate(cid, SKILL__LEVEL, getConfigValue("rateExperience") + (value / 100))

end

\data\creaturescripts\scripts\login.lua

			 registerCreatureEvent(cid, "extraExp")

\data\creaturescripts\creaturescripts.xml

 <event type="login" name="extraExp" event="script" value="extraExp.lua"/>

\data\creaturescripts\scripts\extraExp.lua

local config = {

ExtraExpRate = 30,

}


function onLogin(cid)

if not(isPremium(cid)) then

return doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Voce nao possui premium time, compre ja sua premium time e ganhe "..config.ExtraExpRate.."% de experiencia adicional.")

end


doPlayerSetPercentExperienceRate(cid, config.ExtraExpRate)

return doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Voce acaba de ganhar "..config.ExtraExpRate.."% de experiencia adicionais por ser premium account.")

end

Deu o Msm erro =[

Editado Janeiro 22, 2013 por luciano01 (veja o histórico de edições)