// The goblin Newbie Area
// Made by Tek and Allonon May 1995
#include "path.h";
inherit "/std/room";
void setup() {
// Descriptions...
set_short("Realm of the Goblin: Gloomy Tunnels");
set_light(20);
set_zone("newbie_tunnels");
set_long("\nRealm of the Goblin: Gloomy Tunnels\n\n"
" The tunnel ends here in this open cavern. Its not a very "
"large cavern, being only about twenty feet by twenty-five feet. "
"There is garbage and kegs laying around all over the place. "
"It looks like someone had a party here. The only exit is to "
"the southwest back the way you came.\n\n");
add_property("no_undead",1);
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");
add_item(({"ground","floor"}),"The ground is covered in garbage and beer kegs. "
"\n\n");
add_item(({"keg","kegs","beer kegs"}),"These kegs are empty, not "
"even a drop of beer left, unfortunatly.\n");
add_item("garbage","This is mostly useless stuff covered in puke and "
"excretment. You see something shiny in the garbage.\n");
// Items....
add_exit("southwest", ROOM"ngob27.c","path");
// Exits....
} /*setup() */
void init() {
add_action("do_search","search");
::init();
}
int do_search(string str) {
if(!str)
{
write("\nYou search around but don't find anything interesting\n");
return 1;
}
else
if(str=="garbage") {
if(this_player()->query_property("GOBLIN_SWORD"))
{
write("You search the garbage completely and find nothing.\n");
return 1;
}
else
{
write("You have found a sword, it appears to have some "
"writing on it.\n");
new(WEAPON+"ques_sword.c")->move(this_object());
this_player()->add_property("GOBLIN_SWORD",1);
return 1;
}
}
}