mob/var
   full_access
mob/var
    HP
    MHP
    MP
    MMP
    Str
    Mana_Power
    Class = ""
    Exp
    Mexp
    Level = 1
    host = ""

mob/create_character/Login()
    if(client.CheckPassport("14c847b7157ec746"))
        var/mob/character
        full_access = 1
        usr<<sound('opening.mid',1)
        var/charactername = input("Hello, Pick a name for your character, something you wish for people to call you in the game.  If you use HTML codes for your name you WILL be banned.  Multiple abusers will be banned permanently.","Character Name?")
        switch(input("What class do you want?")in list("Monk","Sorcerer","Knight"))
            if("Monk")
                icon = 'Etc.dmi'
                icon_state = "monk"
                character.HP = 25
                character.MHP = 25
                character.MP = 5
                character.MMP = 5
                character.Mana_Power = 10
                character.Str = 12
                character.Def = 10
                character.Class = "Monk"
                character.Exp = 0
                character.Mexp = 20
            if("Sorcerer")
                icon = 'Etc.dmi'
                icon_state = "sorcerer"
                character.HP = 14
                character.MHP = 14
                character.MP = 25
                character.MMP = 25
                character.Mana_Power = rand(10,20)
                character.Str = 7
                character.Def = 9
                character.Class = "Sorcerer"
                character.Exp = 0
                character.Mexp = 13
            if("Knight")
                icon = 'Etc.dmi'
                icon_state = "knight"
                character.HP = 20
                character.MHP = 20
                character.MP = 0
                character.MMP = 0
                character.Mana_Power = 0
                character.Str = 15
                character.Def = 12
                character.Class = "Knight"
                character.Exp = 0
                character.Mexp = 27
        character.name = charactername
        src.client.mob = character
        character.loc=locate (2,2,1)
        world<<"<B>[character] has logged in!"
        del(src)
        ..()
    else
        var/mob/character
        full_access = 0
        usr<<sound('opening.mid',1)
        var/charactername = input("Hello, Pick a name for your character, something you wish for people to call you in the game.  If you use HTML codes for your name you WILL be banned.  Multiple abusers will be banned permanently.","Character Name?")
        switch(input("What class do you want? this decides your stats.")in list("Monk","Sorcerer","Knight"))
            if("Monk")
                icon = 'Etc.dmi'
                icon_state = "monk"
                character.HP = 25
                character.MHP = 25
                character.MP = 5
                character.MMP = 5
                character.Mana_Power = 10
                character.Str = 12
                character.Def = 10
                character.Class = "Monk"
                character.Exp = 0
                character.Mexp = 20
            if("Sorcerer")
                icon = 'Etc.dmi'
                icon_state = "sorcerer"
                character.HP = 14
                character.MHP = 14
                character.MP = 25
                character.MMP = 25
                character.Mana_Power = rand(10,20)
                character.Str = 7
                character.Def = 9
                character.Class = "Sorcerer"
                character.Exp = 0
                character.Mexp = 13
            if("Knight")
                icon = 'Etc.dmi'
                icon_state = "knight"
                character.HP = 20
                character.MHP = 20
                character.MP = 0
                character.MMP = 0
                character.Mana_Power = 0
                character.Str = 15
                character.Def = 12
                character.Class = "Knight"
                character.Exp = 0
                character.Mexp = 27
        character.name = charactername
        src.client.mob = character
        character.loc=locate (2,2,1)
        world<<"<B>[character] has logged in!"
        del(src)
        ..()