#include <lib.h>

inherit LIB_DAEMON;

mixed cmd(string args) {
    object ob, room, where;
    string last_loc, name;
    int result;

    if( !args || args == "" ){ 
        ob = this_player();
        name = "You";
    }
    else {
        if( !(ob = find_player(convert_name(args))) && !(ob = find_living(args)) )
            return "No such being exists anywhere presently.";
        name = "They";
    }
    if(!last_loc = ob->GetProperty("LastLocation")){
        write(name+" have nowhere to return to.");
        return 1;
    }

    if(grepp(last_loc,"#")) where = find_object(last_loc);
    else where = load_object(last_loc);

    if(!where){
        write("There is a problem with that location.");
        write(name+" remain where "+lower_case(name)+" are.");
        return 1;
    }

    if(environment(ob) == where){
        write(name+" are already there.");
        return 1;
    }

    else result = ob->eventMoveLiving(where);

    if(ob != this_player()){
        if(result){
            message("system", "You have been returned to your previous location by " +
                    (string)this_player()->GetName() + ".", ob);
            message("system", "You return " + (string)ob->GetCapName() +
                    " to their previous location.", this_player());
        }
        else {
            return "Failed to move " + (string)ob->GetCapName() + ".";
        }
    }
    return 1;
}

void help() {
    message("help", "Syntax: <return [living]>\n\n"
            "Sends someone back, after a trans.\n"
            "With no arguments, sends you to your last location.\n\n"
            "See also: goto", this_player());
}