#include "path.h"
#include <mail.h>
inherit "/std/room/basic_room";
int do_mail( string words );
private nosave object _dictionary;
void setup() {
add_help_file("mail_room");
set_short("Post Office");
set_light(70);
set_long(
"Black and orange colours seem to dominate the room, you can see a counter "
"or something in amongst all the clashing colours.\n");
add_item("counter", ({ "long",
"There are some envelopes and bits of paper strewn "
"about on the counter.",
"position", "the counter" }));
add_exit("southeast", CRUMPT + "crumpt2", "door");
add_exit("north", CRUMPT + "parcel_post", "corridor");
add_property("place", "Pumpkin");
} /* setup() */
void reset() {
if ( !_dictionary ) {
_dictionary = clone_object( "/net/obj/dict" );
_dictionary->add_property( "there", "attached to the counter" );
_dictionary->reset_get();
_dictionary->move( this_object() );
}
} /* reset() */
void init() {
::init();
add_command("mail", "<string>", (: do_mail($4[0]) :));
add_command("mail", "", (: do_mail(0) :));
} /* init() */
int do_mail( string words ) {
return (int)MAIL_TRACK->mail( words );
} /* do_mail() */
int send_message( string from, int parcel ) {
#if 0
object thing;
thing = clone_object( CHARS +"post_et" );
thing->set_home( file_name( this_object() ) );
thing->move( this_object(), "$N pop$s out of the counter and grab$s the mail." );
if ( find_player( recipient ) ) {
thing->goto_player( recipient, from );
} else {
thing->goto_dest( COMM_ROOM, from );
}
return 1;
#endif
} /* send_message() */
