/** * Returns the person you've transed to their previous location. * @author Windy, Feb '01 * @changed Changed to use wiz-present and work with multiple targets. * - Sandoz, Nov. 2002. */ #include <creator.h> inherit COMMAND_BASE; /** @ignore yes */ int cmd( object *obs ) { object ob; int ret; foreach( ob in obs ) { string *tmp; if( !sizeof( tmp = ob->query_property("last_trans") ) ) { add_failed_mess( WIZ_PRESENT->desc_object(ob)+" has not been " "transed recently.\n"); continue; } if( file_name( ENV(ob) ) == tmp[1] ) { add_failed_mess( WIZ_PRESENT->desc_object(ob)+" is already at "+ ob->HIS+" return location.\n"); continue; } ret = 1; ob->add_property("last_trans", ({ TP->query_name(), ( ENV(ob) ? file_name( ENV(ob) ) : "nullspace") }), 3600 ); tell_object( ob, "You are magically returned to where you came " "from.\n"); ob->move_with_look( tmp[1], ob->query_mmsgin(), ob->query_mmsgout() ); write( WIZ_PRESENT->desc_object(ob)+" has been returned.\n"); } return ret; } /* cmd() */ /** @ignore yes */ mixed query_patterns() { return ({"<indirect:wiz-present>", (: cmd($1) :) }); }