void create() 
{
	::create();
		set_name("desert");
		set_short("The MuaBark desert");
		set_long("The MuaBark Desert stretches off in all directions. Large sand dunes make it impossible to see very far in any direction. A powerful wind kicks sand into the air, making it difficult to breath.");
		
		set_properties(([
			"light"		: 3,
			"night light"	: 1,
			"dessert"     	: 1
		]));
		
		set_listen("default", "The deafening sound of the powerful desert winds drowns out all other sounds");
		set_exits(([
			"northwest"			: ROOMS "muabark001.c",
			"southeast"			: ROOMS "muabark021.c",
			"east"				: ROOMS "muabark019.c",
			
			
		]));
}

void create_object(void)
{
    set_short("A dimly lit room");
    set_long("A small, dimly lit room. A large mural adorns the west wall, " +
             "and a large wooden desk stands by the east wall. A big wooden " +
             "chair with a dark blue cushion stands in front of the desk. " +
             "By the south wall stands a large bed covered with a black " +
             "sheet. The only light in the room comes from a flickering " +
             "candle on the desk.\n");
    set_new_light(5);
    set_skip_obvious(1);
    add_property("indoors");
    
    add_item("room","A room that looks as if it serves as living quarters " +
             "for a person of some rank");
    add_item("mural","A large mural depicting a huge black dragon in flight");
    add_item("dragon","A huge, black dragon flying over a forested valley " +
             "under a starlit sky. For a moment you thought you saw it's " +
             "eyes glow faintly");
    add_item("eyes|eye|glow","Nah, it couldn't have been..");
    add_item("valley","A beautiful valley. A river flows through it, and " +
             "there is a village and a castle there. It looks familiar " +
             "somehow..");
    add_item("river","It flows from the north to the south");
    add_item("village","A small, peaceful village");
    add_item("castle","A dark, eerie castle");
    add_item("sky","It is filled with stars");
    add_item("star|stars|dot|dots","Small, white dots on the mural");
    add_item("wall|walls","Smooth, black stone");
    add_item("desk","A heavy oak desk");
    add_item("chair","An oak chair with a dark blue cushion in it");
    add_item("cushion","A soft, dark blue cushion");
    add_item("bed","A heavy oak bed, neatly made");
    add_item("sheet","A black velvet sheet");
    add_item("candle","A flickering wax candle");

    load_doors();
    reset(0);
}

