Max Skills on First Login

--[[
    Max Skills on First Login
    Rochet2 style :3

    Based on a script by Psykko @ WoWBase, which is based on a script by QQrofl @ AC-Web
]]

local T =
{
    -- Skill spells
    ["Paladin"] = {107,196,198,201,750,200,2776,9116,197,199,202},
    ["Shaman"] = {107,15590,198,8737,196,9116,27763,9116,197,199,227},
    ["Warrior"] = {107,264,5011,674,15590,266,196,198,201,750,200,9116,3018,227,2764,2567,197,199,202},
    ["Hunter"] = {264,5011,674,15590,266,196,201,8737,200,227,197,202},
    ["Rogue"] = {264,5011,674,15590,266,196,198,201,3018,2764,2567},
    ["Druid"] = {1180,15590,198,200,27764,227,199},
    ["Mage"] = {1180,201,5019,227,5009},
    ["Warlock"] = {1180,201,5019,227,5009},
    ["Priest"] = {1180,201,5019,227,5009},
    ["Death Knight"] = {674,196,198,201,750,200,52665,197,199,202},

    ["Skills"] = {43,44,45,46,54,55,95,136,160,162,172,173,176,226,228,229,473},
}

local function FirstLog(event, pPlayer)
    local Class = pPlayer:GetPlayerClass()
    if(Class and T[Class]) then
        for _, SpellID in ipairs(T[Class]) do
            pPlayer:LearnSpell(SpellID)
        end
    end
    for _, SkillID in ipairs(T["Skills"]) do
        pPlayer:AdvanceSkill(SkillID, 1250)
    end
    pPlayer:SendAreaTriggerMessage("|cffFFFF05Learned and maxed out all skills")
end

RegisterServerHook(3, FirstLog)