Don't forget, you can log in with your Play.net account

Progressive Stealing (script)

From Elanthipedia
Revision as of 02:49, 21 December 2009 by Maintenance script (talk | contribs)
Jump to navigation Jump to search
(Select All)
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

##################################################################
#####                                                        #####
#####              VARIABLES FOR USER TO SET                 #####
#####                                                        #####
##################################################################


# What is your name?
    setVariable name Kalic

# Are you wearing any large items that can't be stored and are worn,
# such as a parry stick, quarterstaff, or lance? If so, input these
# here or the script will fail after an arrest due to being unable
# to retrieve them from your sack:
    setVariable largeitem1 <item>
    setVariable largeitem2 <item>

# Would you like the script to simply DROP all the items you steal, 
# or STOW them to pawn off as many as possible, and dump the rest in
# the thief bin (or a bucket if you're not actually a thief)? Item
# protection safeguards are in place to ensure only the items you
# steal during the script will be sold/binned.
    setVariable DropOrStow STOW

# If stowing items to pawn and bin, which containers will you use
# for your pilfered goods? If you only want to use one, set both
# variables to the same container. These containers will be checked
# at the start for any items that could be mistaken for ones you are
# going to be stealing.
    setVariable container1 Pack
    setVariable container2 Haver

# If you are an empath or magic user, you can turn on
# perceiving health or power perception by replacing STEAL
# with PERC or POWER here. Or, if you are a thief, put MARK
# to mark items. Switch back to STEAL to toggle these off.
    setVariable markpowperc STEAL

# Would you like to steal from clans like Tiger Clan or Steel Claw
# Clan and risk getting your hand cut off? The script will do its
# best to get you healed and continue where you left off if so.
    setVariable clanoption YES

# Do you want the script to automatically exit from the game if you
# are dead or get stunned for some reason other than clan justice?
    setVariable flee NO

# If you are a thief, enter your guild passwords here.
    setVariable shardpass gibberish
    setVariable riverpass gibberish

##################################################################
#####                                                        #####
#####                    INTERNAL SETUP                      #####
#####                  *** DO NOT EDIT ***                   #####
#####                                                        #####
##################################################################


    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


##################################################################
#####                                                        #####
#####                    SETTINGS REPORT                     #####
#####                                                        #####
##################################################################


    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


##################################################################
#####                                                        #####
#####                DIFFICULTY ADJUSTMENTS                  #####
#####                                                        #####
##################################################################


    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


##################################################################
#####                                                        #####
#####              CHECKING PROVINCE AND CITY                #####
#####                                                        #####
##################################################################


    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

##################################################################
#####                                                        #####
#####             CLASS, HAND, AND ARMOR CHECKS              #####
#####                                                        #####
##################################################################


    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


##################################################################
#####                                                        #####
#####            SKILL AND ITEM-BASED BAG CHECKS             #####
#####                                                        #####
##################################################################
# First, SKILLCHECK checks your stealing skill and assigns you to a
# bracket based on your stealing ranks, currently as RANK1-RANK8.
# The counter is set to this number (1-8) and then RANKADJUSTER
# modifies it with %DifficultyA, which if applicable is set by EASY
# or HARD to add or subtract 1 or 2 from the initial rank bracket.

# Once the adjusted rank is determined, it then routes to each
# province's item lists, so that these can be retrieved and checked
# against the contents of the user's containers to ensure nothing
# will be mistakenly pawned. The BAGCHECK labels are in each province
# section, since they are province-based, but the BAGWARN labels
# 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


##################################################################
#####                                                        #####
#####              KHRI CHECK AND ACTIVATION                 #####
#####                                                        #####
##################################################################


    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%


##################################################################
#####                                                        #####
#####            PRIMARY SHOP STEALING ENGINE                #####
#####                                                        #####
##################################################################
# Outside every shop, we run %MRS, which is set to SHOPCHECK
# unless we are under MOVEON or RESUME circumstances. SHOPCHECK
# checks to see if there is a reason to activate MOVEON,
# prioritizing health (having your hand chopped off by clan justice)
# followed by exp (being mind locked or nearly so). In addition,
# if the item set for this particular store is "nothing," the echo
# will match for that and LEAVE this store before trying to go in
# 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

