/* /secure/cmds/creator/about.c * Based on Descartes' <more> * Created by Magnafix 9-8-96 */ #include <lib.h> #include <message_class.h> #include "include/more.h" inherit LIB_DAEMON; mixed cmd(string str) { object thing; string name, tmp; if( !str || str == "" ) return "Syntax: <about OBJECT>"; if(!present(str, this_player()) && str != "here" && !present(str, environment(this_player()))) return notify_fail("You don't see that.\n"); if(str == "here") thing = environment(this_player()); else thing = present( str, this_player()); if(!thing) thing = present(str, environment(this_player())); if(thing->GetDoor()) thing = load_object(thing->GetDoor()); if(!thing) return notify_fail("Uh oh, error.\n"); if(interactive(thing)){ message( "info","Players do not have files with LPC code. " "Player save files are not subject to examination with this command.", this_player()); return 1; } name = base_name(thing) + ".c"; message( "info", name + "\n", this_player() ); return (mixed)this_player()->eventPage(name, MSG_SYSTEM | MSG_NOCOLOUR); } string GetHelp(string str) { return ("Syntax: <about OBJECT>\n\n" "Pages through the file referenced by the file name of " "the object that you name. OBJECT can either be in " "your inventory or in the room.\nWhile inside the pager, you " "have access to the following commands:\n" + (string)LIB_PAGER->GetHelp("pager") + "\n\n" "See also: cat, ed, head, tail"); }