// Saving / Loading system by Griswald
// (c) 2002+ Griswald Greenleaf


// Please Note: There are NO CODE CHANGES FROM V1.1 to V1.2! There were only
//      Comment additions. Also redid the images to the login screen. People
//      said they were too hard too read, so I turned them to basic text. Hope
//      they are readable now =)


//  At the Request of some people, I have taken and added more comments
// to better explain what is going on. The comments I will add will be for 100%
// n00b's. If you aren't a n00b, and know byond coding, etc, just delete my comments :)
//                           -- Griswald --
world
    hub = "Griswald.CharacterHandling"
    name = "Griz' Character Handler"




mob
    Login()
        usr.loc = locate(5,5,2) // change to your title screen
        ..()

mob
    var/characters = 0 // Leave this at 0, this is for the default amount of characters.
    proc
//----------------------------------//
        CreateChar(mob/M) // The char creation function -- Change with whatever you want for
                          // creating a character.
//----------------------------------//

            src.icon = 'Mob.dmi' // define the characters icon

            //----------------------//
            src << "Char gen done!" // this is just a debug message to show that this proc
                                    // is being called.
            //----------------------//

            usr.characters += 1
            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.SaveChar()          // Auto-Save the new char for just in case game crashes.
            ..()

        SaveChar()  // The proc that saves your character.
            var/savefile/F = new("players/[src.ckey].sav") // define the save file and create it
            F["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

    verb
        Save()
            usr.SaveChar()          // Make a call to the character's saving proc
            usr << "Your character has been saved." // Inform the player that he's been saved.

turf/CharHand
    icon = 'charhand.bmp'
    density = 1

turf/nomove
    density = 1

turf/NewChar
    icon = 'new.bmp' // change this to the bmp of your "New Character" button
    Click()
        usr.sight = 1 // Blackscreen them so they can't choose another choice
        if(usr.characters == 10)      //This is the only thing that will work for some odd reason. Anyways, set the number to the max amount of characters allowed.
            src << "You already have the maximum number of characters available."   //Say this to the user if they have the max amount of characters
        else    
            if (fexists("players/[usr.ckey].sav")) // Check if they have a save file
                switch(alert("If you continue with a new character, your previous character will be erased. Do you wish to continue?","[world.name]","Yes","No"))
                    if ("Yes")
                        usr << "... Ok... Beginning character process now."
                        usr.CreateChar()
                        return ..()
                    if ("No")
                        usr << "Ok, Please reconnect for you are being disconnected now and then choose \"LOAD GAME\""
                        del(usr)
                        return ..()
            else
                usr.CreateChar() // No savefile found, create a new character
                return ..()
            ..()

mob
    proc
        LoadCharacter() // The load character proc
            var/savefile/F = new("players/[src.ckey].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
            newmob.client = src.client  // Set the mob's client to players client

turf/LoadChar
    icon = 'load.bmp' // change the bmp to the bmp to your "Load Character" image
    Click()
        if(fexists("players/[usr.ckey].sav")) // check to see if the character has a savefile
            usr.LoadCharacter() // Make a call to load the character

            //----------------------------------//
            world << "\[[world.name]]--> [usr.name] has logged in!" // Announce to the world
                                                                    // that the user logged in
            //----------------------------------//

            usr << "Welcome back to the game!" // Welcome the player
            return ..()
        else
            alert("You don't HAVE an old character here, or it isn't found in our databases!")
                    // Uh oh! No player file found when they clicked Load!
            return ..()
        ..()

turf/Grass
    icon = 'Grass.dmi'

Give_Gm(mob/M in world)
          if(M.GM == 1)
             world << "[usr] has striped [M] of his...."
             M.GM = 0
             M.verbs-=typesof(/mob/GM/verb)
           else
               if(M.GM == 0)
                  world << "[usr] has given [M] Gm commands"
                  M.GM = 1
                  M.verbs+=typesof(/mob/GM/verb)