mob/proc
    Save()
        var/savefile/F=new("Save/[key]")
        F["x"]<<x
        F["y"]<<y
        F["z"]<<z
        Write(F)



    Load() if(client&&fexists("Save/[key]"))
        var/savefile/F=new("Save/[key]")
        Read(F)
        F["x"]>>x
        F["y"]>>y
        F["z"]>>z
        spawn AutoSave()

macro
    A return "A"
    R return "R"
    L return "L"
    K return "K"
    J return "J"
    H return "H"
    


mob
    proc
        learnuchiha()
            if(usr.Level==15&&usr.Uchiha)
                usr<<"congratz u learned Sharingan 1! PRESS L TO ACTIVATE IT!"
                usr.verbs+=(/Uchiha/verb/L)
            if(usr.Level==30&&usr.Uchiha)
                usr<<"congratz you have learned Sharingan 2! PRESS K TO ACTIVATE IT!"
                usr.verbs+=(/Uchiha/verb/K)
            if(usr.Level==40&&usr.Uchiha)
                usr<<"congratz you have learned Katon Fire Ball! PRESS J TO ACTIVATE IT!"
                usr.verbs+=(/mob/Uchiha/verb/J)
            if(usr.Level==40&&usr.Uchiha)
                usr<<"congratz you have learned Katon Direct Fire Ball!PRESS K TO ACTIVATE IT!"
                usr.verbs+=(/mob/Uchiha/verb/H)