if SERVER then
    AddCSLuaFile()
    resource.AddFile("/class_system/sound/changeclass.wav")
end
HogwartsRP_class = 1

HogwartsRP_ClassList = {
[1] = "Free Time",
[2] = "Class 1/Charms",
[3] = "Class 3/Def. Against the DF",
[4] = "Free Time",
[5] = "Hagrid's Place",
[6] = "Class 1/Def. Against the DF",
[7] = "Astronomy Tower",
[8] = "Free Time",
[9] = "Challenge and Battle Room",
[10] = "Battle Room",
[11] = "Lockdown",
[12] = "Class 1/Study of Occlumency",
[13] = "Class 3/Transfiguration Class",
[14] = "Grand Hall/Cafeteria Time",
[15] = "Class 1/Charms Class",
[16] = "Free Time",
[17] = "Quiditch/Competition",
[18] = "Class 5/Study of Muggles",
[19] = "Free Time",
[20] = "Class 1/Charms Class",
[21] = "Class 5/History Class",
[22] = "Study of Herbology",
[23] = "Class 4/Potion Class",
[24] = "Free time",
[25] = "Class 1/Charms Class",
[26] = "Class 3/Def. Against the DF",
[27] = "Challenge and Battle Room",
[28] = "Free Time",
[29] = "Hagrid's Place",
[30] = "Class 1/Def. Against the DF",
[31] = "Astronomy Tower",--
}

if SERVER then

timer.Create("NextClassBegins",360,0,function()

    HogwartsRP_class = HogwartsRP_class + 1

    if HogwartsRP_class > table.Count(HogwartsRP_ClassList) then HogwartsRP_class = 1 end

    for k,ply in pairs(player.GetAll()) do

        ply:SetNWFloat( "HWRP_Class", HogwartsRP_class )
        ply:SendLua("surface.PlaySound(\"changeclass.wav\")")

    end


end)


local function PlyInitSpawn(ply)

    ply:SetNWFloat( "HWRP_Class", HogwartsRP_class )

end
hook.Add("PlayerInitialSpawn","SyncClass",PlyInitSpawn)

else
hook.Add("HUDPaint","DrawClassDisplay",function()
    if HogwartsRP_ClassList[LocalPlayer():GetNWFloat("HWRP_Class")] != nil then
    surface.SetFont("HarryPFont")
    local add = surface.GetTextSize(HogwartsRP_ClassList[LocalPlayer():GetNWFloat("HWRP_Class")])
    draw.RoundedBox(10,9,20,100 + add,90,Color(28,28,28,150))
    draw.RoundedBox(10,10,21,98 + add,88,Color(28,28,28,150))
    draw.SimpleText(HogwartsRP_ClassList[LocalPlayer():GetNWFloat("HWRP_Class")],"HarryPFont",60,55,Color(255,255,255,255))

    end



end)


end
if CLIENT then
surface.CreateFont( "HarryPFont", {
    font = "Harry P",
    extended = false,
    size = 32,
    weight = 500,
    blursize = 0,
    scanlines = 0,
    antialias = true,
    underline = false,
    italic = false,
    strikeout = false,
    symbol = false,
    rotary = false,
    shadow = false,
    additive = false,
    outline = false,
} )
end