#include "undef.h"
#include "special.h"




Zone		= ledge
Author		= "Unknown"
Quest		= Orb

EndZone		= ledge


Object      = RopeBotPit
Name	= "rope"
Altname	= "ladder"
Location	= IN_ROOM:pit@ledge
OFlags		= Destroyed, NoGet
Linked    = RopeTopPit@moor
MaxState  = 2
Desc0   = "A rope ladder leads up out of the pit."
Desc1   = "A rope leads up out of the pit."
Desc2   = "A knotted rope leads up out of the pit."
Trap		= all
@
catch_untie
{  int ob;
   ob = clone_object(OBJ_LIMBO_ROPE, -1, NULL);
   if(ob >= 0) 
   {
      bprintf("You untie the rope.\n");
      setobjstate(OBJ_LEDGE_ROPEBOTPIT, 1);
      osetbit(OBJ_LEDGE_ROPEBOTPIT, OFL_DESTROYED);
      osetbit(OBJ_MOOR_ROPETOPPIT, OFL_DESTROYED);
      setexit(LOC_MOOR_PIT, 5, 0);
      setexit(LOC_LEDGE_PIT, 4, 0);
      send_msg(ploc(mynum), MODE_NSFLAG|MS(SFL_BLIND), LVL_MIN,
	       LVL_MAX, mynum, NOBODY,
	       "\001p%s\003 unties the rope.\n", pname(mynum));
      setoloc(ob, ploc(mynum), IN_ROOM);
      do_not_continue;
      return;
   }
}
@
EndTrap
EndObject       = RopeBotPit

Object      = RopeWest
Name	= "rope"
Altname	= "ladder"
Location	= IN_ROOM:On@ledge
OFlags		= Destroyed, NoGet
Linked    = RopeEast@Valley
MaxState  = 2
Desc0   = "A rope ladder leads west across to the steps."
Desc1   = "A rope hangs west across to the steps."
Desc2   = "A knotted rope hangs west across to the steps."
UseTrap		= all:ropeeast@valley
EndObject       = RopeWest

Object      = tunnWest
Name	= "tunnel"
Altname	= "rockfall"
Location	= IN_ROOM:tunnel@ledge
OFlags		= NoGet
Linked    = tunnEast
State     = 1
MaxState  = 1
Desc1   = "A large rockfall blocks the passage to the east."
Trap		= all
@
catch_dig
{
  if (state (OBJ_LEDGE_TUNNEAST) == 1)
  {
      bprintf ("You dig your way through the rockfall, and soon clear "
	       "the passage.\n");
      setobjstate (OBJ_LEDGE_TUNNEAST, 0);
      fail(-1);
  }
}
@
EndTrap
EndObject       = tunnWest

Object      = tunnEast
Name	= "tunnel"
Altname	= "rockfall"
Location	= IN_ROOM:forgotten@ledge
OFlags		= NoGet
Linked    = tunnWest
State     = 1
MaxState  = 1
Desc1   = "
A huge rockfall to the west has sealed off the only exit to this chamber."
UseTrap		= all:tunnWest
EndObject       = tunnEast

Object      = orb
Location	= IN_ROOM:forgotten@ledge
BaseValue    = 1000 
Desc0   = "
A huge glittering platinum orb sparkles in the light, sending rainbows of
glittering fire twinkling around you."
Trap		= all
@
   switch (event) {
   case E_ONGET:
     if (param_s.misc == BEFORE_GET)
      set_quest(Q_ORB,param_s.plx);
     break;
   default: break;
   }
@
EndTrap
EndObject       = orb


Location	= "On"
East		= Cavemouth@ledge
LFlags		= Outdoors, Realtime
Title		= "&+WOn The Ledge&*"
Desc		= ^
   You are standing on a narrow ledge high up the side of some steep cliffs.
The ledge continues west beside a narrow cavemouth.  To the east the ledge ends
some twenty feet short of a set of steps, which climb up the cliff side from
the valley below.
^
EndLocation	= "On"

Location	= "Cavemouth"
North		= Cave@ledge
East		= Ledge@ledge
West		= On@ledge
LFlags		= Outdoors, Realtime
Title		= "&+WCavemouth&*"
Desc		= ^
   You are standing on a narrow precipitous ledge.  The ledge runs east-west,
and to the north a narrow cavemouth leads into semi-darkness.  Braving vertigo,
you gaze over the lip of the ledge across the vast expanse of trees far below.
^
EndLocation	= "Cavemouth"

Location	= "Ledge"
East		= Death@ledge
West		= Cavemouth@ledge
LFlags		= Outdoors, Realtime
Title		= "&+WLedge&*"
Desc		= ^
   The ledge narrows here, become only a couple of inches wide as it leads
further eastwards.  To the west the ledge widens out.
^
EndLocation	= "Ledge"

Location	= "Death"
LFlags		= Outdoors, Realtime, Death
Title		= "&+WLedge&*"
Desc		= ^
   Your feet slip on the dangerously thin ledge, and you plunge rapidly
downwards to your death...
^
EndLocation	= "Death"

Location	= "Cave"
North		= Pit@ledge
East		= Tunnel@ledge
South		= Cavemouth@ledge
Title		= "&+WNarrow Cave&*"
Desc		= ^
   You are standing in a long narrow cave.  Dim and pallid light shines in from
the cavemouth to the south, illuminating passageways north and east.
^
EndLocation	= "Cave"

Location	= "Tunnel"
East		= ^TunnWest@ledge
West		= Cave@ledge
Title		= "&+WNarrow Tunnel&*"
Desc		= ^
   You are clambering along a narrow slanted passage.  Rubble and loose stones
rain down around you as you move, suggesting the roof is not very strong. Light
shines along the passage from a junction to the west.
^
EndLocation	= "Tunnel"

Location	= "Forgotten"
West		= ^TunnEast@ledge
Title		= "&+WForgotten Place&*"
Desc		= ^
   You are standing in a dim forgotten place, deep underground.  The rocks
around you seem placid and silent, as if in silent contemplation of some deeper
more ancient power of the earth.
^
EndLocation	= "Forgotten"

Location	= "Pit"
South		= Cave@ledge
LFlags		= Outdoors, Realtime
Title		= "&+WBottom Of Pit&*"
Desc		= ^
   You are standing at the bottom of a huge open pit.  The pit walls are almost
sheer, and well beyond climbing.  A narrow tunnel leads south into shadow.
^
EndLocation	= "Pit"