// The goblin Newbie Area // Made by Tek and Allonon May 1995 #include "path.h" inherit "/std/room"; object *npc; void setup() { // Descriptions... set_light(20); set_zone("newbie_tunnel"); set_short("Realm of the Goblin: Temple Ruins"); set_long("\nRealm of the Goblin: Temple Ruins\n\n" " You have entered the ruins of the temple of Nargar." " These ruins are full of trash and junk. It appears " "that someone is using these ruins for a home." " There is a pile of blankets here that seems to be used for a bed, " "and several stone blocks that once were used as bases " "for statues honoring the goblin gods of old." " The statues have long since crumbled to dust. " "You seem to sense another prescence. To the south you hear the gentle " "lapping of water.\n\n"); add_property("no_undead",1); add_item(({"roof"}), "There is water dripping fom the stone above your head as you look up" " some dirty water falls into your eyes blinding you for a moment.\n"); add_item(({"floor"}), "The floor is compleatly smooth stone except for the occasional" " pile of goblin excrement.\n"); add_item(({"blocks", "stone", "stones"}), "Theses large blocks come almost up to your chin. You can only " "wonder about what the statues looked like that once stood here.\n"); add_item(({"bed", "blankets"}), "This is a pile of blankets that appears to be used for a bed. It smells of urine.\n"); add_item(({"trash", "ruins", "junk"}), "There seems to be no end to the amount of junk located in here." " After digging around looking at pieces of rags and stone" ", you fail to find a single useful item. This definitely is" " trash even by goblin standards.\n"); add_item(({"wall", "rock"}), "The walls here are dark and damp. They are covered " "with moss and fungus. Some places there are " "bodily wastes smeared up on the walls. The " "sight of it is disgusting.\n"); add_item(({"moss", "fungus"}), "The moss and fungus probably grow here " "because the walls are so damp and wet.\n"); // Items... add_exit("south",ROOM+"ngob35.c","path"); npc= allocate(1); // Exits... } /* setup() */ void reset() { int i; for(i = 0; i < sizeof(npc); i++) { if(!npc[i]) { npc[i]=clone_object("/d/newbie/goblin/npcs/bentneck.c"); npc[i]->move(this_object()); } } } void dest_me() { int i; for(i = 0; i < sizeof(npc); i++) { if( npc[i] ) npc[i]->dest_me(); } ::dest_me(); }