mob
    proc
        CreateChar(mob/M)
            Name
            var/char_name = input("Please name your character.","Name") as null|text
            if(char_name == null)
                goto Name
            var/Type = input("What type of Chao would you like to be?") in list("test","tester"
            if(Type == "test")
                usr.icon = 'mob.dmi'
                goto Start
            Start
            usr.name = char_name
            usr.loc = locate(1,1,1) // spawn the character to 1,1 on map #1
            usr.sight = 0            // make it so the character can see
            usr.Save()              // Auto-Save the new char for just in case game crashes.

        SaveChar(mob/M as mob)             //The proc that saves your character.
            var/savefile/F = new("players/[src.key].sav") // define the save file and create it
            F["N=name"] << name        // Outputs the characters name into the savefile list
            F["X"] << src.x            // Outputs the char's X coordinate into the list
            F["Y"] << src.y            // Outputs the char's Y coordinate into the list
            F["Z"] << src.z            // Outputs the char's Z coordinate into the list
            F["Mob"] << usr.client.mob // Outputs ALL of the character (var's, etc) into the list

        Load(mob/M as mob) // The load character proc
            var/savefile/F = new("players/[src.key].sav") // define the location of the save file
            var/X       // Defines a temporary X variable
            var/Y       // Defines a temporary Y variable
            var/Z       // Defines a temporary Z variable
            var/mob/newmob = new() // Initialize a new mob
            F["name"] >> name// Load the name from the list into the character's name
            F["X"] >> X     // Load the X variable from the savefile to the temporary X variable
            F["Y"] >> Y     // Load the Y variable from the savefile to the temporary Y variable
            F["Z"] >> Z     // Load the Z variable from the savefile to the temporary Z variable
            F["Mob"] >> newmob  // Load all the mob data into the initialized mob
            newmob.loc = locate(X,Y,Z)  // Move the initialized mob to the last saved location
            src.client.mob = newmob // change the clients mob to the initialized mob
            del(src) // delete the old mob from memory (not the initialized mob)