/*    /cmds/creator/message.c
 *    from the Foundation II LPC Library
 *    allows a person to modify their default messages
 *    created by Descartes of Borg 950428
 */

#include <lib.h>

inherit LIB_DAEMON;

mixed cmd(string args) {
    string type, msg;

    if( !args || args == "" ) {
	mapping msgs;
	string *cles;
	int i;
	string tmp = "";

	i = sizeof(cles = keys(msgs = (mapping)this_player()->GetMessages()));
	while(i--) tmp += sprintf("%:-10s %s\n", cles[i], msgs[cles[i]]);
	message("system", tmp, this_player());
	return 1;
    }
    if( sscanf(args, "%s %s", type, msg) != 2) return "Set it to what?";
    if( !((int)this_player()->SetMessage(type, msg)) )
	return "Invalid message type.";
    message("system", "Message " + type + " changed to:\n" + msg, 
      this_player());
    return 1;
}

void help() {
    message("help", "Syntax: <message [msg type] [message]>\n\n"
      "Allows you to modify standard " + mud_name() + " messages.  "
      "The message types are come, leave, telin, telout, home, "
      "clone, dest, login, logout, say, ask, exclaim.  Not that "
      "with say, ask, and exclaim you only may enter in the verbs.  "
      "Depending on the message class, you may place such placeholders "
      "as:\n$M\t" + mud_name() + "\n$N\tYour name\n$D\tdirection\n"
      "$O\tobject",
      this_player());
}