EscapeWarrens (script)

EscapeWarrens (script)
Category	travel
Front-end	StormFront
Author	Deke

This script will get you out of the Under Shard warrens area depositing you on the ring road outside the traders guild.

Storm Front front end required, will NOT work with Wizard.

This is the link to the map of this area...

RanikMap67b

The section this will extricate you from is labeled "The Warrens"

SetVariable DIR2GO n
GoTo WARRENSWANDER

WARRENSWANDERW:
Pause
WARRENSWANDER:
SetVariable RETREATRETURN WARRENSWANDER
Match USME a stone ramp
Match USME dark-furred rats crawl in and out of the holes upon the wall
Match USME perpetual howl of loneliness
Match USME A yawning chasm splits this great stone cavern in two
Match USMS searching for this instant source of wealth
Match USMNE their shells covered in phosphorescent spores
Match USME rat claws upon stone fills this nexus of the twisting stone passageways
Match USMSW Like filaments of an intricate spiderweb
Match USMW under the rubble, not all did
Match USMSW run from some unnamed terror
Match USMN One of the walls to the east has collapsed
Match USMW leads up to a large opening in the ceiling of the cavern
Match USMNE glow seen at sunset on a clear day
Match USMNW water leaking through a crack in the ceiling
Match USMS to prevent the roof from collapsing
Match USMS stagnant puddle on the packed-earth floor
Match USMSW this evidence of stone's power
Match USMS vaguely resembling a humanoid shape
Match USMW diseased flesh and rotting bodies
Match USMS haphazardly, as if in desperation
Match USMS barely visible as maws of darkness against the crumbling stone walls
Match USMS old storage chamber
Match USMNW A coppery, carrion stench fills the tunnel
Match USMN strange geometric symbol
Match USMSW the apparent remains of a campfire
Match USMUP sticky brown wetness across one wall
Match USMW a barrel of snakes.
Match USMW bricks that barely support the low earthen roof
Match USMNW end in cave-ins and brick walls
Match USMW Heavy bootsteps mar the soft dirt
Match WARRENSWANDERW ...wait
Match RETREAT engaged
put %DIR2GO
MatchWait

USME:
SetVariable DIR2GO e
GoTo WARRENSWANDER

USMS:
SetVariable DIR2GO s
GoTo WARRENSWANDER

USMNE:
SetVariable DIR2GO ne
GoTo WARRENSWANDER

USMSW:
SetVariable DIR2GO sw
GoTo WARRENSWANDER

USMW:
SetVariable DIR2GO w
GoTo WARRENSWANDER

USMN:
SetVariable DIR2GO nw
GoTo WARRENSWANDER

USMNW:
SetVariable DIR2GO nw
GoTo WARRENSWANDER

USMUP:
Pause
move up
move ne
move nw
move go open
move sw
move u
move u
ECHO *** You are out of the warrens of UnderShard ***
Exit

#*************************************
# START Retreat & Stand section
#*************************************

# Usage example;
#AIMRETREAT:
#SetVariable RETREATRETURN AIM
#GoTo RETREAT

RETREATW:
Pause
RETREAT:
#ECHO >>>> RETREAT: Return = %RETREATRETURN <<<<
Match RETSTAND must stand first
Matchre RETREAT /to pole range|You stop advancing|pole weapon range on you|melee range on you/i
Matchre RETLOOK /are unable to get away|You try to back away/i
Match EXIT You are still stunned
Matchre %RETREATRETURN% /You retreat from combat|as far away as you can get|You sneak back out of combat/i
Match RETREATW ...wait
put retreat
MatchWait

RETLOOKW:
Pause
RETLOOK:
Matchre EXIT /You're very beat up|You're beat up|You're badly hurt|You're smashed|You're terribly wounded/i
Matchre RETREAT /\.\]|range on you/i
Match RETLOOKW ...wait
MatchWait

RETSTAND:
SetVariable STANDRETURN RETREAT
GoTo STAND

STANDW:
Pause
STAND:
Matchre %STANDRETURN /You stand back up|You are already standing/i
Matchre EXIT /You're very beat up|You're beat up|You're badly hurt|You're smashed|You're terribly wounded|dead/i
Matchre STANDW /prevents you from standing|cannot manage to stand/i
Match STANDW ...wait
put Stand
MatchWait

EXIT:
put avoid drag
Match END You will need to login again to continue playing
Match EXIT ...wait
put exit
MatchWait

END:
Exit

#*************************************
# END  Retreat & Stand section
#*************************************