void create() {
  ::create();
  set_properties( ([
    "light" : 2, "night light" : 0, "indoors" : 0, "mountain" : 1,
  ]) );
  set_short("a mountain");
  set_long(
    "The large chasm to the west looms dangerously close, but a stone "
    "walkway has been erected which leads over it and out to a plateau. "
    "The walkway is curved, resembling an inversed archway. It seems "
    "to be secured rather well to the mountainside. Northwards, the path "
    "opens up a bit into a wider space. Mountain peaks rise high above in "
    "all directions, but the plateau is higher than any of them."
  );
  set_items( ([
    "chasm" : "A wide, deep drop into nothingness.",
   ({ "walkway", "archway" }) : "This stone marvel leads steeply up towards "
     "the top of the plateau.",
   "peaks" : "They rise up against the sky.",
   "plateau" : "It is the highest point visible. The walkway rises quickly "
     "up towards the top of it, which can't be seen from here.",
  ]) );

void setup(void) {
   add_area("Gurba");
   add_area("GurbaSquare");
   add_area("GurbaOutdoor");

   set_short("Gurba Town Square - East");
   set_long("Here on the eastern side of the town square, a large " +
      "crowd of merchants are trying to convince people to buy their " +
      "wares. The resulting bedlam is fantastically loud and utterly " +
      "disorganized. The bricks here are well-worn from the constant " +
      "traffic. Gelmir Road leads off towards the east from here.");

   set_exits(([
      "north" : DIR + "/rooms/square_northeast",
      "south" : DIR + "/rooms/square_southeast",
      "west" : DIR + "/rooms/square_center",
      "east" : DIR + "/rooms/gelmir1",
   ]));

   add_item("merchants", "These fine gentlemen and ladies work " +
      "tirelessly to promote the sales of their respective goods.");
}

void extra_create()
{
  set_short( "Royal Guard's barracks in the Bastion" );
  set_long(wrap("You have come to a heavily fortified barracks. The way "+
  "north leads to a strongly reinforced door, and is obstructed by a number "+
  "of defensive mechanisms such as crossbow traps pointed at the south "+
  "entrance. There are some wooden beds along the walls; each of them has "+
  "a sword scabbard bolted right to the bed, providing easy access to "+
  "whatever weapons might once have been stored there. There is evidence that "+
  "this room has seem some fierce combat in ages past; ancient bloodstains "+
  "have never been cleaned off the stones, and there are numerous dents and "+
  "scratches along the floor and walls that look to have been made by "+
  "weaponry of various sorts.\n"));
  add_monster("/u/a/allanon/area/ity/mon/baresias.c");
  set_item_desc(([
  ({"defensive mechanisms", "crossbow traps", "traps"}) : "There are a "+
  "variety of devices in this room meant to hinder or stop progress to "+
  "the north. Some of them are crossbow traps, although the quarrels have "+
  "long since rotted away. Others are odd, tubular canisters with dragon's "+
  "heads on the ends. These have soot on the inside, but you are not sure "+
  "what they were used for. In any case, they have rusted badly and are "+
  "no longer functional.\n",

void setup() {
   object obj, obj2;

   set_name("octopus");
   add_adj("giant");
   set_short("An octopus");
   set_long("A very big octopus with long arms, reaching for you.");

   set_level(10);
   set_hit_skill("combat/unarmed");
   set_skill("combat/unarmed", 50);
   set_skill("combat/defense", 100);

   obj = clone_object(DIR + "/obj/chest.c");
   obj->move(this_object());
   obj->setup();

   obj2 = clone_object("/domains/required/objects/coin.c");
   obj2->set_amount(random(500) + 1);
   obj2->move(obj);
   obj2->setup();
}

void extra_create()
{
    set_name( "the ghost of Rifrad" );
    add_alias( "rifrad" );
    add_alias( "ghost" );
    add_alias( "doctor" );
    add_alias( "ghost of rifrad" );
    
    set_short( "the ghost of Rifrad" );
    set_ansi_short( sprintf( "%sthe ghost of Rifrad", HIK ) );
    
    set_long( "Where there was once a being, there is now a fluctuating "
      "darkness. A cold ghastly presence. All that remains of Rifrad "
      "is his incorporal form." );   
    
    set_gender( "male" );
    set_alignment( NEUTRAL_AL );
    
    set_stat( "str" , 200 );
    set_stat( "con" , 200 );
    set_stat( "wil" , 500 );
    set_stat( "dex" , 200 );
    
    set_proficiency( "hands", 75 );
    set_skill( "dodge", 65 );
    
    set_type( "psychic" );
    
    set( NoStunP, 1 );
    set( UndeadP, 1 );
    
    set_aggressive( 1 );
    
    set_natural_ac( 3 );
    
    call_out( "hello", 1 );
    
    add_special_attack( "soulwell", THISO, 8 );
}    

void create() {
    ::create();
    set_short("The Killy beach");
    set_long("The isle is a rather large one, unusual for "
      "this part of the sea.  Thick forestation covers "
      "most of the island, preventing anyone from "
      "crossing the island any further than the beach.");
    set_exits(([
      ]));
    set_max_catch(20);
    set_max_fishing(2);
    set_chance(75);
    set_fish(([
	"rainbow fish":10,
	"trout":15,
	"gold fish":5,
	"pirch":5,
	"stingray": 10,
	"lamprey":15
      ]));
    set_letter("m");
}

void create()
{
    ::create();
        set_name("sandy beach");
        set_short("Sandy Beach");
        set_long("Many small waves slide up onto the beach here, leaving various sea plants behind as the water falls back into the sea. Each plant looks different, there must be a large coral reef to the north. The sands of the beach are made up of a very fine and white sand, it feels very soft to the touch. A large cliff stands to the southeast, it rises high into the air.");  
        set_properties( ([
        "light"       : 2,
        "night light" : 2,]) );
        set_items(([
    	"beach"    :  "The beach is composed of an endless amount of white sand.",
    	"sea"    :  "The endless sea sparkles.",
    	"cliff"    : "A very tall sheer cliff, it looks like it is impossible to scale.",
	    ]));
	    set_listen("default", "The sounds of waves fill the air.");
	    set_smell("default", "The smell of sea salt is everywhere.");
	    set_exits(([
			"east"	    : ROOMS "beach09.c",
			"south"     : ROOMS "beach07.c",

        ]));
}

void setup(void) {
   object obj;

   set_name("slim");
   set_gender( "male" );
   add_adj("large");
   set_short("Slim shady");
   set_long("This guy is skinny, he is also kind of creepy looking.  He " +
      "reminds you of an anemic scarecrow.");

   set_race("human");
   set_level(1);
   set_hit_skill("combat/unarmed");
   set_skill("combat/unarmed", 50);
   set_skill("combat/defense", 100);
   set_aggressive(0);

   obj = clone_object(DIR + "/obj/10ghat.c");
   obj->setup();
   obj->move(this_object());
   do_wear(obj);
}

void create()
{
    ::create();
        set_name("sandy beach");
        set_short("Sandy Beach");
        set_long("To the south is a large cliff, it reaches high into the air. Small amounts of vegetation grows on the face of the cliff. The beach is made up of very white and fine sand, it stretches far off to the east. Waves bring foam to the beach surface, and other various items from the sea. The sea meets the horizon to the north.");  
        set_properties( ([
        "light"       : 2,
        "night light" : 2,]) );
        set_items(([
    	"beach"    :  "The beach is composed of an endless amount of white sand.",
    	"sea"    :  "The endless sea sparkles.",
    	"cliff"    : "A very tall sheer cliff, it looks like it is impossible to scale.",
	    ]));
	    set_listen("default", "The sounds of waves fill the air.");
	    set_smell("default", "The smell of sea salt is everywhere.");
	    set_exits(([
			"east"	    : ROOMS "beach07.c",
			"west"      : ROOMS "beach05.c",

        ]));
}

void create()
{
    ::create();
    set_short("The Colosseum.");
    set_long("%^RESET%^%^CYAN%^The Tirun Colosseum.%^RESET%^\n"
      "This chamber has a flight of stairs leading down.  The room vibrates with the "
      "noise of cheering and battling.  The fighting area of the Colosseum is below "

      "the ground to take up less space in town and to hide this barbarous past time.\n\n"
      "You can enter the Colosseum to fight by typing <enter>.");
    set_exits( ([ 
        "north" : "/d/nopk/tirun/adv_hall",
        "out"  : "/d/nopk/tirun/square2",
      ]) );
    set_properties( ([ "no attack"   : 1,
        "no magic"    : 1,
        "no bump"     : 1,
        "light"       : 2,
        "night light" : 2,
        "indoors"     : 1,
        "no steal"    : 1 ]) );
    arena = ({});

void create_object(void)
{
    set_short("The second floor of the third gate tower");
    set_long("The second floor of the third gate tower. There are several " +
             "holes and wooden hatches on the floor, and large iron " +
             "cauldrons hang over the hatches in chains from the ceiling. " +
             "There are thin arrowslits in the west and south walls, and " +
             "archways to the east and the northwest.\n");
    set_new_light(5);
    add_property("indoors");

    add_item("room","A room on the second floor of the tower");
    add_item("floor","A smooth, black stone floor with holes and wooden " +
             "hatches on it");
    add_item("hatch|hatches","The hatches cover shafts going down to the " +
             "tunnel below");
    add_item("hole|holes","Probably for firing arrows through, if an " +
             "attacking force would manage to come all the way down there");
    add_item("shafts|shaft","Probably used for pouring molten lead and " +
             "other nasty things down upon attackers in the tunnel below " +
             "through");
    add_item("cauldron|cauldrons","The big iron cauldrons are probably " +
             "being used for melting and keeping lead, that would be " +
             "poured down upon an attacking force in the tunnel below in");
    add_item("chain|chains","Strong iron chains holding up the cauldrons");
    add_item("ceilong|wall|walls","Smooth, black stone");
    add_item("arrowslits|arrowslit","Through the arrowslits in the west " +
             "wall you see the inner courtayard, and through those in the " +
             "south wall you see the outer courtyard");
    add_item("courtyard","You would have to go down there to get a good look");
    add_item("archway|archways","Two of them. One going east, the other " +
             "going northwest");

    add_exit(ROOM + "lev2_wall2","east");
    add_exit(ROOM + "lev2_guardroom2","northwest");

    reset(0);
}

void create_object(void)
{
    set_short("Outside an old building");
    set_long("The road through the forest ends here in front of an old " +
           "building. The trees stand close to the road and their branches " +
           "reach out over it, leaving it in shadow. Nothing can " +
           "be heard in the dark forest around you. The building in front " +
           "of you is in a state of decay, but not yet a ruin. It appears " +
           "to have been used as a shrine once, but now it lays deserted. " +
           "An archway leads inside.\n");
    set_new_light(3);

    add_item("road","The road ends here in front an old building");
    add_item("forest","The forest is dark and silent. You would surely get " +
             "lost should you enter it");
    add_item("building","The building is the decaying remains of an old " +
             "shrine");
    add_item("remains","The building is deteriorating, but it is not " +
             "really a ruin quite yet");
    add_item("tree|trees","Majestic old oak trees");
    add_item("branch|branches","The branches of the trees reach out over " +
             "the road, leaving it in shadow. They are very close and you " +
             "could probably reach one of them");
    add_item("shadow","Long shadows created by the branches hanging out " +
             "over the road");
    add_item("ruin","The building has not yet deteriorated enough to be " +
             "called a ruin");
    add_item("shrine","The building looks as if it was once used as a " +
             "shrine. On the roof above the entrance is a symbol");
    add_item("symbol","The symbol of The Church of True Faith");
    add_item("archway","The archway is decorated with figures and symbols");
    add_item("figure|figures","Figures depicting the struggle between good " +
             "and evil");
    add_item("symbols","Symbols of The Church of True Faith");

    add_exit(ROOM + "north_road11","west");
    add_exit(ROOM + "shrine_entrance","east");
}

void setup(void) {
   add_area(AREA);
   add_area(FAIRYLAND_AREA);
   set_short("By Great Lake");
   set_long("You are standing by Great Lake. You can hear the gulls crying. " +
      "If you go east, you will end up in a clump of reeds.");

   add_exit("east", FAIRYLAND_ROOMS + "/reeds.c");
   add_exit("west", FAIRYLAND_ROOMS + "/lake_road.c");

   add_item("water", "Great Lake, the lake where Smaug is said to drink.");
   add_item("cold water", "Great Lake, the lake where Smaug is said to drink.");
   add_item("lake", "Great Lake, the lake where Smaug is said to drink.");
   add_item("Great Lake", "Great Lake, where Smaug is said to drink.");
   add_item("great lake", "Great Lake, where Smaug is said to drink.");
   add_item("reeds", "You think you see something behind the reeds.");
   add_item("clump of reeds", "You think you see something behind the clump of reeds.");
   add_item("gulls", "They flit off in the distance, echoes of their cries in the air.");

   add_action("listen_cmd", "listen");

   add_block("east");
}