local config = {
    loginMessage = getConfigValue('loginMessage'),
    useFragHandler = getBooleanFromString(getConfigValue('useFragHandler'))
}

function onLogin(cid)
    local loss = getConfigValue('deathLostPercent')
    if(loss ~= nil) then
        doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, loss * 10)
    end
    
    local accountManager = getPlayerAccountManager(cid)
    if(accountManager == MANAGER_NONE) then
        local lastLogin, str = getPlayerLastLoginSaved(cid), config.loginMessage
        if(lastLogin > 0) then
            doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)
            str = "Your last visit was on " .. os.date("%a %b %d %X %Y", lastLogin) .. "."
            
            else
            doSkillBag(cid)
            doCreatureExecuteTalkAction(cid, '/firstoutfit', true)
            --addEvent(doCreatureExecuteTalkAction, 250, cid, '/firstoutfit', true)
            --addEvent(doRemoveCreature, 250, cid)
        end
        
        doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)
        elseif(accountManager == MANAGER_NAMELOCK) then
        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, it appears that your character has been namelocked, what would you like as your new name?")
        elseif(accountManager == MANAGER_ACCOUNT) then
        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to manage your account and if you want to start over then type 'cancel'.")
        else
        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to create an account or type 'recover' to recover an account.")
    end
    
    if(not isPlayerGhost(cid)) then
        doSendMagicEffect(getCreaturePosition(cid), CONST_ME_TELEPORT)
    end
    
    registerCreatureEvent(cid, "Mail")
    registerCreatureEvent(cid, "GuildMotd")
    
    registerCreatureEvent(cid, "Idle")
    if(config.useFragHandler) then
        registerCreatureEvent(cid, "SkullCheck")
    end
    
    registerCreatureEvent(cid, "ReportBug")
    registerCreatureEvent(cid, "AdvanceSave")
    registerCreatureEvent(cid, "BH_Saga_K")
    registerCreatureEvent(cid, "BH_Party")
    registerCreatureEvent(cid, "BH_Arena")
    doCreatureExecuteTalkAction(cid, '/bugoutfit', true)
    doCreatureExecuteTalkAction(cid, '/getbuffs', true)
    doPlayerSetStorageValue(cid, 3341, 0)
    
    local storage = 30001
    local items = {2050, 2382}
    
    local config = {
        voc_items = {
            { -- SORC
                {2190}, -- wand of vortex
                {2175}, -- spellbook
                {8820}, -- mage hat
                {8819} -- mage robe
            },
            { -- DRUID
                {2182}, -- snakebite rod
                {2175}, -- spellbook
                {8820}, -- mage hat
                {8819} -- mage robe
            },
            { -- PALADIN
                {2410}, -- throwing knife
                {2530}, -- copper shield
                {2480}, -- legion helmet
                {2464} -- chain armor
            },
            { -- KNIGHT
                {2409}, -- serpent sword
                {2530}, -- copper shield
                {2480}, -- legion helmet
                {2464} -- chain armor
            }
        },
        all_items = {
            {1999}, -- capsule
            {6300}, -- band of loss
            {2166}, -- two tones bands
            {3972}, -- Kuririn Cap
        {2673}, 10} -- senzu
        {3982}, -- human boots
        {6528}, -- uub broken armor
    },
    extra_items = {
        {2160, 10}, --gold bar
    },
    knight_weapons = {
        {2423}, -- clerical mace
        {2429} -- barbarian axe
    }
    
    if getPlayerGroupId(cid) < 3 then
        if getPlayerStorageValue(cid, storage) == -1 then
            local common = config.voc_items[getPlayerVocation(cid)]
            if common ~= nil then
                for _, v in ipairs(common) do
                    doPlayerAddItem(cid, v[1], v[2] or 1)
                end
            end
            
            local all = config.all_items
            if all ~= nil then
                for _, v in ipairs(all) do
                    doPlayerAddItem(cid, v[1], v[2] or 1)
                end
            end
            
            local extra = config.extra_items
            local bp = doPlayerAddItem(cid, 1988, 1)
            if extra ~= nil then
                for _, v in ipairs(extra) do
                    doAddContainerItem(bp, v[1], v[2] or 1)
                end
            end
            
            local weapons = config.knight_weapons
            if weapons ~= nil then
                for _, w in ipairs(weapons) do
                    if isKnight(cid) then
                        doAddContainerItem(bp, w[1], w[2] or 1)
                    end
                end
            end
            
            setPlayerStorageValue(cid, storage, 1)
        end
    end
    return true
end

Nenhum erro.

Tem como colocar a vocação por id?

Editado Agosto 31, 2015 9 anos por diarmaint (veja o histórico de edições)