world/mob = /mob/BaseCamp/ChoosingCharacter

world
    view = 6

mob/BaseCamp/ChoosingCharacter
    Login()
        spawn()
            usr.loc = locate(1,1,1)
            usr.freeze = 1
        return ..()

mob
    var
        freeze = 0

mob/Move()
    if(src.freeze == 1)
        return
    else
        ..()

mob
    verb
        Test()
            usr << "This is just a test."


turf
    icon = 'TURFS.dmi'
    VOID
        icon_state = "VOID"
        density = 1
        opacity = 1

mob
    icon = 'Andorid 17.dmi'

var
    list
        bannednames=list("1","2","3","4","5","6","7","8","9","0"," ","<",">","!",".",",","+","\",",")","(","*","&","^","%","$","#","@","!","~","`")


mob/var/HasItUp = 0

obj
    TITLE
        icon = 'background3.png'
        name = ""
        layer = 200
        
    NEW
        icon = 'new1.jpg'
        Click()
            if(usr.HasItUp == 0)//this is to prevent users from having multiple windows open
                usr.HasItUp = 1
                var/mob/character
                crap:
                    var/charactername1 = input("What is your character's name?","Character Name?")as null|text
                    if(charactername1 == null || charactername1 == "" || charactername1 == " "|| charactername1 == "  " || charactername1 == "   ")
                        usr.HasItUp = 0
                        return
                    var/m = copytext(charactername1,1,2)//inefficient way of putting a name together
                    var/v = uppertext("[m]")
                    var/c = copytext(charactername1,2,11)
                    var/b = lowertext(c)
                    var/charactername = "[v][b]"
                    for(var/X in bannednames)
                        if(findtext(charactername,X))
                            alert(usr,"Name rejected..","DENIED!")
                            goto crap
                    switch(input("Pick a Race.","Character Class") in list("android","Bas-Jin","Changling","Demon","Dragon","Hemadein","Human","Majin","Makyo-Jin","Mutant","Namekian","Saibamen","Saiyan","Half Breed","Bio Android","Konat","Tuffle","Kai"))
                        if ("Person")
                            character = new /mob()
                            character.name = charactername
                            usr.client.mob = character
                            character.loc=locate (1,1,1)
                            del(src)
                        if("Back")
                            goto crap
            else
                return
    LOAD
        icon = 'Load.jpg'
        Click()
            if(usr.HasItUp == 0)
                usr.HasItUp = 1
                var/savefile/F = usr.client.base_PlayerSavefile()
                F.cd = "/players/[usr.ckey]/mobs/"
                var/list/characters = F.dir
                var/b = 0
                var/entry
                var/autoname = ""
                for (entry in characters)
                    b ++
                for(entry in characters)
                    if(b == 1)
                        autoname = entry
                if(b == 0)
                    usr << "You don't have any saved characters on this server."
                if(b == 1)
                    usr.client.base_LoadMob(autoname)
                else
                    var/name = input("What is the name of the character you want to load?","Character Load") in usr.client.base_CharacterNames() + list("Cancel")
                    if(name == "Cancel")
                        usr.HasItUp = 0
                        return
                    else
                        usr.client.base_LoadMob(name)
            else
                return
    DELETE
        icon = 'delete.jpg'
        Click()
            var/savefile/F = usr.client.base_PlayerSavefile()
            F.cd = "/players/[usr.ckey]/mobs/"
            var/list/characters = F.dir
            var/b = 0
            for (var/entry in characters)
                b ++
            if(b == 0)
                usr << "You don't have any saved characters on this server."
            if(usr.HasItUp == 0)
                usr.HasItUp = 1
                var/name = input("What is the name of the character you want to delete?","Character Delete") in usr.client.base_CharacterNames() + list("Cancel")
                if(name == "Cancel")
                    usr.HasItUp = 0
                    return
                else
                    switch(alert("Are you absolutely sure you want to delete [name]?","Character Delete","No","Yes"))
                        if("Yes")
                            usr.HasItUp = 0
                            usr.client.base_DeleteMob(name)
                        if("No")
                            usr.HasItUp = 0
                            return
            else
                return