mud/lib/domains/Praxis/cemetery/grave_yard6.c
2020-09-06 05:43:07 -07:00

53 lines
1.9 KiB
C

inherit "/lib/std/room";
void create() {
::create();
SetProperty("light", 1);
SetShort( "Descartes' grave");
SetLong(
"This is the cold and silent northeast corner of the ancient "
"cemetery. You feel shivers go up your spine as you look at "
"the tortured form of the statue mounted over this grave. "
"There are small heaps of nuts and bolts lying on the grave. "
"You notice a plaque on the statue.");
SetItems(
(["cemetery" : "All about you stretch the silent graves. "
"You feel like you are being watched.",
"grave" : "The grave is covered with small metal nuts and "
"bolts and other metal tributes.",
"nuts" : "The grave is covered with heaps of small pieces of metal.",
"bolts" : "The grave is covered with small bits of metal, "
"including nuts and bolts.",
"statue" : "The statue is of a large cube, made of many "
"metal bits stuck together.",
"writing" : "Here lies the Borg, unit #82664302-tr, "
"unmourned and unnoticed when it ceased to function.",
"plaque" : "The plaque is of silver metal. You might be "
"able to read the engraving on it."]) );
SetSkyDomain("town");
SetExits(
(["northwest" : "/domains/Praxis/cemetery/grave_yard8",
"southwest" : "/domains/Praxis/cemetery/grave_yard2",
"southeast" : "/domains/Praxis/cemetery/grave_yard5"]) );
}
void reset() {
::reset();
if (!present("ghost"))
new("/domains/Praxis/cemetery/mon/ghost6")->move(this_object());
}
void init() {
::init();
add_action("read","read");
}
int read(string str) {
if (str == "plaque") {
write (::GetLong("writing"));
return 1;
}
notify_fail("Read what?\n");
return 0;
}