// /bin/user/_reply.c
// from the Nightmare mudlib
// replies to the person who previously told to you
// created by Descartes of Borg 06 february 1993
#include <lib.h>
#include <talk_type.h>
#include <daemons.h>
inherit LIB_DAEMON;
int cmd(string str) {
string reply,a,b,msg,machine_message,frm;
object ob, machine;
mixed err;
reply = (string)this_player()->GetProperty("reply");
if(!reply) reply = "no one";
if(!str) {
notify_fail("Current reply addressee: "+capitalize(reply)+"\n");
return 0;
}
if(reply == "no one") {
notify_fail("No current reply addressee.\n");
return 0;
}
ob = find_living(reply);
if(!ob && (sscanf(reply, "%s@%s", a, b) != 2)) {
notify_fail(capitalize(reply)+" is not currently in our reality.\n");
return 0;
}
if(sscanf(reply, "%s@%s", a, b) == 2) {
a = lower_case(a);
SERVICES_D->eventSendTell(a, b, str);
return 1;
}
if( (err = (mixed)this_player()->CanSpeak(ob, "reply", str)) != 1 )
return err;
machine=present("cratylus' answering machine",ob);
if(machine){
int parse_it;
parse_it=machine->query_answer();
frm=(string)this_player()->GetName();
if(parse_it){
machine->get_message(frm+" tells you: "+msg+".\n");
machine_message=machine->send_message();
message("info",machine_message,this_player());
return 1;
}
}
this_player()->eventSpeak(ob, TALK_PRIVATE, str);
ob->SetProperty("reply", this_player()->GetKeyName());
return 1;
}
void help() {
message("help",
"Syntax: <reply [(message)]>\n\n"
"With a message, it replies to the person who last told or replied "
"to you. Without a message, it shows who the current object of "
"your reply would be.\n\nSee also: "
"finger, idle, muds, say, shout, tell, yell", this_player()
);
}
