#include "path.h" inherit "/std/outside"; int found; object chain; object sword; void setup() { add_property("no_undead",1); set_light(LIGHT); set_short("Island of Maroek: Forest\n"); set_long("Island of Maroek: Forest Path\n\n" "You have arrived in a dark corner of the forst. There is a large rock on one " "side of this small clearing that you swear looks like a large bed. Dead leaves carpet the " "entire forest floor crunch underfoot. " "\n\n"); add_item("canopy","The canopy is made of the immense trees' leaves and nearly cuts " "off all the light from above.\n"); add_item("trees","The trees of this area seem to be darker and more menacing than " "anywhere else in the forest.\n"); add_item("rock","You could almost swear this rock looked like a large, but hard, bed.\n"); add_exit("southeast",ROOMS+"half19","path"); } void reset() { found = 0; } void dest_me() { ::dest_me(); } int do_search(string str) { if(! found) { write("You search around the rock, as Mari suggested, and discover a leather satchel. " "inside you find an old Halfling Bastard sword and a Halfling Chainmail. \n"); say(this_player()->query_cap_name()+" scrounges around through the leaves\n",this_player()); found = 1; chain = new(ARMOUR+"chainmail.c"); chain->set_short("Halfling Chainmail"); chain->set_long("This Chainmail is just like any other chainmail, except that it " "has been taken in on the sides and along the bottom to fit a halfling a little " "better. No pun intended.\n"); chain->move(this_object()); sword = new(WEAPONS+"bastard_sword.c"); sword->set_short("halfling bastard sword"); sword->set_long("This weapon, normally too cumbersome for some humans, has been " "shortened some to fit the needs and strength of a Halfling. \n"); sword->move(this_object()); } else { write("You scrounge around in the leaves, but don't see anything.\n"); } return 1; }