Progressive Stealing (script)

From Elanthipedia
Revision as of 03:48, 21 December 2009 by Maintenance script (talk | contribs) (Created page with 'ECHO ECHO ECHO ECHO *********************************************** ECHO *** ECHO *** Progressive Stealing ECHO *** By: Kalic & Challeirra ECH...')
(diff) ← Older revision | Latest revision (diff) | Newer revision → (diff)
Jump to navigation Jump to search

ECHO ECHO ECHO ECHO *********************************************** ECHO *** ECHO *** Progressive Stealing ECHO *** By: Kalic & Challeirra ECHO *** ECHO *********************************************** ECHO ECHO IF_3 GOTO VARIABLESEXCEEDED IF_1 GOTO SKIPREMINDER ECHO *** Don't forget you can run this script EASY, HARD, LESS, or MORE! SKIPREMINDER: ECHO ECHO 

   pause 2
          2. #####
          3. VARIABLES FOR USER TO SET #####
          4. #####


  1. What is your name?
   setVariable name Kalic
  1. Are you wearing any large items that can't be stored and are worn,
  2. such as a parry stick, quarterstaff, or lance? If so, input these
  3. here or the script will fail after an arrest due to being unable
  4. to retrieve them from your sack:
   setVariable largeitem1 <item>
   setVariable largeitem2 <item>
  1. Would you like the script to simply DROP all the items you steal,
  2. or STOW them to pawn off as many as possible, and dump the rest in
  3. the thief bin (or a bucket if you're not actually a thief)? Item
  4. protection safeguards are in place to ensure only the items you
  5. steal during the script will be sold/binned.
   setVariable DropOrStow STOW
  1. If stowing items to pawn and bin, which containers will you use
  2. for your pilfered goods? If you only want to use one, set both
  3. variables to the same container. These containers will be checked
  4. at the start for any items that could be mistaken for ones you are
  5. going to be stealing.
   setVariable container1 Pack
   setVariable container2 Haver
  1. If you are an empath or magic user, you can turn on
  2. perceiving health or power perception by replacing STEAL
  3. with PERC or POWER here. Or, if you are a thief, put MARK
  4. to mark items. Switch back to STEAL to toggle these off.
   setVariable markpowperc STEAL
  1. Would you like to steal from clans like Tiger Clan or Steel Claw
  2. Clan and risk getting your hand cut off? The script will do its
  3. best to get you healed and continue where you left off if so.
   setVariable clanoption YES
  1. Do you want the script to automatically exit from the game if you
  2. are dead or get stunned for some reason other than clan justice?
   setVariable flee NO
  1. If you are a thief, enter your guild passwords here.
   setVariable shardpass gibberish
   setVariable riverpass gibberish
          2. #####
          3. INTERNAL SETUP #####
          4. *** DO NOT EDIT *** #####
          5. ##### 


   setVariable startlocation waitandsee
   setVariable itemlocation  
   setVariable DoubleDiff norm
   setVariable DoubleDiff2 null
   setVariable DifficultyA multiply 1
   setVariable DifficultyB multiply 1
   setVariable MRS shopcheck1
   setVariable LorM leave
   setVariable npcoption yes
   setVariable update 1.20
   setVariable stealsettings (none)
   if_1 setVariable stealsettings %0
   setVariable norepeat first
   GOTO %stealinghelp

   NOTFIRSTRUN:
   if_1 GOTO %1
   GOTO SETTINGSREPORT


          2. #####
          3. SETTINGS REPORT #####
          4. ##### 


   SETTINGSREPORT:
       put echocolumn /on
       waitfor EchoColumn
       counter set 0
       ECHO
       ECHO
       ECHO ***********************************************
       ECHO *** You current user settings are:
       ECHO ***
       GOTO NAMEREPORT

   NAMEREPORT:
       ECHO *** NAME:       Your name is %name%.

   LARGEITEMS:
       ECHO *** ITEMS:      If arrested (and applicable), script will try to retrieve the following items from your sack:
       ECHO ***                %largeitem1%        %largeitem2%

   DIFFREPORT:
       counter set 1
       GOTO DIFFREPORT.%DoubleDiff%
   DIFFREPORT.1:
       counter set 2
       GOTO DIFFREPORT.%DoubleDiff2%

   DIFFREPORT.NORM:
       ECHO *** DIFFICULTY: NORMAL - You have not modified difficulty or quantity settings.
       GOTO DROPSTOW.%DropOrStow%
   DIFFREPORT.EASY:
       ECHO *** DIFFICULTY: EASY - You will steal easier items.
       GOTO DIFFREPORT.%c%
   DIFFREPORT.HARD:
       ECHO *** DIFFICULTY: HARD - You will steal harder items.
       GOTO DIFFREPORT.%c%
   DIFFREPORT.LESS:
       ECHO *** QUANTITY:   LESS - You will steal one fewer item per shop (minimum 1).
       GOTO DIFFREPORT.%c%
   DIFFREPORT.MORE:
       ECHO *** QUANTITY:   MORE - You will steal one more item per shop (maximum 6).
       GOTO DIFFREPORT.%c%
   DIFFREPORT.EASYEASY:
       ECHO *** DIFFICULTY: EASY EASY - You will steal much easier items.
       GOTO DIFFREPORT.%c%
   DIFFREPORT.HARDHARD:
       ECHO *** DIFFICULTY: HARD HARD - You will steal much harder items.
       GOTO DIFFREPORT.%c%
   DIFFREPORT.LESSLESS:
       ECHO *** QUANTITY:   LESS LESS - You will steal two fewer items per shop (minimum 1).
       GOTO DIFFREPORT.%c%
   DIFFREPORT.MOREMORE:
       ECHO *** QUANTITY:   MORE MORE - You will steal two more items per shop (maximum 6).
       GOTO DIFFREPORT.%c%
   DIFFREPORT.NULL:
       GOTO DROPSTOW.%DropOrStow%

   DIFFREPORT.2:
       GOTO DROPSTOW.%DropOrStow%

   DROPSTOW.DROP:
       ECHO *** DROP:       You will drop stolen items.
       GOTO MARKPOWPERC.%markpowperc%
   DROPSTOW.STOW:
       ECHO *** STOW:       You will stow stolen items to pawn and/or bin in the following containers:
       ECHO ***                %container1%        %container2%
       GOTO MARKPOWPERC.%markpowperc%

   MARKPOWPERC.MARK:
       ECHO *** MARK:       You will mark items before attempting to steal them.
       GOTO CLANOPTION.%clanoption%
   MARKPOWPERC.POWER:
       ECHO *** POWER:      You will perceive power before stealing in each shop.
       GOTO CLANOPTION.%clanoption%
   MARKPOWPERC.PERC:
       ECHO *** PERC:       You will perceive health before stealing in each shop.
       GOTO CLANOPTION.%clanoption%
   MARKPOWPERC.STEAL:
       GOTO CLANOPTION.%clanoption%

   CLANOPTION.YES:
       ECHO *** CLANS:      YES - Clans will be included in your stealing route.
       GOTO FLEEOPTION.%flee%
   CLANOPTION.NO:
       ECHO *** CLANS:      NO - Clans will not be included in your stealing route.
       GOTO FLEEOPTION.%flee%

   FLEEOPTION.YES:
       ECHO *** AUTO-EXIT:  YES - You WILL automatically exit the game if killed or inexplicably stunned.
       GOTO THIEFPASS
   FLEEOPTION.NO:
       ECHO *** AUTO-EXIT:  NO - You will NOT automatically exit the game due to death or stun.
       GOTO THIEFPASS

   THIEFPASS:
       ECHO *** PASSWORDS:  If you are a thief, you will use the following guild passwords:
       ECHO ***                SHARD: %shardpass%        HAVEN: %riverpass%



   SETTINGSREPORTEND:
       ECHO ***********************************************
       ECHO
       ECHO
       pause 1
       put echocolumn /off
       waitfor EchoColumn
       pause 2
       GOTO CITYCHECKER

   VARIABLESEXCEEDED:
       pause 2
       ECHO
       ECHO
       ECHO ***********************************************
       ECHO *** 
       ECHO *** Please restart Progressive Stealing using 2 or fewer modifiers.
       ECHO *** 
       ECHO ***********************************************
       ECHO
       ECHO
       EXIT


          2. #####
          3. DIFFICULTY ADJUSTMENTS #####
          4. ##### 


   EASY:
       SHIFT
       GOTO EASY.%DoubleDiff%
   EASY.NORM:
       setVariable DoubleDiff easy
       setVariable DifficultyA subtract 1
       GOTO NOTFIRSTRUN
   EASY.EASY:
       setVariable DoubleDiff easyeasy
       setVariable DifficultyA subtract 2
       GOTO NOTFIRSTRUN
   EASY.LESS:
       setVariable DoubleDiff2 less
       setVariable DifficultyA subtract 1
       setVariable DifficultyB subtract 1
       GOTO NOTFIRSTRUN
   EASY.MORE:
       setVariable DoubleDiff2 more
       setVariable DifficultyA subtract 1
       setVariable DifficultyB add 1
       GOTO NOTFIRSTRUN

   HARD:
       SHIFT
       GOTO HARD.%DoubleDiff%
   HARD.NORM:
       setVariable DoubleDiff hard
       setVariable DifficultyA add 1
       GOTO NOTFIRSTRUN
   HARD.HARD:
       setVariable DoubleDiff hardhard
       setVariable DifficultyA add 2
       GOTO NOTFIRSTRUN
   HARD.LESS:
       setVariable DoubleDiff2 less
       setVariable DifficultyA add 1
       setVariable DifficultyB subtract 1
       GOTO NOTFIRSTRUN
   HARD.MORE:
       setVariable DoubleDiff2 more
       setVariable DifficultyA add 1
       setVariable DifficultyB add 1
       GOTO NOTFIRSTRUN

   LESS:
       SHIFT
       GOTO %DoubleDiff%.LESS
   NORM.LESS:
       setVariable DoubleDiff less
       setVariable DifficultyB subtract 1
       GOTO NOTFIRSTRUN
   LESS.LESS:
       setVariable DoubleDiff lessless
       setVariable DifficultyB subtract 2
       GOTO NOTFIRSTRUN

   MORE:
       SHIFT
       GOTO %DoubleDiff%.MORE
   NORM.MORE:
       setVariable DoubleDiff more
       setVariable DifficultyB add 1
       GOTO NOTFIRSTRUN
   MORE.MORE:
       setVariable DoubleDiff moremore
       setVariable DifficultyB add 2
       GOTO NOTFIRSTRUN

   EASY.HARD:
   HARD.EASY:
   LESS.MORE:
   MORE.LESS:
       setVariable DoubleDiff norm
       setVariable DifficultyA multiply 1
       setVariable DifficultyB multiply 1
       GOTO NOTFIRSTRUN


          2. #####
          3. CHECKING PROVINCE AND CITY #####
          4. ##### 


   CITYCHECKER:
       matchre SETCROSSING /The Crossing|Cormyn|Falken|Chizili|Mauriga|Talmai|Orielda|Herilo/
       matchre SETCROSSING /Milgrym|Tembeg|Berolt|Grisgonda|Marcipur|Durantine|The True Bard|Ragge|Orem|Brisson|Guard House/
       matchre SETARTHE /Arthe Dale|Barley Bulrush|Tanglefoot|Woodcock|Quellia|Bobba/
       matchre SETTIGER /Tiger Clan Home/
       matchre SETLETH /Leth Deriel|Morikai's|Madame Orris|Alberdeen|Yerui's|Ongadine's/
       matchre SETLETH /Sinjian's|Blanca's|merchant Yithye|Huyelm|Origami Boutique/
       matchre SETRATHA /Ratha|Paedraig|Truffenyi's Green|Chabalu|Hotagi'rath/
       matchre SETRATHA /Drorg|Namazzi|Ktzini|Krrikt'k's|Elepaio|Krelpit|Redwing|Amorand|Veraclese|Ssivo|Kalazashi|Svra'an/
       matchre SETSHARD /Shard|Aelik|Zerek|Fiona|Meek|Zieq|Idizieq|Sierack|Malik|Kilam|Demiciil|Bonime|Budd|Avlea|Genevive/
       matchre SETSHARD /Coin of the Realm|Tokens of Affection|Little Frills|Travel Tours|Toy Box|Budd|Scholar's Museum/
       matchre SETSHARD /Froissart|Survivalist Supplies|Marachek|Windawn|Enescu/
       matchre SETSTEEL /Quintan|Struan|Steelclaw/
       match SETHORSE Zaldi Taipa
       matchre SETHAVEN /Riverhaven|Alayle|Enfermine's|Noel Razoreye|Cecelia|Zanthron's|Ss'Thran|Smaragdaus'/
       matchre SETHAVEN /Fine Leaf's|Adaerna|Thringol's|Tibvaov|Crin's Herbal|City Togs/
       match BADLOCATION Obvious
       put look
       GOTO UniversalMatch

   SETCROSSING:
       setVariable citycode CROSS
       setVariable provcode ZOL
       setVariable lethcross CROSS
       GOTO CLASS

   SETARTHE:
       setVariable citycode ARTHE
       setVariable provcode ZOL
       setVariable lethcross CROSS
       GOTO CLASS

   SETTIGER:
       setVariable citycode TIGER
       setVariable provcode ZOL
       setVariable lethcross CROSS
       GOTO CLASS

   SETLETH:
       setVariable citycode LETH
       setVariable provcode ZOL
       setVariable lethcross LETH
       GOTO CLASS

   SETHAVEN:
       setVariable citycode HAVEN
       setVariable provcode THG
       GOTO CLASS

   SETRATHA:
       setVariable citycode RATHA
       setVariable provcode QIR
       GOTO CLASS

   SETSHARD:
       setVariable citycode SHARD
       setVariable provcode ILI
       GOTO CLASS

   SETSTEEL:
       setVariable citycode STEEL
       setVariable provcode ILI
       GOTO CLASS

   SETHORSE:
       setVariable citycode HORSE
       setVariable provcode ILI
       GOTO CLASS

   BADLOCATION:
       ECHO
       ECHO ***********************************************
       ECHO ***
       ECHO *** Could not locate you. Please enter your province
       ECHO *** code for a list of valid starting locations.
       ECHO ***
       ECHO *** Zoluren = ZOL
       ECHO *** Therengia = THG
       ECHO *** Ilithi = ILI
       ECHO *** Qi'Reshalia = QIR
       ECHO *** Forfedhdar = FRF
       ECHO ***
       ECHO ***********************************************
       ECHO
       match ZOL.BADLOCATION zol
       match THG.BADLOCATION thg
       match ILI.BADLOCATION ili
       match QIR.BADLOCATION qir
       match FRF.BADLOCATION frf
       GOTO UniversalMatch

   FRF.BADLOCATION:
       setVariable province Forfedhdar
       GOTO NON.BADLOCATION
   NON.BADLOCATION:
       ECHO
       ECHO ***********************************************
       ECHO ***
       ECHO *** Sorry, just a teaser!
       ECHO ***
       ECHO *** %province% has not been implemented yet.
       ECHO ***
       ECHO ***********************************************
       ECHO
       GOTO END
          2. #####
          3. CLASS, HAND, AND ARMOR CHECKS #####
          4. ##### 


   CLASS:
       matchre NONTHIEF /You wave your|There is no sign/
       match THIEF What do you
       match CLASS.STOW How do you expect
       match CLASS ...wait
       put sign
       GOTO UniversalMatch

   CLASS.STOW:
       put stow right
       wait
       put stow left
       wait
       GOTO CLASS

   THIEF:
       setVariable class thief
       GOTO HANDCHECK

   NONTHIEF:
       setVariable class nonthief
       matchre HANDCHECK /That is not a spell|You do not know|You aren't trained|You wouldn't have/
       match EMPATH You close your eyes
       matchre RELEASE /already preparing|trace an arcane sigil/
       match SPELLHUM You should stop playing
       put prep hw
       GOTO UniversalMatch

   SPELLHUM:
       put stop hum
       GOTO NONTHIEF

   RELEASE:
       put release
       wait
       GOTO NONTHIEF

   EMPATH:
       setVariable class empath
       put release
       wait
       GOTO HANDCHECK

   HANDCHECK:
       match STOWHANDS You glance down to see
       match ARMORCHECK You glance down at your empty
       put glance
       GOTO UniversalMatch

   STOWHANDS:
       put stow left
       wait
       put stow right
       wait
       match HANDWARN You glance down to see
       match ARMORCHECK You glance down at your empty
       put glance
       GOTO UniversalMatch

   HANDWARN:
       ECHO ***********************************************
       ECHO *** WARNING: You are holding something that
       ECHO *** can't be stowed. Fix and type "CONT".
       ECHO ***********************************************
       match ARMORCHECK CONT
       GOTO UniversalMatch

   ARMORCHECK:
       match ARMORWARN You are
       match SKILLCHECK You have
       put inv armor
       GOTO UniversalMatch

   ARMORWARN:
       ECHO ***********************************************
       ECHO *** WARNING: You are wearing armor. Fix and type "CONT".
       ECHO ***********************************************
       match ARMORCHECK CONT
       GOTO UniversalMatch


          2. #####
          3. SKILL AND ITEM-BASED BAG CHECKS #####
          4. #####
  2. First, SKILLCHECK checks your stealing skill and assigns you to a
  3. bracket based on your stealing ranks, currently as RANK1-RANK8.
  4. The counter is set to this number (1-8) and then RANKADJUSTER
  5. modifies it with %DifficultyA, which if applicable is set by EASY
  6. or HARD to add or subtract 1 or 2 from the initial rank bracket.
  1. Once the adjusted rank is determined, it then routes to each
  2. province's item lists, so that these can be retrieved and checked
  3. against the contents of the user's containers to ensure nothing
  4. will be mistakenly pawned. The BAGCHECK labels are in each province
  5. section, since they are province-based, but the BAGWARN labels
  6. are universal and so kept here.
   SKILLCHECK:
       matchre BEGGAR /g:      |g:     1/
       matchre RANK1 /g:     2|g:     3/
       matchre RANK2 /g:     4|g:     5/
       matchre RANK3 /g:     6|g:     7|g:     8|g:     9/
       matchre RANK4 /g:    10|g:    11|g:    12|g:    13|g:    14/
       matchre RANK5 /g:    15|g:    16|g:    17|g:    18|g:    19/
       matchre RANK6 /g:    20|g:    21|g:    22|g:    23|g:    24/
       matchre RANK7 /g:    25|g:    26|g:    27|g:    28|g:    29/
       matchre RANK8 /g:    3|g:    4|g:    5|g:    6|g:    7/
       matchre RANK8 /g:    8|g:    9|g:   10|g:   11|g:   12/
       put skill steal
       GOTO UniversalMatch

   RANK1:
       counter set 1
       GOTO RANKADJUSTER
   RANK2:
       counter set 2
       GOTO RANKADJUSTER
   RANK3:
       counter set 3
       GOTO RANKADJUSTER
   RANK4:
       counter set 4
       GOTO RANKADJUSTER
   RANK5:
       counter set 5
       GOTO RANKADJUSTER
   RANK6:
       counter set 6
       GOTO RANKADJUSTER
   RANK7:
       counter set 7
       GOTO RANKADJUSTER
   RANK8:
       counter set 8
       GOTO RANKADJUSTER

   RANKADJUSTER:
       pause 1
       counter %DifficultyA
       GOTO %provcode%.RANKADJ%c

   RANKREPORT:
       ECHO
       ECHO
       ECHO ***********************************************
       ECHO ***                  %skillrange%: Altering course...
       ECHO ***********************************************
       ECHO
       pause 2
       counter set 0
       counter %DifficultyB
       setVariable rank %c
       GOTO BAGS.%DropOrStow%

   BAGS.STOW:
       GOTO %provcode%.BAGCHECK
   BAGS.DROP:
       GOTO KHRICHECK.%class%

   BEGGAR:
       pause 1
       ECHO ***********************************************
       ECHO ***          You aren't worthy yet. Hit the beggar.
       ECHO ***********************************************
       GOTO END

   BEGGAR.MOD:
       pause 1
       ECHO ***********************************************
       ECHO *** Sorry, but using the EASY option is not possible with
       ECHO *** less than 40 ranks in stealing. Using two EASY options
       ECHO *** is not possible with less than 60 ranks in stealing.
       ECHO ***********************************************
       GOTO END

   BAGWARN:
       ECHO ***********************************************
       ECHO *** WARNING: Your %container1 appears to contain items
       ECHO *** that will be pawned.  If this is okay, type YES.
       ECHO ***
       ECHO *** Note: This could be a false alarm if your bag contains
       ECHO *** a partial match, like a "pine strongbox" for a "pin,"
       ECHO *** but we are trying to be extra careful with your items.
       ECHO ***********************************************
       match %provcode%.BAGCHECK2 good positive attitude
       GOTO UniversalMatch

   BAGWARN2:
       ECHO ***********************************************
       ECHO *** WARNING: Your %container2 appears to contain items
       ECHO *** that will be pawned.  If this is okay, type YES.
       ECHO ***
       ECHO *** Note: This could be a false alarm if your bag contains
       ECHO *** a partial match, like a "pine strongbox" for a "pin,"
       ECHO *** but we are trying to be extra careful with your items.
       ECHO ***********************************************
       match KHRICHECK.%class% good positive attitude
       GOTO UniversalMatch


          2. #####
          3. KHRI CHECK AND ACTIVATION #####
          4. ##### 


   KHRICHECK.NONTHIEF:
   KHRICHECK.EMPATH:
       setVariable slipoption noslip
       GOTO %citycode%

   KHRICHECK.THIEF:
       wait
       match KHRISTART you are not
       match KHRISTOP you are under
       match %citycode% Please rephrase
       put khri check
       GOTO UniversalMatch

   KHRISTOP:
       put khri stop
       GOTO KHRIPAUSE

   KHRIPAUSE:
       ECHO ***********************************************
       ECHO *** PAUSING 2 MINUTES FOR CONCENTRATION
       ECHO ***********************************************
       pause 120
       GOTO KHRISTART

   KHRISTART:
       put khri start skulk
       wait
       put khri start plunder
       wait
       put khri start focus
       wait
       put khri start darken
       wait
       put khri start dampen
       wait
       GOTO SLIPCHECK

   SLIPCHECK:
       pause 1
       match SLIPYES SNEAK
       match SLIPNO You glance
       put slip help
       put glance
       GOTO UniversalMatch

   SLIPYES:
       setVariable slipoption slip
       GOTO %citycode%

   SLIPNO:
       setVariable slipoption noslip
       GOTO %citycode%


          2. #####
          3. PRIMARY SHOP STEALING ENGINE #####
          4. #####
  2. Outside every shop, we run %MRS, which is set to SHOPCHECK
  3. unless we are under MOVEON or RESUME circumstances. SHOPCHECK
  4. checks to see if there is a reason to activate MOVEON,
  5. prioritizing health (having your hand chopped off by clan justice)
  6. followed by exp (being mind locked or nearly so). In addition,
  7. if the item set for this particular store is "nothing," the echo
  8. will match for that and LEAVE this store before trying to go in
  9. and steal.
   SHOPCHECK:
       match MOVEON.STARTLOC %startlocation%
   SHOPCHECK1:
       counter set %rank
       setvariable MRS shopcheck
       match MOVEON.HEALTH hand which appears completely useless
       match LEAVE Nothing
       match ENTER.%slipoption% Time development
       match MOVEON.EXP mind lock
       put health
       put echo %storecode %item
       put skill steal
       GOTO UniversalMatch
  1. Before entering the shop, here we set the counter which we will
  2. use with the STEALCOUNT labels to see how many times the person
  3. should steal and has stolen in each shop. %rank is initially set
  4. under RANKREPORT to 0, then modified by %DifficultyB to add or
  5. subtract 1 or 2 if applicable based on the use of MORE or LESS.
  6. Here, it will be further modified by %shopdiff as set by each
  7. shop's quantity adjustment. The result is multiplied by 100, and
  8. then each time you steal, 1 is added to this number, and this
  9. allows us to make STEALCOUNT labels which account for both the
  10. number of times you SHOULD steal, and the number you actually
  11. have stolen per shop.
   ENTER.NOSLIP:
       setVariable StowStatus once
       counter set %rank
       counter add %shopdiff
       counter multiply 100
   HIDE:
       pause 1
       match HIDE ...wait
       match HUMSTOP too busy performing
       matchre ALTENTER /ruining your|Behind what/
       matchre ENTER /You melt|You slip|You blend|But you/
       put hide
       GOTO UniversalMatch

   ENTER.SLIP:
       setVariable StowStatus once
       counter set %rank
       counter add %shopdiff
       counter multiply 100
   ENTER:
       pause 1
       match ENTER ...wait
       match HIDE Sneaking is an
       match ALTENTER You can't sneak
       matchre %markpowperc /You sneak|In which direction/
       put sneak %entrance
       GOTO ShopEngaged

   ALTENTER:
       pause 1
       match MOVEERROR You can't go there.
       match HIDE4 Obvious
       put go %entrance
       GOTO ShopEngaged

   HIDE4:
       pause 1
       match HIDE4 ...wait
       matchre %markpowperc% /ruining your|Behind what|You melt|You slip|You blend|But you|You look around/
       put hide
       GOTO UniversalMatch

   PREPERC:
       pause 2
   PERC:
       pause 1
       put perc health
       match PERC ...wait
       match PREPERC You're not ready to
       matchre NOPERC /You aren't trained|USAGE/
       matchre STEAL /You close your eyes|interfering/
       GOTO ShopEngaged
   NOPERC:
       setVariable markpowperc POWER
       GOTO POWER

   POWER:
       pause 1
       put power
       match POWER ....wait
       matchre NOPOWER /You aren't trained|USAGE/
       match STEAL Roundtime
       GOTO ShopEngaged
   NOPOWER:
       setVariable markpowperc STEAL
       GOTO STEAL

   MARK:
       pause 1
       match MARK ...wait
       matchre NEXT.%slipoption% /Mark what|you are being watched|reason to call the guards|beyond foolish|pretty sure you'll be caught|likely be futile|gavel echoes through|taste of bitter failure|a long shot|chances to lift it|quite the struggle|Guards!/
       matchre STEAL /Roundtime|You trace|You can not|to take unwanted notice of you/
       put mark %item% %itemlocation%
       GOTO ShopEngaged

   STEAL:
       pause 1
       setVariable StealOrNext hide3
       match STEAL ...wait
       match %DropOrStow%.ONCE should back off
       matchre %DropOrStow%.%StowStatus% /Guards!|begins to shout/
       matchre NEXT.%slipoption% /You haven't|You can't/
       match CHECK Roundtime
       put steal %item% %itemlocation%
       GOTO ShopEngaged

   CHECK:
       counter add 1
       GOTO STEALCOUNT%c

   STEALCOUNT201:
   STEALCOUNT301:
   STEALCOUNT401:
   STEALCOUNT501:
   STEALCOUNT601:
   STEALCOUNT403:
   STEALCOUNT503:
   STEALCOUNT603:
   STEALCOUNT605:
  1. ECHO *** Has completed 1st/3rd/5th steal, is about to attempt again before double stow
       setVariable StowStatus twice
       GOTO STEAL

   STEALCOUNT302:
   STEALCOUNT402:
   STEALCOUNT502:
   STEALCOUNT602:
   STEALCOUNT504:
   STEALCOUNT604:
  1. ECHO *** Has completed 2nd or 4th steal and is about to attempt again after double stow
       setVariable StowStatus once
       setVariable StealOrNext hide2
       GOTO %DropOrStow%.TWICE

   STEALCOUNT-299:
   STEALCOUNT-199:
   STEALCOUNT-99:
   STEALCOUNT1:
   STEALCOUNT101:
   STEALCOUNT303:
   STEALCOUNT505:
  1. ECHO *** Has completed 1st/3rd/5th steal, is finished, and is about to stow the odd item
       GOTO %DropOrStow%.ONCE

   STEALCOUNT202:
   STEALCOUNT404:
   STEALCOUNT606:
  1. ECHO *** Has completed 2nd/4th/6th steal, is finished, and is about to double stow
       setVariable StealOrNext hide3
       GOTO %DropOrStow%.TWICE

   STOW.ONCE:
       pause 1
       matchre HIDE3 /You put|Perhaps you should/
       match STOW.ONCE ...wait
       matchre STOW.ONCE.2 /any more room|no matter how you|to fit in the/
       match DROP referring
       put put my %item in my %container1
       GOTO ShopEngaged

   STOW.ONCE.2:
       match HIDE3 You put
       match STOW.ONCE.2 ...wait
       matchre DROP /any more room|no matter how you|to fit in the|referring/
       put put my %item in my %container2
       GOTO ShopEngaged

   STOW.TWICE:
       pause 1
       match STOW.TWICE.3 You put
       match STOW.TWICE ...wait
       matchre STOW.TWICE.2 /any more room|no matter how you|to fit in the/
       match DROP referring
       put put my %item in my %container1
       GOTO ShopEngaged

   STOW.TWICE.2:
       match STOW.TWICE.3 You put
       match STOW.TWICE.2 ...wait
       matchre DROP /any more room|no matter how you|to fit in the|referring/
       put put my %item in my %container2
       GOTO ShopEngaged

   STOW.TWICE.3:
       match %StealOrNext% You put
       match STOW.TWICE.3 ...wait
       matchre STOW.TWICE.4 /any more room|no matter how you|to fit in the/
       match DROP referring
       put put my %item in my %container1
       GOTO ShopEngaged

   STOW.TWICE.4:
       match %StealOrNext% You put
       match STOW.TWICE.4 ...wait
       matchre DROP /any more room|no matter how you|to fit in the|referring/
       put put my %item in my %container2
       GOTO ShopEngaged

   DROP:
   DROP.ONCE:
   DROP.TWICE:
       match DROP ...wait
       match %StealOrNext% empty hands
       match EMPTYRIGHT right hand and nothing
       matchre EMPTYBOTH /right hand and a|right hand and some/
       match EMPTYLEFT in your left hand.
       put glance
       GOTO ShopEngaged

   EMPTYBOTH:
       match EMPTYBOTH If you still wish
       match EMPTYRIGHT You drop
       put empty left
       GOTO ShopEngaged

   EMPTYRIGHT:
       match EMPTYRIGHT If you still wish
       match %StealOrNext% You drop
       put empty right
       GOTO ShopEngaged

   EMPTYLEFT:
       match EMPTYLEFT If you still wish
       match %StealOrNext% You drop
       put empty left
       GOTO ShopEngaged

   HIDE2:
       pause 1
       match HIDE2 ...wait
       match JAILCHECK You look around
       matchre STEAL /You melt|You slip|You blend|But you|ruining your/
       put hide
       GOTO ShopEngaged

   HIDE3:
       GOTO NEXT.%slipoption

   NEXT.NOSLIP:
       pause 1
       match HIDE3 ...wait
       match RUNTONEXT ruining your
       match JAILCHECK2 You look around
       matchre NEXT /You melt|You slip|You blend|But you/
       put hide
       GOTO ShopEngaged

   NEXT:
   NEXT.SLIP:
       pause 1
       match NEXT ...wait
       match HIDE3 Sneaking is an
       match JAILCHECK2 Maybe you should
       matchre ALTLEAVE /You can't sneak|Sneaking isn't allowed|In which direction/
       match LEAVE You sneak
       counter set %rank
       put sneak out
       GOTO ShopEngaged

   LEAVE:
   LEAVE.MOVEON:
   LEAVE.SHOPCHECK:
       setVariable itemlocation  
       GOTO LEAVE.%storecode

   ALTLEAVE:
       GOTO ALTLEAVE.%storecode


          2. #####
          3. MOBILE NPC STEALING #####
          4. #####
  2. Adding more NPCs is easy! Just add a label here and a match for
  3. them in the TRAVEL label.


   CROSS.BEGGAR:
       setVariable npcname beggar
       GOTO NPC.%npcoption%
   CROSS.MINSTREL:
       setVariable npcname minstrel
       GOTO NPC.%npcoption%
   CROSS.VETERAN:
       setVariable npcname veteran
       GOTO NPC.%npcoption%
   RATHA.SAILOR:
       setVariable npcname sailor
       GOTO NPC.%npcoption%
   KALIC:
       setVariable npcname Kalic
       GOTO AUTHORS
   CHALL:
       setVariable npcname Challeirra
       GOTO AUTHORS
   MORFIC:
       setVariable npcname Morfic
       GOTO AUTHORS

   NPC.NO:
       GOTO %citycode%.%c

   NPC.YES:
   NPC.1:
       match NPC.1 ...wait
       match NPC.2 Roundtime
       match %citycode%.%c You look around
       put hide
       GOTO UniversalMatch

   NPC.2:
       match NPC.2 ...wait
    1. match NPC.3 Roundtime <-- switch out this for the line below it to add back a steal attempt
       match %citycode%.%c Roundtime
       match NPC.STAND you go sprawling
       matchre %citycode%.%c /You can't steal|alas, it is empty|You haven't picked|begins to shout/
       put steal %npcname%
       GOTO UniversalMatch

   NPC.3:
       match NPC.3 ...wait
       match NPC.STAND you go sprawling
       matchre %citycode%.%c /You can't steal|alas, it is empty|You haven't picked|begins to shout|Roundtime/i
       put steal %npcname%
       GOTO UniversalMatch

   NPC.STAND:
       match %citycode%.%c You stand
       matchre NPC.STAND /wait|type ahead|Roundtime/i
       put kneel
       put stand
       GOTO UniversalMatch

   AUTHORS:
       GOTO AUTHORS.%norepeat%

   AUTHORS.FIRST:
       match AUTHORS.FIRST ...wait
       match AUTHORS.WHISPER %npcname%
       match %citycode%.%c Obvious
       put look
       GOTO UniversalMatch

   AUTHORS.WHISPER:
       put whisper %npcname% This is Progressive Stealing, reporting itself functional! Version %update running with settings: %stealsettings%.
       setVariable norepeat subseq
       GOTO %citycode%.%c

   AUTHORS.SUBSEQ:
       GOTO %citycode%.%c


          2. #####
          3. CENTRALIZED CONTROL FUNCTIONS #####
          4. ##### 


   HUMSTOP:
       put stop hum
       GOTO HIDE

   JAILCHECK:
       matchre JAILWAIT /jail|heavily barred door|Holding Cell|Guardhouse|Great Tower, Cell|Gallows Tree, Cell/i
       match ALTENTER It appears to be the local tobacco shop.
       match %markpowperc Obvious
       put look
       GOTO ShopEngaged

   JAILCHECK2:
       matchre JAILWAIT /jail|heavily barred door|Holding Cell|Guardhouse|Great Tower, Cell|Gallows Tree, Cell/i
       matchre ALTLEAVE.%storecode% /Shaefferty|Chabalu|Froissart|Windawn|Beeanna/
       match NEXT.%slipoption% Obvious
       put look
       GOTO ShopEngaged

   JAILWAIT:
       setVariable startresume %startlocation
       setVariable startlocation placeholder
       setVariable ResumeStore %storecode%
       setVariable MRS resume
       GOTO UniversalMatch

   PREPLEA:
       setVariable startresume %startlocation
       setVariable startlocation placeholder
       setVariable ResumeStore %storecode%
       setVariable MRS resume
   PLEA:
       match %citycode%.FREE You plead for forgiveness!
       match %citycode%.DEBT you do not have
       match %citycode%.FREE You are free to go
       put plead innocent
       GOTO UniversalMatch
  1. The TRAVEL label is run almost every time you move. It adds 1
  2. to the counter, and if you successfully move and no other
  3. factors interfere, you will match "Obvious" paths and go to the
  4. next travel label based on the count and your current city. If
  5. you fail to move, this will match for various reasons why (being
  6. stunned, engaged in combat, stuck in RT, or being in the wrong
  7. location) and respond to those issues, then go to BACKTRACK to
  8. subtract 1 from the counter and retry the previous movement. In
  9. addition, if you move successfully, this will also match for any
  10. stealable NPCs that appear before "Obvious" exits and cause you
  11. to stop and steal from them before moving on.
   TRAVEL:
       counter add 1
       ECHO *** Travel destination %citycode%.%c ***
       match HEALTHCHECK.TRAVEL You are still stunned
       match HEALTHCHECK.TRAVEL do that while kneeling
       match MOVEERROR You can't go there.
       match BACKTRACK ...wait
       match CROSS.BEGGAR an old blind beggar
       match CROSS.MINSTREL a wandering minstrel
       match CROSS.VETERAN a grizzled old war veteran
       match RATHA.SAILOR an old sailor
       match RATHA.SAILOR a peg-legged sailor
       match KALIC Kalic
       match MORFIC Morfic
       match CHALL Challeirra
       matchre RETREAT.TRAVEL /pole weapon range|melee range|you are engaged/
       match %citycode%.%c Obvious
       match %citycode%.%c It's pitch dark
       GOTO UniversalMatch

   BACKTRACK:
       counter subtract 1
       ECHO *** Backtrack is re-trying from %citycode%.%c ***
       pause 1
       GOTO %citycode%.%c

   RETREAT.TRAVEL:
       matchre RETREAT.TRAVEL /You retreat back to pole|wait|type ahead|Roundtime/i
       match BACKTRACK You retreat from combat.
       match %citycode%.%c You are already as far away as you can get!
       put retreat
       GOTO UniversalMatch

   RETREAT.SHOP:
       matchre RETREAT.SHOP /You retreat back to pole|wait|type ahead|Roundtime/i
       match RUNTONEXT /You retreat from combat.|already as far away/
       put retreat
       GOTO UniversalMatch

   RUNTONEXT:
       put out
       matchre RETREAT.SHOP /pole weapon range|melee range|wait/
       match LEAVE Obvious
       match ALTLEAVE.%storecode You can't go there.
       GOTO UniversalMatch
  1. Every action inside a shop goes to this label before
  2. UniversalMatch and adds matches to see if an action has failed
  3. due to being engaged or stunned in a shop as this requires a
  4. different response than during travel.
   SHOPENGAGED:
       matchre RETREAT.SHOP /pole weapon range|melee range/
       match HEALTHCHECK.SHOP You are still stunned
       GOTO UniversalMatch

   HEALTHCHECK.SHOP:
       setVariable TravelOrShop shop
       GOTO HEALTHCHECK

   HEALTHCHECK.TRAVEL:
       setVariable TravelOrShop travel
       GOTO HEALTHCHECK

   HEALTHCHECK:
       match CLANCHOP hand which appears completely useless
       match EMERGENCY.FLEE.%flee% You glance
       match EMERGENCY.FLEE.%flee% still stunned
       put health
       put glance
       GOTO UniversalMatch

   CLANCHOP:
       setVariable MRS moveon
       setVariable LorM moveon
       setVariable MoveOnReason HEALTH
       setVariable npcoption no
       pause 10
       GOTO STAND

   STAND:
       match STAND roundtime
       match HEALTHCHECK.%TravelOrShop% You are still stunned
       matchre STAND.%TravelOrShop% /You stand|You are already standing/
       put stand
       GOTO UniversalMatch

   STAND.TRAVEL:
       setVariable ResumeStore %storecode
       setVariable startresume %startlocation
       setVariable startlocation placeholder
       GOTO BACKTRACK

   STAND.SHOP:
       setVariable ResumeStore %storecode
       setVariable startresume %startlocation
       setVariable startlocation placeholder
       GOTO %DropOrStow%.%StowStatus%
  1. Every match in the script is routed through this variable which
  2. contains the one and only matchwait. This allows us to add
  3. matches to continuously check for being dead, arrested, or for
  4. trying to go into a shop that is closed which can happen in
  5. several different circumstances.
   UNIVERSALMATCH:
       matchre LEAVE.%MRS% /You stop as you realize|is locked|You realize the shop is closed/
       matchre EMERGENCY.FLEE.%flee% /You are a ghost/
       matchre JAILCHECK /Maybe you should|You look around|Stop right there|do that while lying/
       match PREPLEA You don't seem to be able to move to do that.
       match PLEA PLEAD INNOCENT or PLEAD GUILTY
       matchwait

   MOVEERROR:
       counter subtract 1
       ECHO
       ECHO *************************************************
       ECHO ***      You don’t seem to be where you are supposed to be.
       ECHO *** You were at %citycode%.%c%. Please note this for debugging.
       ECHO *************************************************
       ECHO
       GOTO END

   EMERGENCY.FLEE.YES:
       put quit
   EMERGENCY.FLEE.NO:
       ECHO
       ECHO
       ECHO
       ECHO ***********************************************
       ECHO ***
       ECHO ***         Something has gone terribly wrong!
       ECHO ***
       ECHO ***********************************************
       ECHO
       ECHO
       ECHO
       GOTO END


          2. #####
          3. RESUME AND MOVEON FUNCTIONS #####
          4. #####
  2. If we have been arrested or had a hand chopped off and need to
  3. go back to the store we left off at, %MRS will be set to RESUME
  4. and use the counter to count down as we make our way through the
  5. loop back to where we left off. Each province has a resume list
  6. which increments a counter based on which shop we were at. Here,
  7. we retrieve the Countdown variable, subtract 1, and either keep
  8. going or, if we reach 1 or 0, different things happen. At 1, we
  9. actually reach the store we last stole from, which we don't want
  10. to visit again, so we continue to move on but we reinstate the
  11. startlocation, so that if the next shop is the one we started at,
  12. we will MOVEON fully. At 0, we have reached the shop after the
  13. one where we had the problem, and are ready to revert to MRS as
  14. SHOPCHECK.
   RESUME:
   LEAVE.RESUME:
       counter set %Countdown%
       counter subtract 1
       setVariable Countdown %c
       GOTO %Countdown%

   COUNTDOWN:
   30:
   29:
   28:
   27:
   26:
   25:
   24:
   23:
   22:
   21:
   20:
   19:
   18:
   17:
   16:
   15:
   14:
   13:
   12:
   11:
   10:
   9:
   8:
   7:
   6:
   5:
   4:
   3:
   2:
       GOTO LEAVE

   1:
       setVariable startlocation %startresume
       GOTO LEAVE

   0:
       setVariable MRS shopcheck
       setVariable LorM leave
       setVariable npcoption yes
       GOTO %MRS%

   MOVEON.STARTLOC:
       setVariable MoveOnReason LOC
       ECHO *************************************************
       ECHO *** Activated MOVEON.%storecode% based on startlocation:
       ECHO *** %startlocation%
       ECHO *************************************************
       GOTO MOVEON.SET

   MOVEON.EXP:
       setVariable MoveOnReason EXP
       setVariable npcoption no
       ECHO *************************************************
       ECHO *** Activated MOVEON.%storecode% based on exp level
       ECHO *************************************************
       GOTO MOVEON.SET

   MOVEON.HEALTH:
       setVariable MoveOnReason HEALTH
       setVariable ResumeStore %storecode%
       setVariable startresume %startlocation%
       setVariable startlocation placeholder
       setVariable npcoption no
       ECHO *************************************************
       ECHO *** Activated MOVEON.%storecode% based on health
       ECHO *************************************************
       GOTO MOVEON.SET
  1. If MOVEON is activated, here is where we set the variables. MRS
  2. will be used outside every shop to determine whether to run
  3. SHOPCHECK, to go to RESUME and keep counting down, or to MOVEON
  4. and simply leave each shop because there is an issue we need to
  5. deal with (loop completed, experience full, or hand chopped
  6. off). LorM, set to either LEAVE or MOVEON, is used only at
  7. specific spots where we want to branch out of the loop.
   MOVEON.SET:
       setVariable MRS moveon
       setVariable LorM moveon
   MOVEON:
       GOTO LEAVE


          2. #####
          3. PAWNING SYSTEM #####
          4. ##### 


   SELLGET:
       match SELLGET ...wait
       match SELLING You get
       match SELLGET2 referring
       put get my %sellitem% from my %container1%
       GOTO UniversalMatch

   SELLGET2:
       match SELLGET2 ...wait
       match SELLING2 You get
       match SELLCYCLE referring
       put get my %sellitem% from my %container2%
       GOTO UniversalMatch

   SELLING:
       match SELLGET takes your
       matchre TRASH.%class% /worth|idiots|Waste all/
       match SELLING ...wait
       put sell my %sellitem%
       GOTO UniversalMatch

   SELLING2:
       match SELLGET2 takes your
       matchre TRASH.%class% /worth|idiots|Waste all/
       match SELLING2 ...wait
       put sell my %sellitem%
       GOTO UniversalMatch

   TRASH.NONTHIEF:
   TRASH.EMPATH:
       match TRASH.NONTHIEF.REPEAT1 bucket
       match NOBUCKET referring
       put put my %sellitem% in bucket
       GOTO UniversalMatch

   TRASH.NONTHIEF2:
       match TRASH.NONTHIEF.REPEAT2 bucket
       match NOBUCKET2 referring
       put put my %sellitem% in bucket
       GOTO UniversalMatch

   NOBUCKET:
       put drop my %sellitem%
       GOTO TRASH.NONTHIEF.REPEAT1

   NOBUCKET2:
       put drop my %sellitem%
       GOTO TRASH.NONTHIEF.REPEAT2

   TRASH.NONTHIEF.REPEAT1:
       match TRASH.NONTHIEF You get
       match TRASH.NONTHIEF.REPEAT1 ...wait
       match TRASH.NONTHIEF.REPEAT2 referring
       put get my %sellitem% from my %container1%
       GOTO UniversalMatch

   TRASH.NONTHIEF.REPEAT2:
       match TRASH.NONTHIEF2 You get
       match TRASH.NONTHIEF.REPEAT2 ...wait
       match SELLCYCLE referring
       put get my %sellitem% from my %container2%
       GOTO UniversalMatch

   SELLCYCLE:
       counter add 1
       GOTO %provcode%.SellItem%c%

   TRASH.THIEF:
       match TRASH.THIEF ...wait
       matchre TRASH.THIEF2 /any more room in|no matter how you|to fit in the/
       match SELLCYCLE You put
       put put my %sellitem% in my %container1%
       GOTO UniversalMatch

   TRASH.THIEF2:
       match TRASH.THIEF2 ...wait
       matchre TRASH.NONTHIEF2 /any more room in|no matter how you|to fit in the/
       match SELLCYCLE You put
       put put my %sellitem% in my %container2%
       GOTO UniversalMatch


          2. #####
          3. BINNING SYSTEM #####
          4. ##### 


   BINGET:
       match BINDROP You get
       match BINGET2 referring
       match BINGET ...wait
       put get my %sellitem% from my %container1%
       GOTO UniversalMatch

   BINGET2:
       match BINDROP2 You get
       match THIEFCYCLE referring
       match BINGET2 ...wait
       put get my %sellitem% from my %container2%
       GOTO UniversalMatch

   BINDROP:
       match BINGET falls into the
       match THIEFSTOW not fooling anyone
       match BINDROP ...wait
       put put my %sellitem% in bin
       GOTO UniversalMatch

   BINDROP2:
       match BINGET2 falls into the
       match THIEFSTOW not fooling anyone
       match BINDROP2 ...wait
       put put my %sellitem% in bin
       GOTO UniversalMatch

   THIEFSTOW:
       put empty right
       wait
       put empty left
       GOTO THIEFCYCLE

   THIEFCYCLE:
       counter add 1
       GOTO %provcode%.SellItem%c%


          2. #####
          3. ITEM RETRIEVAL AFTER ARREST #####
          4. ##### 


   SACKCHECK1:
       put open my small sack
       match %citycode%.ITEMCHECK referring
       match SACKCHECK2 You open
       GOTO UniversalMatch

   SACKCHECK2:
       put look in my small sack
       match %citycode%.ITEMCHECK There is nothing in there.
       match SACKJUNK1 %item%
       match SACKCHECK3 you see
       GOTO UniversalMatch

   SACKCHECK3:
       put get my %largeitem1% from my small sack
       match SACKWEAR1 You get
       match SACKCHECK4 referring
       GOTO UniversalMatch

   SACKCHECK4:
       put get my %largeitem2% from my small sack
       match SACKWEAR2 You get
       match SACKCHECK5 referring
       GOTO UniversalMatch

   SACKCHECK5:
       put look in my small sack
       match %citycode%.ITEMCHECK There is nothing in there.
       match SACKJUNK1 %item%
       match SACKSCREWED you see
       GOTO UniversalMatch

   SACKJUNK1:
       put get my %item in my small sack
       match SACKJUNK2 You get
       GOTO UniversalMatch

   SACKJUNK2:
       put put my %item% in my %container1%
       put put my %item% in my %container2%
       match SACKCHECK2 You put
       match SACKCHECK2 referring
       matchre SACKDROP /any more room|no matter how you/
       GOTO UniversalMatch

   SACKDROP:
       put drop my %item%
       match SACKCHECK2 You drop
       GOTO UniversalMatch

   SACKWEAR1:
       put wear my %largeitem1%
       wait
       put glance
       match SACKCHECK4 nothing in your
       match SACKCHECK4 You glance down to see a small sack in your left hand.
       matchre SACKSTOW1 /hand and a|hand and some/
       GOTO UniversalMatch

   SACKWEAR2:
       put wear my %largeitem2%
       wait
       put glance
       match SACKCHECK5 nothing in your
       match SACKCHECK5 You glance down to see a small sack in your left hand.
       matchre SACKSTOW2 /hand and a|hand and some/
       GOTO UniversalMatch

   SACKSTOW1:
       put stow my %largeitem1%
       wait
       put glance
       match SACKCHECK4 nothing in your
       match SACKCHECK4 You glance down to see a small sack in your left hand.
       matchre SACKSCREWED /hand and a|hand and some/
       GOTO UniversalMatch

   SACKSTOW2:
       put stow my %largeitem2%
       wait
       put glance
       match SACKCHECK5 nothing in your
       match SACKCHECK5 You glance down to see a small sack in your left hand.
       matchre SACKSCREWED /hand and a|hand and some/
       GOTO UniversalMatch

   SACKSCREWED:
       ECHO
       ECHO ***********************************************
       ECHO *** Script was unable to retrieve your items after arrest.
       ECHO ***********************************************
       ECHO
       GOTO END


          2. #####
          3. EMPATH SELF-HEALING #####
          4. ##### 
   EMPATH.HEALSELF:

   RH:
       setVariable TargetWound Right Hand
       GOTO HEALWOUNDS

   WOUNDCHECK:
       put health
       match H head
       match N neck
       match RA right arm
       match LA left arm
       match RL right leg
       match LL left leg
       match RH right hand
       match LH left hand
       match C chest
       match A abdomen
       match B back
       match RE right eye
       match LE left eye
       matchre S /skin|rash|twitching|numbness|paralysis|difficulty/
       match %citycode%.EMPATH.TO.RESUME.FROM.%SelfHealLoc% You have no significant injuries.
       GOTO UniversalMatch

   H:
       setVariable TargetWound Head
       GOTO HEALWOUNDS
   N:
       setVariable TargetWound Neck
       GOTO HEALWOUNDS
   RA:
       setVariable TargetWound Right Arm
       GOTO HEALWOUNDS
   LA:
       setVariable TargetWound Left Arm
       GOTO HEALWOUNDS
   RL:
       setVariable TargetWound Right Leg
       GOTO HEALWOUNDS
   LL:
       setVariable TargetWound Left Leg
       GOTO HEALWOUNDS
   LH:
       setVariable TargetWound Left Hand
       GOTO HEALWOUNDS
   C:
       setVariable TargetWound Chest
       GOTO HEALWOUNDS
   B:
       setVariable TargetWound Back
       GOTO HEALWOUNDS
   A:
       setVariable TargetWound Abdomen
       GOTO HEALWOUNDS
   RE:
       setVariable TargetWound Right Eye
       GOTO HEALWOUNDS
   LE:
       setVariable TargetWound Left Eye
       GOTO HEALWOUNDS
   S:
       setVariable TargetWound Skin
       GOTO HEALWOUNDS

   HEALWOUNDS:
       setVariable HealSpell hw
       GOTO PREPSPELL

   HEALSCARS:
       setVariable HealSpell hs
       GOTO PREPSPELL

   PREPSPELL:
       put prep %HealSpell%
       match PREPSPELL ...wait
       match HARNESS1 attunement
       match NOMANA You have to strain
       GOTO UniversalMatch

   HARNESSWAIT:
       pause 10
   HARNESS1:
       put har 4
       match HARNESS1 wait
       match HARNESS2 Roundtime
       match NOMANA You strain
       GOTO UniversalMatch

   HARNESS2:
       put har 4
       match HARNESS2 wait
       match CASTSPELL Roundtime
       match NOMANA You strain
       GOTO UniversalMatch

   CASTSPELL:
       pause 5
       put cast %TargetWound%
       match CASTSPELL ...wait
       match HEALSCARS wounds, but it cannot
       match HEALSCARS The internal wounds on your %TargetWound% appears completely healed.
       match WOUNDCHECK scars, but it cannot
       match WOUNDCHECK The internal scars on your %TargetWound% appears completely healed.
       matchre PREPSPELL /ineffective|almost|improved|better|You don't have/
       GOTO UniversalMatch

   NOMANA:
       pause 60
       GOTO PREPSPELL


                          2. #############
                          3. ZOLUREN #############
                          4. #############
                          5. SKILL DETERMINATION #############
                          6. (tweak the items you steal here if desired) #############
                          7. ############# 


   ZOL.RANKADJ1:
       setVariable skillrange 20-39
       setVariable ADbard <nothing>
       setVariable ADbardQuant 1
       setVariable ADodd <nothing>
       setVariable ADoddQuant 1
       setVariable ADthread <nothing>
       setVariable ADthreadQuant 1
       setVariable ADfash <nothing>
       setVariable ADfashQuant 1
       setVariable ADweap <nothing>
       setVariable ADweapQuant 1
       setVariable Ctann <nothing>
       setVariable CtannQuant 1
       setVariable Cstit <nothing>
       setVariable CstitQuant 1
       setVariable Cbath reed
       setVariable CbathItemLoc  
       setVariable CbathQuant 1
       setVariable Chab <nothing>
       setVariable ChabQuant 1
       setVariable Ccobb <nothing>
       setVariable CcobbQuant 1
       setVariable Calch water
       setVariable CalchQuant 2
       setVariable Cbota <nothing>
       setVariable CbotaQuant 1
       setVariable Cbloss rose
       setVariable CblossQuant 1
       setVariable Cgen bark
       setVariable CgenQuant 1
       setVariable Cgem hairpin
       setVariable CgemQuant 1
       setVariable Cweap sling
       setVariable CweapQuant 1
       setVariable Carm gloves
       setVariable CarmQuant 1
       setVariable Clock slim lockpick
       setVariable ClockQuant 1
       setVariable Carti <nothing>
       setVariable CartiQuant 1
       setVariable Cbard pick
       setVariable CbardQuant 1
       setVariable Ccleric chamomile
       setVariable CclericQuant 1
       setVariable Lmorik <nothing>
       setVariable LmorikQuant 1
       setVariable Lperf <nothing>
       setVariable LperfQuant 1
       setVariable Lgen <nothing>
       setVariable LgenQuant 1
       setVariable Lbow flights
       setVariable LbowQuant 1
       setVariable Lweap <nothing>
       setVariable LweapQuant 1
       setVariable Lwick <nothing>
       setVariable LwickQuant 1
       setVariable Lcloth <nothing>
       setVariable LclothQuant 1
       setVariable Lbard <nothing>
       setVariable LbardQuant 1
       setVariable Lwood <nothing>
       setVariable LwoodQuant 1
       setVariable Lgami <nothing>
       setVariable LgamiQuant 1
       setVariable TCweap <nothing>
       setVariable TCweapItemLoc in catalog
       setVariable TCweapQuant 1
       setVariable TCpedd <nothing>
       setVariable TCpeddQuant 1
       setVariable TCherb <nothing>
       setVariable TCherbQuant 1
       GOTO RANKREPORT

   ZOL.RANKADJ2:
       setVariable skillrange 40-59
       setVariable ADbard <nothing>
       setVariable ADbardQuant 2
       setVariable ADodd <nothing>
       setVariable ADoddQuant 2
       setVariable ADthread pouch
       setVariable ADthreadQuant 2
       setVariable ADfash <nothing>
       setVariable ADfashQuant 2
       setVariable ADweap butcher's knife
       setVariable ADweapQuant 2
       setVariable Ctann <nothing>
       setVariable CtannQuant 2
       setVariable Cstit beret
       setVariable CstitQuant 1
       setVariable Cbath soap
       setVariable CbathItemLoc in basin
       setVariable CbathQuant 1
       setVariable Chab hood
       setVariable ChabQuant 2
       setVariable Ccobb anklets
       setVariable CcobbQuant 1
       setVariable Calch alcohol
       setVariable CalchQuant 2
       setVariable Cbota <nothing>
       setVariable CbotaQuant 2
       setVariable Cbloss rose
       setVariable CblossQuant 2
       setVariable Cgen purse
       setVariable CgenQuant 2
       setVariable Cgem hairpin
       setVariable CgemQuant 2
       setVariable Cweap sling
       setVariable CweapQuant 2
       setVariable Carm leather gloves
       setVariable CarmQuant 2
       setVariable Clock slim lockpick
       setVariable ClockQuant 2
       setVariable Carti <nothing>
       setVariable CartiQuant 2
       setVariable Cbard pick
       setVariable CbardQuant 2
       setVariable Ccleric chalice
       setVariable CclericQuant 2
       setVariable Lmorik <nothing>
       setVariable LmorikQuant 2
       setVariable Lperf <nothing>
       setVariable LperfQuant 2
       setVariable Lgen <nothing>
       setVariable LgenQuant 2
       setVariable Lbow arrowhead
       setVariable LbowQuant 2
       setVariable Lweap <nothing>
       setVariable LweapQuant 2
       setVariable Lwick <nothing>
       setVariable LwickQuant 2
       setVariable Lcloth <nothing>
       setVariable LclothQuant 2
       setVariable Lbard <nothing>
       setVariable LbardQuant 2
       setVariable Lwood <nothing>
       setVariable LwoodQuant 2
       setVariable Lgami <nothing>
       setVariable LgamiQuant 2
       setVariable TCweap <nothing>
       setVariable TCweapItemLoc in catalog
       setVariable TCweapQuant 2
       setVariable TCpedd <nothing>
       setVariable TCpeddQuant 2
       setVariable TCherb <nothing>
       setVariable TCherbQuant 2
       GOTO RANKREPORT

   ZOL.RANKADJ3:
       setVariable skillrange 60-99
       setVariable ADbard rag
       setVariable ADbardQuant 2
       setVariable ADodd <nothing>
       setVariable ADoddQuant 2
       setVariable ADthread needle
       setVariable ADthreadQuant 2
       setVariable ADfash snood
       setVariable ADfashQuant 2
       setVariable ADweap hood
       setVariable ADweapQuant 2
       setVariable Ctann thread
       setVariable CtannQuant 2
       setVariable Cstit cloche
       setVariable CstitQuant 2
       setVariable Cbath soap
       setVariable CbathItemLoc in basin
       setVariable CbathQuant 2
       setVariable Chab skullcap
       setVariable ChabQuant 2
       setVariable Ccobb moccasins
       setVariable CcobbQuant 2
       setVariable Calch pestle
       setVariable CalchQuant 2
       setVariable Cbota <nothing>
       setVariable CbotaQuant 2
       setVariable Cbloss <nothing>
       setVariable CblossQuant 2
       setVariable Cgen flint
       setVariable CgenQuant 2
       setVariable Cgem anklet
       setVariable CgemQuant 2
       setVariable Cweap dagger
       setVariable CweapQuant 2
       setVariable Carm leather aventail
       setVariable CarmQuant 2
       setVariable Clock stout lockpick
       setVariable ClockQuant 2
       setVariable Carti <nothing>
       setVariable CartiQuant 2
       setVariable Cbard rag
       setVariable CbardQuant 2
       setVariable Ccleric wine
       setVariable CclericQuant 2
       setVariable Lmorik <nothing>
       setVariable LmorikQuant 2
       setVariable Lperf <nothing>
       setVariable LperfQuant 2
       setVariable Lgen shears
       setVariable LgenQuant 2
       setVariable Lbow <nothing>
       setVariable LbowQuant 2
       setVariable Lweap <nothing>
       setVariable LweapQuant 2
       setVariable Lwick <nothing>
       setVariable LwickQuant 2
       setVariable Lcloth <nothing>
       setVariable LclothQuant 2
       setVariable Lbard <nothing>
       setVariable LbardQuant 2
       setVariable Lwood <nothing>
       setVariable LwoodQuant 2
       setVariable Lgami white paper
       setVariable LgamiQuant 2
       setVariable TCweap <nothing>
       setVariable TCweapItemLoc in catalog
       setVariable TCweapQuant 2
       setVariable TCpedd <nothing>
       setVariable TCpeddQuant 2
       setVariable TCherb <nothing>
       setVariable TCherbQuant 2
       GOTO RANKREPORT

   ZOL.RANKADJ4:
       setVariable skillrange 100-149
       setVariable ADbard tambourine skin
       setVariable ADbardQuant 2
       setVariable ADodd fan
       setVariable ADoddQuant 2
       setVariable ADthread bobbin
       setVariable ADthreadQuant 2
       setVariable ADfash vest
       setVariable ADfashQuant 2
       setVariable ADweap sling
       setVariable ADweapQuant 2
       setVariable Ctann bodkin
       setVariable CtannQuant 2
       setVariable Cstit muff
       setVariable CstitQuant 2
       setVariable Cbath towel
       setVariable CbathItemLoc on stand
       setVariable CbathQuant 2
       setVariable Chab vest
       setVariable ChabQuant 2
       setVariable Ccobb tights
       setVariable CcobbQuant 2
       setVariable Calch large jar
       setVariable CalchQuant 2
       setVariable Cbota jadice flower
       setVariable CbotaQuant 1
       setVariable Cbloss <nothing>
       setVariable CblossQuant 2
       setVariable Cgen scabbard
       setVariable CgenQuant 2
       setVariable Cgem clasp
       setVariable CgemQuant 2
       setVariable Cweap arrows
       setVariable CweapQuant 2
       setVariable Carm reinforced greaves
       setVariable CarmQuant 2
       setVariable Clock stout lockpick
       setVariable ClockQuant 2
       setVariable Carti <nothing>
       setVariable CartiQuant 2
       setVariable Cbard ocarina
       setVariable CbardQuant 2
       setVariable Ccleric vial
       setVariable CclericQuant 2
       setVariable Lmorik buckskin pelt
       setVariable LmorikQuant 1
       setVariable Lperf <nothing>
       setVariable LperfQuant 0
       setVariable Lgen dice
       setVariable LgenQuant 1
       setVariable Lgami silver paper
       setVariable LgamiQuant 2
       setVariable Lcloth moufles
       setVariable LclothQuant 1
       setVariable Lwood <nothing>
       setVariable LwoodQuant 0
       setVariable Lbard ocarina
       setVariable LbardQuant 1
       setVariable Lwick wicker quiver
       setVariable LwickQuant 2
       setVariable Lweap <nothing>
       setVariable LweapQuant 2
       setVariable Lbow bolts
       setVariable LbowQuant 1
       setVariable TCweap <nothing>
       setVariable TCweapItemLoc in catalog
       setVariable TCweapQuant 1
       setVariable TCpedd knapsack
       setVariable TCpeddQuant 1
       setVariable TCherb cebi root
       setVariable TCherbQuant 1
       GOTO RANKREPORT

   ZOL.RANKADJ5:
       setVariable skillrange 150-199
       setVariable ADbard bodhran skin
       setVariable ADbardQuant 2
       setVariable ADodd fan
       setVariable ADoddQuant 2
       setVariable ADthread bobbin
       setVariable ADthreadQuant 2
       setVariable ADfash cape
       setVariable ADfashQuant 2
       setVariable ADweap short sword
       setVariable ADweapQuant 2
       setVariable Ctann scraper
       setVariable CtannQuant 2
       setVariable Cstit shawl
       setVariable CstitQuant 2
       setVariable Cbath towel
       setVariable CbathItemLoc on stand
       setVariable CbathQuant 2
       setVariable Chab kilt
       setVariable ChabQuant 2
       setVariable Ccobb jack boots
       setVariable CcobbQuant 2
       setVariable Calch large bowl
       setVariable CalchQuant 2
       setVariable Cbota georin salve
       setVariable CbotaQuant 2
       setVariable Cbloss wreath
       setVariable CblossQuant 1
       setVariable Cgen quiver
       setVariable CgenQuant 2
       setVariable Cgem engagement ring
       setVariable CgemQuant 2
       setVariable Cweap cutlass
       setVariable CweapQuant 2
       setVariable Carm mail gloves
       setVariable CarmQuant 2
       setVariable Clock <nothing>
       setVariable ClockQuant 2
       setVariable Carti talisman
       setVariable CartiQuant 1
       setVariable Cbard lyre
       setVariable CbardQuant 2
       setVariable Ccleric basin
       setVariable CclericQuant 2
       setVariable Lmorik deer skin
       setVariable LmorikQuant 2
       setVariable Lperf <nothing>
       setVariable LperfQuant 0
       setVariable Lgen dice
       setVariable LgenQuant 1
       setVariable Lgami leather case
       setVariable LgamiQuant 1
       setVariable Lcloth tunic
       setVariable LclothQuant 2
       setVariable Lwood <nothing>
       setVariable LwoodQuant 0
       setVariable Lbard ocarina
       setVariable LbardQuant 1
       setVariable Lwick wicker quiver
       setVariable LwickQuant 2
       setVariable Lweap <nothing>
       setVariable LweapQuant 2
       setVariable Lbow long arrows
       setVariable LbowQuant 1
       setVariable TCweap short sword
       setVariable TCweapItemLoc in catalog
       setVariable TCweapQuant 1
       setVariable TCpedd knapsack
       setVariable TCpeddQuant 2
       setVariable TCherb cebi root
       setVariable TCherbQuant 2
       GOTO RANKREPORT

   ZOL.RANKADJ6:
       setVariable skillrange 200-249
       setVariable ADbard itharr's
       setVariable ADbardQuant 2
       setVariable ADodd earring
       setVariable ADoddQuant 2
       setVariable ADthread pattern
       setVariable ADthreadQuant 2
       setVariable ADfash trousers
       setVariable ADfashQuant 2
       setVariable ADweap wooden shield
       setVariable ADweapQuant 2
       setVariable Ctann shears
       setVariable CtannQuant 2
       setVariable Cstit blouse
       setVariable CstitQuant 2
       setVariable Cbath bathrobe
       setVariable CbathItemLoc on counter
       setVariable CbathQuant 1
       setVariable Chab trousers
       setVariable ChabQuant 2
       setVariable Ccobb thigh boots
       setVariable CcobbQuant 2
       setVariable Calch large bowl
       setVariable CalchQuant 2
       setVariable Cbota riolur leaf
       setVariable CbotaQuant 2
       setVariable Cbloss corsage
       setVariable CblossQuant 2
       setVariable Cgen backpack
       setVariable CgenQuant 2
       setVariable Cgem coral hairpin
       setVariable CgemQuant 2
       setVariable Cweap rapier
       setVariable CweapQuant 2
       setVariable Carm chain aventail
       setVariable CarmQuant 2
       setVariable Clock <nothing>
       setVariable ClockQuant 2
       setVariable Carti talisman
       setVariable CartiQuant 2
       setVariable Cbard bodhran skin
       setVariable CbardQuant 2
       setVariable Ccleric coffer
       setVariable CclericQuant 2
       setVariable Lmorik sluagh hide
       setVariable LmorikQuant 2
       setVariable Lperf panther perfume
       setVariable LperfQuant 1
       setVariable Lgen dice
       setVariable LgenQuant 2
       setVariable Lbow leather quiver
       setVariable LbowQuant 2
       setVariable Lweap <nothing>
       setVariable LweapQuant 2
       setVariable Lwick mesh sack
       setVariable LwickQuant 2
       setVariable Lcloth doublet
       setVariable LclothQuant 2
       setVariable Lbard case
       setVariable LbardQuant 2
       setVariable Lwood applewood log
       setVariable LwoodQuant 1
       setVariable Lgami oak case
       setVariable LgamiQuant 2
       setVariable TCweap short sword
       setVariable TCweapItemLoc in catalog
       setVariable TCweapQuant 2
       setVariable TCpedd hood
       setVariable TCpeddQuant 2
       setVariable TCherb hulij elixir
       setVariable TCherbQuant 2
       GOTO RANKREPORT

   ZOL.RANKADJ7:
       setVariable skillrange 250-299
       setVariable ADbard silverlock
       setVariable ADbardQuant 2
       setVariable ADodd earring
       setVariable ADoddQuant 2
       setVariable ADthread pattern
       setVariable ADthreadQuant 2
       setVariable ADfash trousers
       setVariable ADfashQuant 2
       setVariable ADweap vest
       setVariable ADweapQuant 2
       setVariable Ctann pattern
       setVariable CtannQuant 2
       setVariable Cstit leggings
       setVariable CstitQuant 2
       setVariable Cbath bathrobe
       setVariable CbathItemLoc on counter
       setVariable CbathQuant 2
       setVariable Chab doublet
       setVariable ChabQuant 2
       setVariable Ccobb hip boots
       setVariable CcobbQuant 2
       setVariable Calch tincture jar
       setVariable CalchQuant 1
       setVariable Cbota ithor potion
       setVariable CbotaQuant 2
       setVariable Cbloss corsage
       setVariable CblossQuant 2
       setVariable Cgen backpack
       setVariable CgenQuant 2
       setVariable Cgem bloodstone hairpin
       setVariable CgemQuant 2
       setVariable Cweap war club
       setVariable CweapQuant 2
       setVariable Carm scale aventail
       setVariable CarmQuant 2
       setVariable Clock <nothing>
       setVariable ClockQuant 2
       setVariable Carti talisman
       setVariable CartiQuant 2
       setVariable Cbard refill
       setVariable CbardQuant 2
       setVariable Ccleric chasuble
       setVariable CclericQuant 2
       setVariable Lmorik cougar pelt
       setVariable LmorikQuant 2
       setVariable Lperf panther perfume
       setVariable LperfQuant 2
       setVariable Lgen dice
       setVariable LgenQuant 2
       setVariable Lbow leather quiver
       setVariable LbowQuant 2
       setVariable Lweap <nothing>
       setVariable LweapQuant 2
       setVariable Lwick mesh sack
       setVariable LwickQuant 2
       setVariable Lcloth jerkin
       setVariable LclothQuant 2
       setVariable Lbard mirliton
       setVariable LbardQuant 2
       setVariable Lwood hazelwood log
       setVariable LwoodQuant 2
       setVariable Lgami elm case
       setVariable LgamiQuant 2
       setVariable TCweap mace
       setVariable TCweapItemLoc in catalog
       setVariable TCweapQuant 2
       setVariable TCpedd hood
       setVariable TCpeddQuant 2
       setVariable TCherb hulij elixir
       setVariable TCherbQuant 2
       GOTO RANKREPORT

   ZOL.RANKADJ9:
   ZOL.RANKADJ10:
       ECHO ***********************************************
       ECHO ***        Sorry, but there isn't anything harder yet!
       ECHO ***********************************************
   ZOL.RANKADJ8:
       setVariable skillrange 300+
       setVariable ADbard peri'el's
       setVariable ADbardQuant 2
       setVariable ADodd purse
       setVariable ADoddQuant 2
       setVariable ADthread pattern
       setVariable ADthreadQuant 2
       setVariable ADfash frock
       setVariable ADfashQuant 2
       setVariable ADweap cuirass
       setVariable ADweapQuant 2
       setVariable Ctann potion
       setVariable CtannQuant 1
       setVariable Cstit shirt
       setVariable CstitQuant 2
       setVariable Cbath bath towel
       setVariable CbathItemLoc on rack
       setVariable CbathQuant 2
       setVariable Chab tabard
       setVariable ChabQuant 2
       setVariable Ccobb <nothing>
       setVariable CcobbQuant 2
       setVariable Calch tincture jar
       setVariable CalchQuant 2
       setVariable Cbota ithor potion
       setVariable CbotaQuant 2
       setVariable Cbloss bouquet
       setVariable CblossQuant 2
       setVariable Cgen stove
       setVariable CgenQuant 2
       setVariable Cgem bloodstone hairpin
       setVariable CgemQuant 2
       setVariable Cweap longsword
       setVariable CweapQuant 2
       setVariable Carm chain helm
       setVariable CarmQuant 2
       setVariable Clock <nothing>
       setVariable ClockQuant 2
       setVariable Carti talisman
       setVariable CartiQuant 2
       setVariable Cbard mandolin
       setVariable CbardQuant 2
       setVariable Ccleric habit
       setVariable CclericQuant 2
       setVariable Lmorik reaver pelt
       setVariable LmorikQuant 2
       setVariable Lperf woodsmoke cologne
       setVariable LperfQuant 2
       setVariable Lgen quiver
       setVariable LgenQuant 2
       setVariable Lbow short bow
       setVariable LbowQuant 2
       setVariable Lweap wolf-tail shield
       setVariable LweapQuant 1
       setVariable Lwick mesh sack
       setVariable LwickQuant 2
       setVariable Lcloth mantle
       setVariable LclothQuant 2
       setVariable Lbard keyed flute
       setVariable LbardQuant 2
       setVariable Lwood ironwood log
       setVariable LwoodQuant 2
       setVariable Lgami enameled case
       setVariable LgamiQuant 2
       setVariable TCweap hammer
       setVariable TCweapItemLoc in catalog
       setVariable TCweapQuant 1
       setVariable TCpedd scabbard
       setVariable TCpeddQuant 1
       setVariable TCherb hulij elixir
       setVariable TCherbQuant 3
       GOTO RANKREPORT

   ZOL.RANKADJ-1:
   ZOL.RANKADJ0:
       GOTO BEGGAR.MOD

   ZOL.BAGCHECK:
       matchre BAGWARN /%Ctann%|%Cstit%|%Chab%|%Cbath%|%Ccobb%|%Calch%|%Cbota%|%Cbloss%/
       matchre BAGWARN /%Cgen%|%Cgem%|%Cweap%|%Carm%|%Cbard%|%Clock%|%Ccleric%|%Carti%/
       matchre BAGWARN /%ADodd%|%ADbard%|%ADthread%|%ADfash%|%ADweap%|%TCweap%|%TCpedd%|%TCherb%/
       matchre BAGWARN /%Lmorik%|%Lperf%|%Lgen%|%Lbow%|%Lweap%|%Lwick%|%Lcloth%|%Lbard%|%Lwood%|%Lgami%/
       match ZOL.BAGCHECK2 You glance
       put look in my %container1
       put glance
       GOTO UniversalMatch

   ZOL.BAGCHECK2:
       matchre BAGWARN2 /%Ctann%|%Cstit%|%Chab%|%Cbath%|%Ccobb%|%Calch%|%Cbota%|%Cbloss%/
       matchre BAGWARN2 /%Cgen%|%Cgem%|%Cweap%|%Carm%|%Cbard%|%Clock%|%Ccleric%|%Carti%/
       matchre BAGWARN2 /%ADodd%|%ADbard%|%ADthread%|%ADfash%|%ADweap%|%TCweap%|%TCpedd%|%TCherb%/
       matchre BAGWARN /%Lmorik%|%Lperf%|%Lgen%|%Lbow%|%Lweap%|%Lwick%|%Lcloth%|%Lbard%|%Lwood%|%Lgami%/
       match KHRICHECK.%class% You glance
       put look in my %container2
       put glance
       GOTO UniversalMatch


          2. #####
          3. ZOLUREN STARTING POSITION #####
          4. ##### 
   CROSS:
       match CROSS.START.NE [The Crossing, Northeast Customs]
       match CROSS.START.E [The Crossing, Eastern Gate]
       match CROSS.START.W [The Crossing, Western Gate]
       match CROSS.START.BANK a picture of a smiling Dwarf
       match CROSS.START.PAWN [Cormyn's House of Heirlooms]
       match CROSS.START.TANN [Falken's Tannery, Supply Room]
       match CROSS.START.ALCH [Chizili's Alchemical Goods, Salesroom]
       match CROSS.START.BOTA [Mauriga's Botanicals, Salesroom]
       match CROSS.START.COBB [Talmai's Cobblery, Salesroom]
       match CROSS.START.BLOSS [Orielda's Blossoms, Front Room]
       match CROSS.START.WEAP [Milgrym's Weapons, Showroom]
       match CROSS.START.ARM [Tembeg's Armory, Salesroom]
       match CROSS.START.GEN [Berolt's Dry Goods, Showroom]
       match CROSS.START.GEM [Grisgonda's Gems and Jewels]
       match CROSS.START.STIT [Marcipur's Stitchery, Workshop]
       match CROSS.START.CLERIC [Brother Durantine's Shop]
       match CROSS.START.BARD [The True Bard D'Or, Fine Instruments]
       match CROSS.START.LOCK [Ragge's Locksmithing, Salesroom]
       match CROSS.START.ARTI [Herilo's Artifacts, Showroom]
       match CROSS.START.BATH [Orem's Bathhouse, Lobby]
       match CROSS.START.HAB [Brisson's Haberdashery, Sales Salon]
       match CROSS.START.GUARD Like most towns, this one spared every expense when decorating the office
       match JAILWAIT [Guard House, Jail Cell]
       match PLEA [Guard House, Chamber of Justice]
       match ZOL.BADLOCATION Obvious
       put look
       GOTO UniversalMatch

   ARTHE:
       match ARTHE.START.GATE [Arthe Dale, Village Gate]
       match ARTHE.START.WEAP [Bobba's Arms and Armor]
       match ARTHE.START.BARD [Barley Bulrush, Bardic Ballads]
       match ARTHE.START.ODD [Odds 'n Ends, Sales Room]
       match ARTHE.START.FASH [Phoebe's Fashions, Sales Room]
       match ARTHE.START.THREAD [Quellia's Thread Shop, Sales Room]
   TIGER:
       match TIGER.START.GATE A river-rock wall extends east to west, protecting the northern end
       match TIGER.START.WEAP Havor Foehammer
       match TIGER.START.PEDD Tiger Clan Home, Peddler's Wagon
       match TIGER.START.HERB the midwife Neesa
   LETH:
       match LETH.START.NW [Leth Deriel, Alder Bower Gate]
       match LETH.START.SW [Leth Deriel, Deobar Bower Gate]
       match LETH.START.TOWNCENTER [Leth Deriel, Sana'ati Dyaus Drui'tas]
       match LETH.START.MORIKAI [Morikai's, Salesroom]
       match LETH.START.PERFUME [Madame Orris' Perfumerie, Salon]
       match LETH.START.GENERAL [Alberdeen's Meats and Provisions, Front Room]
       match LETH.START.WOOD [Yerui's Woodcraft, Workshop]
       match LETH.START.CLOTH [Ongadine's Garb and Gear, Showroom]
       match LETH.START.BARD [Sinjian's Bardic Requisites, Sales Room]
       match LETH.START.WICKER [Blanca's Basketry and Wickerworks, Showroom]
       match LETH.START.WEAPON [Leth Deriel, Wooden Shack]
       match LETH.START.BOWYER [Huyelm's Trueflight Bow and Arrow Shop, Salesroom]
       match LETH.START.ORIGAMI [Origami Boutique]
       match ZOL.BADLOCATION Obvious
       put look
       GOTO UniversalMatch

   ZOL.BADLOCATION:
       put echocolumn /on
       waitfor EchoColumn
       ECHO *****************************************************************
       ECHO *** Not a valid starting location.
       ECHO *** Starting locations in Zoluren are:
       ECHO ***
       ECHO *** Crossing Inside Gates            Arthe Dale Inside Gate
       ECHO *** Crossing Outside Bank            Arthe Dale Arms and Armor
       ECHO *** Crossing Alchemist Shop          Arthe Dale Bard Shop
       ECHO *** Crossing Armory                  Arthe Dale Odds 'n Ends
       ECHO *** Crossing Artificer               Arthe Dale Fashion Shop
       ECHO *** Crossing Bard Shop               Arthe Dale Thread Shop
       ECHO *** Crossing Bath House              Tiger Clan Inside Gate
       ECHO *** Crossing Cleric Shop             Tiger Clan Forge
       ECHO *** Crossing Cobbler Shop            Tiger Clan Peddler's Wagon
       ECHO *** Crossing Florist                 Tiger Clan Midwife's Herbs
       ECHO *** Crossing Gem Shop                Leth Deriel Inside Gates
       ECHO *** Crossing General Store           Leth Deriel Town Center
       ECHO *** Crossing Haberdashery            Leth Deriel Morikai's Shop
       ECHO *** Crossing Herbalist               Leth Deriel Perfume Shop
       ECHO *** Crossing Locksmith               Leth Deriel General Store
       ECHO *** Crossing Pawn Shop               Leth Deriel Woodcraft Shop
       ECHO *** Crossing Stitchery               Leth Deriel Clothing Shop
       ECHO *** Crossing Tannery Supply Room     Leth Deriel Bard Shop
       ECHO *** Crossing Weapon Shop             Leth Deriel Wickerworks
       ECHO *** Crossing Guard House             Leth Deriel Weapon Shop
       ECHO *** Crossing Jail Cell               Leth Deriel Bowyer's Shop
       ECHO *** Crossing Chamber of Justice      Leth Deriel Origami Tent
       ECHO ***
       ECHO *****************************************************************
       put echocolumn /off
       waitfor EchoColumn
       GOTO END

   CROSS.START.TANN:
       counter set 291
       setVariable storecode Ctann
       setVariable startlocation %storecode%
       GOTO CROSS.%c

   CROSS.START.ALCH:
       counter set 41
       setVariable storecode Calch
       setVariable startlocation %storecode%
       match CROSS.%c Obvious
       put out
       GOTO UniversalMatch

   CROSS.START.BOTA:
       counter set 44
       setVariable storecode Cbota
       setVariable startlocation %storecode%
       match CROSS.%c Obvious
       put out
       GOTO UniversalMatch

   CROSS.START.COBB:
       counter set 279
       setVariable storecode Ccobb
       setVariable startlocation %storecode%
       match CROSS.%c Obvious
       put out
       GOTO UniversalMatch

   CROSS.START.BLOSS:
       counter set 59
       setVariable storecode Cbloss
       setVariable startlocation %storecode%
       match CROSS.%c Obvious
       put out
       GOTO UniversalMatch

   CROSS.START.WEAP:
       counter set 64
       setVariable storecode Cweap
       setVariable startlocation %storecode%
       match CROSS.%c Obvious
       put out
       GOTO UniversalMatch

   CROSS.START.ARM:
       counter set 66
       setVariable storecode Carm
       setVariable startlocation %storecode%
       match CROSS.%c Obvious
       put out
       GOTO UniversalMatch

   CROSS.START.GEN:
       counter set 69
       setVariable storecode Cgen
       setVariable startlocation %storecode%
       match CROSS.%c Obvious
       put out
       GOTO UniversalMatch

   CROSS.START.GEM:
       counter set 72
       setVariable storecode Cgem
       setVariable startlocation %storecode%
       match CROSS.%c Obvious
       put out
       GOTO UniversalMatch

   CROSS.START.STIT:
       counter set 75
       setVariable storecode Cstit
       setVariable startlocation %storecode%
       match CROSS.%c Obvious
       put out
       GOTO UniversalMatch

   CROSS.START.CLERIC:
       counter set 85
       setVariable storecode Ccleric
       setVariable startlocation %storecode%
       match CROSS.%c Obvious
       put out
       GOTO UniversalMatch

   CROSS.START.BARD:
       counter set 89
       setVariable storecode Cbard
       setVariable startlocation %storecode%
       match CROSS.%c Obvious
       put out
       GOTO UniversalMatch

   CROSS.START.BATH:
       counter set 93
       setVariable storecode Cbath
       setVariable startlocation %storecode%
       match CROSS.%c Obvious
       put out
       GOTO UniversalMatch

   CROSS.START.LOCK:
       counter set 98
       setVariable storecode Clock
       setVariable startlocation %storecode%
       match CROSS.%c Obvious
       put out
       GOTO UniversalMatch

   CROSS.START.ARTI:
       counter set 112
       setVariable storecode Carti
       setVariable startlocation %storecode%
       match CROSS.%c Obvious
       put out
       GOTO UniversalMatch

   CROSS.START.HAB:
       counter set 115
       setVariable storecode Chab
       setVariable startlocation %storecode%
       match CROSS.%c Obvious
       put out
       GOTO UniversalMatch

   TIGER.START.WEAP:
       counter set 18
       setVariable storecode TCweap
       setVariable startlocation %storecode%
       match TIGER.%c Obvious
       put out
       GOTO UniversalMatch

   TIGER.START.PEDD:
       counter set 22
       setVariable storecode TCpedd
       setVariable startlocation %storecode%
       match TIGER.%c Obvious
       put out
       GOTO UniversalMatch

   TIGER.START.HERB:
       counter set 26
       setVariable storecode TCherb
       setVariable startlocation %storecode%
       match TIGER.%c Obvious
       put out
       GOTO UniversalMatch

   CROSS.START.NE:
     CROSS.1:
       counter set 1
       put w
       GOTO TRAVEL
     CROSS.2:
       put s
       GOTO TRAVEL
     CROSS.3:
       put s
       GOTO TRAVEL
     CROSS.4:
       put go shop
       GOTO TRAVEL
     CROSS.5:
       GOTO CROSS.START.COBB

   CROSS.START.W:
     CROSS.6:
       counter set 6
       put e
       GOTO TRAVEL
     CROSS.7:
       put e
       GOTO TRAVEL
     CROSS.8:
       put e
       GOTO TRAVEL
     CROSS.9:
       put s
       GOTO TRAVEL
   CROSS.START.W2:
     CROSS.26:
     CROSS.10:
       counter set 10
       put s
       GOTO TRAVEL
     CROSS.11:
       put s
       GOTO TRAVEL
     CROSS.12:
       put s
       GOTO TRAVEL
     CROSS.13:
       put s
       GOTO TRAVEL
     CROSS.14:
       put go shop
       GOTO TRAVEL
     CROSS.15:
       GOTO CROSS.START.ARTI

   CROSS.START.E:
     CROSS.16:
       counter set 16
       put w
       GOTO TRAVEL
     CROSS.17:
       put w
       GOTO TRAVEL
     CROSS.18:
       put w
       GOTO TRAVEL
     CROSS.19:
       put w
       GOTO TRAVEL
   CROSS.START.BANK:
     CROSS.20:
       counter set 20
       put nw
       GOTO TRAVEL
     CROSS.21:
       put w
       GOTO TRAVEL
     CROSS.22:
       put go shop
       GOTO TRAVEL
     CROSS.23:
       GOTO CROSS.START.CLERIC

   CROSS.START.PAWN:
     CROSS.24:
       counter set 24
       put out
       GOTO TRAVEL
     CROSS.25:
       put w
       GOTO TRAVEL

   CROSS.START.GUARD:
     CROSS.27:
       counter set 27
       put out
       GOTO TRAVEL
     CROSS.28:
       put n
       GOTO TRAVEL
     CROSS.29:
       put e
       GOTO TRAVEL
     CROSS.30:
       put go haber
       GOTO TRAVEL
     CROSS.31:
       GOTO CROSS.START.HAB

   TIGER.START.GATE:
     TIGER.52:
       counter set 52
       put s
       GOTO TRAVEL
     TIGER.53:
       put go building
       GOTO TRAVEL
     TIGER.54:
       GOTO TIGER.START.WEAP


          2. #####
          3. CROSSING LEAVING SHOPS #####
          4. ##### 


   ALTLEAVE.CTANN:
   LEAVE.CTANN:
     CROSS.32:
       counter set 32
       put e
       GOTO TRAVEL
     CROSS.33:
       put e
       GOTO TRAVEL
     CROSS.34:
       put out
       GOTO TRAVEL
     CROSS.35:
       put e
       GOTO TRAVEL
     CROSS.36:
       put s
       GOTO TRAVEL
     CROSS.37:
       put e
       GOTO TRAVEL
     CROSS.38:
       put e
       GOTO TRAVEL
     CROSS.39:
       put e
       GOTO TRAVEL
     CROSS.40:
       setVariable storecode Calch
       put n
       GOTO TRAVEL
     CROSS.41:
       setVariable entrance shop
       setVariable item %Calch
       setVariable shopdiff %CalchQuant
       GOTO %MRS%

   LEAVE.CALCH:
     CROSS.42:
       counter set 42
       put e
       GOTO TRAVEL
     CROSS.43:
       setVariable storecode Cbota
       put s
       GOTO TRAVEL
     CROSS.44:
       setVariable entrance shop
       setVariable item %Cbota
       setVariable shopdiff %CbotaQuant
       GOTO %MRS%

   LEAVE.CBOTA:
       GOTO %LorM%.CBOTA.1
   LEAVE.CBOTA.1:
     CROSS.45:
       counter set 45
       put e
       GOTO TRAVEL
     CROSS.46:
       put e
       GOTO TRAVEL
     CROSS.47:
       put e
       GOTO TRAVEL
     CROSS.48:
       put n
       GOTO TRAVEL
     CROSS.49:
       put e
       GOTO TRAVEL
     CROSS.50:
     CROSS.153:
       counter set 153
       put n
       GOTO TRAVEL
     CROSS.154:
       put e
       GOTO TRAVEL
     CROSS.155:
       put go gate
       GOTO TRAVEL

   MOVEON.CBOTA.1:
       GOTO MOVEON.CBOTA.%MoveOnReason%

   MOVEON.CBOTA.EXP:
   MOVEON.CBOTA.LOC:
     CROSS.332:
       counter set 332
       put e
       GOTO TRAVEL
     CROSS.333:
       put s
       GOTO TRAVEL
     CROSS.334:
       put w
       GOTO TRAVEL
     CROSS.335:
       put s
       GOTO TRAVEL
     CROSS.336:
       GOTO LEAVE.CBLOSS

   MOVEON.CBOTA.HEALTH:
       GOTO MOVEON.CBOTA.HEALTH.%class%

   MOVEON.CBOTA.HEALTH.THIEF:
   MOVEON.CBOTA.HEALTH.NONTHIEF:
     CROSS.139:
       counter set 139
       put e
       GOTO TRAVEL
     CROSS.140:
       put go arch
       GOTO TRAVEL
     CROSS.141:
       GOTO CROSS.HOSPITAL.%class

   MOVEON.CBOTA.HEALTH.EMPATH:
     CROSS.328:
       counter set 328
       put n
       GOTO TRAVEL
     CROSS.329:
       setVariable SelfHealLoc Cbota
       GOTO EMPATH.HEALSELF

   CROSS.EMPATH.TO.RESUME.FROM.CBOTA:
     CROSS.330:
       counter set 330
       put s
       GOTO TRAVEL
     CROSS.331:
       GOTO MOVEON.CBOTA.HEALTH.NONTHIEF

   LEAVE.CCOBB:
       GOTO %LorM%.CCOBB.1
   MOVEON.CCOBB.EXP:
   MOVEON.CCOBB.LOC:
   LEAVE.CCOBB.1:
     CROSS.52:
       counter set 52
       put s
       GOTO TRAVEL
     CROSS.53:
       put w
       GOTO TRAVEL
     CROSS.54:
       put w
       GOTO TRAVEL
     CROSS.55:
       put w
       GOTO TRAVEL
     CROSS.56:
       put n
       GOTO TRAVEL
     CROSS.57:
       put w
       GOTO TRAVEL
     CROSS.58:
       setVariable storecode Cbloss
       put s
       GOTO TRAVEL
     CROSS.59:
       setVariable entrance shop
       setVariable item %Cbloss
       setVariable shopdiff %CblossQuant
       GOTO %MRS%

   MOVEON.CCOBB.1:
       GOTO MOVEON.CCOBB.%MoveOnReason%

   MOVEON.CCOBB.HEALTH:
     CROSS.142:
       counter set 142
       put n
       GOTO TRAVEL
     CROSS.143:
       put w
       GOTO TRAVEL
     CROSS.144:
       put s
       GOTO TRAVEL
     CROSS.145:
       put w
       GOTO TRAVEL
     CROSS.146:
       put w
       GOTO TRAVEL
     CROSS.147:
       put w
       GOTO TRAVEL
     CROSS.148:
       GOTO MOVEON.CBOTA.HEALTH.%class%

   LEAVE.CBLOSS:
     CROSS.60:
       counter set 60
       put s
       GOTO TRAVEL
     CROSS.61:
       put go bazaar
       GOTO TRAVEL
     CROSS.62:
       put go path
       GOTO TRAVEL
     CROSS.63:
       setVariable storecode Cweap
       put w
       GOTO TRAVEL
     CROSS.64:
       setVariable entrance shop
       setVariable item %Cweap
       setVariable shopdiff %CweapQuant
       GOTO %MRS%

   LEAVE.CWEAP:
     CROSS.65:
       counter set 65
       setVariable storecode Carm
       put w
       GOTO TRAVEL
     CROSS.66:
       setVariable entrance shop
       setVariable item %Carm
       setVariable shopdiff %CarmQuant
       GOTO %MRS%

   LEAVE.CARM:
     CROSS.67:
       counter set 67
       put se
       GOTO TRAVEL
     CROSS.68:
       setVariable storecode Cgen
       put s
       GOTO TRAVEL
     CROSS.69:
       setVariable entrance store
       setVariable item %Cgen
       setVariable shopdiff %CgenQuant
       GOTO %MRS%

   LEAVE.CGEN:
     CROSS.70:
       counter set 70
       put e
       GOTO TRAVEL
     CROSS.71:
       setVariable storecode Cgem
       put e
       GOTO TRAVEL
     CROSS.72:
       setVariable entrance shop
       setVariable item %Cgem
       setVariable shopdiff %CgemQuant
       GOTO %MRS%

   LEAVE.CGEM:
     CROSS.73:
       counter set 73
       put n
       GOTO TRAVEL
     CROSS.74:
       setVariable storecode Cstit
       put e
       GOTO TRAVEL
     CROSS.75:
       setVariable entrance stit
       setVariable item %Cstit
       setVariable shopdiff %CstitQuant
       GOTO %MRS%

   LEAVE.CSTIT:
     CROSS.76:
       counter set 76
       put e
       GOTO TRAVEL
     CROSS.77:
       put s
       GOTO TRAVEL
     CROSS.78:
       put s
       GOTO TRAVEL
     CROSS.79:
       put s
       GOTO TRAVEL
     CROSS.80:
       put w
       GOTO TRAVEL
     CROSS.81:
       put w
       GOTO TRAVEL
     CROSS.82:
       put w
       GOTO TRAVEL
     CROSS.83:
       put nw
       GOTO TRAVEL
     CROSS.84:
       setVariable storecode Ccleric
       put w
       GOTO TRAVEL
     CROSS.85:
       setVariable entrance shop
       setVariable item %Ccleric
       setVariable shopdiff %CclericQuant
       GOTO %MRS%

   LEAVE.CCLERIC:
     CROSS.86:
       counter set 86
       put w
       GOTO TRAVEL
     CROSS.87:
       put n
       GOTO TRAVEL
     CROSS.88:
       setVariable storecode Cbard
       put n
       GOTO TRAVEL
     CROSS.89:
       setVariable entrance shop
       setVariable item %Cbard
       setVariable shopdiff %CbardQuant
       GOTO %MRS%

   LEAVE.CBARD:
     CROSS.90:
       counter set 90
       put s
       GOTO TRAVEL
     CROSS.91:
       put s
       GOTO TRAVEL
     CROSS.92:
       setVariable storecode Cbath
       put w
       GOTO TRAVEL
     CROSS.93:
       setVariable entrance bath
       setVariable item %Cbath
       setVariable itemlocation %CbathItemLoc
       setVariable shopdiff %CbathQuant
       GOTO %MRS%

   LEAVE.CBATH:
     CROSS.94:
       counter set 94
       put w
       GOTO TRAVEL
     CROSS.95:
       put w
       GOTO TRAVEL
     CROSS.96:
       put n
       GOTO TRAVEL
     CROSS.97:
       setVariable storecode Clock
       put n
       GOTO TRAVEL
     CROSS.98:
       setVariable entrance door
       setVariable item %Clock
       setVariable shopdiff %ClockQuant
       GOTO %MRS%

   LEAVE.CLOCK:
     CROSS.99:
       counter set 99
       put n
       GOTO TRAVEL
     CROSS.100:
       put e
       GOTO TRAVEL
     CROSS.101:
       put n
       GOTO TRAVEL
     CROSS.102:
       put n
       GOTO TRAVEL
     CROSS.103:
       put n
       GOTO TRAVEL
     CROSS.104:
       put w
       GOTO TRAVEL
     CROSS.105:
       put go bridge
       GOTO TRAVEL
     CROSS.106:
       put w
       GOTO TRAVEL
     CROSS.107:
       put s
       GOTO TRAVEL
     CROSS.108:
       put s
       GOTO TRAVEL
     CROSS.109:
       put s
       GOTO TRAVEL
     CROSS.110:
       put s
       GOTO TRAVEL
     CROSS.111:
       put s
       setVariable storecode Carti
       GOTO TRAVEL
     CROSS.112:
       setVariable entrance shop
       setVariable item %Carti
       setVariable shopdiff %CartiQuant
       GOTO %MRS%

   LEAVE.CARTI:
     CROSS.113:
       counter set 113
       put s
       GOTO TRAVEL
     CROSS.114:
       setVariable storecode Chab
       put e
       GOTO TRAVEL
     CROSS.115:
       setVariable entrance haber
       setVariable item %Chab
       setVariable shopdiff %ChabQuant
       GOTO %MRS%

   LEAVE.CHAB:
       GOTO %LorM%.CHAB.1
   LEAVE.CHAB.1:
     CROSS.116:
       counter set 116
       put n
       GOTO TRAVEL
     CROSS.117:
       put n
       GOTO TRAVEL
     CROSS.118:
       put n
       GOTO TRAVEL
     CROSS.119:
       put ne
       GOTO TRAVEL
     CROSS.120:
       put nw
       GOTO TRAVEL
     CROSS.121:
       put n
       GOTO TRAVEL
     CROSS.122:
       GOTO LEAVE.CHAB.CLAN.%clanoption%

   LEAVE.CHAB.CLAN.YES:
       put echo %TCherb %TCpedd %TCweap
       put glance
       match LEAVE.CHAB.CLAN.NO nothing nothing nothing
       match LEAVE.CHAB.CLAN.YES.2 You glance
       GOTO UniversalMatch

   LEAVE.CHAB.CLAN.NO:
       setVariable clanoption NO
       GOTO LEAVE.CHAB.CLAN.NO.1
       
   LEAVE.CHAB.CLAN.YES.2:
     CROSS.123:
       counter set 123
       put w
       GOTO TRAVEL
     CROSS.124:
       put w
       GOTO TRAVEL
     CROSS.125:
       put w
       GOTO TRAVEL
     CROSS.126:
       put w
       GOTO TRAVEL
     CROSS.127:
     CROSS.292:
       counter set 292
       put go gate
       GOTO TRAVEL

     CROSS.293:
     TIGER.1:
       counter set 1
       setVariable citycode TIGER
       put go path
       GOTO TRAVEL
     TIGER.2:
       put w
       GOTO TRAVEL
     TIGER.3:
       put w
       GOTO TRAVEL
     TIGER.4:
       put nw
       GOTO TRAVEL
     TIGER.5:
       put w
       GOTO TRAVEL
     TIGER.6:
       put w
       GOTO TRAVEL
     TIGER.7:
       put nw
       GOTO TRAVEL
     TIGER.8:
       put w
       GOTO TRAVEL
     TIGER.9:
       put w
       GOTO TRAVEL
     TIGER.10:
       put sw
       GOTO TRAVEL
     TIGER.11:
       put w
       GOTO TRAVEL
     TIGER.12:
       put w
       GOTO TRAVEL
     TIGER.13:
       put nw
       GOTO TRAVEL
     TIGER.14:
       put nw
       GOTO TRAVEL
     TIGER.15:
       put w
       GOTO TRAVEL
     TIGER.16:
       put go gate
       GOTO TRAVEL
     TIGER.17:
       put s
       setVariable storecode TCweap
       GOTO TRAVEL
     TIGER.18:
       setVariable entrance building
       setVariable item %TCweap
       setVariable itemlocation %TCweapItemLoc
       setVariable shopdiff %TCweapQuant
       GOTO %MRS%

   LEAVE.TCWEAP:
     TIGER.19:
       counter set 19
       put se
       GOTO TRAVEL
     TIGER.20:
       put s
       GOTO TRAVEL
     TIGER.21:
       put sw
       GOTO TRAVEL
     TIGER.22:
     TIGER.57:
       counter set 57
       put go wagon
       setVariable storecode TCpedd
       GOTO TRAVEL
     TIGER.58:
       setVariable entrance wagon
       setVariable item %TCpedd
       setVariable shopdiff %TCpeddQuant
       GOTO %MRS%

   ALTLEAVE.TCPEDD:
       setVariable starthold %startlocation
       setVariable startlocation placeholder
     TIGER.55:
       counter set 55
       put out
       GOTO TRAVEL
     TIGER.56:
       setVariable startlocation %starthold
   LEAVE.TCPEDD:
     TIGER.23:
       counter set 23
       match ALTLEAVE.TCPEDD referring
       put go green
       GOTO TRAVEL
     TIGER.24:
       put nw
       GOTO TRAVEL
     TIGER.25:
       put go toft
       setVariable storecode TCherb
       GOTO TRAVEL
     TIGER.26:
       setVariable entrance cottage
       setVariable item %TCherb
       setVariable shopdiff %TCherbQuant
       GOTO %MRS%

   LEAVE.TCHERB:
       setVariable starthold %startlocation
       setVariable startlocation placeholder
     TIGER.27:
       counter set 27
       put go path
       GOTO TRAVEL
     TIGER.28:
       put se
       GOTO TRAVEL
     TIGER.29:
       put n
       GOTO TRAVEL
     TIGER.30:
       put ne
       GOTO TRAVEL
     TIGER.31:
       put n
       GOTO TRAVEL
     TIGER.32:
       put nw
       GOTO TRAVEL
     TIGER.33:
       put n
       GOTO TRAVEL
     TIGER.34:
       setVariable startlocation %starthold
       put go gate
       GOTO TRAVEL
     TIGER.35:
       put e
       GOTO TRAVEL
     TIGER.36:
       put se
       GOTO TRAVEL
     TIGER.37:
       put se
       GOTO TRAVEL
     TIGER.38:
       put e
       GOTO TRAVEL
     TIGER.39:
       put e
       GOTO TRAVEL
     TIGER.40:
       put ne
       GOTO TRAVEL
     TIGER.41:
       put e
       GOTO TRAVEL
     TIGER.42:
       put e
       GOTO TRAVEL
     TIGER.43:
       put se
       GOTO TRAVEL
     TIGER.44:
       put e
       GOTO TRAVEL
     TIGER.45:
       put e
       GOTO TRAVEL
     TIGER.46:
       put se
       GOTO TRAVEL
     TIGER.47:
       put e
       GOTO TRAVEL
     TIGER.48:
       put e
       GOTO TRAVEL
     TIGER.49:
       put go path
       GOTO TRAVEL
     TIGER.50:
       put go gate
       GOTO TRAVEL
     TIGER.51:
     CROSS.128:
       counter set 129
       setVariable citycode CROSS
     CROSS.129:
       put e
       GOTO TRAVEL
     CROSS.130:
       put e
       GOTO TRAVEL
     CROSS.131:
     CROSS.280:
       counter set 280
       put e
       GOTO TRAVEL
     CROSS.281:
       put e
       GOTO TRAVEL
   LEAVE.CHAB.CLAN.NO.1:
     CROSS.282:
       counter set 282
       put e
       GOTO TRAVEL
     CROSS.283:
       put e
       GOTO TRAVEL
     CROSS.284:
       put e
       GOTO TRAVEL
     CROSS.285:
       put n
       GOTO TRAVEL
     CROSS.286:
       put n
       GOTO TRAVEL
     CROSS.287:
       put w
       GOTO TRAVEL
     CROSS.288:
       put go shed
       GOTO TRAVEL
     CROSS.289:
       put w
       GOTO TRAVEL
     CROSS.290:
       put w
       setVariable storecode Ctann
       GOTO TRAVEL
     CROSS.291:
       setVariable entrance shed
       setVariable item %Ctann
       setVariable shopdiff %CtannQuant
       GOTO %MRS%

   MOVEON.CHAB.1:
     CROSS.132:
       counter set 132
       put n
       GOTO TRAVEL
     CROSS.133:
       put n
       GOTO TRAVEL
     CROSS.134:
       put n
       GOTO TRAVEL
     CROSS.135:
       put ne
       GOTO TRAVEL
     CROSS.136:
       setVariable storecode Cpawn
       put nw
       GOTO TRAVEL
     CROSS.137:
       setVariable sellorbin SELLGET
       put go shop
       GOTO TRAVEL
     CROSS.138:
       match CROSS.PAWN.TO.EMPATH hand which appears completely useless
       matchre CROSS.PAWN /mind lock|nearly locked/
       match LEAVE.CPAWN.%class Time development
       put health
       put skill steal
       GOTO UniversalMatch

   LEAVE.CPAWN.THIEF:
       GOTO CROSSLETH.%lethcross

   CROSSLETH.LETH:
   LEAVE.CPAWN.EMPATH:
   LEAVE.CPAWN.NONTHIEF:
       GOTO CROSS.PAWN

   CROSSLETH.CROSS:
       setVariable starthold %startlocation
       setVariable startlocation placeholder
       setVariable citycode LETH
       setVariable MRS shopcheck
       setVariable npcoption yes
     LETH.380:
       counter set 380
       put o
       GOTO TRAVEL
     LETH.381:
       put se
       GOTO TRAVEL
     LETH.382:
       put sw
       GOTO TRAVEL
     LETH.383:
       put s
       GOTO TRAVEL
     LETH.384:
       put s
       GOTO TRAVEL
     LETH.385:
       put s
       GOTO TRAVEL
     LETH.386:
       put s
       GOTO TRAVEL
     LETH.387:
       put e
       GOTO TRAVEL
     LETH.388:
       put e
       GOTO TRAVEL
     LETH.389:
       put e
       GOTO TRAVEL
     LETH.390:
       put se
       GOTO TRAVEL
     LETH.391:
       put e
       GOTO TRAVEL
     LETH.392:
       put go warehouse
       GOTO TRAVEL
     LETH.393:
       put s
       GOTO TRAVEL
     LETH.394:
       put go trap
       GOTO TRAVEL
     LETH.395:
       put go river
       GOTO TRAVEL
     LETH.396:
       put w
       GOTO TRAVEL
     LETH.397:
       put n
       GOTO TRAVEL
     LETH.398:
       put go panel
       GOTO TRAVEL
     LETH.399:
       put climb step
       GOTO TRAVEL
     LETH.400:
       put s
       GOTO TRAVEL
     LETH.401:
       put s
       GOTO TRAVEL
     LETH.402:
       put sw
       GOTO TRAVEL
     LETH.403:
       put sw
       GOTO TRAVEL
     LETH.404:
       put d
       GOTO TRAVEL
     LETH.405:
       put s
       GOTO TRAVEL
     LETH.406:
       put sw
       GOTO TRAVEL
     LETH.407:
       put sw
       GOTO TRAVEL
     LETH.408:
       put s
       GOTO TRAVEL
     LETH.409:
       put u
       GOTO TRAVEL
     LETH.410:
       put sw
       GOTO TRAVEL
     LETH.411:
       put w
       GOTO TRAVEL
     LETH.412:
       put sw
       GOTO TRAVEL
     LETH.413:
       put climb ladder
       GOTO TRAVEL
     LETH.414:
       put go gap
       GOTO TRAVEL
     LETH.415:
       put s
       GOTO TRAVEL
     LETH.416:
       put sw
       GOTO TRAVEL
     LETH.417:
       put sw
       GOTO TRAVEL
     LETH.418:
       put sw
       GOTO TRAVEL
     LETH.419:
       put sw
       GOTO TRAVEL
     LETH.420:
       put s
       GOTO TRAVEL
     LETH.421:
       put se
       GOTO TRAVEL
     LETH.422:
       put se
       GOTO TRAVEL
     LETH.423:
       put s
       GOTO TRAVEL
     LETH.424:
       put s
       GOTO TRAVEL
     LETH.425:
       put sw
       GOTO TRAVEL
     LETH.426:
       put sw
       GOTO TRAVEL
     LETH.427:
       put sw
       GOTO TRAVEL
     LETH.428:
       put s
       GOTO TRAVEL
     LETH.429:
       put se
       GOTO TRAVEL
     LETH.430:
       put sw
       GOTO TRAVEL
     LETH.431:
       put s
       GOTO TRAVEL
     LETH.432:
       put sw
       GOTO TRAVEL
     LETH.433:
       put s
       GOTO TRAVEL
     LETH.434:
       put s
       GOTO TRAVEL
     LETH.435:
       put se
       GOTO TRAVEL
     LETH.436:
       put se
       GOTO TRAVEL
     LETH.437:
       put sw
       GOTO TRAVEL
     LETH.438:
       put sw
       GOTO TRAVEL
     LETH.439:
       put sw
       GOTO TRAVEL
     LETH.440:
       put sw
       GOTO TRAVEL
     LETH.441:
       put s
       GOTO TRAVEL
     LETH.442:
       put sw
       GOTO TRAVEL
     LETH.443:
       put se
       GOTO TRAVEL
     LETH.444:
       put se
       GOTO TRAVEL
     LETH.445:
       put s
       GOTO TRAVEL
     LETH.446:
       put s
       GOTO TRAVEL
     LETH.447:
       put se
       GOTO TRAVEL
     LETH.448:
       put se
       GOTO TRAVEL
     LETH.449:
       put s
       GOTO TRAVEL
     LETH.450:
       put s
       GOTO TRAVEL
     LETH.451:
       put se
       GOTO TRAVEL
     LETH.452:
       put go gate
       GOTO TRAVEL
     LETH.453:
       GOTO LETH.START.NW

   CROSS.PAWN.TO.HOSPITAL:
       GOTO CROSS.PAWN.TO.HOSPITAL.%class%
   CROSS.PAWN.TO.HOSPITAL.THIEF:
   CROSS.PAWN.TO.HOSPITAL.NONTHIEF:
     CROSS.294:
       counter set 294
       put out
       GOTO TRAVEL
     CROSS.295:
       put n
       GOTO TRAVEL
     CROSS.296:
       put e
       GOTO TRAVEL
     CROSS.297:
       put e
       GOTO TRAVEL
     CROSS.298:
       put e
       GOTO TRAVEL
     CROSS.299:
       put e
       GOTO TRAVEL
     CROSS.300:
       put e
       GOTO TRAVEL
     CROSS.301:
       put e
       GOTO TRAVEL
     CROSS.302:
       put e
       GOTO TRAVEL
     CROSS.303:
       put n
       GOTO TRAVEL
     CROSS.304:
       put go arch
       GOTO TRAVEL
     CROSS.305:
       GOTO CROSS.HOSPITAL

   CROSS.HOSPITAL.TO.RESUME:
   CROSS.HOSPITAL.EMPATH:
     CROSS.306:
       counter set 306
       put go arch
       GOTO TRAVEL
     CROSS.307:
       put s
       GOTO TRAVEL
     CROSS.308:
       put w
       GOTO TRAVEL
     CROSS.309:
       put w
       GOTO TRAVEL
     CROSS.310:
       put w
       GOTO TRAVEL
     CROSS.311:
       put w
       GOTO TRAVEL
     CROSS.312:
       put w
       GOTO TRAVEL
     CROSS.313:
       put w
       GOTO TRAVEL
     CROSS.314:
       put go bridge
       GOTO TRAVEL
     CROSS.315:
       put w
       GOTO TRAVEL
     CROSS.316:
       put s
       GOTO TRAVEL
     CROSS.327:
     CROSS.317:
       put s
       GOTO TRAVEL
     CROSS.318:
       put s
       GOTO TRAVEL
     CROSS.319:
       put s
       GOTO TRAVEL
     CROSS.320:
       put s
       GOTO TRAVEL
     CROSS.321:
       put s
       GOTO TRAVEL
     CROSS.322:
       put s
       GOTO TRAVEL
     CROSS.323:
       GOTO CROSS.HOSPITAL.%class

   CROSS.HOSPITAL.THIEF:
   CROSS.HOSPITAL.NONTHIEF:
       put join list
       match CROSS.HOSPITAL.TO.RESUME crosses your name off the waiting list.
       GOTO UniversalMatch

   CROSS.PAWN.TO.HOSPITAL.EMPATH:
     CROSS.324:
       counter set 324
       put out
       GOTO TRAVEL
     CROSS.325:
       setVariable SelfHealLoc Cpawn
       GOTO EMPATH.HEALSELF

   CROSS.EMPATH.TO.RESUME.FROM.CPAWN:
     CROSS.326:
       counter set 326
       put w
       GOTO TRAVEL
          2. #####
          3. ARTHE DALE STARTING POSITION #####
          4. ##### 


   ARTHE.START.WEAP:
       counter set 14
       setVariable storecode ADweap
       setVariable startlocation %storecode%
       match %citycode%.%c Obvious
       put out
       GOTO UniversalMatch

   ARTHE.START.BARD:
       counter set 16
       setVariable storecode ADbard
       setVariable startlocation %storecode%
       match %citycode%.%c Obvious
       put out
       GOTO UniversalMatch

   ARTHE.START.ODD:
       counter set 18
       setVariable storecode ADodd
       setVariable startlocation %storecode%
       match %citycode%.%c Obvious
       put out
       GOTO UniversalMatch

   ARTHE.START.FASH:
       counter set 20
       setVariable storecode ADfash
       setVariable startlocation %storecode%
       match %citycode%.%c Obvious
       put out
       GOTO UniversalMatch

   ARTHE.START.THREAD:
       counter set 21
       setVariable storecode ADthread
       setVariable startlocation %storecode%
       match %citycode%.%c Obvious
       put out
       GOTO UniversalMatch

     CROSS.156:
       counter set 156
       put n
       GOTO TRAVEL
     CROSS.157:
       put n
       GOTO TRAVEL
     CROSS.158:
       put n
       GOTO TRAVEL
     CROSS.159:
       put ne
       GOTO TRAVEL
     CROSS.160:
       put ne
       GOTO TRAVEL
     CROSS.161:
       put n
       GOTO TRAVEL
     CROSS.162:
       put nw
       GOTO TRAVEL
     CROSS.163:
       put nw
       GOTO TRAVEL
     CROSS.164:
       put n
       GOTO TRAVEL
     CROSS.165:
       put n
       GOTO TRAVEL
     CROSS.166:
       put ne
       GOTO TRAVEL
     CROSS.167:
       put nw
       GOTO TRAVEL
     CROSS.168:
       put n
       GOTO TRAVEL
     CROSS.169:
       put n
       GOTO TRAVEL

     ARTHE.1:
     CROSS.170:
       counter set 1
       setVariable citycode ARTHE
       put e
       GOTO TRAVEL
     ARTHE.2:
       put down
       GOTO TRAVEL
     ARTHE.3:
       put down
       GOTO TRAVEL
     ARTHE.4:
       put go gate
       GOTO TRAVEL

   ARTHE.START.GATE:
     ARTHE.5:
       counter set 5
       put n
       GOTO TRAVEL
     ARTHE.6:
       put n
       GOTO TRAVEL
     ARTHE.7:
       put n
       GOTO TRAVEL
     ARTHE.8:
       put n
       GOTO TRAVEL
     ARTHE.9:
       put e
       GOTO TRAVEL
     ARTHE.10:
       put e
       GOTO TRAVEL
     ARTHE.11:
       put e
       GOTO TRAVEL
     ARTHE.12:
       put ne
       GOTO TRAVEL
     ARTHE.13:
       setVariable storecode ADweap
       put go entry
       GOTO TRAVEL
     ARTHE.14:
       setVariable entrance entry
       setVariable item %ADweap
       setVariable shopdiff %ADweapQuant
       GOTO %MRS%


          2. #####
          3. ARTHE DALE LEAVING SHOPS #####
          4. ##### 


   ALTLEAVE.ADWEAP:
       setVariable starthold %startlocation
       setVariable startlocation placeholder
     ARTHE.32:
       counter set 32
       put out
       GOTO TRAVEL
     ARTHE.33:
       setVariable startlocation %starthold
   LEAVE.ADweap:
     ARTHE.15:
       put sw
       counter set 15
       setVariable storecode ADbard
       match ALTLEAVE.ADWEAP You can't go
       GOTO TRAVEL
     ARTHE.16:
       setVariable entrance building
       setVariable item %ADbard
       setVariable shopdiff %ADbardQuant
       GOTO %MRS%

   LEAVE.ADBARD:
     ARTHE.17:
       put w
       counter set 17
       setVariable storecode ADodd
       GOTO TRAVEL
     ARTHE.18:
       setVariable entrance door
       setVariable item %ADodd
       setVariable shopdiff %ADoddQuant
       GOTO %MRS%

   LEAVE.ADODD:
     ARTHE.19:
       put w
       counter set 19
       setVariable storecode ADthread
       GOTO TRAVEL
     ARTHE.20:
       setVariable entrance door
       setVariable item %ADthread
       setVariable shopdiff %ADthreadQuant
       GOTO %MRS%

   LEAVE.ADTHREAD:
     ARTHE.21:
       setVariable entrance cottage
       setVariable item %ADfash
       setVariable shopdiff %ADfashQuant
       setVariable storecode ADfash
       GOTO %MRS%

   LEAVE.ADFASH:
     ARTHE.22:
       counter set 22
       put w
       GOTO TRAVEL
     ARTHE.23:
       put s
       GOTO TRAVEL
     ARTHE.24:
       put s
       GOTO TRAVEL
     ARTHE.25:
       put s
       GOTO TRAVEL
     ARTHE.26:
       put s
       GOTO TRAVEL
     ARTHE.27:
       put go gate
       GOTO TRAVEL
     ARTHE.28:
       put up
       GOTO TRAVEL
     ARTHE.29:
       put up
       GOTO TRAVEL
     ARTHE.30:
       put w
       GOTO TRAVEL
     ARTHE.31:
     CROSS.171:
       counter set 171
       setVariable citycode CROSS
       put s
       GOTO TRAVEL
     CROSS.172:
       put s
       GOTO TRAVEL
     CROSS.173:
       put se
       GOTO TRAVEL
     CROSS.174:
       put sw
       GOTO TRAVEL
     CROSS.175:
       put s
       GOTO TRAVEL
     CROSS.176:
       put s
       GOTO TRAVEL
     CROSS.177:
       put se
       GOTO TRAVEL
     CROSS.178:
       put se
       GOTO TRAVEL
     CROSS.179:
       put s
       GOTO TRAVEL
     CROSS.180:
       put sw
       GOTO TRAVEL
     CROSS.181:
       put sw
       GOTO TRAVEL
     CROSS.182:
       put s
       GOTO TRAVEL
     CROSS.183:
       put s
       GOTO TRAVEL
     CROSS.184:
       put s
       GOTO TRAVEL
     CROSS.185:
       put go gate
       GOTO TRAVEL
     CROSS.186:
     CROSS.276:
       counter set 276
       put w
       GOTO TRAVEL
     CROSS.277:
       put s
       GOTO TRAVEL
     CROSS.278:
       put s
       setVariable storecode Ccobb
       GOTO TRAVEL
     CROSS.279:
       setVariable entrance shop
       setVariable item %Ccobb
       setVariable shopdiff %CcobbQuant
       GOTO %MRS%


          2. #####
          3. LETH DERIEL STARTING POSITION #####
          4. ##### 


   LETH.START.MORIKAI:
       counter set 3
       setVariable storecode Lmorik
       setVariable startlocation %storecode%
       match LETH.%c Obvious
       put out
       GOTO UniversalMatch

   LETH.START.PERFUME:
       counter set 26
       setVariable storecode Lperf
       setVariable startlocation %storecode%
       match LETH.%c Obvious
       put out
       GOTO UniversalMatch

   LETH.START.GENERAL:
       counter set 33
       setVariable storecode Lgen
       setVariable startlocation %storecode%
       match LETH.%c Obvious
       put out
       GOTO UniversalMatch

   LETH.START.BOWYER:
       counter set 89
       setVariable storecode Lbow
       setVariable startlocation %storecode%
       match LETH.%c Obvious
       put out
       GOTO UniversalMatch

   LETH.START.WEAPON:
       counter set 80
       setVariable storecode Lweap
       setVariable startlocation %storecode%
       GOTO LETH.%c

   LETH.START.WICKER:
       counter set 74
       setVariable storecode Lwick
       setVariable startlocation %storecode%
       match LETH.%c Obvious
       put out
       GOTO UniversalMatch

   LETH.START.CLOTH:
       counter set 64
       setVariable storecode Lcloth
       setVariable startlocation %storecode%
       match LETH.%c Obvious
       put out
       GOTO UniversalMatch

   LETH.START.BARD:
       counter set 71
       setVariable storecode Lbard
       setVariable startlocation %storecode%
       match LETH.%c Obvious
       put out
       GOTO UniversalMatch

   LETH.START.WOOD:
       counter set 67
       setVariable storecode Lwood
       setVariable startlocation %storecode%
       match LETH.%c Obvious
       put go door
       GOTO UniversalMatch

   LETH.START.ORIGAMI:
       counter set 42
       setVariable storecode Lgami
       setVariable startlocation %storecode%
       match LETH.%c Obvious
       put out
       GOTO UniversalMatch

   LETH.START.NW:
     LETH.1:
       counter set 1
       put se
       GOTO TRAVEL
     LETH.2:
     LETH.17:
       counter set 2
       setVariable storecode Lmorik
       put sw
       GOTO TRAVEL
     LETH.3:
       setVariable startlocation %storecode%
     LETH.95:
       setVariable entrance hut
       setVariable item %Lmorik
       setVariable shopdiff %LmorikQuant
       GOTO %MRS%

   LETH.START.SW:
     LETH.4:
       counter set 4
       put ne
       GOTO TRAVEL
     LETH.5:
       put ne
       GOTO TRAVEL
     LETH.6:
       put ne
       GOTO TRAVEL
     LETH.7:
       put ne
       GOTO TRAVEL
     LETH.8:
       put ne
       GOTO TRAVEL
     LETH.9:
       put ne
       GOTO TRAVEL
     LETH.10:
       put ne
       GOTO TRAVEL
   LETH.START.TOWNCENTER:
     LETH.11:
       counter set 11
       put nw
       GOTO TRAVEL
     LETH.12:
       put nw
       GOTO TRAVEL
     LETH.13:
       put nw
       GOTO TRAVEL
     LETH.14:
       put nw
       GOTO TRAVEL
     LETH.15:
       put nw
       GOTO TRAVEL
     LETH.16:
       put nw
       GOTO TRAVEL


          2. #####
          3. LETH DERIEL LEAVING SHOPS #####
          4. ##### 


   LEAVE.LMORIK:
       GOTO %LorM%.LMORIK.1
   LEAVE.LMORIK.1:
     LETH.18:
       counter set 18
       put ne
       GOTO TRAVEL
     LETH.19:
       put se
       GOTO TRAVEL
     LETH.20:
       put se
       GOTO TRAVEL
     LETH.21:
       put se
       GOTO TRAVEL
     LETH.22:
       put se
       GOTO TRAVEL
     LETH.23:
       put se
       GOTO TRAVEL
     LETH.24:
       put ne
       GOTO TRAVEL
     LETH.25:
       setVariable storecode Lperf
       put go path
       GOTO TRAVEL
     LETH.26:
       setVariable entrance shack
       setVariable item %Lperf
       setVariable shopdiff %LperfQuant
       GOTO %MRS%

   LEAVE.LPERF:
     LETH.27:
       counter set 27
       put go path
       GOTO TRAVEL
     LETH.28:
       put se
       GOTO TRAVEL
     LETH.29:
       put s
       GOTO TRAVEL
     LETH.30:
       put e
       GOTO TRAVEL
     LETH.31:
       put e
       GOTO TRAVEL
     LETH.32:
       setVariable storecode Lgen
       put e
       GOTO TRAVEL
     LETH.33:
       setVariable entrance stump
       setVariable item %Lgen
       setVariable shopdiff %LgenQuant
       GOTO %MRS%

   LEAVE.LGEN:
     LETH.34:
       counter set 34
       put w
       GOTO TRAVEL
     LETH.35:
       put w
       GOTO TRAVEL
     LETH.36:
       put w
       GOTO TRAVEL
     LETH.37:
       put w
       GOTO TRAVEL
     LETH.38:
       put w
       GOTO TRAVEL
     LETH.39:
       put w
       GOTO TRAVEL
     LETH.40:
       put w
       GOTO TRAVEL
     LETH.41:
       setVariable storecode Lgami
       put se
       GOTO TRAVEL
     LETH.42:
       setVariable entrance tent
       setVariable item %Lgami
       setVariable shopdiff %LgamiQuant
       GOTO %MRS%

   LEAVE.LGAMI:
     LETH.43:
       counter set 43
       put se
       GOTO TRAVEL
     LETH.44:
       put se
       GOTO TRAVEL
     LETH.45:
       put se
       GOTO TRAVEL
     LETH.46:
       setVariable storecode Lcloth
       put n
       GOTO TRAVEL
     LETH.47:
       setVariable entrance hole
       setVariable item %Lcloth
       setVariable shopdiff %LclothQuant
       GOTO %MRS%

   LEAVE.LCLOTH:
     LETH.65:
       counter set 65
       put s
       GOTO TRAVEL
     LETH.66:
       setVariable storecode Lwood
       put ne
       GOTO TRAVEL
     LETH.67:
       setVariable entrance door
       setVariable item %Lwood
       setVariable shopdiff %LwoodQuant
       GOTO %MRS%

   ALTLEAVE.LWOOD:
       setVariable starthold %startlocation
       setVariable startlocation placeholder
     LETH.48:
       counter set 48
       put go door
       GOTO TRAVEL
     LETH.49:
       setVariable startlocation %starthold
   LEAVE.LWOOD:
     LETH.68:
       counter set 68
       put sw
       GOTO TRAVEL
     LETH.69:
       put s
       GOTO TRAVEL
     LETH.70:
       setVariable storecode Lbard
       put s
       GOTO TRAVEL
     LETH.71:
       setVariable entrance knot
       setVariable item %Lbard
       setVariable shopdiff %LbardQuant
       GOTO %MRS%

   LEAVE.LBARD:
     LETH.100:
       counter set 100
       put s
       GOTO TRAVEL
     LETH.101:
       put w
       GOTO TRAVEL
     LETH.102:
       setVariable storecode Lwick
       put nw
       GOTO TRAVEL
     LETH.103:
       setVariable entrance hut
       setVariable item %Lwick
       setVariable shopdiff %LwickQuant
       GOTO %MRS%

   LEAVE.LWICK:
     LETH.75:
       counter set 75
       put nw
       GOTO TRAVEL
     LETH.76:
       put nw
       GOTO TRAVEL
     LETH.77:
       put ne
       GOTO TRAVEL
     LETH.78:
       put climb stair
       GOTO TRAVEL
     LETH.79:
       setVariable storecode Lweap
       put go shack
       GOTO TRAVEL
     LETH.80:
       setVariable entrance shack
       setVariable item %Lweap
       setVariable shopdiff %LweapQuant
       GOTO %MRS%

   ALTLEAVE.LWEAP:
       setVariable starthold %startlocation
       setVariable startlocation placeholder
     LETH.465:
       counter set 465
       put out
       GOTO TRAVEL
     LETH.466:
       setVariable startlocation %starthold
   LEAVE.LWEAP:
     LETH.81:
       counter set 81
       match ALTLEAVE.LWEAP referring
       put climb stair
       GOTO TRAVEL
     LETH.82:
       put sw
       GOTO TRAVEL
     LETH.83:
       put nw
       GOTO TRAVEL
     LETH.84:
       put nw
       GOTO TRAVEL
     LETH.85:
       put nw
       GOTO TRAVEL
     LETH.86:
       put n
       GOTO TRAVEL
     LETH.87:
       put e
       GOTO TRAVEL
     LETH.88:
       setVariable storecode Lbow
       put go path
       GOTO TRAVEL
     LETH.89:
       setVariable entrance door
       setVariable item %Lbow
       setVariable shopdiff %LbowQuant
       GOTO %MRS%

   LEAVE.LBOW:
     LETH.90:
       counter set 90
       put go path
       GOTO TRAVEL
     LETH.91:
       put w
       GOTO TRAVEL
     LETH.92:
       put n
       GOTO TRAVEL
     LETH.93:
       put ne
       GOTO TRAVEL
     LETH.94:
       setVariable storecode Lmorik
       put ne
       GOTO TRAVEL
          2. #####
          3. LETH DERIEL MOVEON COORDS #####
          4. ##### 


   MOVEON.LMORIK.1:
       GOTO LETH.MOVEON.%class

   LETH.MOVEON.EMPATH:
   LETH.MOVEON.NONTHIEF:
     LETH.455:
       counter set 455
       put ne
       GOTO TRAVEL
     LETH.456:
       put se
       GOTO TRAVEL
     LETH.457:
       put se
       GOTO TRAVEL
     LETH.458:
       put se
       GOTO TRAVEL
     LETH.459:
       put se
       GOTO TRAVEL
     LETH.460:
       put se
       GOTO TRAVEL
     LETH.461:
       put se
       GOTO TRAVEL
     LETH.462:
       put e
       GOTO TRAVEL
     LETH.463:
       put go door
       GOTO TRAVEL
     LETH.464:
       setVariable sellorbin SELLGET
       counter set 24
       GOTO LETH.PAWN

   LETH.MOVEON.THIEF:
     LETH.298:
       counter set 298
       put ne
       GOTO TRAVEL
     LETH.299:
       put nw
       GOTO TRAVEL
     LETH.300:
       counter set 300
       put go gate
       GOTO TRAVEL
     LETH.301:
       put nw
       GOTO TRAVEL
     LETH.302:
       put n
       GOTO TRAVEL
     LETH.303:
       put n
       GOTO TRAVEL
     LETH.304:
       put nw
       GOTO TRAVEL
     LETH.305:
       put nw
       GOTO TRAVEL
     LETH.306:
       put n
       GOTO TRAVEL
     LETH.307:
       put n
       GOTO TRAVEL
     LETH.308:
       put nw
       GOTO TRAVEL
     LETH.309:
       put nw
       GOTO TRAVEL
     LETH.310:
       put ne
       GOTO TRAVEL
     LETH.311:
       put n
       GOTO TRAVEL
     LETH.312:
       put ne
       GOTO TRAVEL
     LETH.313:
       put ne
       GOTO TRAVEL
     LETH.314:
       put ne
       GOTO TRAVEL
     LETH.315:
       put ne
       GOTO TRAVEL
     LETH.316:
       put nw
       GOTO TRAVEL
     LETH.317:
       put nw
       GOTO TRAVEL
     LETH.318:
       put n
       GOTO TRAVEL
     LETH.319:
       put n
       GOTO TRAVEL
     LETH.320:
       put ne
       GOTO TRAVEL
     LETH.321:
       put n
       GOTO TRAVEL
     LETH.322:
       put ne
       GOTO TRAVEL
     LETH.323:
       put nw
       GOTO TRAVEL
     LETH.324:
       put n
       GOTO TRAVEL
     LETH.325:
       put ne
       GOTO TRAVEL
     LETH.326:
       put ne
       GOTO TRAVEL
     LETH.327:
       put ne
       GOTO TRAVEL
     LETH.328:
       put n
       GOTO TRAVEL
     LETH.329:
       put n
       GOTO TRAVEL
     LETH.330:
       put nw
       GOTO TRAVEL
     LETH.331:
       put nw
       GOTO TRAVEL
     LETH.332:
       put n
       GOTO TRAVEL
     LETH.333:
       put ne
       GOTO TRAVEL
     LETH.334:
       put ne
       GOTO TRAVEL
     LETH.335:
       put ne
       GOTO TRAVEL
     LETH.336:
       put ne
       GOTO TRAVEL
     LETH.337:
       put n
       GOTO TRAVEL
     LETH.338:
    1. Thief passage
       match END I could not find
       put go bould
       GOTO TRAVEL
     LETH.339:
       put go root
       GOTO TRAVEL
     LETH.340:
       put ne
       GOTO TRAVEL
     LETH.341:
       put e
       GOTO TRAVEL
     LETH.342:
       put ne
       GOTO TRAVEL
     LETH.343:
       put d
       GOTO TRAVEL
     LETH.344:
       put n
       GOTO TRAVEL
     LETH.345:
       put ne
       GOTO TRAVEL
     LETH.346:
       put ne
       GOTO TRAVEL
     LETH.347:
       put n
       GOTO TRAVEL
     LETH.348:
       put u
       GOTO TRAVEL
     LETH.349:
       put ne
       GOTO TRAVEL
     LETH.350:
       put ne
       GOTO TRAVEL
     LETH.351:
       put n
       GOTO TRAVEL
     LETH.352:
       put n
       GOTO TRAVEL
     LETH.353:
       put climb step
       GOTO TRAVEL
     LETH.354:
       put out
       GOTO TRAVEL
     LETH.355:
       put s
       GOTO TRAVEL
     LETH.356:
       put e
       GOTO TRAVEL
     LETH.357:
       put go ware
       GOTO TRAVEL
     LETH.358:
       put u
       GOTO TRAVEL
     LETH.359:
       put n
       GOTO TRAVEL
     LETH.360:
       put out
       GOTO TRAVEL
     LETH.361:
       put w
       GOTO TRAVEL
     LETH.362:
       put nw
       GOTO TRAVEL
     LETH.363:
       put w
       GOTO TRAVEL
     LETH.364:
       put w
       GOTO TRAVEL
     LETH.365:
       put w
       GOTO TRAVEL
     LETH.366:
       put w
       GOTO TRAVEL
     LETH.367:
       GOTO LETHCROSS.%lethcross

   LETHCROSS.LETH:
     LETH.378:
       counter set 378
       put go house
       GOTO TRAVEL
     LETH.379:
       setVariable MRS shopcheck
       setVariable LorM leave
       setVariable npcoption yes
       setVariable citycode CROSS
       GOTO CROSS.START.GUARD

   LETHCROSS.CROSS:
     LETH.369:
       counter set 369
       put n
       GOTO TRAVEL
     LETH.370:
       put n
       GOTO TRAVEL
     LETH.371:
       put n
       GOTO TRAVEL
     LETH.372:
       put n
       GOTO TRAVEL
     LETH.373:
       put n
       GOTO TRAVEL
     LETH.374:
       put n
       GOTO TRAVEL
     LETH.375:
       put e
       GOTO TRAVEL
     LETH.376:
       put go shop
       GOTO TRAVEL
     LETH.377:
       setVariable citycode CROSS
       setVariable sellorbin SELLGET
       GOTO CROSS.PAWN


          2. #####
          3. ALTERNATE EXITS #####
          4. ##### 


   ALTLEAVE.CCOBB:
   ALTLEAVE.CALCH:
   ALTLEAVE.CBOTA:
   ALTLEAVE.CBLOSS:
   ALTLEAVE.CGEN:
   ALTLEAVE.CGEM:
   ALTLEAVE.CWEAP:
   ALTLEAVE.CARM:
   ALTLEAVE.CBARD:
   ALTLEAVE.CLOCK:
   ALTLEAVE.CCLERIC:
   ALTLEAVE.CHAB:
   ALTLEAVE.CSTIT:
   ALTLEAVE.CBATH:
       GOTO MOVEERROR


          2. #####
          3. ZOLUREN PAWNING #####
          4. ##### 


   CROSS.PAWN.DROP:
       GOTO END

   CROSS.PAWN:
       GOTO CROSS.PAWN.%DropOrStow%
   CROSS.PAWN.STOW:
       counter set 0
     ZOL.SellItem0:
       setVariable sellitem %Ccobb
       GOTO %sellorbin
     ZOL.SellItem1:
       setVariable sellitem %Calch
       GOTO %sellorbin
     ZOL.SellItem2:
       setVariable sellitem %Cbota
       GOTO %sellorbin
     ZOL.SellItem3:
       setVariable sellitem %Cbloss
       GOTO %sellorbin
     ZOL.SellItem4:
       setVariable sellitem %Cgen
       GOTO %sellorbin
     ZOL.SellItem5:
       setVariable sellitem %Cgem
       GOTO %sellorbin
     ZOL.SellItem6:
       setVariable sellitem %Cweap
       GOTO %sellorbin
     ZOL.SellItem7:
       setVariable sellitem %Carm
       GOTO %sellorbin
     ZOL.SellItem8:
       setVariable sellitem %Cbard
       GOTO %sellorbin
     ZOL.SellItem9:
       setVariable sellitem %Clock
       GOTO %sellorbin
     ZOL.SellItem10:
       setVariable sellitem %Ccleric
       GOTO %sellorbin
     ZOL.SellItem11:
       setVariable sellitem %Ctann
       GOTO %sellorbin
     ZOL.SellItem12:
       setVariable sellitem %Cstit
       GOTO %sellorbin
     ZOL.SellItem13:
       setVariable sellitem %Cbath
       GOTO %sellorbin
     ZOL.SellItem14:
       setVariable sellitem %Chab
       GOTO %sellorbin
     ZOL.SellItem15:
       setVariable sellitem %ADweap
       GOTO %sellorbin
     ZOL.SellItem16:
       setVariable sellitem %ADodd
       GOTO %sellorbin
     ZOL.SellItem17:
       setVariable sellitem %ADbard
       GOTO %sellorbin
     ZOL.SellItem18:
       setVariable sellitem %ADthread
       GOTO %sellorbin
     ZOL.SellItem19:
       setVariable sellitem %ADfash
       GOTO %sellorbin
     ZOL.SellItem20:
       setVariable sellitem %Carti
       GOTO %sellorbin
     ZOL.SellItem21:
       GOTO CROSS.PAWN.CLAN.%clanoption
   CROSS.PAWN.CLAN.YES:
       setVariable sellitem %TCweap
       GOTO %sellorbin
     ZOL.SellItem22:
       setVariable sellitem %TCpedd
       GOTO %sellorbin
     ZOL.SellItem23:
       setVariable sellitem %TCherb
       GOTO %sellorbin
   CROSS.PAWN.CLAN.NO:
     ZOL.SellItem24:
       GOTO LETH.PAWN.%class
   LETH.PAWN.THIEF:
   LETH.PAWN.BINGET:
   LETH.PAWN:
       setVariable sellitem %Lcloth
       GOTO %sellorbin
     ZOL.SellItem25:
       setVariable sellitem %Lwood
       GOTO %sellorbin
     ZOL.SellItem26:
       setVariable sellitem %Lbard
       GOTO %sellorbin
     ZOL.SellItem27:
       setVariable sellitem %Lwick
       GOTO %sellorbin
     ZOL.SellItem28:
       setVariable sellitem %Lweap
       GOTO %sellorbin
     ZOL.SellItem29:
       setVariable sellitem %Lbow
       GOTO %sellorbin
     ZOL.SellItem30:
       setVariable sellitem %Lmorik
       GOTO %sellorbin
     ZOL.SellItem31:
       setVariable sellitem %Lperf
       GOTO %sellorbin
     ZOL.SellItem32:
       setVariable sellitem %Lgen
       GOTO %sellorbin
     ZOL.SellItem33:
       setVariable sellitem %Lgami
       GOTO %sellorbin
     ZOL.SellItem34:
       GOTO %citycode%.FINISH.%class

   CROSS.FINISH.NONTHIEF:
   CROSS.FINISH.EMPATH:
   LETH.FINISH.NONTHIEF:
   LETH.FINISH.EMPATH:
   LETH.PAWN.EMPATH:
   LETH.PAWN.NONTHIEF:
       GOTO END

   CROSS.FINISH.THIEF:
       setVariable starthold %startlocation
       setVariable startlocation placeholder
     CROSS.187:
       counter set 187
       put out
       GOTO TRAVEL
     CROSS.188:
       put n
       GOTO TRAVEL
     CROSS.189:
       put w
       GOTO TRAVEL
     CROSS.190:
       put w
       GOTO TRAVEL
     CROSS.191:
       put w
       GOTO TRAVEL
     CROSS.192:
       put s
       GOTO TRAVEL
     CROSS.193:
       put s
       GOTO TRAVEL
     CROSS.194:
       put s
       GOTO TRAVEL
     CROSS.195:
       put s
       GOTO TRAVEL
     CROSS.196:
       put s
       GOTO TRAVEL
     CROSS.197:
       put s
       GOTO TRAVEL
     CROSS.198:
       put w
       GOTO TRAVEL
     CROSS.199:
       put w
       GOTO TRAVEL
     CROSS.200:
       put w
       GOTO TRAVEL
     CROSS.201:
       put go ruin
       GOTO TRAVEL
     CROSS.202:
       put w
       GOTO TRAVEL
     CROSS.203:
       put go space
       GOTO TRAVEL
     CROSS.204:
       counter set 0
       setVariable class BINGET
      1. ^ Needed for SellItem Termination ^
       setVariable sellorbin BINGET
       GOTO %provcode%.Sellitem0


          2. #####
          3. CROSSING BINNING #####
          4. ##### 


   CROSS.FINISH.BINGET:
      setVariable class THIEF
     CROSS.205:
       counter set 205
       put go nich
       GOTO TRAVEL
     CROSS.206:
       put e
       GOTO TRAVEL
     CROSS.207:
       put go door
       GOTO TRAVEL
     CROSS.208:
       put e
       GOTO TRAVEL
     CROSS.209:
       put e
       GOTO TRAVEL
     CROSS.210:
       put e
       GOTO TRAVEL
     CROSS.211:
       put n
       GOTO TRAVEL
     CROSS.212:
       put n
       GOTO TRAVEL
     CROSS.213:
       put n
       GOTO TRAVEL
     CROSS.214:
       put n
       GOTO TRAVEL
     CROSS.215:
       put n
       GOTO TRAVEL
     CROSS.216:
       put n
       GOTO TRAVEL
     CROSS.217:
       put e
       GOTO TRAVEL
     CROSS.218:
       put e
       GOTO TRAVEL
     CROSS.219:
       put e
       GOTO TRAVEL
     CROSS.220:
       put s
       GOTO TRAVEL
     CROSS.221:
       put go shop
       GOTO TRAVEL
     CROSS.222:
       setVariable startlocation %starthold
       GOTO END


          2. #####
          3. ZOLUREN JUSTICE AND RESUMING #####
          4. ##### 


   CROSS.ITEMCHECK:
       put drop my small sack
       wait
       match CROSS.DEBT2 You have nothing
       match CROSS.FREE2 INVENTORY HELP
       put inv
       GOTO UniversalMatch

   ARTHE.DEBT:
       setVariable citycode CROSS
   CROSS.DEBT:
     CROSS.223:
       counter set 223
       put w
       GOTO TRAVEL
     CROSS.224:
       put w
       GOTO TRAVEL
   CROSSDEBT2:
     CROSS.225:
       counter set 225
       put out
       GOTO TRAVEL
     CROSS.226:
       put e
       GOTO TRAVEL
     CROSS.227:
       put e
       GOTO TRAVEL
     CROSS.228:
       put e
       GOTO TRAVEL
     CROSS.229:
       put e
       GOTO TRAVEL
     CROSS.230:
       put se
       GOTO TRAVEL
     CROSS.231:
       put e
       GOTO TRAVEL
     CROSS.232:
       put s
       GOTO TRAVEL
     CROSS.233:
       put s
       GOTO TRAVEL
     CROSS.234:
       put go bridge
       GOTO TRAVEL
     CROSS.235:
       put ne
       GOTO TRAVEL
     CROSS.236:
       put go bank
       GOTO TRAVEL
     CROSS.237:
       put go win
       GOTO TRAVEL
     CROSS.238:
       put wit 500 bronze kronar
       wait
     CROSS.239:
       counter set 239
       put out
       GOTO TRAVEL
     CROSS.240:
       put out
       GOTO TRAVEL
     CROSS.241:
       put nw
       GOTO TRAVEL
     CROSS.242:
       put n
       GOTO TRAVEL
     CROSS.243:
       put e
       GOTO TRAVEL
     CROSS.244:
       put go hall
       GOTO TRAVEL
     CROSS.245:
       put go coll off
       GOTO TRAVEL
     CROSS.246:
       put pay 5000
       wait
     CROSS.247:
       counter set 247
       put out
       GOTO TRAVEL
     CROSS.248:
       put out
       GOTO TRAVEL
     CROSS.249:
       put w
       GOTO TRAVEL
     CROSS.250:
       put s
       GOTO TRAVEL
     CROSS.251:
       put se
       GOTO TRAVEL
     CROSS.252:
       put go bank
       GOTO TRAVEL
     CROSS.253:
       put go win
       GOTO TRAVEL
     CROSS.254:
       put dep all
       wait
     CROSS.255:
       counter set 255
       put out
       GOTO TRAVEL
     CROSS.256:
       put out
       GOTO TRAVEL
     CROSS.257:
       put sw
       GOTO TRAVEL
     CROSS.258:
       put go bridge
       GOTO TRAVEL
     CROSS.259:
       put n
       GOTO TRAVEL
     CROSS.260:
       put n
       GOTO TRAVEL
     CROSS.261:
       put w
       GOTO TRAVEL
     CROSS.262:
       put nw
       GOTO TRAVEL
     CROSS.263:
       put w
       GOTO TRAVEL
     CROSS.264:
       put w
       GOTO TRAVEL
     CROSS.265:
       put w
       GOTO TRAVEL
     CROSS.266:
       put w
       GOTO TRAVEL
     CROSS.267:
       put go house
       GOTO TRAVEL
     CROSS.268:
     CROSS.271:
       put get %name sack
       matchre SACKCHECK1 /referring|You reach/
       GOTO UniversalMatch

   ARTHE.FREE:
       setVariable citycode CROSS
   CROSS.FREE:
     CROSS.269:
       counter set 269
       put w
       GOTO TRAVEL
     CROSS.270:
       put w
       GOTO TRAVEL

   CROSS.FREE2:
       pause 1
       match CROSS.MISSINGSTART waitandsee
       match CROSS.FREE3 okstart
       put echo %startresume
       put echo okstart
       GOTO UniversalMatch

   CROSS.MISSINGSTART:
       setVariable startresume The road curves slightly in concert with the river here, gradually
       setVariable ResumeStore Chab
       GOTO CROSS.FREE3

   CROSS.FREE3:
     CROSS.272:
       counter set 272
       put out
       GOTO TRAVEL
     CROSS.273:
       put e
       GOTO TRAVEL
     CROSS.274:
       put n
       GOTO TRAVEL
     CROSS.275:
       counter set 1
       setVariable storecode Chab
       GOTO RESUME.%ResumeStore%

   RESUME.CARTI:
       counter add 1
   RESUME.CLOCK:
       counter add 1
   RESUME.CBATH:
       counter add 1
   RESUME.CBARD:
       counter add 1
   RESUME.CCLERIC:
       counter add 1
   RESUME.CSTIT:
       counter add 1
   RESUME.CGEM:
       counter add 1
   RESUME.CGEN:
       counter add 1
   RESUME.CARM:
       counter add 1
   RESUME.CWEAP:
       counter add 1
   RESUME.CBLOSS:
       counter add 1
   RESUME.CCOBB:
       counter add 1
   RESUME.ADFASH:
       counter add 1
   RESUME.ADTHREAD:
       counter add 1
   RESUME.ADODD:
       counter add 1
   RESUME.ADBARD:
       counter add 1
   RESUME.ADWEAP:
       counter add 1
   RESUME.CBOTA:
       counter add 1
   RESUME.CALCH:
       counter add 1
   RESUME.CTANN:
       counter add 1
       GOTO RESUME.ZOL.CLAN.%clanoption%

   RESUME.ZOL.CLAN.YES:
   RESUME.TCHERB:
       counter add 1
   RESUME.TCPEDD:
       counter add 1
   RESUME.TCWEAP:
       counter add 1
   RESUME.ZOL.CLAN.NO:
   RESUME.CHAB:
       counter add 1
       setVariable Countdown %c
       GOTO RESUME


          2. #####
          3. LETH DERIEL JUSTICE AND RESUMING #####
          4. ##### 


   LETH.ITEMCHECK:
       put drop my small sack
       wait
       match LETH.DEBT2 You have nothing
       match LETH.FREE2 INVENTORY HELP
       put inv
       GOTO UniversalMatch

   LETH.DEBT:
     LETH.198:
       counter set 198
       put u
       GOTO TRAVEL
   LETH.DEBT2:
     LETH.199:
       counter set 199
       put out
       GOTO TRAVEL
     LETH.200:
       put se
       GOTO TRAVEL
     LETH.201:
       put se
       GOTO TRAVEL
     LETH.202:
       put se
       GOTO TRAVEL
     LETH.203:
       put se
       GOTO TRAVEL
     LETH.204:
       put se
       GOTO TRAVEL
     LETH.205:
       put e
       GOTO TRAVEL
     LETH.206:
       put e
       GOTO TRAVEL
     LETH.207:
       put go door
       GOTO TRAVEL
     LETH.208:
       put up
       GOTO TRAVEL
     LETH.209:
       put wit 500 bronze kronar
       wait
     LETH.210:
       put down
       GOTO TRAVEL
     LETH.211:
       put out
       GOTO TRAVEL
     LETH.212:
       put w
       GOTO TRAVEL
     LETH.213:
       put w
       GOTO TRAVEL
     LETH.214:
       put go burl
       GOTO TRAVEL
     LETH.215:
       put go door
       GOTO TRAVEL
     LETH.216:
       put up
       GOTO TRAVEL
     LETH.217:
       put up
       GOTO TRAVEL
     LETH.218:
       put pay 5000
       wait
     LETH.219:
       put d
       GOTO TRAVEL
     LETH.220:
       put d
       GOTO TRAVEL
     LETH.221:
       put climb ramp
       GOTO TRAVEL
     LETH.222:
       put go burl
       GOTO TRAVEL
     LETH.223:
       put e
       GOTO TRAVEL
     LETH.224:
       put e
       GOTO TRAVEL
     LETH.225:
       put go door
       GOTO TRAVEL
     LETH.226:
       put up
       GOTO TRAVEL
     LETH.227:
       put dep all
       wait
     LETH.228:
       put down
       GOTO TRAVEL
     LETH.229:
       put out
       GOTO TRAVEL
     LETH.230:
       put w
       GOTO TRAVEL
     LETH.231:
       put w
       GOTO TRAVEL
     LETH.232:
       put nw
       GOTO TRAVEL
     LETH.233:
       put nw
       GOTO TRAVEL
     LETH.234:
       put nw
       GOTO TRAVEL
     LETH.235:
       put nw
       GOTO TRAVEL
     LETH.236:
       put nw
       GOTO TRAVEL
     LETH.237:
       put go tree
       GOTO TRAVEL
     LETH.246:
     LETH.238:
       put get %name sack
       matchre SACKCHECK1 /referring|You reach/
       GOTO UniversalMatch

   LETH.FREE:
     LETH.245:
       counter set 245
       put u
       GOTO TRAVEL
   LETH.FREE2:
       pause 1
       match LETH.MISSINGSTART waitandsee
       match LETH.FREE3 okstart
       put echo %startresume
       put echo okstart
       GOTO UniversalMatch

   LETH.MISSINGSTART:
       setVariable startresume lets you catch a glimpse of Oracle Hollow
       setVariable ResumeStore Lmorik
       GOTO LETH.FREE3

   LETH.FREE3:
     LETH.241:
       counter set 241
       put out
       GOTO TRAVEL
     LETH.242:
       put nw
       GOTO TRAVEL
     LETH.243:
       put sw
       GOTO TRAVEL
     LETH.244:
       counter set 1
       setVariable storecode Lmorik
       GOTO RESUME.%ResumeStore%

   RESUME.LBOW:
       counter add 1
   RESUME.LWEAP:
       counter add 1
   RESUME.LWICK:
       counter add 1
   RESUME.LBARD:
       counter add 1
   RESUME.LWOOD:
       counter add 1
   RESUME.LCLOTH:
       counter add 1
   RESUME.LGAMI:
       counter add 1
   RESUME.LGEN:
       counter add 1
   RESUME.LPERF:
       counter add 1
   RESUME.LMORIK:
       counter add 1
       setVariable Countdown %c
       GOTO RESUME


                          2. #############
                          3. ILITHI #############
                          4. #############
                          5. SKILL DETERMINATION #############
                          6. (tweak the items you steal here if desired) #############
                          7. ############# 


   ILI.RANKADJ1:
       setVariable skillrange 20-39
       setVariable Sgene charcoal
       setVariable SgeneQuant 1
       setVariable Sweap <nothing>
       setVariable SweapQuant 1
       setVariable Sstit gloves
       setVariable SstitQuant 1
       setVariable Salch water
       setVariable SalchQuant 2
       setVariable Sherb <nothing>
       setVariable SherbQuant 1
       setVariable Sreag <nothing>
       setVariable SreagQuant 1
       setVariable Sbard pick
       setVariable SbardQuant 2
       setVariable Slock <nothing>
       setVariable SlockQuant 1
       setVariable Sarmo leather gloves
       setVariable SarmoQuant 1
       setVariable Scoin <nothing>
       setVariable ScoinQuant 1
       setVariable Stoke <nothing>
       setVariable StokeQuant 1
       setVariable Sfril <nothing>
       setVariable SfrilQuant 1
       setVariable Shera <nothing>
       setVariable SheraQuant 1
       setVariable Stour <nothing>
       setVariable StourItemLoc  
       setVariable StourQuant 1
       setVariable Stoyb <nothing>
       setVariable StoybQuant 1
       setVariable Sbarb alcohol
       setVariable SbarbQuant 1
       setVariable Smuse <nothing>
       setVariable SmuseQuant 1
       setVariable Sbake swirl
       setVariable SbakeQuant 1
       setVariable Sbows flights
       setVariable SbowsQuant 1
       setVariable Stann <nothing>
       setVariable StannQuant 1
       setVariable Ssupb chicken flights
       setVariable SsupbQuant 1
       setVariable Ssupf <nothing>
       setVariable SsupfQuant 1
       setVariable Smarw <nothing>
       setVariable SmarwQuant 1
       setVariable Smarg charcoal
       setVariable SmargQuant 1
       setVariable Senes <nothing>
       setVariable SenesQuant 1
       setVariable SCCleat <nothing>
       setVariable SCCleatQuant 1
       setVariable SCCweap <nothing>
       setVariable SCCweapQuant 1
       setVariable HCfelt <nothing>
       setVariable HCfeltQuant 1
       setVariable HCequi <nothing>
       setVariable HCequiQuant 1
       setVariable HCfalc <nothing>
       setVariable HCfalcQuant 1
       setVariable HCjaht <nothing>
       setVariable HCjahtQuant 1
       setVariable HCcash <nothing>
       setVariable HCcashQuant 1
       setVariable HCbow1 <nothing>
       setVariable HCbow1Quant 1
       setVariable HCbow2 <nothing>
       setVariable HCbow2Quant 1
       GOTO RANKREPORT

   ILI.RANKADJ2:
       setVariable skillrange 40-59
       setVariable Sgene hairbrush
       setVariable SgeneQuant 2
       setVariable Sweap <nothing>
       setVariable SweapQuant 2
       setVariable Sstit gloves
       setVariable SstitQuant 2
       setVariable Salch mixing stick
       setVariable SalchQuant 2
       setVariable Sherb <nothing>
       setVariable SherbQuant 2
       setVariable Sreag <nothing>
       setVariable SreagQuant 2
       setVariable Sbard rag
       setVariable SbardQuant 2
       setVariable Slock iron keyblank
       setVariable SlockQuant 1
       setVariable Sarmo leather gloves
       setVariable SarmoQuant 2
       setVariable Scoin <nothing>
       setVariable ScoinQuant 2
       setVariable Stoke <nothing>
       setVariable StokeQuant 2
       setVariable Sfril gloves
       setVariable SfrilQuant 2
       setVariable Shera <nothing>
       setVariable SheraQuant 2
       setVariable Stour <nothing>
       setVariable StourItemLoc  
       setVariable StourQuant 2
       setVariable Stoyb whistle
       setVariable StoybQuant 1
       setVariable Sbarb oil
       setVariable SbarbQuant 2
       setVariable Smuse <nothing>
       setVariable SmuseQuant 2
       setVariable Sbake cupcake
       setVariable SbakeQuant 2
       setVariable Sbows glue
       setVariable SbowsQuant 2
       setVariable Stann <nothing>
       setVariable StannQuant 2
       setVariable Ssupb glue
       setVariable SsupbQuant 2
       setVariable Ssupf oil
       setVariable SsupfQuant 2
       setVariable Smarw bolts
       setVariable SmarwQuant 1
       setVariable Smarg hairbrush
       setVariable SmargQuant 2
       setVariable Senes <nothing>
       setVariable SenesQuant 2
       setVariable SCCleat <nothing>
       setVariable SCCleatQuant 2
       setVariable SCCweap <nothing>
       setVariable SCCweapQuant 2
       setVariable HCfelt slippers
       setVariable HCfeltQuant 2
       setVariable HCequi <nothing>
       setVariable HCequiQuant 2
       setVariable HCfalc <nothing>
       setVariable HCfalcQuant 2
       setVariable HCjaht <nothing>
       setVariable HCjahtQuant 2
       setVariable HCcash <nothing>
       setVariable HCcashQuant 2
       setVariable HCbow1 <nothing>
       setVariable HCbow1Quant 2
       setVariable HCbow2 <nothing>
       setVariable HCbow2Quant 1
       GOTO RANKREPORT

   ILI.RANKADJ3:
       setVariable skillrange 60-99
       setVariable Sgene unguent
       setVariable SgeneQuant 2
       setVariable Sweap <nothing>
       setVariable SweapQuant 2
       setVariable Sstit hood
       setVariable SstitQuant 2
       setVariable Salch pestle
       setVariable SalchQuant 1
       setVariable Sherb <nothing>
       setVariable SherbQuant 2
       setVariable Sreag <nothing>
       setVariable SreagQuant 2
       setVariable Sbard cloth
       setVariable SbardQuant 2
       setVariable Slock iron keyblank
       setVariable SlockQuant 2
       setVariable Sarmo collar
       setVariable SarmoQuant 2
       setVariable Scoin <nothing>
       setVariable ScoinQuant 2
       setVariable Stoke <nothing>
       setVariable StokeQuant 2
       setVariable Sfril straw hat
       setVariable SfrilQuant 2
       setVariable Shera <nothing>
       setVariable SheraQuant 2
       setVariable Stour boggle doll
       setVariable StourItemLoc in black basket
       setVariable StourQuant 1
       setVariable Stoyb whistle
       setVariable StoybQuant 2
       setVariable Sbarb candle mold
       setVariable SbarbQuant 3
       setVariable Smuse <nothing>
       setVariable SmuseQuant 2
       setVariable Sbake box
       setVariable SbakeQuant 2
       setVariable Sbows arrowhead
       setVariable SbowsQuant 2
       setVariable Stann thread
       setVariable StannQuant 2
       setVariable Ssupb falcon flights
       setVariable SsupbQuant 2
       setVariable Ssupf wood pestle
       setVariable SsupfQuant 1
       setVariable Smarw bolts
       setVariable SmarwQuant 2
       setVariable Smarg bowl
       setVariable SmargQuant 2
       setVariable Senes <nothing>
       setVariable SenesQuant 2
       setVariable SCCleat <nothing>
       setVariable SCCleatQuant 2
       setVariable SCCweap <nothing>
       setVariable SCCweapQuant 2
       setVariable HCfelt <nothing>
       setVariable HCfeltQuant 2
       setVariable HCequi <nothing>
       setVariable HCequiQuant 2
       setVariable HCfalc <nothing>
       setVariable HCfalcQuant 2
       setVariable HCjaht <nothing>
       setVariable HCjahtQuant 2
       setVariable HCcash <nothing>
       setVariable HCcashQuant 2
       setVariable HCbow1 <nothing>
       setVariable HCbow1Quant 2
       setVariable HCbow2 <nothing>
       setVariable HCbow2Quant 1
       GOTO RANKREPORT

   ILI.RANKADJ4:
       setVariable skillrange 100-149
       setVariable Sgene razor
       setVariable SgeneQuant 2
       setVariable Sweap <nothing>
       setVariable SweapQuant 1
       setVariable Sstit shawl
       setVariable SstitQuant 2
       setVariable Salch oil
       setVariable SalchQuant 2
       setVariable Sherb riolur leaf
       setVariable SherbQuant 1
       setVariable Sreag <nothing>
       setVariable SreagQuant 2
       setVariable Sbard fife
       setVariable SbardQuant 2
       setVariable Slock bronze keyblank
       setVariable SlockQuant 2
       setVariable Sarmo chain legguards
       setVariable SarmoQuant 2
       setVariable Scoin <nothing>
       setVariable ScoinQuant 2
       setVariable Stoke <nothing>
       setVariable StokeQuant 2
       setVariable Sfril lace fan
       setVariable SfrilQuant 2
       setVariable Shera <nothing>
       setVariable SheraQuant 2
       setVariable Stour badge
       setVariable StourItemLoc on stand
       setVariable StourQuant 1
       setVariable Stoyb whistle
       setVariable StoybQuant 3
       setVariable Sbarb blued-steel clippers
       setVariable SbarbQuant 1
       setVariable Smuse <nothing>
       setVariable SmuseQuant 1
       setVariable Sbake <nothing>
       setVariable SbakeQuant 2
       setVariable Sbows shaper
       setVariable SbowsQuant 2
       setVariable Stann bodkin
       setVariable StannQuant 2
       setVariable Ssupb steel shaper
       setVariable SsupbQuant 2
       setVariable Ssupf stone pestle
       setVariable SsupfQuant 1
       setVariable Smarw bolts
       setVariable SmarwQuant 3
       setVariable Smarg cloth sheath
       setVariable SmargQuant 2
       setVariable Senes jadice flower
       setVariable SenesQuant 1
       setVariable SCCleat <nothing>
       setVariable SCCleatQuant 2
       setVariable SCCweap <nothing>
       setVariable SCCweapQuant 2
       setVariable HCfelt <nothing>
       setVariable HCfeltQuant 2
       setVariable HCequi <nothing>
       setVariable HCequiQuant 2
       setVariable HCfalc <nothing>
       setVariable HCfalcQuant 2
       setVariable HCjaht <nothing>
       setVariable HCjahtQuant 2
       setVariable HCcash <nothing>
       setVariable HCcashQuant 2
       setVariable HCbow1 <nothing>
       setVariable HCbow1Quant 2
       setVariable HCbow2 <nothing>
       setVariable HCbow2Quant 1
       GOTO RANKREPORT

   ILI.RANKADJ5:
       setVariable skillrange 150-199
       setVariable Sgene clippers
       setVariable SgeneQuant 2
       setVariable Sweap targe
       setVariable SweapQuant 1
       setVariable Sstit blouse
       setVariable SstitQuant 2
       setVariable Salch tukai stones
       setVariable SalchQuant 2
       setVariable Sherb riolur leaf
       setVariable SherbQuant 2
       setVariable Sreag simple talisman
       setVariable SreagQuant 1
       setVariable Sbard bow
       setVariable SbardQuant 2
       setVariable Slock bronze lockpick
       setVariable SlockQuant 2
       setVariable Sarmo mail gauntlets
       setVariable SarmoQuant 2
       setVariable Scoin <nothing>
       setVariable ScoinQuant 2
       setVariable Stoke <nothing>
       setVariable StokeQuant 2
       setVariable Sfril pants
       setVariable SfrilQuant 2
       setVariable Shera target shield
       setVariable SheraQuant 2
       setVariable Stour badge
       setVariable StourItemLoc on stand
       setVariable StourQuant 2
       setVariable Stoyb beard
       setVariable StoybQuant 2
       setVariable Sbarb black clippers
       setVariable SbarbQuant 2
       setVariable Smuse <nothing>
       setVariable SmuseQuant 1
       setVariable Sbake <nothing>
       setVariable SbakeQuant 2
       setVariable Sbows shears
       setVariable SbowsQuant 2
       setVariable Stann scraper
       setVariable StannQuant 2
       setVariable Ssupb blued shaper
       setVariable SsupbQuant 2
       setVariable Ssupf stone pestle
       setVariable SsupfQuant 2
       setVariable Smarw kris
       setVariable SmarwQuant 2
       setVariable Smarg cloth scabbard
       setVariable SmargQuant 2
       setVariable Senes sufil sap
       setVariable SenesQuant 2
       setVariable SCCleat <nothing>
       setVariable SCCleatQuant 2
       setVariable SCCweap <nothing>
       setVariable SCCweapQuant 2
       setVariable HCfelt <nothing>
       setVariable HCfeltQuant 2
       setVariable HCequi <nothing>
       setVariable HCequiQuant 2
       setVariable HCfalc <nothing>
       setVariable HCfalcQuant 2
       setVariable HCjaht <nothing>
       setVariable HCjahtQuant 2
       setVariable HCcash <nothing>
       setVariable HCcashQuant 2
       setVariable HCbow1 <nothing>
       setVariable HCbow1Quant 2
       setVariable HCbow2 <nothing>
       setVariable HCbow2Quant 1
       GOTO RANKREPORT

   ILI.RANKADJ6:
       setVariable skillrange 200-249
       setVariable Sgene short sword
       setVariable SgeneQuant 2
       setVariable Sweap targe
       setVariable SweapQuant 2
       setVariable Sstit cloak
       setVariable SstitQuant 2
       setVariable Salch seolard weed
       setVariable SalchQuant 1
       setVariable Sherb genich stem
       setVariable SherbQuant 2
       setVariable Sreag simple talisman
       setVariable SreagQuant 2
       setVariable Sbard four strings
       setVariable SbardQuant 2
       setVariable Slock wrist sheath
       setVariable SlockQuant 1
       setVariable Sarmo choker
       setVariable SarmoQuant 2
       setVariable Scoin coin case
       setVariable ScoinQuant 1
       setVariable Stoke <nothing>
       setVariable StokeQuant 2
       setVariable Sfril sandals
       setVariable SfrilQuant 2
       setVariable Shera ordinary shield
       setVariable SheraQuant 2
       setVariable Stour boggle doll
       setVariable StourItemLoc in black basket
       setVariable StourQuant 2
       setVariable Stoyb wig
       setVariable StoybQuant 2
       setVariable Sbarb silver-trimmed clippers
       setVariable SbarbQuant 2
       setVariable Smuse black slippers
       setVariable SmuseQuant 1
       setVariable Sbake <nothing>
       setVariable SbakeQuant 2
       setVariable Sbows long arrows
       setVariable SbowsQuant 2
       setVariable Stann shears
       setVariable StannQuant 2
       setVariable Ssupb stone-tipped arrow
       setVariable SsupbQuant 2
       setVariable Ssupf stone pestle
       setVariable SsupfQuant 2
       setVariable Smarw visored helm
       setVariable SmarwQuant 2
       setVariable Smarg cloth backtube
       setVariable SmargQuant 2
       setVariable Senes blocil potion
       setVariable SenesQuant 2
       setVariable SCCleat <nothing>
       setVariable SCCleatQuant 2
       setVariable SCCweap thigh sheath
       setVariable SCCweapQuant 1
       setVariable HCfelt <nothing>
       setVariable HCfeltQuant 2
       setVariable HCequi <nothing>
       setVariable HCequiQuant 2
       setVariable HCfalc <nothing>
       setVariable HCfalcQuant 2
       setVariable HCjaht <nothing>
       setVariable HCjahtQuant 2
       setVariable HCcash <nothing>
       setVariable HCcashQuant 2
       setVariable HCbow1 <nothing>
       setVariable HCbow1Quant 2
       setVariable HCbow2 <nothing>
       setVariable HCbow2Quant 1
       GOTO RANKREPORT

   ILI.RANKADJ7:
       setVariable skillrange 250-299
       setVariable Sgene chain helm
       setVariable SgeneQuant 2
       setVariable Sweap stiletto
       setVariable SweapQuant 1
       setVariable Sstit tunic
       setVariable SstitQuant 2
       setVariable Salch seolarn weed
       setVariable SalchQuant 2
       setVariable Sherb hisan salve
       setVariable SherbQuant 2
       setVariable Sreag elbaite runestone
       setVariable SreagQuant 1
       setVariable Sbard refill
       setVariable SbardQuant 2
       setVariable Slock wrist sheath
       setVariable SlockQuant 2
       setVariable Sarmo mesh handguards
       setVariable SarmoQuant 2
       setVariable Scoin coin case
       setVariable ScoinQuant 2
       setVariable Stoke <nothing>
       setVariable StokeQuant 2
       setVariable Sfril doll
       setVariable SfrilQuant 1
       setVariable Shera medium buckler
       setVariable SheraQuant 2
       setVariable Stour snow doll
       setVariable StourItemLoc in white basket
       setVariable StourQuant 2
       setVariable Stoyb book
       setVariable StoybQuant 2
       setVariable Sbarb brass razor
       setVariable SbarbQuant 2
       setVariable Smuse black slippers
       setVariable SmuseQuant 2
       setVariable Sbake <nothing>
       setVariable SbakeQuant 2
       setVariable Sbows barbed arrows
       setVariable SbowsQuant 2
       setVariable Stann pattern
       setVariable StannQuant 2
       setVariable Ssupb stone-tipped arrow
       setVariable SsupbQuant 2
       setVariable Ssupf marble pestle
       setVariable SsupfQuant 2
       setVariable Smarw chain greaves
       setVariable SmarwQuant 2
       setVariable Smarg cloth backtube
       setVariable SmargQuant 2
       setVariable Senes ithor potion
       setVariable SenesQuant 2
       setVariable SCCleat crinnet
       setVariable SCCleatQuant 1
       setVariable SCCweap dirk
       setVariable SCCweapQuant 1
       setVariable HCfelt <nothing>
       setVariable HCfeltQuant 2
       setVariable HCequi <nothing>
       setVariable HCequiQuant 2
       setVariable HCfalc <nothing>
       setVariable HCfalcQuant 2
       setVariable HCjaht <nothing>
       setVariable HCjahtQuant 2
       setVariable HCcash ring
       setVariable HCcashQuant 1
       setVariable HCbow1 <nothing>
       setVariable HCbow1Quant 2
       setVariable HCbow2 <nothing>
       setVariable HCbow2Quant 1
       GOTO RANKREPORT

   ILI.RANKADJ9:
   ILI.RANKADJ10:
       ECHO ***********************************************
       ECHO ***        Sorry, but there isn't anything harder yet!
       ECHO ***********************************************
   ILI.RANKADJ8:
       setVariable skillrange 300+
       setVariable Sgene great helm
       setVariable SgeneQuant 2
       setVariable Sweap stiletto
       setVariable SweapQuant 2
       setVariable Sstit coat
       setVariable SstitQuant 2
       setVariable Salch cauldron
       setVariable SalchQuant 2
       setVariable Sherb ithor potion
       setVariable SherbQuant 2
       setVariable Sreag elbaite runestone
       setVariable SreagQuant 2
       setVariable Sbard mandolin
       setVariable SbardQuant 2
       setVariable Slock ivory lockpick
       setVariable SlockQuant 2
       setVariable Sarmo chain veil
       setVariable SarmoQuant 2
       setVariable Scoin coin case
       setVariable ScoinQuant 3
       setVariable Stoke token
       setVariable StokeQuant 1
       setVariable Sfril doll
       setVariable SfrilQuant 2
       setVariable Shera medium shield
       setVariable SheraQuant 2
       setVariable Stour dagger
       setVariable StourItemLoc  
       setVariable StourQuant 2
       setVariable Stoyb marionette
       setVariable StoybQuant 2
       setVariable Sbarb horn-handled razor
       setVariable SbarbQuant 2
       setVariable Smuse earring
       setVariable SmuseQuant 2
       setVariable Sbake <nothing>
       setVariable SbakeQuant 2
       setVariable Sbows barbed arrows
       setVariable SbowsQuant 2
       setVariable Stann potion
       setVariable StannQuant 2
       setVariable Ssupb razor-tipped arrow
       setVariable SsupbQuant 2
       setVariable Ssupf stone mortar
       setVariable SsupfQuant 2
       setVariable Smarw rapier
       setVariable SmarwQuant 2
       setVariable Smarg cloth backtube
       setVariable SmargQuant 3
       setVariable Senes ithor potion
       setVariable SenesQuant 3
       setVariable SCCleat chanfron
       setVariable SCCleatQuant 1
       setVariable SCCweap spear
       setVariable SCCweapQuant 1
       setVariable HCfelt amulet
       setVariable HCfeltQuant 1
       setVariable HCequi white blanket
       setVariable HCequiQuant 1
       setVariable HCfalc <nothing>
       setVariable HCfalcQuant 2
       setVariable HCjaht <nothing>
       setVariable HCjahtQuant 2
       setVariable HCcash ring
       setVariable HCcashQuant 2
       setVariable HCbow1 <nothing>
       setVariable HCbow1Quant 2
       setVariable HCbow2 <nothing>
       setVariable HCbow2Quant 1
       GOTO RANKREPORT

   ILI.RANKADJ-1:
   ILI.RANKADJ0:
       GOTO BEGGAR.MOD

   ILI.BAGCHECK:
       matchre BAGWARN /%Sgene%|%Sweap%|%Sstit%|%Salch%|%Sherb%|%Sreag%|%Sbard%|%Slock%/
       matchre BAGWARN /%Sarmo%|%Scoin%|%Stoke%|%Sfril%|%Shera%|%Stour%|%Stoyb%|%Sbarb%/
       matchre BAGWARN /%Smuse%|%Sbake%|%Sbows%|%Stann%|%Ssupb%|%Ssupf%|%Smarw%|%Smarg%|%Senes%/
       matchre BAGWARN /%SCCleat%|%SCCweap%|%HCfelt%|%HCequi%|%HCfalc%|%HCjaht%|%HCcash%|%HCbow1%|%HCbow2%/
       match ILI.BAGCHECK2 You glance
       put look in my %container1
       put glance
       GOTO UniversalMatch

   ILI.BAGCHECK2:
       matchre BAGWARN2 /%Sgene%|%Sweap%|%Sstit%|%Salch%|%Sherb%|%Sreag%|%Sbard%|%Slock%/
       matchre BAGWARN2 /%Sarmo%|%Scoin%|%Stoke%|%Sfril%|%Shera%|%Stour%|%Stoyb%|%Sbarb%/
       matchre BAGWARN2 /%Smuse%|%Sbake%|%Sbows%|%Stann%|%Ssupb%|%Ssupf%|%Smarw%|%Smarg%|%Senes%/
       matchre BAGWARN2 /%SCCleat%|%SCCweap%|%HCfelt%|%HCequi%|%HCfalc%|%HCjaht%|%HCcash%|%HCbow1%|%HCbow2%/
       match KHRICHECK.%class% You glance
       put look in my %container2
       put glance
       GOTO UniversalMatch


          2. #####
          3. ILITHI STARTING POSITION #####
          4. ##### 
   SHARD:
       match SHARD.START.NG Shard, North City Gates
       match SHARD.START.WG Shard, West City Gates
       match SHARD.START.EG Shard, East City Gates
       match SHARD.START.SG Shard, South Square
       match SHARD.START.BANK Shard, First Bank of Ilithi
       match SHARD.START.PAWN Aelik's Pawn
       match SHARD.START.GENE Zerek
       match SHARD.START.WEAP Fiona
       match SHARD.START.STIT Meek's Stitchery
       match SHARD.START.HERB Zieq
       match SHARD.START.ALCH Idizieq
       match SHARD.START.REAG Sierack
       match SHARD.START.BARD Malik
       match SHARD.START.LOCK Kilam
       match SHARD.START.ARMO Demiciil
       match SHARD.START.COIN [Coin of the Realm]
       match SHARD.START.TOKE [Tokens of Affection]
       match SHARD.START.FRIL [Little Frills]
       match SHARD.START.HERA Bonime
       match SHARD.START.TOUR [Elanthian Travel Tours, Gift Shop]
       match SHARD.START.TOYB [The Toy Box]
       match SHARD.START.BARB Budd's Barber Shop
       match SHARD.START.MUSE Scholar's Museum
       match SHARD.START.BAKE Genevive
       match SHARD.START.BOWS Avlea
       match SHARD.START.TANN Froissart
       match SHARD.START.SUPB [Survivalist Supplies, Back Room]
       match SHARD.START.SUPF [Survivalist Supplies, Front Room]
       match SHARD.START.MARA Marachek's Oak, Merchant Central
       match SHARD.START.MARW Ivo Marachek
       match SHARD.START.MARG Windawn
       match SHARD.START.ENES Enescu
       match ILI.BADLOCATION Obvious
       put look
       GOTO UniversalMatch

   STEEL:
       match STEEL.START.LEAT Quintan
       match STEEL.START.WEAP Struan
       match STEEL.START.GATE Passing between the mammoth beams that serve as gateposts
   HORSE:
       match HORSE.START.PATH a red banner with a galloping horse-archer silhouetted
       match HORSE.START.FELT Anaylisse
       match HORSE.START.EQUI.W Stablemaster Ela
       match HORSE.START.EQUI.E Cut off from the rest of the tent by an elaborate screen
       match HORSE.START.FALC Akhila
       match HORSE.START.JAHT.1 Jan Taipen Chadir
       match HORSE.START.JAHT.2 Jahtinit
       match HORSE.START.CASH Yasnah
       match HORSE.START.BOW1 Fresh air wafts down from the opening at the apex
       match HORSE.START.BOW2 Fabric dyed the color of the winter sky covers
       match ILI.BADLOCATION Obvious
       setvariable citycode SHARD
       put look
       GOTO UniversalMatch

   ILI.BADLOCATION:
       put echocolumn /on
       waitfor EchoColumn
       ECHO ***********************************************
       ECHO *** Not a valid starting location.
       ECHO *** Starting locations in Ilithi are:
       ECHO ***
       ECHO *** Inside Shard Gates           Inside SCC gate
       ECHO *** Shard Bank                   Struan's Weapons
       ECHO *** Shard Pawn shop              Quintan's Leather
       ECHO *** Zerek's General Supplies     
       ECHO *** Fiona's Arms                 Inside Horse Clan path
       ECHO *** Demiciil's Armory            Anaylisse's Felterie
       ECHO *** Avlea's Bows                 Ela's Equine Supplies
       ECHO *** Meek's Stitchery             Falconer's Chadir
       ECHO *** Zieq's Herbs and Alchemy     Jahtinit's Corner
       ECHO *** Sierack's Artificer Shop     Yasnah's Cashmere
       ECHO *** Malik's Instruments          Zaldi Taipa, Bowyer
       ECHO *** Kilam's Locks
       ECHO *** Genevive's Bakery            Marachek's Oak
       ECHO *** The Scholar's Museum         Enescu's Herbs
       ECHO *** Coin of the Realm Shop
       ECHO *** Tokens of Affection Shop     Froissart's Tannery
       ECHO *** Little Frills Shop           Survivalist Supplies
       ECHO *** Bonime's Heraldry Shop
       ECHO *** The Toy Box
       ECHO *** Budd's Barber Shop
       ECHO ***
       ECHO *******************************************************
       put echocolumn /off
       waitfor EchoColumn
       GOTO END

   SHARD.START.GENE:
       counter set 254
       setVariable storecode Sgene
       setVariable startlocation %storecode%
       match SHARD.%c Obvious
       put out
       GOTO UniversalMatch

   SHARD.START.WEAP:
       counter set 37
       setVariable storecode Sweap
       setVariable startlocation %storecode%
       match SHARD.%c Obvious
       put out
       GOTO UniversalMatch

   SHARD.START.STIT:
       counter set 42
       setVariable storecode Sstit
       setVariable startlocation %storecode%
       match SHARD.%c Obvious
       put out
       GOTO UniversalMatch

   SHARD.START.HERB:
       match SHARD.START.ALCH Obvious
       put out
       GOTO UniversalMatch
   SHARD.START.ALCH:
       counter set 51
       setVariable storecode Salch
       setVariable startlocation %storecode%
       match SHARD.%c Obvious
       put out
       GOTO UniversalMatch

   SHARD.START.REAG:
       counter set 61
       setVariable storecode Sreag
       setVariable startlocation %storecode%
       match SHARD.%c Obvious
       put out
       GOTO UniversalMatch

   SHARD.START.LOCK:
       match SHARD.START.BARD Obvious
       put go trapdoor
       GOTO UniversalMatch
   SHARD.START.BARD:
       counter set 64
       setVariable storecode Sbard
       setVariable startlocation %storecode%
       match SHARD.%c Obvious
       put out
       GOTO UniversalMatch

   SHARD.START.ARMO:
       counter set 72
       setVariable storecode Sarmo
       setVariable startlocation %storecode%
       match SHARD.%c Obvious
       put out
       GOTO UniversalMatch

   SHARD.START.COIN:
       counter set 79
       setVariable storecode Scoin
       setVariable startlocation %storecode%
       match SHARD.%c Obvious
       put go door
       GOTO UniversalMatch

   SHARD.START.TOKE:
       counter set 81
       setVariable storecode Stoke
       setVariable startlocation %storecode%
       match SHARD.%c Obvious
       put go door
       GOTO UniversalMatch

   SHARD.START.FRIL:
       counter set 83
       setVariable storecode Sfril
       setVariable startlocation %storecode%
       match SHARD.%c Obvious
       put go door
       GOTO UniversalMatch

   SHARD.START.HERA:
       counter set 86
       setVariable storecode Shera
       setVariable startlocation %storecode%
       match SHARD.%c Obvious
       put go door
       GOTO UniversalMatch

   SHARD.START.TOUR:
       counter set 89
       setVariable storecode Stour
       setVariable startlocation %storecode%
       match SHARD.%c Obvious
       put go door
       GOTO UniversalMatch

   SHARD.START.TOYB:
       counter set 92
       setVariable storecode Stoyb
       setVariable startlocation %storecode%
       match SHARD.%c Obvious
       put go door
       GOTO UniversalMatch

   SHARD.START.BARB:
       counter set 94
       setVariable storecode Sbarb
       setVariable startlocation %storecode%
       match SHARD.%c Obvious
       put go door
       GOTO UniversalMatch

   SHARD.START.MUSE:
       counter set 107
       setVariable storecode Smuse
       setVariable startlocation %storecode%
       match SHARD.%c Obvious
       put out
       GOTO UniversalMatch

   SHARD.START.BAKE:
       counter set 112
       setVariable storecode Sbake
       setVariable startlocation %storecode%
       match SHARD.%c Obvious
       put out
       GOTO UniversalMatch

   SHARD.START.BOWS:
       counter set 120
       setVariable storecode Sbows
       setVariable startlocation %storecode%
       match SHARD.%c Obvious
       put out
       GOTO UniversalMatch

   SHARD.START.SUPF:
       match SHARD.START.SUPB Obvious
       put go curtain
       GOTO UniversalMatch
   SHARD.START.SUPB:
   SHARD.START.TANN:
       counter set 139
       setVariable storecode Stann
       setVariable startlocation %storecode%
       match SHARD.%c Obvious
       put out
       GOTO UniversalMatch

   SHARD.START.MARW:
   SHARD.START.MARG:
       match SHARD.START.MARA Obvious
       put go door
       GOTO UniversalMatch
   SHARD.START.MARA:
       counter set 205
       setVariable storecode Smarw
       setVariable startlocation %storecode%
       GOTO SHARD.%c Obvious

   SHARD.START.ENES:
       counter set 214
       setVariable storecode Senes
       setVariable startlocation %storecode%
       match SHARD.%c Obvious
       put out
       GOTO UniversalMatch

   STEEL.START.LEAT:
       counter set 462
       setVariable storecode SCCleat
       setVariable startlocation %storecode%
       match SHARD.%c Obvious
       put n
       GOTO UniversalMatch

   STEEL.START.WEAP:
       counter set 470
       setVariable storecode SCCweap
       setVariable startlocation %storecode%
       match SHARD.%c Obvious
       put out
       GOTO UniversalMatch

   HORSE.START.FELT:
       counter set 580
       setVariable storecode HCfelt
       setVariable startlocation %storecode%
       match SHARD.%c Obvious
       put go flap
       GOTO UniversalMatch

   HORSE.START.EQUI.W:
       match HORSE.START.EQUI.E Obvious
       put e
       GOTO UniversalMatch
   HORSE.START.EQUI.E:
       counter set 589
       setVariable storecode HCequi
       setVariable startlocation %storecode%
       match SHARD.%c Obvious
       put w
       GOTO UniversalMatch

   HORSE.START.FALC:
       counter set 595
       setVariable storecode HCfalc
       setVariable startlocation %storecode%
       match SHARD.%c Obvious
       put go flap
       GOTO UniversalMatch

   HORSE.START.JAHT.1:
       match HORSE.START.JAHT.2 Obvious
       put go corner
       GOTO UniversalMatch
   HORSE.START.JAHT.2:
       counter set 598
       setVariable storecode HCjaht
       setVariable startlocation %storecode%
       match SHARD.%c Obvious
       put go tent
       GOTO UniversalMatch

   HORSE.START.CASH:
       counter set 605
       setVariable storecode HCcash
       setVariable startlocation %storecode%
       match SHARD.%c Obvious
       put go flap
       GOTO UniversalMatch

   HORSE.START.BOW2:
       match HORSE.START.BOW1 Obvious
       put go curtain
       GOTO UniversalMatch
   HORSE.START.BOW1:
       counter set 608
       setVariable storecode HCbow1
       setVariable startlocation %storecode%
       match SHARD.%c Obvious
       put go flap
       GOTO UniversalMatch

   SHARD.START.NG:
     SHARD.1:
       counter set 1
       put s
       GOTO TRAVEL
     SHARD.2:
       put s
       GOTO TRAVEL
     SHARD.3:
       put s
       GOTO TRAVEL
     SHARD.4:
       put go shop
       GOTO TRAVEL
     SHARD.5:
       GOTO SHARD.START.GENE

   SHARD.START.WG:
     SHARD.6:
       counter set 6
       put s
       GOTO TRAVEL
     SHARD.7:
       put se
       GOTO TRAVEL
     SHARD.8:
       put go building
       GOTO TRAVEL
     SHARD.9:
       GOTO SHARD.START.ARMO

   SHARD.START.EG:
     SHARD.10:
       counter set 10
       put s
       GOTO TRAVEL
     SHARD.11:
       put sw
       GOTO TRAVEL
     SHARD.12:
       put go shop
       GOTO TRAVEL
     SHARD.13:
       GOTO SHARD.START.BOWS

   SHARD.START.SG:
     SHARD.14:
       counter set 14
       put go bridge
       GOTO TRAVEL
     SHARD.15:
       put w
       GOTO TRAVEL
     SHARD.16:
       put go shop
       GOTO TRAVEL
     SHARD.17:
       GOTO SHARD.START.COIN

   SHARD.START.BANK:
     SHARD.383:
       counter set 383
       put out
       GOTO TRAVEL
     SHARD.384:
     SHARD.18:
       counter set 18
       put e
       GOTO TRAVEL
     SHARD.19:
       put go bridge
       GOTO TRAVEL
     SHARD.20:
       put se
       GOTO TRAVEL
     SHARD.21:
       put go building
       GOTO TRAVEL
     SHARD.22:
       GOTO SHARD.START.REAG

   SHARD.START.PAWN:
     SHARD.385:
       counter set 385
       put out
       GOTO TRAVEL
     SHARD.386:
     SHARD.23:
       counter set 23
       put s
       GOTO TRAVEL
     SHARD.24:
       put s
       GOTO TRAVEL
     SHARD.25:
       put s
       GOTO TRAVEL
     SHARD.26:
       GOTO SHARD.START.SG

   STEEL.START.GATE:
     SHARD.735:
       counter set 735
       put e
       GOTO TRAVEL
     SHARD.736:
       put n
       GOTO TRAVEL
     SHARD.737:
       put n
       GOTO TRAVEL
     SHARD.738:
       put n
       GOTO TRAVEL
     SHARD.739:
       put go stable
       GOTO TRAVEL
     SHARD.740:
       put e
       GOTO TRAVEL
     SHARD.741:
       put s
       GOTO TRAVEL
     SHARD.742:
       GOTO STEEL.START.LEAT

   HORSE.START.PATH:
     SHARD.749:
       counter set 749
       put sw
       GOTO TRAVEL
     SHARD.750:
       put w
       GOTO TRAVEL
     SHARD.751:
       put sw
       GOTO TRAVEL
     SHARD.752:
       put se
       GOTO TRAVEL
     SHARD.753:
       put w
       GOTO TRAVEL
     SHARD.754:
       put w
       GOTO TRAVEL
     SHARD.755:
       put se
       GOTO TRAVEL
     SHARD.756:
       put se
       GOTO TRAVEL
     SHARD.757:
       put s
       GOTO TRAVEL
     SHARD.758:
       put go tent
       GOTO TRAVEL
     SHARD.759:
       GOTO HORSE.START.FELT


          2. #####
          3. ILITHI LEAVING SHOPS #####
          4. ##### 


   LEAVE.SGENE:
       GOTO %LorM%.SGENE.1
   LEAVE.SGENE.1:
     SHARD.27:
       counter set 27
       put s
       GOTO TRAVEL
     SHARD.28:
       put s
       GOTO TRAVEL
     SHARD.29:
       put s
       GOTO TRAVEL
     SHARD.30:
       put s
       GOTO TRAVEL
     SHARD.31:
       put go gate
       GOTO TRAVEL
     SHARD.32:
       put s
       GOTO TRAVEL
     SHARD.33:
       put ne
       GOTO TRAVEL
     SHARD.34:
       put ne
       GOTO TRAVEL
     SHARD.35:
       put ne
       GOTO TRAVEL
     SHARD.36:
       setVariable storecode Sweap
       put ne
       GOTO TRAVEL
     SHARD.37:
       setVariable entrance shop
       setVariable item %Sweap
       setVariable shopdiff %SweapQuant
       GOTO %MRS%

   LEAVE.SWEAP:
     SHARD.38:
       counter set 38
       put sw
       GOTO TRAVEL
     SHARD.39:
       put sw
       GOTO TRAVEL
     SHARD.40:
       put se
       GOTO TRAVEL
     SHARD.41:
       setVariable storecode Sstit
       put e
       GOTO TRAVEL
     SHARD.42:
       setVariable entrance home
       setVariable item %Sstit
       setVariable shopdiff %SstitQuant
       GOTO %MRS%

   LEAVE.SSTIT:
     SHARD.43:
       counter set 43
       put go bridge
       GOTO TRAVEL
     SHARD.44:
       put w
       GOTO TRAVEL
     SHARD.45:
       put w
       GOTO TRAVEL
     SHARD.46:
       put w
       GOTO TRAVEL
     SHARD.47:
       put n
       GOTO TRAVEL
     SHARD.48:
       put nw
       GOTO TRAVEL
     SHARD.49:
       put w
       GOTO TRAVEL
     SHARD.50:
       setVariable storecode Salch
       put w
       GOTO TRAVEL
     SHARD.51:
       setVariable entrance door
       setVariable item %Salch
       setVariable shopdiff %SalchQuant
       GOTO %MRS%

   LEAVE.SALCH:
     SHARD.52:
       counter set 52
       setVariable storecode Sherb
       put go door
       GOTO TRAVEL
     SHARD.53:
       setVariable entrance iron door
       setVariable item %Sherb
       setVariable shopdiff %SherbQuant
       GOTO %MRS%

   LEAVE.SHERB:
       setVariable starthold %startlocation
       setVariable startlocation placeholder
     SHARD.54:
       counter set 54
       put out
       GOTO TRAVEL
     SHARD.55:
       setVariable startlocation %starthold
       put sw
       GOTO TRAVEL
     SHARD.56:
       put s
       GOTO TRAVEL
     SHARD.57:
       put w
       GOTO TRAVEL
     SHARD.58:
       put w
       GOTO TRAVEL
     SHARD.59:
       put go bridge
       GOTO TRAVEL
     SHARD.60:
       setVariable storecode Sreag
       put se
       GOTO TRAVEL
     SHARD.61:
       setVariable entrance building
       setVariable item %Sreag
       setVariable shopdiff %SreagQuant
       GOTO %MRS%

   LEAVE.SREAG:
     SHARD.62:
       counter set 62
       put sw
       GOTO TRAVEL
     SHARD.63:
       setVariable storecode Sbard
       put sw
       GOTO TRAVEL
     SHARD.64:
       setVariable entrance shop
       setVariable item %Sbard
       setVariable shopdiff %SbardQuant
       GOTO %MRS%

   LEAVE.SBARD:
     SHARD.65:
       counter set 65
       setVariable storecode Slock
       put go shop
       GOTO TRAVEL
     SHARD.66:
       put ask malik about kilam
       matchre KILAM1 /order something and offer|looks at you curiously/
       GOTO UniversalMatch
   KILAM1:
       put order pick
       match KILAM2 That would suit you
       GOTO UniversalMatch
   KILAM2:
       put offer 10000000
       match KILAM3 OFFER it again within the next
       GOTO UniversalMatch
   KILAM3:
       put offer 10000000
       match KILAM4 They drag you out
       GOTO UniversalMatch
   KILAM4:
       setVariable item %Slock
       setVariable shopdiff %SlockQuant
   KILAM5:
       matchre KILAM5 /wait|type ahead|Roundtime/i
       match %MRS% You stand back up.
       put kneel
       put stand
       GOTO UniversalMatch

   LEAVE.SLOCK:
       setVariable starthold %startlocation
       setVariable startlocation placeholder
     SHARD.68:
       counter set 68
       match ALTLEAVE.SLOCK You can't go there.
       put sw
       GOTO TRAVEL
     SHARD.69:
       setVariable startlocation %starthold
       put sw
       GOTO TRAVEL
     SHARD.70:
       put go bridge
       GOTO TRAVEL
     SHARD.71:
       setVariable storecode Sarmo
       put nw
       GOTO TRAVEL
     SHARD.72:
       setVariable entrance building
       setVariable item %Sarmo
       setVariable shopdiff %SarmoQuant
       GOTO %MRS%

   LEAVE.SARMO:
     SHARD.73:
       counter set 73
       put se
       GOTO TRAVEL
     SHARD.74:
       put se
       GOTO TRAVEL
     SHARD.75:
       put e
       GOTO TRAVEL
     SHARD.76:
       put e
       GOTO TRAVEL
     SHARD.77:
       put go bridge
       GOTO TRAVEL
     SHARD.78:
       setVariable storecode Scoin
       put w
       GOTO TRAVEL
     SHARD.79:
       setVariable entrance building
       setVariable item %Scoin
       setVariable shopdiff %ScoinQuant
       GOTO %MRS%

   LEAVE.SCOIN:
     SHARD.80:
       counter set 80
       setVariable storecode Stoke
       put s
       GOTO TRAVEL
     SHARD.81:
       setVariable entrance shop
       setVariable item %Stoke
       setVariable shopdiff %StokeQuant
       GOTO %MRS%

   LEAVE.STOKE:
     SHARD.82:
       counter set 82
       setVariable storecode Sfril
       put s
       GOTO TRAVEL
     SHARD.83:
       setVariable entrance shop
       setVariable item %Sfril
       setVariable shopdiff %SfrilQuant
       GOTO %MRS%

   LEAVE.SFRIL:
     SHARD.84:
       counter set 84
       put s
       GOTO TRAVEL
     SHARD.85:
       setVariable storecode Shera
       put s
       GOTO TRAVEL
     SHARD.86:
       setVariable entrance building
       setVariable item %Shera
       setVariable shopdiff %SheraQuant
       GOTO %MRS%

   LEAVE.SHERA:
     SHARD.87:
       counter set 87
       put e
       GOTO TRAVEL
     SHARD.88:
       setVariable storecode Stour
       put e
       GOTO TRAVEL
     SHARD.89:
       setVariable entrance shop
       setVariable item %Stour
       setVariable itemlocation %StourItemLoc
       setVariable shopdiff %StourQuant
       GOTO %MRS%

   LEAVE.STOUR:
     SHARD.90:
       counter set 90
       put n
       GOTO TRAVEL
     SHARD.91:
       setVariable storecode Stoyb
       put n
       GOTO TRAVEL
     SHARD.92:
       setVariable entrance shop
       setVariable item %Stoyb
       setVariable shopdiff %StoybQuant
       GOTO %MRS%

   LEAVE.STOYB:
     SHARD.93:
       counter set 93
       setVariable storecode Sbarb
       put n
       GOTO TRAVEL
     SHARD.94:
       setVariable entrance shop
       setVariable item %Sbarb
       setVariable shopdiff %SbarbQuant
       GOTO %MRS%

   LEAVE.SBARB:
     SHARD.95:
       counter set 95
       put w
       GOTO TRAVEL
     SHARD.96:
       put n
       GOTO TRAVEL
     SHARD.97:
       put go square
       GOTO TRAVEL
     SHARD.98:
       put n
       GOTO TRAVEL
     SHARD.99:
       put n
       GOTO TRAVEL
     SHARD.100:
       put n
       GOTO TRAVEL
     SHARD.101:
       put n
       GOTO TRAVEL
     SHARD.102:
       put n
       GOTO TRAVEL
     SHARD.103:
       put n
       GOTO TRAVEL
     SHARD.104:
       put n
       GOTO TRAVEL
     SHARD.105:
       put n
       GOTO TRAVEL
     SHARD.106:
       setVariable storecode Smuse
       put go building
       GOTO TRAVEL
     SHARD.107:
       setVariable entrance arch
       setVariable item %Smuse
       setVariable shopdiff %SmuseQuant
       GOTO %MRS%

   LEAVE.SMUSE:
     SHARD.108:
       counter set 108
       put out
       GOTO TRAVEL
     SHARD.109:
       put go gate
       GOTO TRAVEL
     SHARD.110:
       put n
       GOTO TRAVEL
     SHARD.111:
       setVariable storecode Sbake
       put se
       GOTO TRAVEL
     SHARD.112:
       setVariable entrance bakery
       setVariable item %Sbake
       setVariable shopdiff %SbakeQuant
       GOTO %MRS%

   LEAVE.SBAKE:
     SHARD.113:
       counter set 113
       put se
       GOTO TRAVEL
     SHARD.114:
       put se
       GOTO TRAVEL
     SHARD.115:
       put se
       GOTO TRAVEL
     SHARD.116:
       put se
       GOTO TRAVEL
     SHARD.117:
       put se
       GOTO TRAVEL
     SHARD.118:
       put go bridge
       GOTO TRAVEL
     SHARD.119:
       setVariable storecode Sbows
       put ne
       GOTO TRAVEL
     SHARD.120:
       setVariable entrance shop
       setVariable item %Sbows
       setVariable shopdiff %SbowsQuant
       GOTO %MRS%

   LEAVE.SBOWS:
       GOTO %LorM%.SBOWS.1
   LEAVE.SBOWS.1:
     SHARD.121:
       counter set 121
       put ne
       GOTO TRAVEL
     SHARD.122:
       put n
       GOTO TRAVEL
     SHARD.123:
       put go gate
       GOTO TRAVEL
     SHARD.124:
       put e
       GOTO TRAVEL
     SHARD.125:
       put e
       GOTO TRAVEL
     SHARD.126:
       put e
       GOTO TRAVEL
     SHARD.127:
       put e
       GOTO TRAVEL
     SHARD.128:
       put e
       GOTO TRAVEL
     SHARD.129:
       put e
       GOTO TRAVEL
     SHARD.130:
       put go gap
       GOTO TRAVEL
     SHARD.131:
       put n
       GOTO TRAVEL
     SHARD.132:
       put n
       GOTO TRAVEL
     SHARD.133:
       put n
       GOTO TRAVEL
     SHARD.134:
       put go gate
       GOTO TRAVEL
     SHARD.135:
       put nw
       GOTO TRAVEL
     SHARD.136:
       put go path
       GOTO TRAVEL
     SHARD.137:
       put ne
       GOTO TRAVEL
     SHARD.138:
       setVariable storecode Stann
       put go building
       GOTO TRAVEL
     SHARD.139:
       setVariable entrance building
       setVariable item %Stann
       setVariable shopdiff %StannQuant
       GOTO %MRS%

   ALTLEAVE.STANN:
   LEAVE.STANN:
       put out
       wait
       setVariable entrance tree
       setVariable item %Ssupb
       setVariable shopdiff %SsupbQuant
       setVariable storecode Ssupb
       GOTO %MRS%

   LEAVE.SSUPB:
     SHARD.140:
       counter set 140
       setVariable storecode Ssupf
       put go tree
       GOTO TRAVEL
     SHARD.141:
       setVariable entrance curtain
       setVariable item %Ssupf
       setVariable shopdiff %SsupfQuant
       GOTO %MRS%

   ALTLEAVE.SSUPF:
       setVariable starthold %startlocation
       setVariable startlocation placeholder
     SHARD.380:
       counter set 380
       put out
       GOTO TRAVEL
     SHARD.381:
       setVariable startlocation %starthold
       put sw
       GOTO TRAVEL
   LEAVE.SSUPF:
     SHARD.142:
       match ALTLEAVE.SSUPF referring
     SHARD.382:
       counter set 142
       put go path
       GOTO TRAVEL
     SHARD.143:
       put se
       GOTO TRAVEL
     SHARD.144:
       put go gate
       GOTO TRAVEL
     SHARD.145:
       put s
       GOTO TRAVEL
     SHARD.146:
       put s
       GOTO TRAVEL
     SHARD.147:
       put s
       GOTO TRAVEL
     SHARD.148:
       put go gap
       GOTO TRAVEL
     SHARD.149:
       put w
       GOTO TRAVEL
     SHARD.150:
       put n
       GOTO TRAVEL
     SHARD.151:
       put n
       GOTO TRAVEL
     SHARD.152:
       put n
       GOTO TRAVEL
     SHARD.153:
       put n
       GOTO TRAVEL
     SHARD.154:
       put n
       GOTO TRAVEL
     SHARD.155:
       put n
       GOTO TRAVEL
     SHARD.156:
       put n
       GOTO TRAVEL
     SHARD.157:
       put n
       GOTO TRAVEL
     SHARD.158:
       put nw
       GOTO TRAVEL
     SHARD.159:
       put nw
       GOTO TRAVEL
     SHARD.160:
       put nw
       GOTO TRAVEL
     SHARD.161:
       put nw
       GOTO TRAVEL
     SHARD.162:
       put nw
       GOTO TRAVEL
     SHARD.163:
       put nw
       GOTO TRAVEL
     SHARD.164:
       put w
       GOTO TRAVEL
     SHARD.165:
       put w
       GOTO TRAVEL
     SHARD.166:
       put w
       GOTO TRAVEL
     SHARD.167:
       put w
       GOTO TRAVEL
     SHARD.168:
       put w
       GOTO TRAVEL
     SHARD.169:
       put w
       GOTO TRAVEL
     SHARD.170:
       put w
       GOTO TRAVEL
     SHARD.171:
       GOTO %LorM%.SSUPF.1

   LEAVE.SSUPF.1:
     SHARD.743:
       counter set 743
       put ne
       GOTO TRAVEL
     SHARD.744:
     SHARD.172:
       counter set 172
       put nw
       GOTO TRAVEL
     SHARD.173:
       put nw
       GOTO TRAVEL
     SHARD.174:
       put n
       GOTO TRAVEL
     SHARD.175:
       put n
       GOTO TRAVEL
     SHARD.176:
       put e
       GOTO TRAVEL
     SHARD.177:
       put e
       GOTO TRAVEL
     SHARD.178:
       put ne
       GOTO TRAVEL
     SHARD.179:
       put e
       GOTO TRAVEL
     SHARD.180:
       put e
       GOTO TRAVEL
     SHARD.181:
       put n
       GOTO TRAVEL
     SHARD.182:
       put ne
       GOTO TRAVEL
     SHARD.183:
       put ne
       GOTO TRAVEL
     SHARD.184:
       put ne
       GOTO TRAVEL
     SHARD.185:
       put n
       GOTO TRAVEL
     SHARD.186:
       put ne
       GOTO TRAVEL
     SHARD.187:
       put ne
       GOTO TRAVEL
     SHARD.188:
       put n
       GOTO TRAVEL
     SHARD.189:
       put n
       GOTO TRAVEL
     SHARD.190:
       put ne
       GOTO TRAVEL
     SHARD.191:
       put ne
       GOTO TRAVEL
     SHARD.192:
       put n
       GOTO TRAVEL
     SHARD.193:
       put n
       GOTO TRAVEL
     SHARD.194:
       put ne
       GOTO TRAVEL
     SHARD.195:
       put n
       GOTO TRAVEL
     SHARD.196:
       put ne
       GOTO TRAVEL
     SHARD.197:
       put n
       GOTO TRAVEL
     SHARD.198:
       put ne
       GOTO TRAVEL
     SHARD.199:
       put e
       GOTO TRAVEL
     SHARD.200:
       put ne
       GOTO TRAVEL
     SHARD.201:
       put n
       GOTO TRAVEL
     SHARD.202:
       put go oak
       GOTO TRAVEL
     SHARD.203:
       put go clock
       GOTO TRAVEL
     SHARD.204:
       setVariable storecode Smarw
       put go blue door
       GOTO TRAVEL
     SHARD.205:
       setVariable entrance blue door
       setVariable item %Smarw
       setVariable shopdiff %SmarwQuant
       GOTO %MRS%

   LEAVE.SMARW:
     SHARD.206:
       counter set 206
       match ALTLEAVE.SMARW referring
       put go green door
       GOTO TRAVEL
     SHARD.207:
       setVariable storecode Smarg
       setVariable entrance green door
       setVariable item %Smarg
       setVariable shopdiff %SmargQuant
       GOTO %MRS%

   LEAVE.SMARG:
     SHARD.208:
       counter set 208
       match ALTLEAVE.SMARG referring
       put go clock
       GOTO TRAVEL
     SHARD.209:
       put go road
       GOTO TRAVEL
     SHARD.210:
       put s
       GOTO TRAVEL
     SHARD.211:
       put sw
       GOTO TRAVEL
     SHARD.212:
       put climb stair
       GOTO TRAVEL
     SHARD.213:
       setVariable storecode Senes
       put go tree
       GOTO TRAVEL
     SHARD.214:
       setVariable entrance tree
       setVariable item %Senes
       setVariable shopdiff %SenesQuant
       GOTO %MRS%

   ALTLEAVE.SENES:
       setVariable starthold %startlocation
       setVariable startlocation placeholder
     SHARD.387:
       counter set 387
       put out
       GOTO TRAVEL
     SHARD.388:
       setVariable startlocation %starthold
   LEAVE.SENES:
     SHARD.215:
       counter set 215
       match ALTLEAVE.SENES referring
       put climb stair
       GOTO TRAVEL
     SHARD.216:
       put w
       GOTO TRAVEL
     SHARD.217:
       put sw
       GOTO TRAVEL
     SHARD.218:
       put s
       GOTO TRAVEL
     SHARD.219:
       put sw
       GOTO TRAVEL
     SHARD.220:
       put s
       GOTO TRAVEL
     SHARD.221:
       put sw
       GOTO TRAVEL
     SHARD.222:
       put s
       GOTO TRAVEL
     SHARD.223:
       put s
       GOTO TRAVEL
     SHARD.224:
       put sw
       GOTO TRAVEL
     SHARD.225:
       put sw
       GOTO TRAVEL
     SHARD.226:
       put s
       GOTO TRAVEL
     SHARD.227:
       put s
       GOTO TRAVEL
     SHARD.228:
       put sw
       GOTO TRAVEL
     SHARD.229:
       put sw
       GOTO TRAVEL
     SHARD.230:
       put s
       GOTO TRAVEL
     SHARD.231:
       put sw
       GOTO TRAVEL
     SHARD.232:
       put sw
       GOTO TRAVEL
     SHARD.233:
       GOTO %LorM%.ENES.1
   LEAVE.SENES.1:
       GOTO SHARD.CLAN.%clanoption%

   MOVEON.SENES.1:
   SHARD.CLAN.NO.1:
     SHARD.733:
       counter set 733
       put sw
       GOTO TRAVEL
     SHARD.734:
     SHARD.234:
       counter set 234
       put s
       GOTO TRAVEL
     SHARD.235:
       put w
       GOTO TRAVEL
     SHARD.236:
       put w
       GOTO TRAVEL
     SHARD.237:
       put sw
       GOTO TRAVEL
     SHARD.238:
       put w
       GOTO TRAVEL
     SHARD.239:
       put w
       GOTO TRAVEL
     SHARD.240:
       put s
       GOTO TRAVEL
     SHARD.241:
       put s
       GOTO TRAVEL
     SHARD.242:
       put se
       GOTO TRAVEL
     SHARD.243:
       put se
       GOTO TRAVEL
     SHARD.244:
       put sw
       GOTO TRAVEL

   SHARD.CLAN.YES:
       put echo %HCfelt %HCequi %HCfalc %HCjaht %HCcash %HCbow1 %HCbow2 %SCCleat %SCCweap
       put glance
       match SHARD.CLAN.NO nothing nothing nothing nothing nothing nothing nothing nothing nothing
       match SHARD.CLAN.YES.2 You glance
       GOTO UniversalMatch

   SHARD.CLAN.NO:
       setVariable clanoption NO
       GOTO SHARD.CLAN.NO.1
       
   SHARD.CLAN.YES.2:
     SHARD.452:
       counter set 452
       put sw
       GOTO TRAVEL
     SHARD.453:
       put go path
       GOTO TRAVEL
     SHARD.454:
       put w
       GOTO TRAVEL
     SHARD.455:
       put go bridge
       GOTO TRAVEL
     SHARD.456:
       put e
       GOTO TRAVEL
     SHARD.457:
       put n
       GOTO TRAVEL
     SHARD.458:
       put n
       GOTO TRAVEL
     SHARD.459:
       put n
       GOTO TRAVEL
     SHARD.460:
       put go stable
       GOTO TRAVEL
     SHARD.461:
       put e
       setVariable storecode SCCleat
       GOTO TRAVEL
     SHARD.462:
       setVariable entrance south
       setVariable item %SCCleat
       setVariable shopdiff %SCCleatQuant
       GOTO %MRS%

   LEAVE.SCCLEAT:
     SHARD.463:
       counter set 463
       put w
       GOTO TRAVEL
     SHARD.464:
       put go door
       GOTO TRAVEL
     SHARD.465:
       put s
       GOTO TRAVEL
     SHARD.466:
       put s
       GOTO TRAVEL
     SHARD.467:
       put s
       GOTO TRAVEL
     SHARD.468:
       put e
       GOTO TRAVEL
     SHARD.469:
       put ne
       setVariable storecode SCCweap
       GOTO TRAVEL
     SHARD.470:
       setVariable entrance building
       setVariable item %SCCweap
       setVariable shopdiff %SCCweapQuant
       GOTO %MRS%

   LEAVE.SCCWEAP:
     SHARD.471:
       counter set 471
       put sw
       GOTO TRAVEL
     SHARD.472:
       put w
       GOTO TRAVEL
     SHARD.473:
       put w
       GOTO TRAVEL
     SHARD.474:
       put go gate
       GOTO TRAVEL
     SHARD.475:
       put e
       GOTO TRAVEL
     SHARD.476:
       put go path
       GOTO TRAVEL
     SHARD.477:
       put s
       GOTO TRAVEL
     SHARD.478:
       put w
       GOTO TRAVEL
     SHARD.479:
       put w
       GOTO TRAVEL
     SHARD.480:
       put sw
       GOTO TRAVEL
     SHARD.481:
       put w
       GOTO TRAVEL
     SHARD.482:
       put w
       GOTO TRAVEL
     SHARD.483:
       put s
       GOTO TRAVEL
     SHARD.484:
       put s
       GOTO TRAVEL
     SHARD.485:
       put se
       GOTO TRAVEL
     SHARD.486:
       put se
       GOTO TRAVEL
     SHARD.487:
       put sw
       GOTO TRAVEL
     SHARD.488:
       put go trail
       GOTO TRAVEL
     SHARD.489:
       put w
       GOTO TRAVEL
     SHARD.490:
       put sw
       GOTO TRAVEL
     SHARD.491:
       put sw
       GOTO TRAVEL
     SHARD.492:
       put s
       GOTO TRAVEL
     SHARD.493:
       put w
       GOTO TRAVEL
     SHARD.494:
       put nw
       GOTO TRAVEL
     SHARD.495:
       put n
       GOTO TRAVEL
     SHARD.496:
       put nw
       GOTO TRAVEL
     SHARD.497:
       put w
       GOTO TRAVEL
     SHARD.498:
       put n
       GOTO TRAVEL
     SHARD.499:
       put nw
       GOTO TRAVEL
     SHARD.500:
       put n
       GOTO TRAVEL
     SHARD.501:
       put nw
       GOTO TRAVEL
     SHARD.502:
       put nw
       GOTO TRAVEL
     SHARD.503:
       put n
       GOTO TRAVEL
     SHARD.504:
       put ne
       GOTO TRAVEL
     SHARD.505:
       put ne
       GOTO TRAVEL
     SHARD.506:
       put ne
       GOTO TRAVEL
     SHARD.507:
       put n
       GOTO TRAVEL
     SHARD.508:
       put ne
       GOTO TRAVEL
     SHARD.509:
       put n
       GOTO TRAVEL
     SHARD.510:
       put nw
       GOTO TRAVEL
     SHARD.511:
       put nw
       GOTO TRAVEL
     SHARD.512:
       put w
       GOTO TRAVEL
     SHARD.513:
       put nw
       GOTO TRAVEL
     SHARD.514:
       put w
       GOTO TRAVEL
     SHARD.515:
       put w
       GOTO TRAVEL
     SHARD.516:
       put sw
       GOTO TRAVEL
     SHARD.517:
       put nw
       GOTO TRAVEL
     SHARD.518:
       put w
       GOTO TRAVEL
     SHARD.519:
       put w
       GOTO TRAVEL
     SHARD.520:
       put w
       GOTO TRAVEL
     SHARD.521:
       put w
       GOTO TRAVEL
     SHARD.522:
       put w
       GOTO TRAVEL
     SHARD.523:
       put sw
       GOTO TRAVEL
     SHARD.524:
       put nw
       GOTO TRAVEL
     SHARD.525:
       put w
       GOTO TRAVEL
     SHARD.526:
       put w
       GOTO TRAVEL
     SHARD.527:
       put sw
       GOTO TRAVEL
     SHARD.528:
       put sw
       GOTO TRAVEL
     SHARD.529:
       put nw
       GOTO TRAVEL
     SHARD.530:
       put w
       GOTO TRAVEL
     SHARD.531:
       put w
       GOTO TRAVEL
     SHARD.532:
       put sw
       GOTO TRAVEL
     SHARD.533:
       put sw
       GOTO TRAVEL
     SHARD.534:
       put nw
       GOTO TRAVEL
     SHARD.535:
       put w
       GOTO TRAVEL
     SHARD.536:
       put sw
       GOTO TRAVEL
     SHARD.537:
       put w
       GOTO TRAVEL
     SHARD.538:
       put sw
       GOTO TRAVEL
     SHARD.539:
       put climb path
       GOTO TRAVEL
     SHARD.540:
       put w
       GOTO TRAVEL
     SHARD.541:
       put nw
       GOTO TRAVEL
     SHARD.542:
       put w
       GOTO TRAVEL
     SHARD.543:
       put sw
       GOTO TRAVEL
     SHARD.544:
       put climb trail
       GOTO TRAVEL
     SHARD.545:
       put nw
       GOTO TRAVEL
     SHARD.546:
       put s
       GOTO TRAVEL
     SHARD.547:
       put sw
       GOTO TRAVEL
     SHARD.548:
       put w
       GOTO TRAVEL
     SHARD.549:
       put nw
       GOTO TRAVEL
     SHARD.550:
       put w
       GOTO TRAVEL
     SHARD.551:
       put w
       GOTO TRAVEL
     SHARD.552:
       put w
       GOTO TRAVEL
     SHARD.553:
       put sw
       GOTO TRAVEL
     SHARD.554:
       put se
       GOTO TRAVEL
     SHARD.555:
       put s
       GOTO TRAVEL
     SHARD.556:
       put w
       GOTO TRAVEL
     SHARD.557:
       put sw
       GOTO TRAVEL
     SHARD.558:
       put w
       GOTO TRAVEL
     SHARD.559:
       put sw
       GOTO TRAVEL
     SHARD.560:
       put w
       GOTO TRAVEL
     SHARD.561:
       put sw
       GOTO TRAVEL
     SHARD.562:
       put w
       GOTO TRAVEL
     SHARD.563:
       put nw
       GOTO TRAVEL
     SHARD.564:
       put w
       GOTO TRAVEL
     SHARD.565:
       put nw
       GOTO TRAVEL
     SHARD.566:
       put w
       GOTO TRAVEL
     SHARD.567:
       put nw
       GOTO TRAVEL
     SHARD.568:
       put w
       GOTO TRAVEL
     SHARD.569:
       put s
       GOTO TRAVEL
     SHARD.570:
       put go path
       GOTO TRAVEL
     SHARD.571:
       put sw
       GOTO TRAVEL
     SHARD.572:
       put w
       GOTO TRAVEL
     SHARD.573:
       put sw
       GOTO TRAVEL
     SHARD.574:
       put se
       GOTO TRAVEL
     SHARD.575:
       put w
       GOTO TRAVEL
     SHARD.576:
       put w
       GOTO TRAVEL
     SHARD.577:
       put se
       GOTO TRAVEL
     SHARD.578:
       put se
       GOTO TRAVEL
     SHARD.579:
       put s
       setVariable storecode HCfelt
       GOTO TRAVEL
     SHARD.580:
       setVariable entrance tent
       setVariable item %HCfelt
       setVariable shopdiff %HCfeltQuant
       GOTO %MRS%

   LEAVE.HCFELT:
     SHARD.581:
       counter set 581
       put sw
       GOTO TRAVEL
     SHARD.582:
       put e
       GOTO TRAVEL
     SHARD.583:
       put ne
       GOTO TRAVEL
     SHARD.584:
       put e
       GOTO TRAVEL
     SHARD.585:
       put se
       GOTO TRAVEL
     SHARD.586:
       put e
       GOTO TRAVEL
     SHARD.587:
       put se
       GOTO TRAVEL
     SHARD.588:
       put go tent
       setVariable storecode HCequi
       GOTO TRAVEL
     SHARD.589:
       setVariable entrance east
       setVariable item %HCequi
       setVariable shopdiff %HCequiQuant
       GOTO %MRS%

   LEAVE.HCEQUI:
     SHARD.590:
       counter set 590
       put go flap
       GOTO TRAVEL
     SHARD.591:
       put s
       GOTO TRAVEL
     SHARD.592:
       put se
       GOTO TRAVEL
     SHARD.593:
       put w
       GOTO TRAVEL
     SHARD.594:
       put nw
       setVariable storecode HCfalc
       GOTO TRAVEL
     SHARD.595:
       setVariable entrance tent
       setVariable item %HCfalc
       setVariable shopdiff %HCfalcQuant
       GOTO %MRS%

   LEAVE.HCFALC:
     SHARD.596:
       counter set 596
       put sw
       GOTO TRAVEL
     SHARD.597:
       put go tent
       setVariable storecode HCjaht
       GOTO TRAVEL
     SHARD.598:
       setVariable entrance corner
       setVariable item %HCjaht
       setVariable shopdiff %HCjahtQuant
       GOTO %MRS%

   LEAVE.HCJAHT:
     SHARD.599:
       counter set 599
       put go flap
       GOTO TRAVEL
     SHARD.600:
       put se
       GOTO TRAVEL
     SHARD.601:
       put se
       GOTO TRAVEL
     SHARD.602:
       put se
       GOTO TRAVEL
     SHARD.603:
       put e
       GOTO TRAVEL
     SHARD.604:
       put se
       setVariable storecode HCcash
       GOTO TRAVEL
     SHARD.605:
       setVariable entrance tent
       setVariable item %HCcash
       setVariable shopdiff %HCcashQuant
       GOTO %MRS%

   LEAVE.HCCASH:
     SHARD.606:
       counter set 606
       put n
       GOTO TRAVEL
     SHARD.607:
       put nw
       setVariable storecode HCbow1
       GOTO TRAVEL
     SHARD.608:
       setVariable entrance tent
       setVariable item %HCbow1
       setVariable shopdiff %HCbow1Quant
       GOTO %MRS%

   LEAVE.HCBOW1:
       setVariable storecode HCbow2
       setVariable item %HCbow2
       setVariable shopdiff %HCbow2Quant
       GOTO %MRS%

   LEAVE.HCBOW2:
     SHARD.745:
       counter set 745
       put go flap
       match SHARD.746 referring
       GOTO TRAVEL
     SHARD.746:
     SHARD.609:
       counter set 609
       setVariable starthold %startlocation
       setVariable startlocation placeholder
       put w
       GOTO TRAVEL
     SHARD.610:
       put ne
       GOTO TRAVEL
     SHARD.611:
       put n
       GOTO TRAVEL
     SHARD.612:
       put nw
       GOTO TRAVEL
     SHARD.613:
       put n
       GOTO TRAVEL
     SHARD.614:
       put nw
       GOTO TRAVEL
     SHARD.615:
       put w
       GOTO TRAVEL
     SHARD.616:
       match HORSE.HEALTH.%class hand which appears completely useless
       match LEAVE.HCBOW2.2 You glance
       put health
       put glance
       GOTO UniversalMatch

   HORSE.HEALTH.EMPATH:
       setVariable SelfHealLoc HorseClan
       GOTO EMPATH.HEALSELF

   SHARD.EMPATH.TO.RESUME.FROM.HORSECLAN:
       setVariable MRS shopcheck
       setVariable LorM leave
       setVariable npcoption yes
       GOTO LEAVE.HCBOW2.2

   HORSE.HEALTH.THIEF:
   HORSE.HEALTH.NONTHIEF:
   LEAVE.HCBOW2.2:
     SHARD.805:
       counter set 805
       put nw
       GOTO TRAVEL
     SHARD.806:
     SHARD.617:
       counter set 617
       put w
       GOTO TRAVEL
     SHARD.618:
       put sw
       GOTO TRAVEL
     SHARD.619:
       put w
       GOTO TRAVEL
     SHARD.620:
       put ne
       GOTO TRAVEL
     SHARD.621:
       put n
       GOTO TRAVEL
     SHARD.622:
       put nw
       GOTO TRAVEL
     SHARD.623:
       put nw
       GOTO TRAVEL
     SHARD.624:
       put e
       GOTO TRAVEL
     SHARD.625:
       put e
       GOTO TRAVEL
     SHARD.626:
       put nw
       GOTO TRAVEL
     SHARD.627:
       put ne
       GOTO TRAVEL
     SHARD.628:
       put e
       GOTO TRAVEL
     SHARD.629:
       put ne
       GOTO TRAVEL
     SHARD.630:
       put go path
       GOTO TRAVEL
     SHARD.631:
       setVariable startlocation %starthold
       put n
       GOTO TRAVEL
     SHARD.632:
       put e
       GOTO TRAVEL
     SHARD.633:
       put se
       GOTO TRAVEL
     SHARD.634:
       put e
       GOTO TRAVEL
     SHARD.635:
       put se
       GOTO TRAVEL
     SHARD.636:
       put e
       GOTO TRAVEL
     SHARD.637:
       put se
       GOTO TRAVEL
     SHARD.638:
       put e
       GOTO TRAVEL
     SHARD.639:
       put ne
       GOTO TRAVEL
     SHARD.640:
       put e
       GOTO TRAVEL
     SHARD.641:
       put ne
       GOTO TRAVEL
     SHARD.642:
       put e
       GOTO TRAVEL
     SHARD.643:
       put ne
       GOTO TRAVEL
     SHARD.644:
       put e
       GOTO TRAVEL
     SHARD.645:
       put n
       GOTO TRAVEL
     SHARD.646:
       put nw
       GOTO TRAVEL
     SHARD.647:
       put ne
       GOTO TRAVEL
     SHARD.648:
       put e
       GOTO TRAVEL
     SHARD.649:
       put e
       GOTO TRAVEL
     SHARD.650:
       put e
       GOTO TRAVEL
     SHARD.651:
       put se
       GOTO TRAVEL
     SHARD.652:
       put e
       GOTO TRAVEL
     SHARD.653:
       put ne
       GOTO TRAVEL
     SHARD.654:
       put n
       GOTO TRAVEL
     SHARD.655:
       put se
       GOTO TRAVEL
     SHARD.656:
       put climb bluff
       GOTO TRAVEL
     SHARD.657:
       put ne
       GOTO TRAVEL
     SHARD.658:
       put e
       GOTO TRAVEL
     SHARD.659:
       put se
       GOTO TRAVEL
     SHARD.660:
     SHARD.670:
       counter set 670
       put e
       GOTO TRAVEL
     SHARD.671:
       put climb path
       GOTO TRAVEL
     SHARD.672:
       put ne
       GOTO TRAVEL
     SHARD.673:
       put e
       GOTO TRAVEL
     SHARD.674:
       put ne
       GOTO TRAVEL
     SHARD.675:
       put e
       GOTO TRAVEL
     SHARD.676:
       put se
       GOTO TRAVEL
     SHARD.677:
       put ne
       GOTO TRAVEL
     SHARD.678:
       put ne
       GOTO TRAVEL
     SHARD.679:
       put e
       GOTO TRAVEL
     SHARD.680:
       put e
       GOTO TRAVEL
     SHARD.681:
       put se
       GOTO TRAVEL
     SHARD.682:
       put ne
       GOTO TRAVEL
     SHARD.683:
       put ne
       GOTO TRAVEL
     SHARD.684:
       put e
       GOTO TRAVEL
     SHARD.685:
       put e
       GOTO TRAVEL
     SHARD.686:
       put se
       GOTO TRAVEL
     SHARD.687:
       put ne
       GOTO TRAVEL
     SHARD.688:
       put e
       GOTO TRAVEL
     SHARD.689:
       put e
       GOTO TRAVEL
     SHARD.690:
       put e
       GOTO TRAVEL
     SHARD.691:
       put e
       GOTO TRAVEL
     SHARD.692:
       put e
       GOTO TRAVEL
     SHARD.693:
       put se
       GOTO TRAVEL
     SHARD.694:
       put ne
       GOTO TRAVEL
     SHARD.695:
       put e
       GOTO TRAVEL
     SHARD.696:
       put e
       GOTO TRAVEL
     SHARD.697:
       put se
       GOTO TRAVEL
     SHARD.698:
       put e
       GOTO TRAVEL
     SHARD.699:
       put se
       GOTO TRAVEL
     SHARD.700:
       put se
       GOTO TRAVEL
     SHARD.701:
       put s
       GOTO TRAVEL
     SHARD.702:
       put sw
       GOTO TRAVEL
     SHARD.703:
       put s
       GOTO TRAVEL
     SHARD.704:
       put sw
       GOTO TRAVEL
     SHARD.705:
       put sw
       GOTO TRAVEL
     SHARD.706:
       put sw
       GOTO TRAVEL
     SHARD.707:
       put s
       GOTO TRAVEL
     SHARD.708:
       put se
       GOTO TRAVEL
     SHARD.709:
       put se
       GOTO TRAVEL
     SHARD.710:
       put s
       GOTO TRAVEL
     SHARD.711:
       put se
       GOTO TRAVEL
     SHARD.712:
       put s
       GOTO TRAVEL
     SHARD.713:
       put e
       GOTO TRAVEL
     SHARD.714:
       put se
       GOTO TRAVEL
     SHARD.715:
       put s
       GOTO TRAVEL
     SHARD.716:
       put se
       GOTO TRAVEL
     SHARD.717:
       put e
       GOTO TRAVEL
     SHARD.718:
       put go trail
       GOTO TRAVEL
     SHARD.719:
       put ne
       GOTO TRAVEL
     SHARD.720:
       put ne
       GOTO TRAVEL
     SHARD.721:
       put e
       GOTO TRAVEL
     SHARD.722:
       put e
       GOTO TRAVEL
     SHARD.723:
   MOVEON.SSUPF.1:
     SHARD.245:
       counter set 245
       put s
       GOTO TRAVEL
     SHARD.246:
       put s
       GOTO TRAVEL
     SHARD.247:
       put s
       GOTO TRAVEL
     SHARD.248:
       put s
       GOTO TRAVEL
     SHARD.249:
       put s
       GOTO TRAVEL
     SHARD.250:
       put go gate
       GOTO TRAVEL
     SHARD.251:
       put s
       GOTO TRAVEL
     SHARD.252:
       put s
       GOTO TRAVEL
     SHARD.253:
       setVariable storecode Sgene
       put s
       GOTO TRAVEL
     SHARD.254:
       setVariable entrance shop
       setVariable item %Sgene
       setVariable shopdiff %SgeneQuant
       GOTO %MRS%

   MOVEON.SBOWS.1:
     SHARD.260:
       counter set 260
       put sw
       GOTO TRAVEL
     SHARD.261:
       put sw
       GOTO TRAVEL
     SHARD.262:
       put w
       GOTO TRAVEL
     SHARD.263:
       put w
       GOTO TRAVEL
     SHARD.264:
       put n
       GOTO TRAVEL
     SHARD.265:
       put n
       GOTO TRAVEL
     SHARD.266:
       put n
       GOTO TRAVEL
     SHARD.267:
       put go building
       GOTO TRAVEL
     SHARD.268:
       match SHARD.PAWN.TO.QUENTIN hand which appears completely useless
       match SHARD.PAWN You glance
       put health
       put glance
       GOTO UniversalMatch

   MOVEON.SGENE.1:
     SHARD.760:
       counter set 760
       put s
       GOTO TRAVEL
     SHARD.761:
       put s
       GOTO TRAVEL
     SHARD.762:
       put s
       GOTO TRAVEL
     SHARD.763:
       put s
       GOTO TRAVEL
     SHARD.764:
       put go gate
       GOTO TRAVEL
     SHARD.765:
       put s
       GOTO TRAVEL
     SHARD.766:
       put e
       GOTO TRAVEL
     SHARD.767:
       match SHARD.QUENTIN.%class hand which appears completely useless
       match MOVEON.SGENE.2 You glance
       put health
       put glance
       GOTO UniversalMatch

   SHARD.QUENTIN.THIEF:
   SHARD.QUENTIN.NONTHIEF:
     SHARD.768:
       counter set 768
       put go building
       GOTO TRAVEL
     SHARD.769:
       put lie
       matchre SHARD.QUENTIN.LEAVE /birthday party|just my friend|You sit up/
       GOTO UniversalMatch
   SHARD.QUENTIN.LEAVE:
       match SHARD.770 You stand
       matchre SHARD.QUENTIN.LEAVE /wait|type ahead|Roundtime/i
       put kneel
       put stand
       GOTO UniversalMatch
     SHARD.770:
       put out
       GOTO TRAVEL
     SHARD.771:
       put w
       GOTO TRAVEL
     SHARD.772:
       GOTO SHARD.QUENTIN.RESUME

   SHARD.QUENTIN.EMPATH:
     SHARD.794:
       counter set 794
       put se
       GOTO TRAVEL
     SHARD.795:
       put s
       GOTO TRAVEL
     SHARD.796:
       put s
       GOTO TRAVEL
     SHARD.797:
       put sw
       GOTO TRAVEL
     SHARD.798:
       setVariable SelfHealLoc ShardTowerSE
       GOTO EMPATH.HEALSELF
   SHARD.EMPATH.TO.RESUME.FROM.SHARDTOWERSE:
     SHARD.799:
       counter set 799
       put ne
       GOTO TRAVEL
     SHARD.800:
       put n
       GOTO TRAVEL
     SHARD.801:
       put n
       GOTO TRAVEL
     SHARD.802:
       put nw
       GOTO TRAVEL
     SHARD.803:
       put w
       GOTO TRAVEL
     SHARD.804:
       GOTO SHARD.QUENTIN.RESUME

   MOVEON.SGENE.2:
     SHARD.773:
       counter set 773
       put se
       GOTO TRAVEL
     SHARD.774:
       put s
       GOTO TRAVEL
     SHARD.775:
       put s
       GOTO TRAVEL
     SHARD.776:
       put sw
       GOTO TRAVEL
     SHARD.777:
       put w
       GOTO TRAVEL
     SHARD.778:
       put se
       GOTO TRAVEL
     SHARD.779:
       GOTO LEAVE.SBAKE

   SHARD.PAWN.TO.QUENTIN:
     SHARD.780:
       counter set 780
       put o
       GOTO TRAVEL
     SHARD.781:
       put n
       GOTO TRAVEL
     SHARD.782:
       put n
       GOTO TRAVEL
     SHARD.783:
       put n
       GOTO TRAVEL
     SHARD.784:
       put n
       GOTO TRAVEL
     SHARD.785:
       put n
       GOTO TRAVEL
     SHARD.786:
       put go gate
       GOTO TRAVEL
     SHARD.787:
       put n
       GOTO TRAVEL
     SHARD.788:
       put e
       GOTO TRAVEL
     SHARD.789:
       put ne
       GOTO TRAVEL
     SHARD.790:
       put n
       GOTO TRAVEL
     SHARD.791:
       put n
       GOTO TRAVEL
     SHARD.792:
       put nw
       GOTO TRAVEL
     SHARD.793:
       GOTO SHARD.QUENTIN.ENTER

   ALTLEAVE.SCOIN:
   ALTLEAVE.STOKE:
   ALTLEAVE.SFRIL:
   ALTLEAVE.SHERA:
   ALTLEAVE.STOUR:
   ALTLEAVE.STOYB:
   ALTLEAVE.SBARB:
   ALTLEAVE.SMARW:
   ALTLEAVE.SMARG:
       setVariable starthold %startlocation
       setVariable startlocation placeholder
     SHARD.255:
       counter set 255
       put go door
       GOTO TRAVEL
     SHARD.256:
       setVariable startlocation %starthold
       GOTO LEAVE.%storecode%

   ALTLEAVE.SLOCK:
       match ALTLEAVE.SLOCK1 Kilam
       match ALTLEAVE.SLOCK2 Malik
       match SHARD.68 brown-trimmed blue shop
       put look
       GOTO ShopEngaged
   ALTLEAVE.SLOCK1:
       put go trapdoor
       match ALTLEAVE.SLOCK2 Malik
       GOTO ShopEngaged
   ALTLEAVE.SLOCK2:
       put out
       match SHARD.68 brown-trimmed blue shop
       GOTO ShopEngaged

   ALTLEAVE.HCFELT:
   ALTLEAVE.HPOTT:
   ALTLEAVE.HCFALC:
   ALTLEAVE.HCCASH:
       setVariable starthold %startlocation
       setVariable startlocation placeholder
     SHARD.724:
       counter set 724
       put go flap
       GOTO TRAVEL
     SHARD.725:
       setVariable startlocation %starthold
       GOTO LEAVE.%storecode%

   ALTLEAVE.HCBOW1:
   ALTLEAVE.HCBOW2:
       setVariable starthold %startlocation
       setVariable startlocation placeholder
     SHARD.747:
       counter set 747
       put go curtain
       GOTO TRAVEL
     SHARD.748:
       setVariable startlocation %starthold
       GOTO LEAVE.%storecode%

   ALTLEAVE.SCCLEAT:
       setVariable starthold %startlocation
       setVariable startlocation placeholder
     SHARD.726:
       counter set 726
       put n
       GOTO TRAVEL
     SHARD.727:
       setVariable startlocation %starthold
       GOTO LEAVE.%storecode%

   ALTLEAVE.HCEQUI:
       setVariable starthold %startlocation
       setVariable startlocation placeholder
     SHARD.728:
       counter set 728
       put w
       GOTO TRAVEL
     SHARD.729:
       setVariable startlocation %starthold
       GOTO LEAVE.%storecode%

   ALTLEAVE.HCJAHT:
       setVariable starthold %startlocation
       setVariable startlocation placeholder
     SHARD.730:
       counter set 730
       put go tent
       GOTO TRAVEL
     SHARD.731:
       setVariable startlocation %starthold
       GOTO LEAVE.%storecode%


          2. #####
          3. ILITHI PAWNING #####
          4. ##### 


   SHARD.PAWN.DROP:
       GOTO END

   SHARD.PAWN:
       GOTO SHARD.PAWN.%DropOrStow%
   SHARD.PAWN.STOW:
       counter set 0
     ILI.SellItem0:
       setVariable sellitem %Sgene
       GOTO %sellorbin
     ILI.SellItem1:
       setVariable sellitem %Sweap
       GOTO %sellorbin
     ILI.SellItem2:
       setVariable sellitem %Sstit
       GOTO %sellorbin
     ILI.SellItem3:
       setVariable sellitem %Salch
       GOTO %sellorbin
     ILI.SellItem4:
       setVariable sellitem %Sherb
       GOTO %sellorbin
     ILI.SellItem5:
       setVariable sellitem %Sreag
       GOTO %sellorbin
     ILI.SellItem6:
       setVariable sellitem %Sbard
       GOTO %sellorbin
     ILI.SellItem7:
       setVariable sellitem %Sarmo
       GOTO %sellorbin
     ILI.SellItem8:
       setVariable sellitem %Scoin
       GOTO %sellorbin
     ILI.SellItem9:
       setVariable sellitem %Stoke
       GOTO %sellorbin
     ILI.SellItem10:
       setVariable sellitem %Sfril
       GOTO %sellorbin
     ILI.SellItem11:
       setVariable sellitem %Stour
       GOTO %sellorbin
     ILI.SellItem12:
       setVariable sellitem %Stoyb
       GOTO %sellorbin
     ILI.SellItem13:
       setVariable sellitem %Sbarb
       GOTO %sellorbin
     ILI.SellItem14:
       setVariable sellitem %Sbows
       GOTO %sellorbin
     ILI.SellItem15:
       setVariable sellitem %Stann
       GOTO %sellorbin
     ILI.SellItem16:
       setVariable sellitem %Ssupb
       GOTO %sellorbin
     ILI.SellItem17:
       setVariable sellitem %Ssupf
       GOTO %sellorbin
     ILI.SellItem18:
       setVariable sellitem %Smarw
       GOTO %sellorbin
     ILI.SellItem19:
       setVariable sellitem %Smarg
       GOTO %sellorbin
     ILI.SellItem20:
       setVariable sellitem %Senes
       GOTO %sellorbin
     ILI.SellItem21:
       setVariable sellitem %Smuse
       GOTO %sellorbin
     ILI.SellItem22:
       setVariable sellitem %Sbake
       GOTO %sellorbin
     ILI.SellItem23:
       setVariable sellitem %Slock
       GOTO %sellorbin
     ILI.SellItem24:
       GOTO SHARD.PAWN.CLAN.%clanoption
   SHARD.PAWN.CLAN.YES:
       setVariable sellitem %SCCleat
       GOTO %sellorbin
     ILI.SellItem25:
       setVariable sellitem %SCCweap
       GOTO %sellorbin
     ILI.SellItem26:
       setVariable sellitem %HCfelt
       GOTO %sellorbin
     ILI.SellItem27:
       setVariable sellitem %HCequi
       GOTO %sellorbin
     ILI.SellItem28:
       setVariable sellitem %HCfalc
       GOTO %sellorbin
     ILI.SellItem29:
       setVariable sellitem %HCjaht
       GOTO %sellorbin
     ILI.SellItem30:
       setVariable sellitem %HCcash
       GOTO %sellorbin
     ILI.SellItem31:
       setVariable sellitem %HCbow1
       GOTO %sellorbin
     ILI.SellItem32:
       setVariable sellitem %HCbow2
       GOTO %sellorbin
   SHARD.PAWN.CLAN.NO:
     ILI.SellItem33:
       GOTO %citycode%.FINISH.%class

   SHARD.FINISH.NONTHIEF:
   SHARD.FINISH.EMPATH:
       GOTO END

   SHARD.FINISH.THIEF:
       setVariable starthold %startlocation
       setVariable startlocation placeholder
     SHARD.272:
       counter set 272
       put out
       GOTO TRAVEL
     SHARD.273:
       put n
       GOTO TRAVEL
     SHARD.274:
       put n
       GOTO TRAVEL
     SHARD.275:
       put n
       GOTO TRAVEL
     SHARD.276:
       put n
       GOTO TRAVEL
     SHARD.277:
       put n
       GOTO TRAVEL
     SHARD.278:
       put go gate
       GOTO TRAVEL
     SHARD.279:
       put n
       GOTO TRAVEL
     SHARD.280:
       put e
       GOTO TRAVEL
     SHARD.281:
       put ne
       GOTO TRAVEL
     SHARD.282:
       put n
       GOTO TRAVEL
     SHARD.283:
       put e
       GOTO TRAVEL
     SHARD.284:
       put e
       GOTO TRAVEL
     SHARD.285:
       put go bridge
       GOTO TRAVEL
     SHARD.286:
       put e
       GOTO TRAVEL
     SHARD.287:
       put e
       GOTO TRAVEL
     SHARD.288:
       put e
       GOTO TRAVEL
     SHARD.289:
       put e
       GOTO TRAVEL
     SHARD.290:
       put e
       GOTO TRAVEL
     SHARD.291:
       put go well
       GOTO TRAVEL
     SHARD.292:
       put climb ladder
       GOTO TRAVEL
     SHARD.293:
       put w
       GOTO TRAVEL
     SHARD.294:
       put out
       GOTO TRAVEL
     SHARD.295:
       put w
       GOTO TRAVEL
     SHARD.296:
       put se
       GOTO TRAVEL
     SHARD.297:
       put go gap
       GOTO TRAVEL
     SHARD.298:
       match SHARD.299 What is the password?
       put knock door
       GOTO UniversalMatch
     SHARD.299:
       match SHARD.300 I thought I recognized you.
       put say %shardpass
       GOTO UniversalMatch
     SHARD.300:
       counter set 300
       put go door
       GOTO TRAVEL
     SHARD.301:
       put go arch
       GOTO TRAVEL
     SHARD.302:
       put s
       GOTO TRAVEL
     SHARD.303:
       counter set 0
       setVariable class BINGET
      1. ^ Needed for SellItem Termination ^
       setVariable sellorbin BINGET
       GOTO %provcode%.Sellitem0


          2. #####
          3. SHARD BINNING #####
          4. ##### 


   SHARD.FINISH.BINGET:
      setVariable class THIEF
     SHARD.304:

       counter set 304
       put n
       GOTO TRAVEL
     SHARD.305:
       put go arch
       GOTO TRAVEL
     SHARD.306:
       put go door
       GOTO TRAVEL
     SHARD.307:
       put n
       GOTO TRAVEL
     SHARD.308:
       put nw
       GOTO TRAVEL
     SHARD.309:
       put e
       GOTO TRAVEL
     SHARD.310:
       put go fissure
       GOTO TRAVEL
     SHARD.311:
       put e
       GOTO TRAVEL
     SHARD.312:
       put climb ladder
       GOTO TRAVEL
     SHARD.313:
       put up
       GOTO TRAVEL
     SHARD.314:
       put w
       GOTO TRAVEL
     SHARD.315:
       put w
       GOTO TRAVEL
     SHARD.316:
       put w
       GOTO TRAVEL
     SHARD.317:
       put w
       GOTO TRAVEL
     SHARD.318:
       put go bridge
       GOTO TRAVEL
     SHARD.319:
       put w
       GOTO TRAVEL
     SHARD.320:
       put w
       GOTO TRAVEL
     SHARD.321:
       put w
       GOTO TRAVEL
     SHARD.322:
       put s
       GOTO TRAVEL
     SHARD.323:
       put sw
       GOTO TRAVEL
     SHARD.324:
       put w
       GOTO TRAVEL
     SHARD.325:
       put s
       GOTO TRAVEL
     SHARD.326:
       put go gate
       GOTO TRAVEL
     SHARD.327:
       put s
       GOTO TRAVEL
     SHARD.328:
       put s
       GOTO TRAVEL
     SHARD.329:
       put s
       GOTO TRAVEL
     SHARD.330:
       put s
       GOTO TRAVEL
     SHARD.331:
       put s
       GOTO TRAVEL
     SHARD.332:
       put go shop
       GOTO TRAVEL
     SHARD.333:
       setVariable startlocation %starthold
       GOTO END


          2. #####
          3. ILITHI JUSTICE AND RESUMING #####
          4. ##### 


   SHARD.ITEMCHECK:
       put drop my small sack
       wait
       match SHARD.DEBT2 You have nothing
       match SHARD.FREE2 INVENTORY HELP
       put inv
       GOTO UniversalMatch

   SHARD.DEBT:
     SHARD.389:
       counter set 389
       put go hallway
       GOTO TRAVEL
   SHARDDEBT2:
     SHARD.390:
       counter set 390
       put out
       GOTO TRAVEL
     SHARD.391:
       put s
       GOTO TRAVEL
     SHARD.392:
       put w
       GOTO TRAVEL
     SHARD.393:
       put nw
       GOTO TRAVEL
     SHARD.394:
       put arch
       GOTO TRAVEL
     SHARD.395:
       put w
       GOTO TRAVEL
     SHARD.396:
       put w
       GOTO TRAVEL
     SHARD.397:
       put go bridge
       GOTO TRAVEL
     SHARD.398:
       put w
       GOTO TRAVEL
     SHARD.399:
       put w
       GOTO TRAVEL
     SHARD.400:
       put go bank
       GOTO TRAVEL
     SHARD.401:
       put n
       GOTO TRAVEL
     SHARD.402:
       put wit 500 bronze dokoras
       wait
     SHARD.403:
       counter set 403
       put s
       GOTO TRAVEL
     SHARD.404:
       put out
       GOTO TRAVEL
     SHARD.405:
       put e
       GOTO TRAVEL
     SHARD.406:
       put go bridge
       GOTO TRAVEL
     SHARD.407:
       put e
       GOTO TRAVEL
     SHARD.408:
       put e
       GOTO TRAVEL
     SHARD.409:
       put e
       GOTO TRAVEL
     SHARD.410:
       put go arch
       GOTO TRAVEL
     SHARD.411:
       put se
       GOTO TRAVEL
     SHARD.412:
       put e
       GOTO TRAVEL
     SHARD.412:
       put go entr
       GOTO TRAVEL
     SHARD.413:
       put go pass
       GOTO TRAVEL
     SHARD.414:
       put pay 5000
       wait
     SHARD.415:
       counter set 415
       put w
       GOTO TRAVEL
     SHARD.416:
       put s
       GOTO TRAVEL
     SHARD.417:
       put w
       GOTO TRAVEL
     SHARD.418:
       put nw
       GOTO TRAVEL
     SHARD.419:
       put arch
       GOTO TRAVEL
     SHARD.420:
       put w
       GOTO TRAVEL
     SHARD.421:
       put w
       GOTO TRAVEL
     SHARD.422:
       put go bridge
       GOTO TRAVEL
     SHARD.423:
       put w
       GOTO TRAVEL
     SHARD.424:
       put w
       GOTO TRAVEL
     SHARD.425:
       put go bank
       GOTO TRAVEL
     SHARD.426:
       put n
       GOTO TRAVEL
     SHARD.427:
       put dep all
       wait
     SHARD.428:
       counter set 428
       put s
       GOTO TRAVEL
     SHARD.429:
       put out
       GOTO TRAVEL
     SHARD.430:
       put e
       GOTO TRAVEL
     SHARD.431:
       put go bridge
       GOTO TRAVEL
     SHARD.432:
       put e
       GOTO TRAVEL
     SHARD.433:
       put e
       GOTO TRAVEL
     SHARD.434:
       put e
       GOTO TRAVEL
     SHARD.435:
       put go arch
       GOTO TRAVEL
     SHARD.436:
       put se
       GOTO TRAVEL
     SHARD.437:
       put e
       GOTO TRAVEL
     SHARD.438:
       put go entr
       GOTO TRAVEL
     SHARD.439:
       put go corr
       GOTO TRAVEL
     SHARD.271:
     SHARD.440:
       put get %name sack
       matchre SACKCHECK1 /referring|You reach/
       GOTO UniversalMatch

   SHARD.FREE:
     SHARD.270:
       counter set 270
       put go hall
       GOTO TRAVEL
   SHARD.FREE2:
       pause 1
       match SHARD.MISSINGSTART waitandsee
       match SHARD.FREE3 okstart
       put echo %startresume
       put echo okstart
       GOTO UniversalMatch

   SHARD.MISSINGSTART:
       setVariable startresume a supplies shop
       setVariable ResumeStore Sgene
       GOTO SHARD.FREE3

   SHARD.FREE3:
     SHARD.442:
       counter set 442
       put out
       GOTO TRAVEL
     SHARD.443:
       put n
       GOTO TRAVEL
     SHARD.444:
       put go arch
       GOTO TRAVEL
   SHARD.QUENTIN.RESUME:
     SHARD.445:
       counter set 445
       put n
       GOTO TRAVEL
     SHARD.446:
       put go gate
       GOTO TRAVEL
     SHARD.447:
       put n
       GOTO TRAVEL
     SHARD.448:
       put n
       GOTO TRAVEL
     SHARD.449:
       put n
       GOTO TRAVEL
     SHARD.450:
       put n
       GOTO TRAVEL
     SHARD.451:
       counter set 1
       setVariable storecode Sgene
       GOTO RESUME.%ResumeStore%

   RESUME.HCBOW2:
       counter add 1
   RESUME.HCBOW1:
       counter add 1
   RESUME.HCCASH:
       counter add 1
   RESUME.HCJAHT:
       counter add 1
   RESUME.HCFALC:
       counter add 1
   RESUME.HPOTT:
       counter add 1
   RESUME.HCEQUI:
       counter add 1
   RESUME.HCFELT:
       counter add 1
   RESUME.SCCWEAP:
       counter add 1
   RESUME.SCCLEAT:
       counter add 1
   RESUME.SENES:
       counter add 1
   RESUME.SMARG:
       counter add 1
   RESUME.SMARW:
       counter add 1
   RESUME.SSUPF:
       counter add 1
   RESUME.SSUPB:
       counter add 1
   RESUME.STANN:
       counter add 1
   RESUME.SBOWS:
       counter add 1
   RESUME.SBAKE:
       counter add 1
   RESUME.SMUSE:
       counter add 1
   RESUME.SBARB:
       counter add 1
   RESUME.STOYB:
       counter add 1
   RESUME.STOUR:
       counter add 1
   RESUME.SHERA:
       counter add 1
   RESUME.SFRIL:
       counter add 1
   RESUME.STOKE:
       counter add 1
   RESUME.SCOIN:
       counter add 1
   RESUME.SARMO:
       counter add 1
   RESUME.SLOCK:
       counter add 1
   RESUME.SBARD:
       counter add 1
   RESUME.SREAG:
       counter add 1
   RESUME.SHERB:
       counter add 1
   RESUME.SALCH:
       counter add 1
   RESUME.SSTIT:
       counter add 1
   RESUME.SWEAP:
       counter add 1
   RESUME.SGENE:
       counter add 1
       setVariable Countdown %c
       GOTO RESUME


                          2. #############
                          3. Therengia #############
                          4. #############
                          5. SKILL DETERMINATION #############
                          6. (tweak the items you steal here if desired) #############
                          7. ############# 


   THG.RANKADJ1:
       setVariable skillrange 20-39
       setVariable RHcloth <nothing>
       setVariable RHclothQuant 1
       setVariable RHgen purse
       setVariable RHgenQuant 1
       setVariable RHarms <nothing>
       setVariable RHarmsQuant 1
       setVariable RHflow black orchid
       setVariable RHflowQuant 1
       setVariable RHart <nothing>
       setVariable RHartQuant 1
       setVariable RHlock ordinary lockpick
       setVariable RHlockQuant 1
       setVariable RHjoy chocolate
       setVariable RHjoyQuant 1
       setVariable RHtobac <nothing>
       setVariable RHtobacQuant 1
       setVariable RHmirg <nothing>
       setVariable RHmirgQuant 1
       setVariable RHweap <nothing>
       setVariable RHweapQuant 1
       setVariable RHcleric grey-brown feather
       setVariable RHclericQuant 1
       setVariable RHbard pick
       setVariable RHbardQuant 1
       setVariable RHnap <nothing>
       setVariable RHnapQuant 1
       setVariable RHherb water
       setVariable RHherbQuant 2
       setVariable RHtog <nothing>
       setVariable RHtogQuant 1
       GOTO RANKREPORT

   THG.RANKADJ2:
       setVariable skillrange 40-59
       setVariable RHcloth <nothing>
       setVariable RHclothQuant 2
       setVariable RHgen flint
       setVariable RHgenQuant 2
       setVariable RHarms dart
       setVariable RHarmsQuant 1
       setVariable RHflow black orchid
       setVariable RHflowQuant 2
       setVariable RHart <nothing>
       setVariable RHartQuant 2
       setVariable RHlock ordinary lockpick
       setVariable RHlockQuant 2
       setVariable RHjoy <nothing>
       setVariable RHjoyQuant 2
       setVariable RHtobac pouch
       setVariable RHtobacQuant 2
       setVariable RHmirg <nothing>
       setVariable RHmirgQuant 2
       setVariable RHweap <nothing>
       setVariable RHweapQuant 2
       setVariable RHcleric incense
       setVariable RHclericQuant 2
       setVariable RHbard pick
       setVariable RHbardQuant 2
       setVariable RHnap <nothing>
       setVariable RHnapQuant 2
       setVariable RHherb mixing stick
       setVariable RHherbQuant 2
       setVariable RHtog <nothing>
       setVariable RHtogQuant 2
       GOTO RANKREPORT

   THG.RANKADJ3:
       setVariable skillrange 60-99
       setVariable RHcloth sash
       setVariable RHclothQuant 2
       setVariable RHgen bark
       setVariable RHgenQuant 2
       setVariable RHarms bolts
       setVariable RHarmsQuant 2
       setVariable RHflow black orchid
       setVariable RHflowQuant 2
       setVariable RHart <nothing>
       setVariable RHartQuant 2
       setVariable RHlock stout lockpick
       setVariable RHlockQuant 2
       setVariable RHjoy <nothing>
       setVariable RHjoyQuant 2
       setVariable RHtobac sungrown cigar
       setVariable RHtobacQuant 2
       setVariable RHmirg <nothing>
       setVariable RHmirgQuant 2
       setVariable RHweap <nothing>
       setVariable RHweapQuant 2
       setVariable RHcleric candle
       setVariable RHclericQuant 2
       setVariable RHbard drum stick
       setVariable RHbardQuant 2
       setVariable RHnap <nothing>
       setVariable RHnapQuant 2
       setVariable RHherb oil
       setVariable RHherbQuant 2
       setVariable RHtog <nothing>
       setVariable RHtogQuant 2
       GOTO RANKREPORT

   THG.RANKADJ4:
       setVariable skillrange 100-149
       setVariable RHcloth gloves
       setVariable RHclothQuant 2
       setVariable RHgen spade
       setVariable RHgenQuant 2
       setVariable RHarms stiletto
       setVariable RHarmsQuant 2
       setVariable RHflow <nothing>
       setVariable RHflowQuant 2
       setVariable RHart <nothing>
       setVariable RHartQuant 2
       setVariable RHlock stout lockpick
       setVariable RHlockQuant 2
       setVariable RHjoy kitten
       setVariable RHjoyQuant 1
       setVariable RHtobac apple pipe
       setVariable RHtobacQuant 2
       setVariable RHmirg <nothing>
       setVariable RHmirgQuant 2
       setVariable RHweap <nothing>
       setVariable RHweapQuant 2
       setVariable RHcleric violets
       setVariable RHclericQuant 2
       setVariable RHbard linen cloth
       setVariable RHbardQuant 2
       setVariable RHnap <nothing>
       setVariable RHnapQuant 2
       setVariable RHherb pestle
       setVariable RHherbQuant 2
       setVariable RHtog <nothing>
       setVariable RHtogQuant 2
       GOTO RANKREPORT

   THG.RANKADJ5:
       setVariable skillrange 150-199
       setVariable RHcloth blouse
       setVariable RHclothQuant 2
       setVariable RHgen dagger sheath
       setVariable RHgenQuant 2
       setVariable RHarms kris
       setVariable RHarmsQuant 2
       setVariable RHflow silk orchid
       setVariable RHflowQuant 1
       setVariable RHart simple talisman
       setVariable RHartQuant 2
       setVariable RHlock slim lockpick
       setVariable RHlockQuant 2
       setVariable RHjoy kitten
       setVariable RHjoyQuant 2
       setVariable RHtobac lanival pipe
       setVariable RHtobacQuant 2
       setVariable RHmirg <nothing>
       setVariable RHmirgQuant 2
       setVariable RHweap club
       setVariable RHweapQuant 1
       setVariable RHcleric herbs
       setVariable RHclericQuant 2
       setVariable RHbard blouse
       setVariable RHbardQuant 2
       setVariable RHnap naphtha
       setVariable RHnapQuant 1
       setVariable RHherb large jar
       setVariable RHherbQuant 2
       setVariable RHtog beaded slippers
       setVariable RHtogQuant 2
       GOTO RANKREPORT

   THG.RANKADJ6:
       setVariable skillrange 200-249
       setVariable RHcloth skirt
       setVariable RHclothQuant 2
       setVariable RHgen scabbard
       setVariable RHgenQuant 2
       setVariable RHarms rapier
       setVariable RHarmsQuant 2
       setVariable RHflow silk orchid
       setVariable RHflowQuant 2
       setVariable RHart simple talisman
       setVariable RHartQuant 2
       setVariable RHlock slim lockpick
       setVariable RHlockQuant 2
       setVariable RHjoy bunny
       setVariable RHjoyQuant 2
       setVariable RHtobac olvio pipe
       setVariable RHtobacQuant 2
       setVariable RHmirg <nothing>
       setVariable RHmirgQuant 2
       setVariable RHweap club
       setVariable RHweapQuant 2
       setVariable RHcleric bottle
       setVariable RHclericQuant 2
       setVariable RHbard alpargatas
       setVariable RHbardQuant 2
       setVariable RHnap naphtha
       setVariable RHnapQuant 2
       setVariable RHherb jadice flower
       setVariable RHherbQuant 2
       setVariable RHtog ivory shirt
       setVariable RHtogQuant 2
       GOTO RANKREPORT

   THG.RANKADJ7:
       setVariable skillrange 250-299
       setVariable RHcloth houpelande
       setVariable RHclothQuant 2
       setVariable RHgen shears
       setVariable RHgenQuant 2
       setVariable RHarms composite bow
       setVariable RHarmsQuant 1
       setVariable RHflow wreath
       setVariable RHflowQuant 2
       setVariable RHart cambrinth ring
       setVariable RHartQuant 1
       setVariable RHlock <nothing>
       setVariable RHlockQuant 2
       setVariable RHjoy bunny
       setVariable RHjoyQuant 3
       setVariable RHtobac riverhaven tobacco
       setVariable RHtobacQuant 2
       setVariable RHmirg anklet
       setVariable RHmirgQuant 2
       setVariable RHweap thorny mace
       setVariable RHweapQuant 2
       setVariable RHcleric chalice
       setVariable RHclericQuant 2
       setVariable RHbard refill
       setVariable RHbardQuant 2
       setVariable RHnap naphtha
       setVariable RHnapQuant 2
       setVariable RHherb mortar
       setVariable RHherbQuant 2
       setVariable RHtog linen shirt
       setVariable RHtogQuant 2
       GOTO RANKREPORT

   THG.RANKADJ9:
   THG.RANKADJ10:
       ECHO ***********************************************
       ECHO ***        Sorry, but there isn't anything harder yet!
       ECHO ***********************************************
   THG.RANKADJ8:
       setVariable skillrange 300+
       setVariable RHcloth dress
       setVariable RHclothQuant 2
       setVariable RHgen stove
       setVariable RHgenQuant 2
       setVariable RHarms sword
       setVariable RHarmsQuant 2
       setVariable RHflow silk orchid
       setVariable RHflowQuant 2
       setVariable RHart cambrinth ring
       setVariable RHartQuant 2
       setVariable RHlock <nothing>
       setVariable RHlockQuant 2
       setVariable RHjoy bunny
       setVariable RHjoyQuant 3
       setVariable RHtobac baron tobacco
       setVariable RHtobacQuant 2
       setVariable RHmirg toe-bells
       setVariable RHmirgQuant 2
       setVariable RHweap hammer
       setVariable RHweapQuant 2
       setVariable RHcleric pomander
       setVariable RHclericQuant 2
       setVariable RHbard mandolin
       setVariable RHbardQuant 2
       setVariable RHnap naphtha
       setVariable RHnapQuant 2
       setVariable RHherb riolur leaf
       setVariable RHherbQuant 2
       setVariable RHtog ivory leggings
       setVariable RHtogQuant 2
       GOTO RANKREPORT

   THG.RANKADJ-1:
   THG.RANKADJ0:
       GOTO BEGGAR.MOD

   THG.BAGCHECK:
       matchre BAGWARN /%RHcloth%|%RHgen%|%RHarms%|%RHflow%|%RHart%|%RHlock%|%RHjoy%|%RHtog%/
       matchre BAGWARN /%RHtobac%|%RHmirg%|%RHweap%|%RHcleric%|%RHbard%|%RHnap%|%RHherb%/
       match THG.BAGCHECK2 You glance
       put look in my %container1
       put glance
       GOTO UniversalMatch

   THG.BAGCHECK2:
       matchre BAGWARN /%RHcloth%|%RHgen%|%RHarms%|%RHflow%|%RHart%|%RHlock%|%RHjoy%|%RHtog%/
       matchre BAGWARN /%RHtobac%|%RHmirg%|%RHweap%|%RHcleric%|%RHbard%|%RHnap%|%RHherb%/
       match KHRICHECK.%class% You glance
       put look in my %container2
       put glance
       GOTO UniversalMatch


          2. #####
          3. THERENGIA START LOCATION #####
          4. ##### 


   HAVEN:
       match HAVEN.START.BANK [Bank of Riverhaven, Main Lobby]
       match HAVEN.START.PIER You also see the Municipal Pier.
       match HAVEN.START.W exit from the town into the countryside.
       match HAVEN.START.E tower's shadow and through a narrow gate
       match HAVEN.START.N The Gate of Nobles, the northern passage
       match HAVEN.START.CLOTH [Clothiers, Sales Floor]
       match HAVEN.START.GEN [Enfermine's Dry Goods, Showroom]
       match HAVEN.START.ARMS [Noel's Arms, Showroom]
       match HAVEN.START.FLOW [Cecelia's Blossoms, Showroom]
       match HAVEN.START.ART [Zanthron's Artificer Shop, Salesroom]
       match HAVEN.START.LOCK [Ss'Thran's Locks, Workroom]
       match HAVEN.START.JOY [Smaragdaus' Joy, Front Room]
       match HAVEN.START.TOBAC [Fine Leaf's End, Sales Room]
       match HAVEN.START.MIRG [Mirglyn Sisters, Goldsmiths]
       match HAVEN.START.WEAP [Thringol's Weapon Shop, Salesroom]
       match HAVEN.START.CLERIC [Riverhaven, Cleric Shop]
       match HAVEN.START.BARD [House of Bardic Blues, Wayfarer's Den]
       match HAVEN.START.NAP vendor's cart with a vial of naphtha
       match HAVEN.START.HERB [Crin's Herbal Shop, Salesroom]
       match HAVEN.START.TOG [City Togs, Sales Room]
       match HAVEN.START.PAWN Ioun's Pawn
       match THG.BADLOCATION Obvious
       put look
       GOTO UniversalMatch

   THG.BADLOCATION:
       ECHO ***********************************************
       ECHO *** Not a valid starting location.
       ECHO *** Starting locations in Therengia are:
       ECHO ***
       ECHO *** Inside Riverhaven Gates
       ECHO *** Riverhaven Bank
       ECHO *** Riverhaven Pawn Shop
       ECHO *** Outside Riverhaven Pier
       ECHO *** Clothiers
       ECHO *** Enfermine's Dry Goods
       ECHO *** Noel's Arms
       ECHO *** Cecelia's Blossoms
       ECHO *** Zanthron's Artificer Shop
       ECHO *** Ss'Thran's Locks
       ECHO *** Smaragdaus' Joy
       ECHO *** Fine Leaf's End
       ECHO *** Mirglyn Sisters, Goldsmiths
       ECHO *** Thringol's Weapon Shop
       ECHO *** House of Bardic Blues
       ECHO *** Cleric Shop
       ECHO *** Outside Naphtha Cart
       ECHO *** Crin's Herbal Shop
       ECHO *** City Togs
       ECHO ***
       ECHO *******************************************************
       GOTO END

   HAVEN.START.CLOTH:
       counter set 114
       setVariable storecode rhcloth
       setVariable startlocation %storecode%
       match HAVEN.%c Obvious
       put out
       GOTO UniversalMatch

   HAVEN.START.GEN:
       counter set 27
       setVariable storecode rhgen
       setVariable startlocation %storecode%
       match HAVEN.%c Obvious
       put out
       GOTO UniversalMatch

   HAVEN.START.ARMS:
       counter set 34
       setVariable storecode rharms
       setVariable startlocation %storecode%
       match HAVEN.%c Obvious
       put out
       GOTO UniversalMatch

   HAVEN.START.FLOW:
       counter set 39
       setVariable storecode rhflow
       setVariable startlocation %storecode%
       match HAVEN.%c Obvious
       put out
       GOTO UniversalMatch

   HAVEN.START.ART:
       counter set 46
       setVariable storecode rhart
       setVariable startlocation %storecode%
       match HAVEN.%c Obvious
       put out
       GOTO UniversalMatch

   HAVEN.START.LOCK:
       counter set 47
       setVariable storecode rhlock
       setVariable startlocation %storecode%
       match HAVEN.%c Obvious
       put out
       GOTO UniversalMatch

   HAVEN.START.JOY:
       counter set 55
       setVariable storecode rhjoy
       setVariable startlocation %storecode%
       match HAVEN.%c Obvious
       put out
       GOTO UniversalMatch

   HAVEN.START.TOBAC:
       counter set 61
       setVariable storecode rhtobac
       setVariable startlocation %storecode%
       match HAVEN.%c Obvious
       put out
       GOTO UniversalMatch

   HAVEN.START.MIRG:
       counter set 65
       setVariable storecode rhmirg
       setVariable startlocation %storecode%
       match HAVEN.%c Obvious
       put out
       GOTO UniversalMatch

   HAVEN.START.WEAP:
       counter set 69
       setVariable storecode rhweap
       setVariable startlocation %storecode%
       match HAVEN.%c Obvious
       put out
       GOTO UniversalMatch

   HAVEN.START.CLERIC:
       counter set 83
       setVariable storecode rhcleric
       setVariable startlocation %storecode%
       match HAVEN.%c Obvious
       put out
       GOTO UniversalMatch

   HAVEN.START.BARD:
       counter set 78
       setVariable storecode rhbard
       setVariable startlocation %storecode%
       match HAVEN.%c Obvious
       put out
       GOTO UniversalMatch

   HAVEN.START.NAP:
       counter set 87
       setVariable storecode rhnap
       setVariable startlocation %storecode%
       GOTO HAVEN.%c

   HAVEN.START.HERB:
       counter set 94
       setVariable storecode rhherb
       setVariable startlocation %storecode%
       match HAVEN.%c Obvious
       put out
       GOTO UniversalMatch

   HAVEN.START.TOG:
       counter set 98
       setVariable storecode rhtog
       setVariable startlocation %storecode%
       match HAVEN.%c Obvious
       put go door
       GOTO UniversalMatch

   HAVEN.START.BANK:
     HAVEN.1:
       counter set 1
       put out
       GOTO TRAVEL
     HAVEN.2:
       put n
       GOTO TRAVEL
     HAVEN.3:
       put n
       GOTO TRAVEL
     HAVEN.4:
       put go shop
       GOTO TRAVEL
     HAVEN.5:
       GOTO HAVEN.START.BARD

   HAVEN.START.PIER:
     HAVEN.6:
       counter set 6
       put w
       GOTO TRAVEL
     HAVEN.7:
       put w
       GOTO TRAVEL
     HAVEN.8:
       put w
       GOTO TRAVEL
     HAVEN.9:
       put go shop
       GOTO TRAVEL
     HAVEN.10:
       GOTO HAVEN.START.CLOTH

   HAVEN.START.E:
     HAVEN.11:
       counter set 11
       put n
       GOTO TRAVEL
     HAVEN.12:
       put n
       GOTO TRAVEL
     HAVEN.13:
       put n
       GOTO TRAVEL
     HAVEN.14:
       put n
       GOTO TRAVEL
     HAVEN.15:
       put n
       GOTO TRAVEL
     HAVEN.16:
       put go shop
       GOTO TRAVEL
     HAVEN.17:
       GOTO HAVEN.START.TOG

   HAVEN.START.W:
     HAVEN.18:
       counter set 18
       put n
       GOTO TRAVEL
     HAVEN.19:
       put go arms
       GOTO TRAVEL
     HAVEN.20:
       GOTO HAVEN.START.ARMS

   HAVEN.START.N:
     HAVEN.21:
       counter set 21
       put s
       GOTO TRAVEL
     HAVEN.22:
       put go shop
       GOTO TRAVEL
     HAVEN.23:
       GOTO HAVEN.START.CLERIC

   HAVEN.START.PAWN:
     HAVEN.514:
       counter set 514
       put out
       GOTO TRAVEL
     HAVEN.515:
       put go arms
       GOTO TRAVEL
     HAVEN.516:
       GOTO HAVEN.START.ARMS
          2. #####
          3. HAVEN LEAVING SHOPS #####
          4. ##### 


   LEAVE.RHCLOTH:
     HAVEN.25:
       counter set 25
       put w
       GOTO TRAVEL
     HAVEN.26:
       setVariable storecode rhgen
       put w
       GOTO TRAVEL
     HAVEN.27:
       setVariable item %RHgen
       setVariable entrance store
       setVariable shopdiff %RHgenQuant
       GOTO %MRS%

   LEAVE.RHGEN:
     HAVEN.30:
       counter set 30
       put w
       GOTO TRAVEL
     HAVEN.31:
       put w
       GOTO TRAVEL
     HAVEN.32:
       put w
       GOTO TRAVEL
     HAVEN.33:
       setVariable storecode rharms
       put n
       GOTO TRAVEL
     HAVEN.34:
       setVariable item %RHarms
       setVariable entrance arms
       setVariable shopdiff %RHarmsQuant
       GOTO %MRS%

   LEAVE.RHARMS:
       GOTO %LorM%.RHARMS.1
   LEAVE.RHARMS.1:
     HAVEN.37:
       counter set 37
       put n
       GOTO TRAVEL
     HAVEN.38:
       setVariable storecode rhflow
       put n
       GOTO TRAVEL
     HAVEN.39:
       setVariable item %RHflow
       setVariable entrance shop
       setVariable shopdiff %RHflowQuant
       GOTO %MRS%

   MOVEON.RHARMS.1:
     HAVEN.120:
       counter set 120
       setVariable sellorbin SELLGET
       put go pawn
       GOTO TRAVEL
     HAVEN.121:
       GOTO HAVEN.PAWN



   LEAVE.RHFLOW:
     HAVEN.42:
       counter set 42
       put n
       GOTO TRAVEL
     HAVEN.43:
       put se
       GOTO TRAVEL
     HAVEN.44:
       put se
       GOTO TRAVEL
     HAVEN.45:
       setVariable storecode rhart
       put se
       GOTO TRAVEL
     HAVEN.46:
       setVariable item %RHart
       setVariable entrance art shop
       setVariable shopdiff %RHartQuant
       GOTO %MRS%

   LEAVE.RHART:
       setVariable storecode rhlock
     HAVEN.47:
       setVariable item %RHlock
       setVariable entrance ord shop
       setVariable shopdiff %RHlockQuant
       GOTO %MRS%

   LEAVE.RHLOCK:
     HAVEN.50:
       counter set 50
       put se
       GOTO TRAVEL
     HAVEN.51:
       put se
       GOTO TRAVEL
     HAVEN.52:
       put e
       GOTO TRAVEL
     HAVEN.53:
       put ne
       GOTO TRAVEL
     HAVEN.54:
       setVariable storecode rhjoy
       put e
       GOTO TRAVEL
     HAVEN.55:
       setVariable item %RHjoy
       setVariable entrance door
       setVariable shopdiff %RHjoyQuant
       GOTO %MRS%

   LEAVE.RHJOY:
       matchre LEAVE.RHJOY /wait|type ahead|Roundtime/i
       matchre LEAVE.RHJOY.2 /You stand|already standing/
       put stand
       GOTO UniversalMatch
   LEAVE.RHJOY.2:
     HAVEN.58:
       counter set 58
       put s
       GOTO TRAVEL
     HAVEN.59:
       put s
       setVariable storecode rhtobac
       GOTO TRAVEL
     HAVEN.60:
       put kneel
       put go shop
       GOTO TRAVEL
     HAVEN.61:
       setVariable item %RHtobac
       setVariable entrance shop
       setVariable shopdiff %RHtobacQuant
       GOTO %MRS%

   ALTLEAVE.RHTOBAC:
       setVariable starthold %startlocation
       setVariable startlocation placeholder
     HAVEN.512:
       counter set 512
       put out
       GOTO TRAVEL
     HAVEN.513:
       setVariable startlocation %starthold
       GOTO LEAVE.%storecode%
   LEAVE.RHTOBAC:
       matchre LEAVE.RHTOBAC /wait|type ahead|Roundtime/i
       matchre LEAVE.RHTOBAC.2 /You stand|already standing/
       match ALTLEAVE.RHTOBAC You can't stand
       put stand
       GOTO UniversalMatch
   LEAVE.RHTOBAC.2:
     HAVEN.63:
       counter set 63
       put w
       GOTO TRAVEL
     HAVEN.64:
       setVariable storecode rhmirg
       put w
       GOTO TRAVEL
     HAVEN.65:
       setVariable item %RHmirg
       setVariable entrance shop
       setVariable shopdiff %RHmirgQuant
       GOTO %MRS%

   LEAVE.RHMIRG:
     HAVEN.68:
       counter set 68
       setVariable storecode rhweap
       put se
       GOTO TRAVEL
     HAVEN.69:
       setVariable item %RHweap
       setVariable entrance shop
       setVariable shopdiff %RHweapQuant
       GOTO %MRS%

   LEAVE.RHWEAP:
     HAVEN.72:
       counter set 72
       put se
       GOTO TRAVEL
     HAVEN.73:
       put ne
       GOTO TRAVEL
     HAVEN.74:
       put n
       GOTO TRAVEL
     HAVEN.75:
       put n
       GOTO TRAVEL
     HAVEN.76:
       put n
       GOTO TRAVEL
     HAVEN.77:
       setVariable storecode rhbard
       put n
       GOTO TRAVEL
     HAVEN.78:
       setVariable item %RHbard
       setVariable entrance shop
       setVariable shopdiff %RHbardQuant
       GOTO %MRS%

   LEAVE.RHBARD:
     HAVEN.80:
       counter set 80
       put n
       GOTO TRAVEL
     HAVEN.81:
       put n
       GOTO TRAVEL
     HAVEN.82:
       setVariable storecode rhcleric
       put n
       GOTO TRAVEL
     HAVEN.83:
       setVariable item %RHcleric
       setVariable entrance shop
       setVariable shopdiff %RHclericQuant
       GOTO %MRS%

   LEAVE.RHCLERIC:
     HAVEN.85:
       counter set 85
       put n
       GOTO TRAVEL
     HAVEN.86:
       setVariable storecode rhnap
       put se
       GOTO TRAVEL
     HAVEN.87:
       setVariable item %RHnap
       setVariable entrance shop
       setVariable shopdiff %RHnapQuant
       GOTO %MRS%

   ALTLEAVE.RHNAP:
   LEAVE.RHNAP:
     HAVEN.90:
       counter set 90
       put se
       GOTO TRAVEL
     HAVEN.91:
       put se
       GOTO TRAVEL
     HAVEN.92:
       put se
       GOTO TRAVEL
     HAVEN.93:
       setVariable storecode rhherb
       put se
       GOTO TRAVEL
     HAVEN.94:
       setVariable item %RHherb
       setVariable entrance shop
       setVariable shopdiff %RHherbQuant
       GOTO %MRS%

   LEAVE.RHHERB:
     HAVEN.97:
       counter set 97
       setVariable storecode rhtog
       put se
       GOTO TRAVEL
     HAVEN.98:
       setVariable item %RHtog
       setVariable entrance shop
       setVariable shopdiff %RHtogQuant
       GOTO %MRS%

   ALTLEAVE.RHTOG:
       setVariable starthold %startlocation
       setVariable startlocation placeholder
     HAVEN.510:
       counter set 510
       put go door
       GOTO TRAVEL
     HAVEN.511:
       setVariable startlocation %starthold
       GOTO LEAVE.%storecode%
   LEAVE.RHTOG:
     HAVEN.100:
       counter set 100
       put s
       GOTO TRAVEL
     HAVEN.101:
       put s
       GOTO TRAVEL
     HAVEN.102:
       put s
       GOTO TRAVEL
     HAVEN.103:
       put s
       GOTO TRAVEL
     HAVEN.104:
       put s
       GOTO TRAVEL
     HAVEN.105:
       put w
       GOTO TRAVEL
     HAVEN.106:
       put w
       GOTO TRAVEL
     HAVEN.107:
       put w
       GOTO TRAVEL
     HAVEN.108:
       put w
       GOTO TRAVEL
     HAVEN.109:
       put w
       GOTO TRAVEL
     HAVEN.110:
       put w
       GOTO TRAVEL
     HAVEN.111:
       put w
       GOTO TRAVEL
     HAVEN.112:
       put w
       GOTO TRAVEL
     HAVEN.113:
       setVariable storecode rhcloth
       put w
       GOTO TRAVEL
     HAVEN.114:
       setVariable item %RHcloth
       setVariable entrance shop
       setVariable shopdiff %RHclothQuant
       GOTO %MRS%
          2. #####
          3. RIVER HAVEN JUSTICE AND RESUMING #####
          4. ##### 


   HAVEN.ITEMCHECK:
       put drop my small sack
       wait
       match HAVEN.DEBT2 You have nothing
       match HAVEN.FREE2 INVENTORY HELP
       put inv
       GOTO UniversalMatch

   HAVEN.DEBT:
     HAVEN.225:
       counter set 225
       put go door
       GOTO TRAVEL
   HAVEN.DEBT2:
     HAVEN.226:
       counter set 226
       put out
       GOTO TRAVEL
     HAVEN.227:
       put n
       GOTO TRAVEL
     HAVEN.228:
       put nw
       GOTO TRAVEL
     HAVEN.229:
       put nw
       GOTO TRAVEL
     HAVEN.230:
       put nw
       GOTO TRAVEL
     HAVEN.231:
       put nw
       GOTO TRAVEL
     HAVEN.232:
       put sw
       GOTO TRAVEL
     HAVEN.233:
       put sw
       GOTO TRAVEL
     HAVEN.234:
       put sw
       GOTO TRAVEL
     HAVEN.235:
       put sw
       GOTO TRAVEL
     HAVEN.236:
       put sw
       GOTO TRAVEL
     HAVEN.237:
       put sw
       GOTO TRAVEL
     HAVEN.238:
       put sw
       GOTO TRAVEL
     HAVEN.239:
       put n
       GOTO TRAVEL
     HAVEN.240:
       put n
       GOTO TRAVEL
     HAVEN.241:
       put go bank
       GOTO TRAVEL
     HAVEN.242:
       put go arch
       GOTO TRAVEL
     HAVEN.243:
       put wit 500 bronze lirum
       wait
     HAVEN.244:
       counter set 244
       put go arch
       GOTO TRAVEL
     HAVEN.245:
       put out
       GOTO TRAVEL
     HAVEN.246:
       put s
       GOTO TRAVEL
     HAVEN.247:
       put s
       GOTO TRAVEL
     HAVEN.248:
       put s
       GOTO TRAVEL
     HAVEN.249:
       put go hall
       GOTO TRAVEL
     HAVEN.250:
       put go office
       GOTO TRAVEL
     HAVEN.251:
       put pay 5000
       wait
     HAVEN.252:
       counter set 252
       put out
       GOTO TRAVEL
     HAVEN.253:
       put out
       GOTO TRAVEL
     HAVEN.254:
       put n
       GOTO TRAVEL
     HAVEN.255:
       put n
       GOTO TRAVEL
     HAVEN.256:
       put n
       GOTO TRAVEL
     HAVEN.257:
       put go bank
       GOTO TRAVEL
     HAVEN.258:
       put go arch
       GOTO TRAVEL
     HAVEN.259:
       put dep all
       wait
     HAVEN.260:
       counter set 260
       put go arch
       GOTO TRAVEL
     HAVEN.261:
       put out
       GOTO TRAVEL
     HAVEN.262:
       put s
       GOTO TRAVEL
     HAVEN.263:
       put s
       GOTO TRAVEL
     HAVEN.264:
       put ne
       GOTO TRAVEL
     HAVEN.265:
       put ne
       GOTO TRAVEL
     HAVEN.266:
       put ne
       GOTO TRAVEL
     HAVEN.267:
       put ne
       GOTO TRAVEL
     HAVEN.268:
       put ne
       GOTO TRAVEL
     HAVEN.269:
       put ne
       GOTO TRAVEL
     HAVEN.270:
       put ne
       GOTO TRAVEL
     HAVEN.271:
       put se
       GOTO TRAVEL
     HAVEN.272:
       put se
       GOTO TRAVEL
     HAVEN.273:
       put se
       GOTO TRAVEL
     HAVEN.274:
       put se
       GOTO TRAVEL
     HAVEN.275:
       put s
       GOTO TRAVEL
     HAVEN.276:
       put go door
       GOTO TRAVEL
     HAVEN.281:
     HAVEN.277:
       put get %name sack
       matchre SACKCHECK1 /referring|You reach/
       GOTO UniversalMatch

   HAVEN.FREE:
     HAVEN.280:
       counter set 280
       put go door
       GOTO TRAVEL
   HAVEN.FREE2:
       pause 1
       match HAVEN.MISSINGSTART waitandsee
       match HAVEN.FREE3 okstart
       put echo %startresume
       put echo okstart
       GOTO UniversalMatch

   HAVEN.MISSINGSTART:
       setVariable startresume Something has snarled traffic as carts and pedestrians
       setVariable ResumeStore RHtog
       GOTO HAVEN.FREE3

   HAVEN.FREE3:
      HAVEN.285:
       counter set 285
       put out
       GOTO TRAVEL
     HAVEN.286:
       put n
       GOTO TRAVEL
     HAVEN.287:
       counter set 1
       setVariable storecode rhtog
       GOTO RESUME.%ResumeStore%

   RESUME.RHHERB:
       counter add 1
   RESUME.RHNAP:
       counter add 1
   RESUME.RHCLERIC:
       counter add 1
   RESUME.RHBARD:
       counter add 1
   RESUME.RHWEAP:
       counter add 1
   RESUME.RHMIRG:
       counter add 1
   RESUME.RHTOBAC:
       counter add 1
   RESUME.RHJOY:
       counter add 1
   RESUME.RHLOCK:
       counter add 1
   RESUME.RHART:
       counter add 1
   RESUME.RHFLOW:
       counter add 1
   RESUME.RHARMS:
       counter add 1
   RESUME.RHGEN:
       counter add 1
   RESUME.RHCLOTH:
       counter add 1
   RESUME.RHTOG:
       counter add 1
       setVariable Countdown %c
       GOTO RESUME


          2. #####
          3. THERENGIA PAWNING #####
          4. ##### 


   HAVEN.PAWN.DROP:
       GOTO END

   HAVEN.PAWN:
       GOTO HAVEN.PAWN.%DropOrStow%
   HAVEN.PAWN.STOW:
       counter set 0
     THG.SellItem0:
       setVariable sellitem %RHcloth
       GOTO %sellorbin
     THG.SellItem1:
       setVariable sellitem %RHgen
       GOTO %sellorbin
     THG.SellItem2:
       setVariable sellitem %RHarms
       GOTO %sellorbin
     THG.SellItem3:
       setVariable sellitem %RHflow
       GOTO %sellorbin
     THG.SellItem4:
       setVariable sellitem %RHart
       GOTO %sellorbin
     THG.SellItem5:
       setVariable sellitem %RHlock
       GOTO %sellorbin
     THG.SellItem6:
       setVariable sellitem %RHjoy
       GOTO %sellorbin
     THG.SellItem7:
       setVariable sellitem %RHtobac
       GOTO %sellorbin
     THG.SellItem8:
       setVariable sellitem %RHmirg
       GOTO %sellorbin
     THG.SellItem9:
       setVariable sellitem %RHweap
       GOTO %sellorbin
     THG.SellItem10:
       setVariable sellitem %RHbard
       GOTO %sellorbin
     THG.SellItem11:
       setVariable sellitem %RHcleric
       GOTO %sellorbin
     THG.SellItem12:
       setVariable sellitem %RHnap
       GOTO %sellorbin
     THG.SellItem13:
       setVariable sellitem %RHherb
       GOTO %sellorbin
     THG.SellItem14:
       setVariable sellitem %RHtog
       GOTO %sellorbin
     THG.SellItem15:
       GOTO %citycode%.FINISH.%class

   HAVEN.FINISH.NONTHIEF:
   HAVEN.FINISH.EMPATH:
       GOTO END

   HAVEN.FINISH.THIEF:
       setVariable starthold %startlocation
       setVariable startlocation placeholder
     HAVEN.GUILDFIND1:
       match HAVEN.GUILDPAWN convenient spot
       match HAVEN.ARTIFICER Silvermoon Road
       match HAVEN.HALFLING with his own kind
       match HAVEN.COOP cooped up somewhere
       match HAVEN.CRESCENT Crescent Way
       match HAVEN.ROOK checking around the rookery
       match HAVEN.GUILDFIND2 You glance
       put contact guild
       put glance
         GOTO UniversalMatch

   HAVEN.GUILDFIND2:
       ECHO
       ECHO ***********************************************
       ECHO ***
       ECHO *** Sorry, but we have not implemented a way
       ECHO *** for thieves without CONTACT GUILD to locate
       ECHO *** the guild in Haven for purposes of binning
       ECHO *** your loot.
       ECHO ***
       ECHO ***********************************************
       ECHO
       GOTO END

   HAVEN.GUILDPAWN:
       setVariable havenguild pawn
     HAVEN.300:
       counter set 300
       put out
       GOTO TRAVEL
     HAVEN.301:
       put search
       pause 3
       put knock door
       wait
       put whisper %riverpass
       wait
       put climb stair
       GOTO TRAVEL
     HAVEN.302:
       put ne
       GOTO TRAVEL
     HAVEN.303:
       put go corner
       GOTO TRAVEL
     HAVEN.304:
       counter set 0
       setVariable class BINGET
      1. ^ Needed for SellItem Termination ^
       setVariable sellorbin BINGET
       GOTO %provcode%.Sellitem0

   HAVEN.ARTIFICER:
       setVariable havenguild artificer
     HAVEN.308:
       counter set 308
       put out
       GOTO TRAVEL
     HAVEN.309:
       put out
       GOTO TRAVEL
     HAVEN.310:
       put n
       GOTO TRAVEL
     HAVEN.311:
       put n
       GOTO TRAVEL
     HAVEN.312:
       put n
       GOTO TRAVEL
     HAVEN.313:
       put se
       GOTO TRAVEL
     HAVEN.314:
       put se
       GOTO TRAVEL
     HAVEN.315:
       put se
       GOTO TRAVEL
     HAVEN.316:
       put search
       pause 3
       put knock door
       wait
       put whisper %riverpass
       wait
       put look floor
       wait
       put go door
       GOTO TRAVEL
     HAVEN.317:
       put go corner
       GOTO TRAVEL
     HAVEN.318:
       counter set 0
       setVariable class BINGET
      1. ^ Needed for SellItem Termination ^
       setVariable sellorbin BINGET
       GOTO %provcode%.Sellitem0

   HAVEN.HALFLING:
       setVariable havenguild halfling
     HAVEN.320:
       counter set 320
       put out
       GOTO TRAVEL
     HAVEN.321:
       put n
       GOTO TRAVEL
     HAVEN.322:
       put n
       GOTO TRAVEL
     HAVEN.323:
       put n
       GOTO TRAVEL
     HAVEN.324:
       put se
       GOTO TRAVEL
     HAVEN.325:
       put se
       GOTO TRAVEL
     HAVEN.326:
       put se
       GOTO TRAVEL
     HAVEN.327:
       put se
       GOTO TRAVEL
     HAVEN.328:
       put se
       GOTO TRAVEL
     HAVEN.329:
       put e
       GOTO TRAVEL
     HAVEN.330:
       put ne
       GOTO TRAVEL
     HAVEN.331:
       put look door
       wait
       put go footpath
       GOTO TRAVEL
     HAVEN.332:
       put search
       pause 3
       put knock grat
       wait
       put whisper %riverpass
       wait
       put go door
       GOTO TRAVEL
     HAVEN.333:
       put ne
       GOTO TRAVEL
     HAVEN.334:
       put go nook
       GOTO TRAVEL
     HAVEN.335:
       counter set 0
       setVariable class BINGET
      1. ^ Needed for SellItem Termination ^
       setVariable sellorbin BINGET
       GOTO %provcode%.Sellitem0

   HAVEN.COOP:
       setVariable havenguild coop
     HAVEN.340:
       counter set 340
       put out
       GOTO TRAVEL
     HAVEN.341:
       put n
       GOTO TRAVEL
     HAVEN.342:
       put n
       GOTO TRAVEL
     HAVEN.343:
       put n
       GOTO TRAVEL
     HAVEN.344:
       put se
       GOTO TRAVEL
     HAVEN.345:
       put se
       GOTO TRAVEL
     HAVEN.346:
       put se
       GOTO TRAVEL
     HAVEN.347:
       put se
       GOTO TRAVEL
     HAVEN.348:
       put se
       GOTO TRAVEL
     HAVEN.349:
       put se
       GOTO TRAVEL
     HAVEN.350:
       put e
       GOTO TRAVEL
     HAVEN.351:
       put search
       pause 3
       put knock door
       wait
       put whisper %riverpass
       put n
       GOTO TRAVEL
     HAVEN.352:
       put go corner
       GOTO TRAVEL
     HAVEN.353:
       counter set 0
       setVariable class BINGET
      1. ^ Needed for SellItem Termination ^
       setVariable sellorbin BINGET
       GOTO %provcode%.Sellitem0

   HAVEN.CRESCENT:
       setVariable havenguild crescent
     HAVEN.360:
       counter set 360
       put out
       GOTO TRAVEL
     HAVEN.361:
       put n
       GOTO TRAVEL
     HAVEN.362:
       put n
       GOTO TRAVEL
     HAVEN.363:
       put n
       GOTO TRAVEL
     HAVEN.364:
       put se
       GOTO TRAVEL
     HAVEN.365:
       put se
       GOTO TRAVEL
     HAVEN.366:
       put se
       GOTO TRAVEL
     HAVEN.367:
       put se
       GOTO TRAVEL
     HAVEN.368:
       put se
       GOTO TRAVEL
     HAVEN.369:
       put s
       GOTO TRAVEL
     HAVEN.370:
       put search
       pause 3
       put knock door
       wait
       put whisper %riverpass
       wait
       put sear shadow
       wait
       put go open
       GOTO TRAVEL
     HAVEN.371:
       put go corner
       GOTO TRAVEL
     HAVEN.372:
       counter set 0
       setVariable class BINGET
      1. ^ Needed for SellItem Termination ^
       setVariable sellorbin BINGET
       GOTO %provcode%.Sellitem0

   HAVEN.ROOK:
       setVariable havenguild rook
     HAVEN.380:
       counter set 380
       put out
       GOTO TRAVEL
     HAVEN.381:
       put n
       GOTO TRAVEL
     HAVEN.382:
       put n
       GOTO TRAVEL
     HAVEN.383:
       put n
       GOTO TRAVEL
     HAVEN.384:
       put se
       GOTO TRAVEL
     HAVEN.385:
       put se
       GOTO TRAVEL
     HAVEN.386:
       put se
       GOTO TRAVEL
     HAVEN.387:
       put se
       GOTO TRAVEL
     HAVEN.388:
       put se
       GOTO TRAVEL
     HAVEN.389:
       put se
       GOTO TRAVEL
     HAVEN.390:
       put se
       GOTO TRAVEL
     HAVEN.391:
       put se
       GOTO TRAVEL
     HAVEN.392:
       put ne
       GOTO TRAVEL
     HAVEN.393:
       put ne
       GOTO TRAVEL
     HAVEN.394:
       put ne
       GOTO TRAVEL
     HAVEN.395:
       put ne
       GOTO TRAVEL
     HAVEN.396:
       put ne
       GOTO TRAVEL
     HAVEN.397:
       put go alley
       GOTO TRAVEL
     HAVEN.398:
       put s
       GOTO TRAVEL
     HAVEN.399:
       put s
       GOTO TRAVEL
     HAVEN.400:
       put go reces
       GOTO TRAVEL
     HAVEN.401:
       put se
       GOTO TRAVEL
     HAVEN.402:
       put search
       pause 3
       put knock door
       wait
       put whisper %riverpass
       wait
       put go arch
       GOTO TRAVEL
     HAVEN.403:
       put clim stai
       GOTO TRAVEL
     HAVEN.404:
       put go corner
       GOTO TRAVEL
     HAVEN.405:
       counter set 0
       setVariable class BINGET
      1. ^ Needed for SellItem Termination ^
       setVariable sellorbin BINGET
       GOTO %provcode%.Sellitem0


          2. #####
          3. HAVEN BINNING #####
          4. ##### 


   HAVEN.FINISH.BINGET:
      setVariable class THIEF
      GOTO %havenguild%.RHLEAVE

   PAWN.RHLEAVE:
     HAVEN.410:
       counter set 410
       put out
       GOTO TRAVEL
     HAVEN.411:
       put sw
       GOTO TRAVEL
     HAVEN.412:
       put clim stair
       GOTO TRAVEL
     HAVEN.413:
       put go door
       GOTO TRAVEL
     HAVEN.414:
       put go pawn
       GOTO TRAVEL
     HAVEN.415:
       setVariable startlocation %starthold
       GOTO END

   ARTIFICER.RHLEAVE:
     HAVEN.420:
       counter set 420
       put out
       GOTO TRAVEL
     HAVEN.421:
       put climb door
       GOTO TRAVEL
     HAVEN.422:
       put nw
       GOTO TRAVEL
     HAVEN.423:
       put nw
       GOTO TRAVEL
     HAVEN.424:
       put nw
       GOTO TRAVEL
     HAVEN.425:
       put s
       GOTO TRAVEL
     HAVEN.426:
       put s
       GOTO TRAVEL
     HAVEN.427:
       put s
       GOTO TRAVEL
     HAVEN.428:
       put go pawn
       GOTO TRAVEL
     HAVEN.429:
       setVariable startlocation %starthold
       GOTO END

   HALFING.RHLEAVE:
     HAVEN.432:
       counter set 432
       put out
       GOTO TRAVEL
     HAVEN.433:
       put sw
       GOTO TRAVEL
     HAVEN.434:
       put go door
       GOTO TRAVEL
     HAVEN.435:
       put go grat
       GOTO TRAVEL
     HAVEN.436:
       put sw
       GOTO TRAVEL
     HAVEN.437:
       put w
       GOTO TRAVEL
     HAVEN.438:
       put nw
       GOTO TRAVEL
     HAVEN.439:
       put nw
       GOTO TRAVEL
     HAVEN.440:
       put nw
       GOTO TRAVEL
     HAVEN.441:
       put nw
       GOTO TRAVEL
     HAVEN.442:
       put nw
       GOTO TRAVEL
     HAVEN.443:
       put s
       GOTO TRAVEL
     HAVEN.444:
       put s
       GOTO TRAVEL
     HAVEN.445:
       put s
       GOTO TRAVEL
     HAVEN.446:
       put go pawn
       GOTO TRAVEL
     HAVEN.447:
       setVariable startlocation %starthold
       GOTO END

   COOP.RHLEAVE:
     HAVEN.450:
       counter set 450
       put out
       GOTO TRAVEL
     HAVEN.451:
       put s
       GOTO TRAVEL
     HAVEN.452:
       put go door
       GOTO TRAVEL
     HAVEN.453:
       put w
       GOTO TRAVEL
     HAVEN.454:
       put nw
       GOTO TRAVEL
     HAVEN.455:
       put nw
       GOTO TRAVEL
     HAVEN.456:
       put nw
       GOTO TRAVEL
     HAVEN.457:
       put nw
       GOTO TRAVEL
     HAVEN.458:
       put nw
       GOTO TRAVEL
     HAVEN.459:
       put s
       GOTO TRAVEL
     HAVEN.460:
       put s
       GOTO TRAVEL
     HAVEN.461:
       put s
       GOTO TRAVEL
     HAVEN.462:
       put go pawn
       GOTO TRAVEL
     HAVEN.463:
       setVariable startlocation %starthold
       GOTO END

   CRESCENT.RHLEAVE:
     HAVEN.468:
       counter set 468
       put out
       GOTO TRAVEL
     HAVEN.469:
       put out
       GOTO TRAVEL
     HAVEN.470:
       put go door
       GOTO TRAVEL
     HAVEN.471:
       put n
       GOTO TRAVEL
     HAVEN.472:
       put nw
       GOTO TRAVEL
     HAVEN.473:
       put nw
       GOTO TRAVEL
     HAVEN.474:
       put nw
       GOTO TRAVEL
     HAVEN.475:
       put nw
       GOTO TRAVEL
     HAVEN.476:
       put nw
       GOTO TRAVEL
     HAVEN.477:
       put s
       GOTO TRAVEL
     HAVEN.478:
       put s
       GOTO TRAVEL
     HAVEN.479:
       put s
       GOTO TRAVEL
     HAVEN.480:
       put go pawn
       GOTO TRAVEL
     HAVEN.481:
       setVariable startlocation %starthold
       GOTO END

   ROOK.RHLEAVE:
     HAVEN.485:
       counter set 485
       put out
       GOTO TRAVEL
     HAVEN.486:
       put climb stair
       GOTO TRAVEL
     HAVEN.487:
       put go arch
       GOTO TRAVEL
     HAVEN.488:
       put go door
       GOTO TRAVEL
     HAVEN.489:
       put go reces
       GOTO TRAVEL
     HAVEN.490:
       put n
       GOTO TRAVEL
     HAVEN.491:
       put n
       GOTO TRAVEL
     HAVEN.492:
       put sw
       GOTO TRAVEL
     HAVEN.493:
       put sw
       GOTO TRAVEL
     HAVEN.494:
       put sw
       GOTO TRAVEL
     HAVEN.495:
       put sw
       GOTO TRAVEL
     HAVEN.496:
       put sw
       GOTO TRAVEL
     HAVEN.497:
       put nw
       GOTO TRAVEL
     HAVEN.498:
       put nw
       GOTO TRAVEL
     HAVEN.499:
       put nw
       GOTO TRAVEL
     HAVEN.500:
       put nw
       GOTO TRAVEL
     HAVEN.501:
       put nw
       GOTO TRAVEL
     HAVEN.502:
       put nw
       GOTO TRAVEL
     HAVEN.503:
       put nw
       GOTO TRAVEL
     HAVEN.504:
       put nw
       GOTO TRAVEL
     HAVEN.505:
       put s
       GOTO TRAVEL
     HAVEN.506:
       put s
       GOTO TRAVEL
     HAVEN.507:
       put s
       GOTO TRAVEL
     HAVEN.508:
       put go pawn
       GOTO TRAVEL
     HAVEN.509:
       setVariable startlocation %starthold
       GOTO END


                          2. #############
                          3. QI'RESHALIA #############
                          4. #############
                          5. SKILL DETERMINATION #############
                          6. (tweak the items you steal here if desired) #############
                          7. ############# 


   QIR.RANKADJ1:
       setVariable skillrange 20-39
       setVariable Rbait worms
       setVariable RbaitQuant 2
       setVariable Rchan rope
       setVariable RchanQuant 1
       setVariable Rherb water
       setVariable RherbQuant 2
       setVariable Rforge <nothing>
       setVariable RforgeQuant 1
       setVariable Rbard pick
       setVariable RbardQuant 1
       setVariable Rhair unguent
       setVariable RhairQuant 1
       setVariable Rleather <nothing>
       setVariable RleatherQuant 1
       setVariable Rtailor stockings
       setVariable RtailorQuant 1
       setVariable Rgami <nothing>
       setVariable RgamiQuant 1
       setVariable Rmagik <nothing>
       setVariable RmagikQuant 1
       setVariable Rjewel <nothing>
       setVariable RjewelQuant 1
       setVariable Rthea <nothing>
       setVariable RtheaQuant 1
       setVariable Rcleric lavender
       setVariable RclericQuant 1
       setVariable Rexot <nothing>
       setVariable RexotQuant 1
       GOTO RANKREPORT

   QIR.RANKADJ2:
       setVariable skillrange 40-59
       setVariable Rbait cheese
       setVariable RbaitQuant 2
       setVariable Rchan biscuit
       setVariable RchanQuant 2
       setVariable Rherb alcohol
       setVariable RherbQuant 2
       setVariable Rforge <nothing>
       setVariable RforgeQuant 2
       setVariable Rbard rag
       setVariable RbardQuant 2
       setVariable Rhair unguent
       setVariable RhairQuant 2
       setVariable Rleather <nothing>
       setVariable RleatherQuant 2
       setVariable Rtailor stockings
       setVariable RtailorQuant 2
       setVariable Rgami <nothing>
       setVariable RgamiQuant 2
       setVariable Rmagik <nothing>
       setVariable RmagikQuant 2
       setVariable Rjewel <nothing>
       setVariable RjewelQuant 2
       setVariable Rthea <nothing>
       setVariable RtheaQuant 2
       setVariable Rcleric plume feather
       setVariable RclericQuant 2
       setVariable Rexot <nothing>
       setVariable RexotQuant 2
       GOTO RANKREPORT

   QIR.RANKADJ3:
       setVariable skillrange 60-99
       setVariable Rbait type 4 line
       setVariable RbaitQuant 2
       setVariable Rchan lobscouse stew
       setVariable RchanQuant 2
       setVariable Rherb pestle
       setVariable RherbQuant 2
       setVariable Rforge <nothing>
       setVariable RforgeQuant 2
       setVariable Rbard cloth
       setVariable RbardQuant 2
       setVariable Rhair hairbrush
       setVariable RhairQuant 2
       setVariable Rleather <nothing>
       setVariable RleatherQuant 2
       setVariable Rtailor shirt
       setVariable RtailorQuant 2
       setVariable Rgami <nothing>
       setVariable RgamiQuant 2
       setVariable Rmagik <nothing>
       setVariable RmagikQuant 2
       setVariable Rjewel ear-frill
       setVariable RjewelQuant 2
       setVariable Rthea <nothing>
       setVariable RtheaQuant 2
       setVariable Rcleric wine
       setVariable RclericQuant 2
       setVariable Rexot <nothing>
       setVariable RexotQuant 2
       GOTO RANKREPORT

   QIR.RANKADJ4:
       setVariable skillrange 100-149
       setVariable Rbait pole
       setVariable RbaitQuant 1
       setVariable Rchan polish
       setVariable RchanQuant 2
       setVariable Rherb large jar
       setVariable RherbQuant 2
       setVariable Rforge dagger
       setVariable RforgeQuant 2
       setVariable Rbard tambourine
       setVariable RbardQuant 2
       setVariable Rhair clippers
       setVariable RhairQuant 2
       setVariable Rleather <nothing>
       setVariable RleatherQuant 2
       setVariable Rtailor sash
       setVariable RtailorQuant 2
       setVariable Rgami plain paper
       setVariable RgamiQuant 1
       setVariable Rmagik <nothing>
       setVariable RmagikQuant 2
       setVariable Rjewel bangle
       setVariable RjewelQuant 2
       setVariable Rthea <nothing>
       setVariable RtheaQuant 2
       setVariable Rcleric candle
       setVariable RclericQuant 2
       setVariable Rexot <nothing>
       setVariable RexotQuant 2
       GOTO RANKREPORT

   QIR.RANKADJ5:
       setVariable skillrange 150-199
       setVariable Rbait pole
       setVariable RbaitQuant 2
       setVariable Rchan breaker
       setVariable RchanQuant 2
       setVariable Rherb cebi root
       setVariable RherbQuant 2
       setVariable Rforge dagger
       setVariable RforgeQuant 2
       setVariable Rbard flute
       setVariable RbardQuant 2
       setVariable Rhair clippers
       setVariable RhairQuant 2
       setVariable Rleather <nothing>
       setVariable RleatherQuant 2
       setVariable Rtailor tunic
       setVariable RtailorQuant 2
       setVariable Rgami plain paper
       setVariable RgamiQuant 2
       setVariable Rmagik <nothing>
       setVariable RmagikQuant 2
       setVariable Rjewel clasp
       setVariable RjewelQuant 2
       setVariable Rthea <nothing>
       setVariable RtheaQuant 2
       setVariable Rcleric vial
       setVariable RclericQuant 2
       setVariable Rexot <nothing>
       setVariable RexotQuant 2
       GOTO RANKREPORT

   QIR.RANKADJ6:
       setVariable skillrange 200-249
       setVariable Rbait pole
       setVariable RbaitQuant 2
       setVariable Rchan strap
       setVariable RchanQuant 2
       setVariable Rherb riolur leaf
       setVariable RherbQuant 2
       setVariable Rforge sap
       setVariable RforgeQuant 2
       setVariable Rbard six strings
       setVariable RbardQuant 2
       setVariable Rhair <nothing>
       setVariable RhairQuant 2
       setVariable Rleather gauntlets
       setVariable RleatherQuant 1
       setVariable Rtailor trousers
       setVariable RtailorQuant 2
       setVariable Rgami white paper
       setVariable RgamiQuant 2
       setVariable Rmagik simple talisman
       setVariable RmagikQuant 1
       setVariable Rjewel silver chain
       setVariable RjewelQuant 2
       setVariable Rthea <nothing>
       setVariable RtheaQuant 2
       setVariable Rcleric censer
       setVariable RclericQuant 2
       setVariable Rexot <nothing>
       setVariable RexotQuant 2
       GOTO RANKREPORT

   QIR.RANKADJ7:
       setVariable skillrange 250-299
       setVariable Rbait pole
       setVariable RbaitQuant 3
       setVariable Rchan ditty bag
       setVariable RchanQuant 2
       setVariable Rherb ithor potion
       setVariable RherbQuant 2
       setVariable Rforge sap
       setVariable RforgeQuant 2
       setVariable Rbard refill
       setVariable RbardQuant 2
       setVariable Rhair <nothing>
       setVariable RhairQuant 2
       setVariable Rleather gauntlets
       setVariable RleatherQuant 2
       setVariable Rtailor vest
       setVariable RtailorQuant 2
       setVariable Rgami blue paper
       setVariable RgamiQuant 2
       setVariable Rmagik simple talisman
       setVariable RmagikQuant 2
       setVariable Rjewel collar
       setVariable RjewelQuant 1
       setVariable Rthea <nothing>
       setVariable RtheaQuant 2
       setVariable Rcleric censer
       setVariable RclericQuant 2
       setVariable Rexot <nothing>
       setVariable RexotQuant 2
       GOTO RANKREPORT

   QIR.RANKADJ9:
   QIR.RANKADJ10:
       ECHO ***********************************************
       ECHO ***        Sorry, but there isn't anything harder yet!
       ECHO ***********************************************
   QIR.RANKADJ8:
       setVariable skillrange 300+
       setVariable Rbait pole
       setVariable RbaitQuant 3
       setVariable Rchan sailcloth quiver
       setVariable RchanQuant 2
       setVariable Rherb tincture jar
       setVariable RherbQuant 2
       setVariable Rforge sap
       setVariable RforgeQuant 2
       setVariable Rbard lyre
       setVariable RbardQuant 2
       setVariable Rhair <nothing>
       setVariable RhairQuant 2
       setVariable Rleather gauntlets
       setVariable RleatherQuant 2
       setVariable Rtailor kilt
       setVariable RtailorQuant 2
       setVariable Rgami bird instructions
       setVariable RgamiQuant 2
       setVariable Rmagik cambrinth ring
       setVariable RmagikQuant 1
       setVariable Rjewel collar
       setVariable RjewelQuant 2
       setVariable Rthea <nothing>
       setVariable RtheaQuant 2
       setVariable Rcleric oil
       setVariable RclericQuant 2
       setVariable Rexot <nothing>
       setVariable RexotQuant 2
       GOTO RANKREPORT

   QIR.RANKADJ-1:
   QIR.RANKADJ0:
       GOTO BEGGAR.MOD

   QIR.BAGCHECK:
       matchre BAGWARN /%Rbait%|%Rchan%|%Rherb%|%Rforge%|%Rbard%|%Rhair%|%Rthea%/
       matchre BAGWARN /%Rleather%|%Rtailor%|%Rgami%|%Rmagik%|%Rjewel%|%Rcleric%|%Rexot%/
       match QIR.BAGCHECK2 You glance
       put look in my %container1
       put glance
       GOTO UniversalMatch

   QIR.BAGCHECK2:
       matchre BAGWARN2 /%Rbait%|%Rchan%|%Rherb%|%Rforge%|%Rbard%|%Rhair%|%Rthea%/
       matchre BAGWARN2 /%Rleather%|%Rtailor%|%Rgami%|%Rmagik%|%Rjewel%|%Rcleric%|%Rexot%/
       match KHRICHECK.%class% You glance
       put look in my %container2
       put glance
       GOTO UniversalMatch


          2. #####
          3. QI'RESHALIA START LOCATION #####
          4. ##### 


   RATHA:
       match RATHA.START.GREEN [Truffenyi's Green]
       match RATHA.START.3SEWER The travel-worn road narrows, and the caravans that frequent
       match RATHA.START.2SEWER Fabulous marble colonnades line a regal plaza
       match RATHA.START.1SEWER A wall of refuse brings an end to travel along this alley.
       match RATHA.START.BANK Lower Bank of Ratha, Atrium
       match RATHA.START.PAWN Paedraig
       match RATHA.START.BAIT Drorg
       match RATHA.START.CHAN Namazzi
       match RATHA.START.HERB Ktzini
       match RATHA.START.FORGE Krrikt'k
       match RATHA.START.BARD Elepaio
       match RATHA.START.HAIR Dennats Baya
       match RATHA.START.LEATHER Redwing
       match RATHA.START.TAILOR Amorand
       match RATHA.START.GAMI Ssivo
       match RATHA.START.MAGIK Kalazashi
       match RATHA.START.JEWEL Svra'an
       match RATHA.START.THEA Hotagi'rath Theater, Rehearsal Hall
       match RATHA.START.EXOT Chabalu
       match RATHA.START.CLERIC This quaint shop run by the Oracle Veraclese
       match QIR.BADLOCATION Obvious
       setVariable citycode ratha
       put look
       GOTO UniversalMatch

   QIR.BADLOCATION:
       ECHO ***********************************************
       ECHO *** Not a valid starting location.
       ECHO *** Starting locations in Qi'Reshalia are:
       ECHO ***
       ECHO *** Ratha Bank Atrium
       ECHO *** Outside Ratha sewers
       ECHO *** Truffenyi's Green
       ECHO *** Ratha Pawn Shop
       ECHO *** Ratha Bait Shop
       ECHO *** Ratha Chandlery
       ECHO *** Ratha Herbalist & Alchemist
       ECHO *** Ratha Forge
       ECHO *** Ratha Bard Shop
       ECHO *** Ratha Hair Care
       ECHO *** Ratha Leatherwork
       ECHO *** Ratha Tailor
       ECHO *** Ratha Origami Shop
       ECHO *** Ratha Magik Shop
       ECHO *** Ratha Jewelry Shop
       ECHO *** Ratha Cleric Shop
       ECHO *** Ratha Exotics Shop
       ECHO *** Ratha Theater Rehearsal Hall
       ECHO ***
       ECHO ***********************************************
       GOTO END

   RATHA.START.GREEN:
       setVariable upperlower upper
     RATHA.540:
       counter set 540
       put s
       GOTO TRAVEL
     RATHA.541:
       put w
       GOTO TRAVEL
     RATHA.542:
       put w
       GOTO TRAVEL
     RATHA.543:
       put nw
       GOTO TRAVEL
     RATHA.544:
       put ne
       GOTO TRAVEL

   RATHA.START.3SEWER:
       setVariable upperlower upper
     RATHA.545:
       counter set 545
       put go grat
       GOTO TRAVEL
     RATHA.546:
       setVariable upperlower lower
       put go crev
       GOTO TRAVEL
     RATHA.547:
       put e
       GOTO TRAVEL
     RATHA.548:
       put se
       GOTO TRAVEL
     RATHA.549:
       put down
       GOTO TRAVEL
     RATHA.550:
       put s
       GOTO TRAVEL
     RATHA.566:
     RATHA.551:
       counter set 551
       put down
       GOTO TRAVEL
     RATHA.552:
       put ne
       GOTO TRAVEL
     RATHA.553:
       put se
       GOTO TRAVEL
     RATHA.554:
       put e
       GOTO TRAVEL
     RATHA.555:
       put go passage
       GOTO TRAVEL
     RATHA.556:
       put go grat
       GOTO TRAVEL

   RATHA.START.1SEWER:
       setVariable upperlower lower
     RATHA.557:
       counter set 557
       put e
       GOTO TRAVEL
     RATHA.558:
       put ne
       GOTO TRAVEL
     RATHA.559:
       put se
       GOTO TRAVEL
     RATHA.560:
       put s
       GOTO TRAVEL
     RATHA.561:
       put se
       GOTO TRAVEL
     RATHA.562:
       put se
       GOTO TRAVEL

   RATHA.START.2SEWER:
       setVariable upperlower lower
     RATHA.564:
       counter set 564
       put go drain
       GOTO TRAVEL
     RATHA.565:
       put go open
       GOTO TRAVEL

   RATHA.START.BANK:
       setVariable upperlower lower
     RATHA.567:
       counter set 567
       put go door
       GOTO TRAVEL
     RATHA.568:
       put climb stair
       GOTO TRAVEL
     RATHA.569:
       put sw
       GOTO TRAVEL
     RATHA.570:
     RATHA.563:
       counter set 570
       put s
       GOTO TRAVEL
     RATHA.571:
       put s
       GOTO TRAVEL
     RATHA.572:
       put s
       GOTO TRAVEL
     RATHA.573:
       put w
       GOTO TRAVEL
     RATHA.574:
       put nw
       GOTO TRAVEL
     RATHA.575:
       setVariable storecode rbait
       put w
       GOTO TRAVEL
     RATHA.576:
     RATHA.594:
       setVariable startlocation %storecode%
     RATHA.538:
       setVariable item %Rbait
       setVariable entrance shop
       setVariable shopdiff %RbaitQuant
       GOTO %MRS%

   RATHA.START.PAWN:
       setVariable upperlower lower
     RATHA.577:
       counter set 577
       put out
       GOTO TRAVEL
     RATHA.578:
       put ne
       GOTO TRAVEL
     RATHA.579:
       put se
       GOTO TRAVEL
     RATHA.580:
       put se
       GOTO TRAVEL
     RATHA.581:
       put s
       GOTO TRAVEL
     RATHA.582:
       put s
       GOTO TRAVEL
     RATHA.583:
       put se
       GOTO TRAVEL
     RATHA.584:
       put e
       GOTO TRAVEL
     RATHA.585:
       put s
       GOTO TRAVEL
     RATHA.586:
       put se
       GOTO TRAVEL
     RATHA.587:
       put s
       GOTO TRAVEL
     RATHA.588:
       put s
       GOTO TRAVEL
     RATHA.589:
       put ne
       GOTO TRAVEL
     RATHA.590:
       put e
       GOTO TRAVEL
     RATHA.591:
       put e
       GOTO TRAVEL
     RATHA.592:
       put e
       GOTO TRAVEL
     RATHA.593:
       setVariable storecode rbait
       put ne
       GOTO TRAVEL

   RATHA.START.BAIT:
       counter set 576
       setVariable upperlower lower
       setVariable storecode Rbait
       match RATHA.%c Obvious
       put out
       GOTO UniversalMatch

   RATHA.START.CHAN:
       counter set 10
       setVariable upperlower lower
       setVariable storecode Rchan
       setVariable startlocation %storecode%
       match RATHA.%c Obvious
       put out
       GOTO UniversalMatch

   RATHA.START.HERB:
       counter set 26
       setVariable upperlower lower
       setVariable storecode Rherb
       setVariable startlocation %storecode%
       match RATHA.%c Obvious
       put out
       GOTO UniversalMatch

   RATHA.START.FORGE:
       counter set 46
       setVariable upperlower lower
       setVariable storecode Rforge
       setVariable startlocation %storecode%
       match RATHA.%c Obvious
       put out
       GOTO UniversalMatch

   RATHA.START.BARD:
       counter set 70
       setVariable upperlower lower
       setVariable storecode Rbard
       setVariable startlocation %storecode%
       match RATHA.%c Obvious
       put out
       GOTO UniversalMatch

   RATHA.START.HAIR:
       counter set 77
       setVariable upperlower lower
       setVariable storecode Rhair
       setVariable startlocation %storecode%
       match RATHA.%c Obvious
       put out
       GOTO UniversalMatch

   RATHA.START.LEATHER:
       counter set 82
       setVariable upperlower lower
       setVariable storecode Rleather
       setVariable startlocation %storecode%
       match RATHA.%c Obvious
       put out
       GOTO UniversalMatch

   RATHA.START.TAILOR:
       counter set 91
       setVariable upperlower lower
       setVariable storecode Rtailor
       setVariable startlocation %storecode%
       match RATHA.%c Obvious
       put out
       GOTO UniversalMatch

   RATHA.START.GAMI:
       counter set 104
       setVariable upperlower upper
       setVariable storecode Rgami
       setVariable startlocation %storecode%
       match RATHA.%c Obvious
       put out
       GOTO UniversalMatch

   RATHA.START.MAGIK:
       counter set 111
       setVariable upperlower upper
       setVariable storecode Rmagik
       setVariable startlocation %storecode%
       match RATHA.%c Obvious
       put out
       GOTO UniversalMatch

   RATHA.START.JEWEL:
       counter set 119
       setVariable upperlower upper
       setVariable storecode Rjewel
       setVariable startlocation %storecode%
       match RATHA.%c Obvious
       put out
       GOTO UniversalMatch

   RATHA.START.THEA:
       counter set 123
       setVariable upperlower upper
       setVariable storecode Rthea
       setVariable startlocation %storecode%
       match RATHA.%c Obvious
       put go arch
       GOTO UniversalMatch

   RATHA.START.EXOT:
       counter set 336
       setVariable upperlower upper
       setVariable storecode Rexot
       setVariable startlocation %storecode%
       match RATHA.%c Obvious
       put out
       GOTO UniversalMatch

   RATHA.START.CLERIC:
       counter set 340
       setVariable upperlower upper
       setVariable storecode Rcleric
       setVariable startlocation %storecode%
       match RATHA.%c Obvious
       put out
       GOTO UniversalMatch
          2. #####
          3. RATHA LEAVING SHOPS #####
          4. ##### 


   LEAVE.RBAIT:
       GOTO %LorM%.RBAIT.1
   LEAVE.RBAIT.1:
     RATHA.1:
       counter set 1
       put e
       GOTO TRAVEL
     RATHA.2:
       put se
       GOTO TRAVEL
     RATHA.3:
       put e
       GOTO TRAVEL
     RATHA.4:
       put e
       GOTO TRAVEL
     RATHA.5:
       put e
       GOTO TRAVEL
     RATHA.6:
       put e
       GOTO TRAVEL
     RATHA.7:
       put e
       GOTO TRAVEL
     RATHA.8:
       put e
       GOTO TRAVEL
     RATHA.9:
       setVariable storecode rchan
       put n
       GOTO TRAVEL
     RATHA.10:
       setVariable item %Rchan
       setVariable entrance shop
       setVariable shopdiff %RchanQuant
       GOTO %MRS%

   LEAVE.RCHAN:
     RATHA.12:
       counter set 12
       put n
       GOTO TRAVEL
     RATHA.13:
       put n
       GOTO TRAVEL
     RATHA.14:
       put n
       GOTO TRAVEL
     RATHA.15:
       put nw
       GOTO TRAVEL
     RATHA.16:
       put n
       GOTO TRAVEL
     RATHA.17:
       put nw
       GOTO TRAVEL
     RATHA.18:
       put n
       GOTO TRAVEL
     RATHA.19:
       put nw
       GOTO TRAVEL
     RATHA.20:
       put nw
       GOTO TRAVEL
     RATHA.21:
       put w
       GOTO TRAVEL
     RATHA.22:
       put w
       GOTO TRAVEL
     RATHA.23:
       put sw
       GOTO TRAVEL
     RATHA.24:
       put w
       GOTO TRAVEL
     RATHA.25:
       setVariable storecode rherb
       put sw
       GOTO TRAVEL
     RATHA.26:
       setVariable entrance shop
       setVariable item %Rherb
       setVariable shopdiff %RherbQuant
       GOTO %MRS%

   LEAVE.RHERB:
     RATHA.27:
       counter set 27
       put sw
       GOTO TRAVEL
     RATHA.28:
       put sw
       GOTO TRAVEL
     RATHA.29:
       put w
       GOTO TRAVEL
     RATHA.30:
       put go grat
       GOTO TRAVEL
     RATHA.31:
       put go passage
       GOTO TRAVEL
     RATHA.32:
       put w
       GOTO TRAVEL
     RATHA.33:
       put nw
       GOTO TRAVEL
     RATHA.34:
       put sw
       GOTO TRAVEL
     RATHA.35:
       put up
       GOTO TRAVEL
     RATHA.36:
       put go open
       GOTO TRAVEL
     RATHA.37:
       put go drain
       GOTO TRAVEL
     RATHA.38:
       put ne
       GOTO TRAVEL
     RATHA.39:
       put e
       GOTO TRAVEL
     RATHA.40:
       put se
       GOTO TRAVEL
     RATHA.41:
       put se
       GOTO TRAVEL
     RATHA.42:
       put s
       GOTO TRAVEL
     RATHA.43:
       put se
       GOTO TRAVEL
     RATHA.44:
       put se
       GOTO TRAVEL
     RATHA.45:
       setVariable storecode rforge
       put se
       GOTO TRAVEL
     RATHA.46:
       setVariable entrance forge
       setVariable item %Rforge
       setVariable shopdiff %RforgeQuant
       GOTO %MRS%

   LEAVE.RFORGE:
     RATHA.47:
       counter set 47
       put nw
       GOTO TRAVEL
     RATHA.48:
       put nw
       GOTO TRAVEL
     RATHA.49:
       put nw
       GOTO TRAVEL
     RATHA.50:
       put n
       GOTO TRAVEL
     RATHA.51:
       put nw
       GOTO TRAVEL
     RATHA.52:
       put nw
       GOTO TRAVEL
     RATHA.53:
       put w
       GOTO TRAVEL
     RATHA.54:
       put w
       GOTO TRAVEL
     RATHA.55:
       put w
       GOTO TRAVEL
     RATHA.56:
       put w
       GOTO TRAVEL
     RATHA.57:
       put w
       GOTO TRAVEL
     RATHA.58:
       put sw
       GOTO TRAVEL
     RATHA.59:
       put w
       GOTO TRAVEL
     RATHA.60:
       put w
       GOTO TRAVEL
     RATHA.61:
       put nw
       GOTO TRAVEL
     RATHA.62:
       put n
       GOTO TRAVEL
     RATHA.63:
       put w
       GOTO TRAVEL
     RATHA.64:
       put w
       GOTO TRAVEL
     RATHA.65:
       put ne
       GOTO TRAVEL
     RATHA.66:
       put nw
       GOTO TRAVEL
     RATHA.67:
       put nw
       GOTO TRAVEL
     RATHA.68:
       put sw
       GOTO TRAVEL
     RATHA.69:
       setVariable storecode rbard
       put s
       GOTO TRAVEL
     RATHA.70:
       setVariable entrance shop
       setVariable item %Rbard
       setVariable shopdiff %RbardQuant
       GOTO %MRS%

   LEAVE.RBARD:
     RATHA.71:
       counter set 71
       put n
       GOTO TRAVEL
     RATHA.72:
       put ne
       GOTO TRAVEL
     RATHA.73:
       put se
       GOTO TRAVEL
     RATHA.74:
       put se
       GOTO TRAVEL
     RATHA.75:
       put sw
       GOTO TRAVEL
     RATHA.76:
       setVariable storecode rhair
       put e
       GOTO TRAVEL
     RATHA.77:
       setVariable entrance shop
       setVariable item %Rhair
       setVariable shopdiff %RhairQuant
       GOTO %MRS%

   LEAVE.RHAIR:
     RATHA.78:
       counter set 78
       put e
       GOTO TRAVEL
     RATHA.79:
       put s
       GOTO TRAVEL
     RATHA.80:
       put se
       GOTO TRAVEL
     RATHA.81:
       setVariable storecode rleather
       put e
       GOTO TRAVEL
     RATHA.82:
       setVariable entrance shop
       setVariable item %Rleather
       setVariable shopdiff %RleatherQuant
       GOTO %MRS%

   LEAVE.RLEATHER:
     RATHA.83:
       counter set 83
       put e
       GOTO TRAVEL
     RATHA.84:
       put ne
       GOTO TRAVEL
     RATHA.85:
       put e
       GOTO TRAVEL
     RATHA.86:
       put e
       GOTO TRAVEL
     RATHA.87:
       put e
       GOTO TRAVEL
     RATHA.88:
       put e
       GOTO TRAVEL
     RATHA.89:
       put e
       GOTO TRAVEL
     RATHA.90:
       setVariable storecode rtailor
       put e
       GOTO TRAVEL
     RATHA.91:
       setVariable entrance shop
       setVariable item %Rtailor
       setVariable shopdiff %RtailorQuant
       GOTO %MRS%

   LEAVE.RTAILOR:
     RATHA.92:
       counter set 92
       put w
       GOTO TRAVEL
     RATHA.93:
       put w
       GOTO TRAVEL
     RATHA.94:
       put sw
       GOTO TRAVEL
     RATHA.95:
       put go drain
       GOTO TRAVEL
     RATHA.96:
       put go open
       GOTO TRAVEL
     RATHA.97:
       put n
       GOTO TRAVEL
     RATHA.98:
       put up
       GOTO TRAVEL
     RATHA.99:
       put nw
       GOTO TRAVEL
     RATHA.100:
       put w
       GOTO TRAVEL
     RATHA.101:
       put go crev
       GOTO TRAVEL
     RATHA.102:
       put go grat
       setVariable upperlower upper
       GOTO TRAVEL
     RATHA.103:
       setVariable storecode rgami
       put sw
       GOTO TRAVEL
     RATHA.104:
       setVariable entrance struct
       setVariable item %Rgami
       setVariable shopdiff %RgamiQuant
       GOTO %MRS%

   LEAVE.RGAMI:
     RATHA.105:
       counter set 105
       put w
       GOTO TRAVEL
     RATHA.106:
       put w
       GOTO TRAVEL
     RATHA.107:
       put nw
       GOTO TRAVEL
     RATHA.108:
       put nw
       GOTO TRAVEL
     RATHA.109:
       put nw
       GOTO TRAVEL
     RATHA.110:
       setVariable storecode rmagik
       put n
       GOTO TRAVEL
     RATHA.111:
       setVariable entrance shop
       setVariable item %Rmagik
       setVariable shopdiff %RmagikQuant
       GOTO %MRS%

   LEAVE.RMAGIK:
     RATHA.112:
       counter set 112
       put e
       GOTO TRAVEL
     RATHA.113:
       put ne
       GOTO TRAVEL
     RATHA.114:
       put ne
       GOTO TRAVEL
     RATHA.115:
       put ne
       GOTO TRAVEL
     RATHA.116:
       put se
       GOTO TRAVEL
     RATHA.117:
       put se
       GOTO TRAVEL
     RATHA.118:
       setVariable storecode rjewel
       put ne
       GOTO TRAVEL
     RATHA.119:
       setVariable entrance shop
       setVariable item %Rjewel
       setVariable shopdiff %RjewelQuant
       GOTO %MRS%

   LEAVE.RJEWEL:
     RATHA.120:
       counter set 120
       put e
       GOTO TRAVEL
     RATHA.121:
       put go building
       GOTO TRAVEL
     RATHA.122:
       setVariable storecode rthea
       put w
       GOTO TRAVEL
     RATHA.123:
       setVariable entrance arch
       setVariable item %Rthea
       setVariable shopdiff %RtheaQuant
       GOTO %MRS%

   LEAVE.RTHEA:
       setVariable starthold %startlocation
       setVariable startlocation placeholder
     RATHA.328:
       counter set 328
       put e
       GOTO TRAVEL
     RATHA.329:
       put out
       GOTO TRAVEL
     RATHA.330:
       put w
       GOTO TRAVEL
     RATHA.331:
       setVariable startlocation %starthold
       put sw
       GOTO TRAVEL
     RATHA.332:
       put se
       GOTO TRAVEL
     RATHA.333:
       put e
       GOTO TRAVEL
     RATHA.334:
       put e
       GOTO TRAVEL
     RATHA.335:
       setVariable storecode rexot
       put e
       GOTO TRAVEL
     RATHA.336:
       setVariable entrance shop
       setVariable item %Rexot
       setVariable shopdiff %RexotQuant
       GOTO %MRS%

   LEAVE.REXOT:
     RATHA.337:
       counter set 337
       put w
       GOTO TRAVEL
     RATHA.338:
       put w
       GOTO TRAVEL
     RATHA.339:
       setVariable storecode rcleric
       put s
       GOTO TRAVEL
     RATHA.340:
       setVariable entrance shop
       setVariable item %Rcleric
       setVariable shopdiff %RclericQuant
       GOTO %MRS%

   LEAVE.RCLERIC:
     RATHA.125:
       counter set 125
       put sw
       GOTO TRAVEL
     RATHA.126:
       put sw
       GOTO TRAVEL
     RATHA.127:
       put go grat
       GOTO TRAVEL
     RATHA.128:
       put go crev
       GOTO TRAVEL
     RATHA.129:
       put e
       GOTO TRAVEL
     RATHA.130:
       put se
       GOTO TRAVEL
     RATHA.131:
       put down
       GOTO TRAVEL
     RATHA.132:
       put s
       GOTO TRAVEL
     RATHA.133:
       put down
       GOTO TRAVEL
     RATHA.134:
       put ne
       GOTO TRAVEL
     RATHA.135:
       put se
       GOTO TRAVEL
     RATHA.136:
       put e
       GOTO TRAVEL
     RATHA.137:
       put go passage
       GOTO TRAVEL
     RATHA.138:
       put go grat
       setVariable upperlower lower
       GOTO TRAVEL
     RATHA.139:
       put e
       GOTO TRAVEL
     RATHA.140:
       put ne
       GOTO TRAVEL
     RATHA.141:
       put nw
       GOTO TRAVEL
     RATHA.142:
       put se
       GOTO TRAVEL
     RATHA.143:
       put se
       GOTO TRAVEL
     RATHA.144:
       put s
       GOTO TRAVEL
     RATHA.145:
       put se
       GOTO TRAVEL
     RATHA.146:
       put se
       GOTO TRAVEL
     RATHA.147:
       put s
       GOTO TRAVEL
     RATHA.148:
       put s
       GOTO TRAVEL
     RATHA.149:
       put s
       GOTO TRAVEL
     RATHA.150:
     RATHA.535:
       counter set 535
       put w
       GOTO TRAVEL
     RATHA.536:
       put nw
       GOTO TRAVEL
     RATHA.537:
       setVariable storecode Rbait
       put w
       GOTO TRAVEL


          2. #####
          3. RATHA MOVEON COORDS #####
          4. ##### 


   MOVEON.RBAIT.1:
     RATHA.178:
     RATHA.152:
       counter set 152
       put sw
       GOTO TRAVEL
     RATHA.153:
       put w
       GOTO TRAVEL
     RATHA.154:
       put w
       GOTO TRAVEL
     RATHA.155:
       put w
       GOTO TRAVEL
     RATHA.156:
       put sw
       GOTO TRAVEL
     RATHA.157:
       put n
       GOTO TRAVEL
     RATHA.158:
       put n
       GOTO TRAVEL
     RATHA.159:
       put nw
       GOTO TRAVEL
     RATHA.160:
       put n
       GOTO TRAVEL
     RATHA.161:
       put w
       GOTO TRAVEL
     RATHA.162:
       put nw
       GOTO TRAVEL
     RATHA.163:
       put n
       GOTO TRAVEL
     RATHA.164:
       put n
       GOTO TRAVEL
     RATHA.165:
       put nw
       GOTO TRAVEL
     RATHA.166:
       put nw
       GOTO TRAVEL
     RATHA.167:
       put sw
       GOTO TRAVEL
     RATHA.168:
       setVariable sellorbin SELLGET
       put go building
       GOTO TRAVEL
     RATHA.245:
       GOTO RATHA.PAWN
          2. #####
          3. RATHA PAWN AND BIN #####
          4. ##### 


   RATHA.PAWN.DROP:
       GOTO END

   RATHA.PAWN:
       GOTO RATHA.PAWN.%DropOrStow%
   RATHA.PAWN.STOW:
       counter set 0
     QIR.SellItem0:
       setVariable sellitem %Rbait
       GOTO %sellorbin
     QIR.SellItem1:
       setVariable sellitem %Rchan
       GOTO %sellorbin
     QIR.SellItem2:
       setVariable sellitem %Rherb
       GOTO %sellorbin
     QIR.SellItem3:
       setVariable sellitem %Rforge
       GOTO %sellorbin
     QIR.SellItem4:
       setVariable sellitem %Rbard
       GOTO %sellorbin
     QIR.SellItem5:
       setVariable sellitem %Rhair
       GOTO %sellorbin
     QIR.SellItem6:
       setVariable sellitem %Rleather
       GOTO %sellorbin
     QIR.SellItem7:
       setVariable sellitem %Rtailor
       GOTO %sellorbin
     QIR.SellItem8:
       setVariable sellitem %Rgami
       GOTO %sellorbin
     QIR.SellItem9:
       setVariable sellitem %Rmagik
       GOTO %sellorbin
     QIR.SellItem10:
       setVariable sellitem %Rjewel
       GOTO %sellorbin
     QIR.SellItem11:
       setVariable sellitem %Rcleric
       GOTO %sellorbin
     QIR.SellItem12:
       GOTO %citycode%.FINISH.%class

   RATHA.FINISH.NONTHIEF:
   RATHA.FINISH.EMPATH:
       GOTO END

   RATHA.FINISH.THIEF:
       setVariable starthold %startlocation
       setVariable startlocation placeholder
     RATHA.758:
       counter set 758
       put out
       GOTO TRAVEL
     RATHA.759:
       put ne
       GOTO TRAVEL
     RATHA.760:
       put ne
       GOTO TRAVEL
     RATHA.761:
       put e
       GOTO TRAVEL
     RATHA.762:
       put e
       GOTO TRAVEL
     RATHA.763:
       put e
       GOTO TRAVEL
     RATHA.764:
       put se
       GOTO TRAVEL
     RATHA.765:
       put e
       GOTO TRAVEL
     RATHA.766:
       put e
       GOTO TRAVEL
     RATHA.767:
       put e
       GOTO TRAVEL
     RATHA.768:
       put e
       GOTO TRAVEL
     RATHA.769:
       put sw
       GOTO TRAVEL
     RATHA.770:
       put w
       GOTO TRAVEL
     RATHA.771:
       put go grat
       GOTO TRAVEL
     RATHA.772:
       put go passage
       GOTO TRAVEL
     RATHA.773:
       put w
       GOTO TRAVEL
     RATHA.774:
       put nw
       GOTO TRAVEL
     RATHA.775:
       put sw
       GOTO TRAVEL
     RATHA.776:
       put up
       GOTO TRAVEL
     RATHA.777:
       put n
       GOTO TRAVEL
     RATHA.778:
       put up
       GOTO TRAVEL
     RATHA.779:
       put nw
       GOTO TRAVEL
     RATHA.780:
       put w
       GOTO TRAVEL
     RATHA.781:
       put go crev
       GOTO TRAVEL
     RATHA.782:
       put go grat
       GOTO TRAVEL
     RATHA.783:
       put ne
       GOTO TRAVEL
     RATHA.784:
       put ne
       GOTO TRAVEL
     RATHA.785:
       put n
       GOTO TRAVEL
     RATHA.786:
       put e
       GOTO TRAVEL
     RATHA.787:
       put e
       GOTO TRAVEL
     RATHA.788:
       put go shop
       GOTO TRAVEL
     RATHA.789:
       put ask chab about cellar
       wait
       put go door
       GOTO TRAVEL
     RATHA.790:
       put go tunnel
       GOTO TRAVEL
     RATHA.791:
       put w
       GOTO TRAVEL
     RATHA.792:
       counter set 0
       setVariable class BINGET
       setVariable sellorbin BINGET
       GOTO %provcode%.Sellitem0

   RATHA.FINISH.BINGET:
       GOTO END

   ALTLEAVE.RBAIT:
   ALTLEAVE.RCHAN:
   ALTLEAVE.RHERB:
   ALTLEAVE.RFORGE:
   ALTLEAVE.RBARD:
   ALTLEAVE.RHAIR:
   ALTLEAVE.RLEATHER:
   ALTLEAVE.RTAILOR:
   ALTLEAVE.RGAMI:
   ALTLEAVE.RMAGIK:
   ALTLEAVE.RJEWEL:
   ALTLEAVE.RCLERIC:
       GOTO MOVEERROR
   ALTLEAVE.RTHEA:
     RATHA.341:
       counter set 341
       put go arch
       GOTO TRAVEL
     RATHA.342:
       GOTO LEAVE.RTHEA
   ALTLEAVE.REXOT:
     RATHA.356:
       counter set 356
       put out
       GOTO TRAVEL
     RATHA.357:
       GOTO LEAVE.REXOT
          2. #####
          3. RATHA 1ST & 2ND TIER JUSTICE #####
          4. ##### 
   RATHA.FREE:
       put get %name sack
       matchre SACKCHECK1 /referring|You reach/
       GOTO UniversalMatch

   RATHA.DEBT:
       GOTO RATHA.%upperlower%.DEBT

   RATHA.ITEMCHECK:
       GOTO RATHA.%upperlower%.ITEMCHECK

   RATHA.LOWER.ITEMCHECK:
       put drop my small sack
       wait
       match RATHA.LOWER.DEBT You have nothing
       match RATHA.LOWER.FREE INVENTORY HELP
       put inv
       matchwait

   RATHA.LOWER.DEBT:
       setVariable upperlower lower
     RATHA.603:
       counter set 603
       put out
       GOTO TRAVEL
     RATHA.604:
       put n
       GOTO TRAVEL
     RATHA.605:
       put n
       GOTO TRAVEL
     RATHA.606:
       put ne
       GOTO TRAVEL
     RATHA.607:
       put climb stair
       GOTO TRAVEL
     RATHA.608:
       put go door
       GOTO TRAVEL
     RATHA.609:
       put go cash
       GOTO TRAVEL
     RATHA.610:
       put with 500 bronze lirum
       wait
       put go atr
       GOTO TRAVEL
     RATHA.611:
       put go door
       GOTO TRAVEL
     RATHA.612:
       put climb stair
       GOTO TRAVEL
     RATHA.613:
       put sw
       GOTO TRAVEL
     RATHA.614:
       put nw
       GOTO TRAVEL
     RATHA.615:
       put nw
       GOTO TRAVEL
     RATHA.616:
       put n
       GOTO TRAVEL
     RATHA.617:
       put nw
       GOTO TRAVEL
     RATHA.618:
       put sw
       GOTO TRAVEL
     RATHA.619:
       put w
       GOTO TRAVEL
     RATHA.620:
       put go grat
       GOTO TRAVEL
     RATHA.621:
       put go passage
       GOTO TRAVEL
     RATHA.622:
       put w
       GOTO TRAVEL
     RATHA.623:
       put nw
       GOTO TRAVEL
     RATHA.624:
       put sw
       GOTO TRAVEL
     RATHA.625:
       put up
       GOTO TRAVEL
     RATHA.626:
       put n
       GOTO TRAVEL
     RATHA.627:
       put up
       GOTO TRAVEL
     RATHA.628:
       put nw
       GOTO TRAVEL
     RATHA.629:
       put w
       GOTO TRAVEL
     RATHA.630:
       put go crev
       GOTO TRAVEL
     RATHA.631:
       put go grat
       GOTO TRAVEL
     RATHA.632:
       put sw
       GOTO TRAVEL
     RATHA.633:
       put se
       GOTO TRAVEL
     RATHA.634:
       put s
       GOTO TRAVEL
     RATHA.635:
       put sw
       GOTO TRAVEL
     RATHA.636:
       put s
       GOTO TRAVEL
     RATHA.637:
       put w
       GOTO TRAVEL
     RATHA.638:
       put go gate
       GOTO TRAVEL
     RATHA.639:
       put n
       GOTO TRAVEL
     RATHA.640:
       put n
       GOTO TRAVEL
     RATHA.641:
       put climb stair
       GOTO TRAVEL
     RATHA.642:
       put go door
       GOTO TRAVEL
     RATHA.643:
       put go hall
       GOTO TRAVEL
     RATHA.644:
       put go off
       GOTO TRAVEL
     RATHA.645:
       put pay 5000
       wait
       put out
       GOTO TRAVEL
     RATHA.646:
       put out
       GOTO TRAVEL
     RATHA.647:
       put go door
       GOTO TRAVEL
     RATHA.648:
       put climb stair
       GOTO TRAVEL
     RATHA.649:
       put s
       GOTO TRAVEL
     RATHA.650:
       put s
       GOTO TRAVEL
     RATHA.651:
       put go gate
       GOTO TRAVEL
     RATHA.652:
       put w
       GOTO TRAVEL
     RATHA.653:
       put n
       GOTO TRAVEL
     RATHA.654:
       put nw
       GOTO TRAVEL
     RATHA.655:
       put n
       GOTO TRAVEL
     RATHA.656:
       put ne
       GOTO TRAVEL
     RATHA.657:
       put e
       GOTO TRAVEL
     RATHA.658:
       put e
       GOTO TRAVEL
     RATHA.659:
       put ne
       GOTO TRAVEL
     RATHA.660:
       put go grat
       GOTO TRAVEL
     RATHA.661:
       put go crev
       GOTO TRAVEL
     RATHA.662:
       put e
       GOTO TRAVEL
     RATHA.663:
       put se
       GOTO TRAVEL
     RATHA.664:
       put down
       GOTO TRAVEL
     RATHA.665:
       put s
       GOTO TRAVEL
     RATHA.666:
       put down
       GOTO TRAVEL
     RATHA.667:
       put ne
       GOTO TRAVEL
     RATHA.668:
       put se
       GOTO TRAVEL
     RATHA.669:
       put e
       GOTO TRAVEL
     RATHA.670:
       put go passage
       GOTO TRAVEL
     RATHA.671:
       put go grat
       GOTO TRAVEL
     RATHA.672:
       put e
       GOTO TRAVEL
     RATHA.673:
       put ne
       GOTO TRAVEL
     RATHA.674:
       put se
       GOTO TRAVEL
     RATHA.675:
       put s
       GOTO TRAVEL
     RATHA.676:
       put se
       GOTO TRAVEL
     RATHA.677:
       put se
       GOTO TRAVEL
     RATHA.678:
       put ne
       GOTO TRAVEL
     RATHA.679:
       put climb stair
       GOTO TRAVEL
     RATHA.680:
       put go door
       GOTO TRAVEL
     RATHA.681:
       put go cash
       GOTO TRAVEL
     RATHA.682:
       put depo all
       wait
       put go atr
       GOTO TRAVEL
     RATHA.683:
       put go door
       GOTO TRAVEL
     RATHA.684:
       put climb stair
       GOTO TRAVEL
     RATHA.685:
       put sw
       GOTO TRAVEL
     RATHA.686:
       put s
       GOTO TRAVEL
     RATHA.687:
       put s
       GOTO TRAVEL
     RATHA.688:
       put go guard
       GOTO TRAVEL
     RATHA.689:
       put get %name sack
       matchre SACKCHECK1 /referring|You reach/
       GOTO UniversalMatch

   RATHA.LOWER.FREE:
       setVariable upperlower lower
       pause 1
       match RATHA.LOWER.MISSINGSTART waitandsee
       match RATHA.LOWER.FREE2 okstart
       put echo %startresume
       put echo okstart
       GOTO UniversalMatch

   RATHA.LOWER.MISSINGSTART:
       setVariable startresume The harbor at this end of the walk
       setVariable ResumeStore Rbait
       GOTO RATHA.LOWER.FREE2

   RATHA.LOWER.FREE2:
     RATHA.254:
       counter set 254
       put out
       GOTO TRAVEL
     RATHA.255:
       put s
       GOTO TRAVEL
     RATHA.256:
       put w
       GOTO TRAVEL
     RATHA.257:
       put nw
       GOTO TRAVEL
     RATHA.258:
       put w
       GOTO TRAVEL
     RATHA.259:
       counter set 1
       setVariable storecode Rbait
       GOTO RESUME.%ResumeStore%

   RESUME.RTAILOR:
       counter add 1
   RESUME.RLEATHER:
       counter add 1
   RESUME.RHAIR:
       counter add 1
   RESUME.RBARD:
       counter add 1
   RESUME.RFORGE:
       counter add 1
   RESUME.RHERB:
       counter add 1
   RESUME.RCHAN:
       counter add 1
   RESUME.RBAIT:
       counter add 1
       setVariable Countdown %c
       GOTO RESUME


          2. #####
          3. RATHA 3RD & 4TH TIER JUSTICE #####
          4. ##### 


   RATHA.UPPER.ITEMCHECK:
       put drop my small sack
       wait
       match RATHA.UPPER.DEBT You have nothing
       match RATHA.UPPER.FREE INVENTORY HELP
       put inv
       matchwait

   RATHA.UPPER.DEBT:
       setVariable upperlower upper
     RATHA.717:
       counter set 717
       put out
       GOTO TRAVEL
     RATHA.718:
       put s
       GOTO TRAVEL
     RATHA.719:
       put s
       GOTO TRAVEL
     RATHA.720:
       put w
       GOTO TRAVEL
     RATHA.721:
       put sw
       GOTO TRAVEL
     RATHA.722:
       put s
       GOTO TRAVEL
     RATHA.723:
       put se
       GOTO TRAVEL
     RATHA.724:
       put s
       GOTO TRAVEL
     RATHA.725:
       put e
       GOTO TRAVEL
     RATHA.726:
       put go gate
       GOTO TRAVEL
     RATHA.727:
       put n
       GOTO TRAVEL
     RATHA.728:
       put n
       GOTO TRAVEL
     RATHA.729:
       put climb stair
       GOTO TRAVEL
     RATHA.730:
       put go door
       GOTO TRAVEL
     RATHA.731:
       put e
       GOTO TRAVEL
     RATHA.732:
       put e
       GOTO TRAVEL
     RATHA.733:
       put with 500 bronze lirum
       wait
       put w
       GOTO TRAVEL
     RATHA.734:
       put w
       GOTO TRAVEL
     RATHA.735:
       put go hall
       GOTO TRAVEL
     RATHA.736:
       put go coll office
       GOTO TRAVEL
     RATHA.737:
       put pay 5000
       wait
       put out
       GOTO TRAVEL
     RATHA.738:
       put out
       GOTO TRAVEL
     RATHA.739:
       put e
       GOTO TRAVEL
     RATHA.740:
       put e
       GOTO TRAVEL
     RATHA.741:
       put depo all
       wait
       put w
       GOTO TRAVEL
     RATHA.742:
       put w
       GOTO TRAVEL
     RATHA.743:
       put go door
       GOTO TRAVEL
     RATHA.744:
       put climb stair
       GOTO TRAVEL
     RATHA.745:
       put s
       GOTO TRAVEL
     RATHA.746:
       put s
       GOTO TRAVEL
     RATHA.747:
       put go gate
       GOTO TRAVEL
     RATHA.748:
       put w
       GOTO TRAVEL
     RATHA.749:
       put n
       GOTO TRAVEL
     RATHA.750:
       put nw
       GOTO TRAVEL
     RATHA.751:
       put n
       GOTO TRAVEL
     RATHA.752:
       put ne
       GOTO TRAVEL
     RATHA.753:
       put e
       GOTO TRAVEL
     RATHA.754:
       put n
       GOTO TRAVEL
     RATHA.755:
       put n
       GOTO TRAVEL
     RATHA.756:
       put go office
       GOTO TRAVEL
     RATHA.757:
       put get %name sack
       matchre SACKCHECK1 /referring|You reach/
       GOTO UniversalMatch

   RATHA.UPPER.FREE:
       setVariable upperlower upper
       pause 1
       match RATHA.UPPER.MISSINGSTART waitandsee
       match RATHA.UPPER.FREE2 okstart
       put echo %startresume
       put echo okstart
       GOTO UniversalMatch

   RATHA.UPPER.MISSINGSTART:
       setVariable startresume At this crossroads, travelers can choose to enjoy
       setVariable ResumeStore Rgami
       GOTO RATHA.UPPER.FREE2

   RATHA.LOWER.FREE2:
     RATHA.246:
       counter set 246
       put out
       GOTO TRAVEL
     RATHA.247:
       put out
       GOTO TRAVEL
     RATHA.248:
       put out
       GOTO TRAVEL
     RATHA.249:
       put s
       GOTO TRAVEL
     RATHA.250:
       put s
       GOTO TRAVEL
     RATHA.251:
       put e
       GOTO TRAVEL
     RATHA.252:
       counter set 1
       setVariable storecode Rgami
       GOTO RESUME.%ResumeStore%

   RESUME.RCLERIC:
       counter add 1
   RESUME.REXOT:
       counter add 1
   RESUME.RTHEA:
       counter add 1
   RESUME.RJEWEL:
       counter add 1
   RESUME.RMAGIK:
       counter add 1
   RESUME.RGAMI:
       counter add 1
       setVariable Countdown %c
       GOTO RESUME


                                          2. ############################
                                          3. SCRIPT END ############################
                                          4. ############################ 


   LabelError:
   HELP:
       SHIFT
       ECHO ***********************************************
       ECHO *** Thank you for choosing PROGRESSIVE STEALING!
       ECHO *** This is a collaborative project by Kalic and Challeirra.
       ECHO *** Special thanks go to Arthadin for help with Ratha.
       ECHO ***     ----------------------------------------
       ECHO ***
       ECHO *** USAGE: .(scriptname) <Toggle>
       ECHO ***
       ECHO *** SOFT TOGGLES: (you may enter up to two of these)
       ECHO ***
       ECHO ***    EASY:  If this toggle is called, the user's rank
       ECHO ***           will be modified to steal items set from
       ECHO ***           one rank lower.
       ECHO ***    HARD:  If this toggle is called, the user's rank
       ECHO ***           will be modified to steal items set from
       ECHO ***           one rank higher.
       ECHO ***    LESS:  If this toggle is called, the user will
       ECHO ***           steal one item less than normal.
       ECHO ***    MORE:  If this toggle is called, the user will
       ECHO ***           steal one item more than normal.
       ECHO ***
       ECHO *** HARD TOGGLES: (set by editing the top of script)
       ECHO ***
       ECHO ***    STEAL: This toggle is the default for non-magic users
       ECHO ***           and will proceed to steal as normal.
       ECHO ***    MARK:  This toggle will allow thieves to also MARK their
       ECHO ***           target items before they attempt to steal them.
       ECHO ***    PERC:  This toggle will assume the user is an Empath
       ECHO ***           and perceive health before attempting to steal.
       ECHO ***    POWER: This toggle can be used by Empaths or any other
       ECHO ***           magic user, and will POWER before stealing.
       ECHO ***
       ECHO *** Send all bugs, questions, comments, and donation offers to
       ECHO *** KalicMasiacl@yahoo.com and Challeirra@gmail.com
       ECHO ***********************************************
       ECHO
       ECHO *** Type "Next" to continue.
       waitfor next
       GOTO featurelist

   FEATURELIST:
       ECHO ***********************************************
       ECHO ************** CURRENT FEATURES ***************
       ECHO ***
       ECHO *** INTELLIGENT DESIGN
       ECHO *** - Progressive items set based on your skill level
       ECHO *** - Usable by any class, with special thief-only features
       ECHO ***      including applicable Khris, slip sneak, and tunnels
       ECHO *** - Loops so you can start anywhere in a province but only
       ECHO ***      visits each shop once per run
       ECHO *** - Intelligent Pawning/binning system for stolen goods
       ECHO *** - Exp check at each shop to pawn/bin early if mind locked
       ECHO *** - Skips any shops where you have nothing set to steal
       ECHO ***
       ECHO *** CUSTOMIZABLE
       ECHO *** - Preset but easily adjustable items to be stolen
       ECHO *** - Toggles to adjust difficulty and quantity of items stolen
       ECHO *** - Toggle to include MARK, PERC HEALTH, or POWER at each shop
       ECHO *** - Toggle to choose whether to include clans in stealing route
       ECHO *** - Toggle whether unexpected stun or death will log you out
       ECHO *** - Additional toggles can be added on request
       ECHO ***
       ECHO *** REACTIVE
       ECHO *** - Knows whether you act or move as expected, and retries if
       ECHO ***      you get stuck due to roundtime or type ahead lines
       ECHO *** - Reacts to arrest, death, and being stunned at any time
       ECHO *** - If arrested, pleads, pays debt and gets items, and picks
       ECHO ***      up where it left off as if nothing happened
       ECHO *** - If caught by clan justice (when they chase you down and cut
       ECHO ***      off your hand), automatically heals up (if empath)
       ECHO ***      or goes to the auto-empath for healing, then resumes
       ECHO *** - Retreats if engaged anywhere and runs to the next shop
       ECHO *** - Automatically steals from mobile NPCS you encounter
       ECHO *** - Skips any shops that are closed for the night
       ECHO ***
       ECHO *** START LOCATIONS
       ECHO *** - Crossing inside any shop, inside gates, or outside bank
       ECHO *** - Arthe Dale inside any shop or inside gate
       ECHO *** - Tiger Clan inside any shop or inside gate
       ECHO *** - Leth Deriel inside any shop, NW and SW gates, or town center
       ECHO *** - Haven inside any shop, bank, inside gates, or by naphtha cart
       ECHO *** - Shard inside any shop, bank, or inside gates
       ECHO *** - Horse Clan inside any tent (except potter) or inside path
       ECHO *** - SCC inside weapon or leather shop or inside gate
       ECHO *** - Ratha inside any shop, lower bank, or outside sewers
       ECHO *** - Lists available start locations if you start elsewhere
       ECHO ***
       ECHO ***********************************************
       ECHO
       ECHO ***  Type "Next" to continue.
       waitfor next
       GOTO helpitemwarning

   HELPITEMWARNING:
       ECHO ***********************************************
       ECHO *** PRESERVING YOUR ITEMS
       ECHO ***
       ECHO *** This script does a LOT of item handling!
       ECHO ***
       ECHO *** It will do its best to make sure you get all your
       ECHO *** items back if you get arrested. You must set your name
       ECHO *** as a variable in case you have to pay your debt and
       ECHO *** collect a sack at the guard house. If you have any
       ECHO *** items that won't be automatically re-worn after being
       ECHO *** in jail, you must also set them in the variable section
       ECHO *** at the top of the script. Otherwise, the script will
       ECHO *** refuse to continue after you get back your sack if it
       ECHO *** can't be successfully emptied!
       ECHO ***
       ECHO *** In addition, you must set the containers in which
       ECHO *** you will be storing your pilfered goods. The script
       ECHO *** will check these in advance to ensure they do not
       ECHO *** contain any items of the same type that you will later
       ECHO *** be pawning. If they do, you will have to confirm with
       ECHO *** the script that this is OK before it will proceed.
       ECHO ***
       ECHO ***********************************************
       ECHO
       ECHO ***********************************************
       ECHO *** To see these help messages in the future, type
       ECHO *** .(scriptname) HELP
       ECHO ***********************************************
       ECHO
       ECHO *** Type "Next" to continue.
       waitfor next
       setVariable stealinghelp notfirstrun
       GOTO notfirstrun

   END:
       ECHO
       ECHO
       ECHO
       ECHO ***********************************************
       ECHO ***      Thank you for using Kalic and Challeirra's
       ECHO ***             Progressive Stealing script.
       ECHO ***********************************************
       ECHO
       ECHO
       ECHO
       GOTO END.%class

   END.THIEF:
       put khri stop
       wait
   END.NONTHIEF:
   END.EMPATH:
       put hide
       exit

   LASTNUMBER:
       ECHO CROSS.336
       ECHO ARTHE.31
       ECHO TIGER.54
       ECHO LETH.466
       ECHO HAVEN.513
       ECHO RATHA.858 (358-534 empty)
       ECHO SHARD.806 (334-379 empty)
       exit
Retrieved from "https://elanthipedia.play.net/index.php?title=Progressive_Stealing_(script)&oldid=139194"