obj
    tittle
        icon = 'Inulogin.bmp'
obj
    conu
        icon = 'load1.png'
        Click()
            usr.client.Load_Char()

obj
    New
        icon = 'new1.png'
        Click()
            spawn()
                usr.Create()

    Exit
        icon = 'quit1.png'
        Click()
            del (usr)

atom/movable
    var
        move
        
    proc/Create()
        var/char_name=input(src,"What do you wish for your name to be","Create") as text
        while(!char_name)
            alert("Plese Enter A Name")
            return
            
        var/mob/new_mob = new()
        var/list/races = new()
        races += "Human"
        races += "Demon"
        races += "Living Dead"
        races += "Half Demon"
        var/char_race=input("What race is [name]?", "Create", null) in races
        
        var/list/classes = new()
        classes += "Slayer"
        classes += "Preist"
        classes += "Munk"
        classes += "Wander"
        var/char_class=input("What calss is [name]?","Create", null) in classes
        
        var/list/genders = new()
        genders += "Male"
        genders += "Female"
        var/char_genders=input("What Gender is [name]?","Create",null) in genders
        
        var/list/starts = new()
        starts += "Well"
        starts += "Forest"
        var/char_starts=input("Were do you want to start?","Create",null) in starts
        
        switch (char_race)
            if ("Human")
                new_mob.race = "Human"
                new_mob.icon = 'mob.dmi'
                new_mob.icon_state = "1"
            if ("Demon")
                new_mob.race = "Demon"
                new_mob.icon = 'mob.dmi'
                new_mob.icon_state = "1"
            if ("Half Demon")
                new_mob.race = "Half Demon"
                new_mob.icon = 'mob.dmi'
                new_mob.icon_state = "1"
            if ("Liveing Dead")
                new_mob.race = "Liveing Dead"
                new_mob.icon = 'mob.dmi'
                new_mob.icon_state = "1"
                
        switch (char_class)
            if ("Slayer")
                new_mob.class = "Slayer"
            if ("Priest")
                new_mob.class = "Priest"
            if ("Munk")
                new_mob.class = "Munk"
            if ("Wander")
                new_mob.class = "Wander"
                
        switch (char_genders)
            if ("Male")
                new_mob.genders = "Male"
            if ("Female")
                new_mob.genders = "Female"
                
        switch (char_starts)
            if ("Well")
                new_mob.loc=locate(7,9,2)
            if ("Forest")
                new_mob.loc=locate(7,9,2)
                            
            
            
        new_mob.name = char_name
        new_mob.race = char_race
        new_mob.class = char_class
        new_mob.genders = char_genders
        usr.client.mob = new_mob
        del(src)