/* /cmds/creator/trans.c * from the Foundation II LPC Library * moves a player to your location * created by Descartes of Borg 950425 */ #include <lib.h> inherit LIB_DAEMON; mixed cmd(string args) { object ob; if( !args || args == "" ) return "Trans whom?"; if( !(ob = find_player(convert_name(args))) && !(ob = find_living(args)) ) return "No such being exists anywhere presently."; if( environment(ob) == environment(this_player()) ) return (string)ob->GetCapName() + " is right here."; if(archp(ob) && !archp(this_player())){ write("You can't trans an admin."); tell_player(ob, this_player()->GetName()+" just tried to trans you."); return 1; } ob->SetProperty("ReturnSite",base_name(environment(ob))); message("system", "You have been summoned by " + (string)this_player()->GetName() + ".", ob); if( !((int)ob->eventMoveLiving(environment(this_player()))) ) return "Failed to move " + (string)ob->GetCapName() + "."; else message("system", "You trans " + (string)ob->GetCapName() + " to you.", this_player()); return 1; } void help() { message("help", "Syntax: <trans [living]>\n\n" "Brings a living thing to your location.\n\n" "See also: return, goto, move, expel", this_player()); }