# Before entering the shop, here we set the counter which we will
# use with the STEALCOUNT labels to see how many times the person
# should steal and has stolen in each shop. %rank is initially set
# under RANKREPORT to 0, then modified by %DifficultyB to add or
# subtract 1 or 2 if applicable based on the use of MORE or LESS.
# Here, it will be further modified by %shopdiff as set by each
# shop's quantity adjustment. The result is multiplied by 100, and
# then each time you steal, 1 is added to this number, and this
# allows us to make STEALCOUNT labels which account for both the
# number of times you SHOULD steal, and the number you actually
# 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:
#        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:
#        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:
#        ECHO *** Has completed 1st/3rd/5th steal, is finished, and is about to stow the odd item
        GOTO %DropOrStow%.ONCE

    STEALCOUNT202:
    STEALCOUNT404:
    STEALCOUNT606:
#        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


##################################################################
#####                                                        #####
#####                 MOBILE NPC STEALING                    #####
#####                                                        #####
##################################################################
# Adding more NPCs is easy! Just add a label here and a match for
# 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
##      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


##################################################################
#####                                                        #####
#####           CENTRALIZED CONTROL FUNCTIONS                #####
#####                                                        #####
##################################################################


    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

# The TRAVEL label is run almost every time you move. It adds 1
# to the counter, and if you successfully move and no other
# factors interfere, you will match "Obvious" paths and go to the
# next travel label based on the count and your current city. If
# you fail to move, this will match for various reasons why (being
# stunned, engaged in combat, stuck in RT, or being in the wrong
# location) and respond to those issues, then go to BACKTRACK to
# subtract 1 from the counter and retry the previous movement. In
# addition, if you move successfully, this will also match for any
# stealable NPCs that appear before "Obvious" exits and cause you
# 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

# Every action inside a shop goes to this label before
# UniversalMatch and adds matches to see if an action has failed
# due to being engaged or stunned in a shop as this requires a
# 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%

# Every match in the script is routed through this variable which
# contains the one and only matchwait. This allows us to add
# matches to continuously check for being dead, arrested, or for
# trying to go into a shop that is closed which can happen in
# 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


##################################################################
#####                                                        #####
#####             RESUME AND MOVEON FUNCTIONS                #####
#####                                                        #####
##################################################################
# If we have been arrested or had a hand chopped off and need to
# go back to the store we left off at, %MRS will be set to RESUME
# and use the counter to count down as we make our way through the
# loop back to where we left off. Each province has a resume list
# which increments a counter based on which shop we were at. Here,
# we retrieve the Countdown variable, subtract 1, and either keep
# going or, if we reach 1 or 0, different things happen. At 1, we
# actually reach the store we last stole from, which we don't want
# to visit again, so we continue to move on but we reinstate the
# startlocation, so that if the next shop is the one we started at,
# we will MOVEON fully. At 0, we have reached the shop after the
# one where we had the problem, and are ready to revert to MRS as
# 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

# If MOVEON is activated, here is where we set the variables. MRS
# will be used outside every shop to determine whether to run
# SHOPCHECK, to go to RESUME and keep counting down, or to MOVEON
# and simply leave each shop because there is an issue we need to
# deal with (loop completed, experience full, or hand chopped
# off). LorM, set to either LEAVE or MOVEON, is used only at
# specific spots where we want to branch out of the loop. 

    MOVEON.SET:
        setVariable MRS moveon
        setVariable LorM moveon
    MOVEON:
        GOTO LEAVE


##################################################################
#####                                                        #####
#####                   PAWNING SYSTEM                       #####
#####                                                        #####
##################################################################


    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


##################################################################
#####                                                        #####
#####                   BINNING SYSTEM                       #####
#####                                                        #####
##################################################################


    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%


##################################################################
#####                                                        #####
#####             ITEM RETRIEVAL AFTER ARREST                #####
#####                                                        #####
##################################################################


    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


##################################################################
#####                                                        #####
#####                  EMPATH SELF-HEALING                   #####
#####                                                        #####
##################################################################

    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


##################################################################################
#############                                                        #############
#############                       ZOLUREN                          #############
#############                                                        #############
#############                  SKILL DETERMINATION                   #############
#############      (tweak the items you steal here if desired)       #############
#############                                                        #############
##################################################################################


    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


##################################################################
#####                                                        #####
#####             ZOLUREN STARTING POSITION                  #####
#####                                                        #####
##################################################################

    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


##################################################################
#####                                                        #####
#####               CROSSING LEAVING SHOPS                   #####
#####                                                        #####
##################################################################


    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

##################################################################
#####                                                        #####
#####             ARTHE DALE STARTING POSITION               #####
#####                                                        #####
##################################################################


    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%


##################################################################
#####                                                        #####
#####              ARTHE DALE LEAVING SHOPS                  #####
#####                                                        #####
##################################################################


    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%


