mob
    proc
        LevelUp()
            if(EXP >= EXPNeeded)
                src.Strength += rand(5,15)
                src.MinStrength += 5
                src.MaxHP += rand(10,30)
                src.MaxMP += rand(6,18)
                src.Def +=rand(3,9)
                src.HP = MaxHP
                src.MP = MaxMP
                src.Level += 1
                src.EXPNeeded += rand(100,300)
                src.EXP = 0
                world << "[src] has achieved level [Level]!"
            else
                return 0
    var
        Slimer
        Slimeb
        Slimeg
        Slime = 'Slime.dmi'
        Cloud = 'Cloud.dmi'
        Sign = ""


    Login()
        
        . = ..()




            usr.name = copytext(name,1,15)
            usr.name = input("What is your name, though Slime Warrior?","Thine's Name")
            if(!src.name)
                del(src)
            var/cred = input("How much red do you want in your slime? (0,0,0 = Black Slime, 200,200,200 = White Slime)") as num
            var/cgreen = input("How much green do you want in your slime? (0,0,0 = Black Slime, 200,200,200 = White Slime)") as num
            var/cblue = input("How much blue do you want in your slime? (0,0,0 = Black Slime, 200,200,200 = White Slime)") as num
            src.Slimer = cred
            src.Slimeg = cgreen
            src.Slimeb = cblue
            Slime += rgb(src.Slimer,src.Slimeg,src.Slimeb)
            src.Random_Status()
            src.overlays += src.Slime
            loc = locate(89,89,1)
            world << "</font><font color = red><B>[src.name]</font>([src.key])</font>, the <B>level [src.Level] </B> has joined the world!"

    mob.Logout()
        src.Write()

client
    script = "<STYLE>BODY {background: #000077; color: blue}</STYLE>"
world
    view = 6

mob/var
    speeding = 0
    rundelay = 2    //Set this to different settings to control how slow the mob walks.

client/Move()
    if(mob.speeding <= 0)
        mob.speeding = 1
        ..()
        sleep(mob.rundelay)
        mob.speeding = 0
    else
        return
mob
    var
        MaxHP
        HP
        MP
        MaxMP
        Strength
        MinStrength
        EXP
        EXPNeeded
        Level
        Def
        Gold = 0

    proc
        Random_Status()
            src.MaxHP = rand(25,100)
            src.HP = MaxHP
            src.MP = rand(20,30)
            src.MaxMP = MP
            src.Strength = rand(10,20)
            src.MinStrength = 10
            src.EXPNeeded = rand(125,200)
            src.Def = rand(1,5)
            Level = 1
            EXP = 0

mob
    Stat()
        statpanel("[src]")
        stat(src)
        stat("---------------------")
        stat("Level","[Level]")
        stat("HP:", "[HP]/[MaxHP]")
        stat("MP:", "[MP]/[MaxMP]")
        stat("Strength:","[Strength]")
        stat("Defense:","[Def]")
        stat("Exp:","[EXP]/[EXPNeeded]")
        stat("Gold:","[Gold]")
        stat("---------------------")
        
client
    var
        tmp
            base_num_characters_allowed = 1
            base_autoload_character = 1
            base_autosave_character = 1
            base_autodelete_mob = 1
            base_save_verbs = 1
mob
    var
        tmp
            base_save_allowed = 1    // Is this mob allowed to be saved?
            base_save_location = 1
        
    var/list/base_saved_verbs
    
    proc/base_InitFromSavefile()
        return
            
            
    Write(savefile/F)
        // Save the location if that has been specified and there is a map.
        // First, call the default Write() behavior for mobs.
        ..()

        if (base_save_location && world.maxx)
            F["last_x"] << x
            F["last_y"] << y
            F["last_z"] << z
            F["HP"] << HP
            F["MaxHP"] << MaxHP
            F["MP"] << MP
            F["MaxMP"] << MaxMP
            F["Strength"] << Strength
            F["Def"] << Def
            F["EXP"] << EXP
            F["EXPNeeded"] << EXPNeeded
            F["Gold"] << Gold
            F["name"] << name