/* -*- LPC -*- */ /* * $Locker: $ * $Id: wiz_info_comm.c,v 1.2 1998/04/13 14:36:08 pinkfish Exp $ * $Log: wiz_info_comm.c,v $ * Revision 1.2 1998/04/13 14:36:08 pinkfish * Added documentation. * * Revision 1.1 1998/01/06 04:54:05 ceres * Initial revision * */ /** * This file contains all the information related creator commands. * @author Ember */ #define PEOPLER "/obj/handlers/peopler" protected int do_gauge(string str); int add_command(string name, object ob, string format, function func); /** @ignore yes */ protected void wiz_commands() { add_command("gauge", this_object(), "<string>", (: do_gauge($4[0]) :)); if(clonep()) call_out("driver_version", 20); } /* wiz_commands() */ /* small addition by a retired creator aka wonda */ /** * This method is called slighty after the login time. It checks * to see if the driver version has changed and pooints to the * change log for more information. */ int driver_version(){ string old = this_object()->query_property("driver_version"); if(!old) { return this_object()->add_property("driver_version", __VERSION__); } if(old != __VERSION__){ this_object()->add_property("driver_version", __VERSION__); write("%^RED%^The driver has been changed to version " + __VERSION__ + ", see /doc/driver/Changes for more information.%^RESET%^\n"); } return 1; } /* driver_version() */ /** @ignore yes */ int review() { PEOPLER->review(); return 1; } /* review() */ /** * This method returns the number of evaluation cycles the * particular command took to run. It is kind of useful for * figuring out how much time a given command takes * to execute * @param str the command to execute * @return 1 on success, 0 on failure */ protected int do_gauge(string str) { int eval_cost; if (this_player(1) != this_object()) return 0; if(!str) { notify_fail("Usage : gauge command.\n"); return 0; } eval_cost = command(str); write("\nThe command '" + str + "' took: " + eval_cost + " CPU cycles.\n"); return 1; } /* do_gauge() */