##################################################################
#####                                                        #####
#####            LETH DERIEL STARTING POSITION               #####
#####                                                        #####
##################################################################


    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


##################################################################
#####                                                        #####
#####             LETH DERIEL LEAVING SHOPS                  #####
#####                                                        #####
##################################################################


    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

##################################################################
#####                                                        #####
#####              LETH DERIEL MOVEON COORDS                 #####
#####                                                        #####
##################################################################


    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:
##    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


##################################################################
#####                                                        #####
#####                  ALTERNATE EXITS                       #####
#####                                                        #####
##################################################################


    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


##################################################################
#####                                                        #####
#####                   ZOLUREN PAWNING                      #####
#####                                                        #####
##################################################################


    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
###     ^ Needed for SellItem Termination ^
        setVariable sellorbin BINGET
        GOTO %provcode%.Sellitem0


##################################################################
#####                                                        #####
#####                  CROSSING BINNING                      #####
#####                                                        #####
##################################################################


    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


##################################################################
#####                                                        #####
#####              ZOLUREN JUSTICE AND RESUMING              #####
#####                                                        #####
##################################################################


    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


##################################################################
#####                                                        #####
#####          LETH DERIEL JUSTICE AND RESUMING              #####
#####                                                        #####
##################################################################


    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



##################################################################################
#############                                                        #############
#############                        ILITHI                          #############
#############                                                        #############
#############                  SKILL DETERMINATION                   #############
#############      (tweak the items you steal here if desired)       #############
#############                                                        #############
##################################################################################


    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


##################################################################
#####                                                        #####
#####              ILITHI STARTING POSITION                  #####
#####                                                        #####
##################################################################

    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


##################################################################
#####                                                        #####
#####                 ILITHI LEAVING SHOPS                   #####
#####                                                        #####
##################################################################


    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%


##################################################################
#####                                                        #####
#####                    ILITHI PAWNING                      #####
#####                                                        #####
##################################################################


    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
###     ^ Needed for SellItem Termination ^
        setVariable sellorbin BINGET
        GOTO %provcode%.Sellitem0


##################################################################
#####                                                        #####
#####                    SHARD BINNING                       #####
#####                                                        #####
##################################################################


    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


##################################################################
#####                                                        #####
#####              ILITHI JUSTICE AND RESUMING               #####
#####                                                        #####
##################################################################


    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


##################################################################################
#############                                                        #############
#############                       Therengia                        #############
#############                                                        #############
#############                  SKILL DETERMINATION                   #############
#############      (tweak the items you steal here if desired)       #############
#############                                                        #############
##################################################################################


    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


##################################################################
#####                                                        #####
#####               THERENGIA START LOCATION                 #####
#####                                                        #####
##################################################################


    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

##################################################################
#####                                                        #####
#####                  HAVEN LEAVING SHOPS                   #####
#####                                                        #####
##################################################################


    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%

##################################################################
#####                                                        #####
#####          RIVER HAVEN JUSTICE AND RESUMING              #####
#####                                                        #####
##################################################################


    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


##################################################################
#####                                                        #####
#####                  THERENGIA PAWNING                     #####
#####                                                        #####
##################################################################


    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
###     ^ 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
###     ^ 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
###     ^ 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
###     ^ 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
###     ^ 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
###     ^ Needed for SellItem Termination ^
        setVariable sellorbin BINGET
        GOTO %provcode%.Sellitem0


##################################################################
#####                                                        #####
#####                    HAVEN BINNING                       #####
#####                                                        #####
##################################################################


    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


##################################################################################
#############                                                        #############
#############                     QI'RESHALIA                        #############
#############                                                        #############
#############                  SKILL DETERMINATION                   #############
#############      (tweak the items you steal here if desired)       #############
#############                                                        #############
##################################################################################


    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


##################################################################
#####                                                        #####
#####               QI'RESHALIA START LOCATION               #####
#####                                                        #####
##################################################################


    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

##################################################################
#####                                                        #####
#####                  RATHA LEAVING SHOPS                   #####
#####                                                        #####
##################################################################


    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


##################################################################
#####                                                        #####
#####                  RATHA MOVEON COORDS                   #####
#####                                                        #####
##################################################################


    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

##################################################################
#####                                                        #####
#####                  RATHA PAWN AND BIN                    #####
#####                                                        #####
##################################################################


    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

##################################################################
#####                                                        #####
#####             RATHA 1ST & 2ND TIER JUSTICE               #####
#####                                                        #####
##################################################################

    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


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


    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


######################################################################################
#####################                                     ############################
#####################            SCRIPT END               ############################
#####################                                     ############################
######################################################################################


    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