ECHO
ECHO
ECHO
ECHO ***********************************************
ECHO ***
ECHO ***                   Progressive Stealing v1.57c
ECHO ***                  By:  Kalic & Challeirra
ECHO ***
ECHO ***********************************************
ECHO
ECHO http://elanthipedia.com/wiki/Progressive_Stealing_(script)
ECHO
ECHO
IF_1 GOTO SKIPREMINDER
ECHO *** Don't forget you can run this script with the modifiers EASY, HARD, LESS, or MORE!
ECHO *** For the full list of command line options, try HELP!
SKIPREMINDER:
ECHO
ECHO

    pause 2

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

# Due to the frequency of updates and user request, variables have
# been consolidated here for ease of replacement, and their
# explanations follow. Variables in CAPS must match the available
# toggles or the script will break.

    var name Kambri
    var largeitem1 no
    var largeitem2 no
    var DropOrStow stow
    var container1 satchel
    var container2 satchel
    var armor.stow backpack
    var action mark
    var clanoption no
    var flee no
    var shardpass gibberish
    var riverpass nuvutheakor
    var PutOrSlip put
    var skulk noskulk
    var sneak no

# Name:
# What is your name? This will be used to retrieve your item sack if
# you are arrested and fined.

# Large Items:
# 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.

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

# Containers:
# 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 and pawning.

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

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

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

# Shardpass, Riverpass:
# If you are a thief, enter your guild passwords here.

# PutOrSlip:
# If you are a thief who will be stowing items to pawn/bin and prefer
# to SLIP items into your containers, replace PUT with SLIP here.

# Skulk:
# If you are a thief and want to use Khri Skulk, put SKULK here.
# Alternately, you may replace it with any other khri you would
# like to run in addition to the defaults (focus, plunder, hasten,
# guile, darken, calm, and dampen).
# SKULK is the only khri which may also be added by command line.

# Sneak:
# YES or NO here toggles whether or not you will hide and sneak
# into and out of shops rather than just walking in and out of
# them. You may override this by entering SNEAK or NOSNEAK (one
# word) in the command line.

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


		var armor.types (parry stick|handwraps|hand claws|footwraps|aegis|buckler|heater|pavise|scutum|shield|sipar|targe|aventail|backplate|balaclava|barbute|bascinet|breastplate|\bcap\b|coat|cowl|cuirass|fauld|gauntlet|gloves|greaves|hauberk|helm|\bhood\b|jerkin|leathers|lorica|mantle|mask|morion|pants|\bplate\b|handguards|robe|sallet|shirt|sleeves|tabard|tasset|thorakes|vambraces|vest|collar|coif|mitt|armor)
    var startlocation waitandsee
    var itemlocation
    var Difficulty 0
    var Quantity 0
    var DiffMod false
    var QuantMod false
    var MRS shopcheck1
    var LorM leave
    var TravelOrShop travel
    var BinOrBucket bucket
    var percentsign %
    var Profit normal
    var npcoption yes
    var update 1.57c
    var labelerr help
    var arrest false
    var Quant Quant
    var swap 1
    var stealsettings %0
    #GOTO %stealinghelp

    NOTFIRSTRUN:
    if_1 GOTO %1
    var labelerr realerror
    put set !roombrief
    waitfor Ok.
    GOTO SETTINGS.REPORT


##################################################################
#####                                                        #####
#####         SOFT TOGGLE AND DIFFICULTY ADJUSTMENTS         #####
#####                                                        #####
##################################################################


    EASY:
        SHIFT
        var DiffMod true
        counter set %Difficulty
        counter subtract 1
        var Difficulty %c
        GOTO NOTFIRSTRUN

    HARD:
        SHIFT
        var DiffMod true
        counter set %Difficulty
        counter add 1
        var Difficulty %c
        GOTO NOTFIRSTRUN

    LESS:
        SHIFT
        var QuantMod true
        counter set %Quantity
        counter subtract 1
        var Quantity %c
        GOTO NOTFIRSTRUN

    MORE:
        SHIFT
        var QuantMod true
        counter set %Quantity
        counter add 1
        var Quantity %c
        GOTO NOTFIRSTRUN

    FOR:
        SHIFT
        GOTO NOTFIRSTRUN

    STOW:
        SHIFT
        var DropOrStow stow
        GOTO NOTFIRSTRUN

    DROP:
        SHIFT
        var DropOrStow drop
        GOTO NOTFIRSTRUN

    MARK:
        SHIFT
        var action mark
        GOTO NOTFIRSTRUN

    POWER:
        SHIFT
        var action power
        GOTO NOTFIRSTRUN

    PERC:
        SHIFT
        var action perc
        GOTO NOTFIRSTRUN

    STEAL:
        SHIFT
        var action steal
        GOTO NOTFIRSTRUN

    PAUSE:
        SHIFT
        var action pause
        GOTO NOTFIRSTRUN

    PUT:
        SHIFT
        var PutOrSlip put
        GOTO NOTFIRSTRUN

    SLIP:
        SHIFT
        var PutOrSlip slip
        GOTO NOTFIRSTRUN

    SKULK:
        SHIFT
        var skulk skulk
        GOTO NOTFIRSTRUN

    SNEAK:
        SHIFT
        var sneak YES
        GOTO NOTFIRSTRUN

    NOSNEAK:
        SHIFT
        var sneak NO
        GOTO NOTFIRSTRUN

    PROFIT:
        SHIFT
        var Profit profit
        GOTO PROFIT.%DropOrStow
    PROFIT.DROP:
        var DropOrStow stow
        ECHO ***********************************************
        ECHO *** You have selected to run this script for profit. Your
        ECHO *** drop/stow toggle has been overridden and changed to STOW.
        ECHO ***********************************************
        pause 3
    PROFIT.STOW:
        GOTO NOTFIRSTRUN


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


    SETTINGS.REPORT:
        put echocolumn /on
        waitfor EchoColumn
        ECHO
        ECHO
        ECHO ***********************************************
        ECHO *** You current user settings are:
        ECHO ***
        GOTO REPORT.NAME

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

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

    REPORT.DIFFMOD.FALSE:
        ECHO *** DIFFICULTY: NORMAL - You have not modified difficulty settings.
        GOTO REPORT.QUANTMOD.%QuantMod
    REPORT.DIFFMOD.TRUE:
        ECHO *** DIFFICULTY: %Difficulty added to your skill bracket.
        GOTO REPORT.QUANTMOD.%QuantMod

    REPORT.QUANTMOD.FALSE:
        ECHO *** QUANTITY:   NORMAL - You have not modified quantity settings.
        GOTO REPORT.%DropOrStow.%Profit
    REPORT.QUANTMOD.TRUE:
        ECHO *** QUANTITY:   %Quantity added to the number of items you steal (min attempts 1, max attempts 6).
        GOTO REPORT.%DropOrStow.%Profit

    REPORT.DROP.NORMAL:
    REPORT.DROP.PROFIT:
        ECHO *** DROP:       You will drop stolen items.
        GOTO REPORT.ACTION.%action
    REPORT.STOW.PROFIT:
        ECHO *** PROFIT:     The items you steal will be selected for their pawning profitability if possible.
    REPORT.STOW.NORMAL:
        ECHO *** STOW:       You will %PutOrSlip stolen items to pawn and/or bin in the following containers:
        ECHO ***                %container1        %container2
        GOTO REPORT.ACTION.%action

    REPORT.ACTION.MARK:
        ECHO *** MARK:       You will mark items before attempting to steal them.
        GOTO REPORT.SNEAK.%sneak
    REPORT.ACTION.POWER:
        ECHO *** POWER:      You will perceive power before stealing in each shop.
        GOTO REPORT.SNEAK.%sneak
    REPORT.ACTION.PERC:
        ECHO *** PERC:       You will perceive health before stealing in each shop.
        GOTO REPORT.SNEAK.%sneak
    REPORT.ACTION.STEAL:
        ECHO *** NO EXTRAS:  You are not set to mark or use power perception or perceive health.
        GOTO REPORT.SNEAK.%sneak
    REPORT.ACTION.PAUSE:
        ECHO *** PAUSE:      You will wait in each shop for user confirmation before stealing.
        GOTO REPORT.SNEAK.%sneak

    REPORT.SNEAK.YES:
    REPORT.SNEAK.SNEAK:
        ECHO *** SNEAKING:   YES - You WILL hide and sneak in and out of shops.
        GOTO REPORT.CLANS.%clanoption
    REPORT.SNEAK.NO:
    REPORT.SNEAK.NOSNEAK:
        ECHO *** SNEAKING:   NO - You will NOT hide and sneak in and out of shops.
        GOTO REPORT.CLANS.%clanoption

    REPORT.CLANS.YES:
        ECHO *** CLANS:      YES - Clans, if any, WILL be included in your stealing route.
        GOTO REPORT.FLEE.%flee
    REPORT.CLANS.NO:
        ECHO *** CLANS:      NO - Clans will NOT be included in your stealing route.
        GOTO REPORT.FLEE.%flee

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

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

    SETTINGS.REPORT.END:
        ECHO ***********************************************
        ECHO
        ECHO
        pause 1
        put echocolumn /off
        waitfor EchoColumn
        pause 2
        GOTO CONTAINER.COMPARE

    CONTAINER.COMPARE:
        match CONTAINER.IDENTICAL %container2
        match CONTAINER.DIFFERENT notidentical
        put echo %container1 notidentical
        GOTO UniversalMatch
    CONTAINER.IDENTICAL:
        var swap 3
    CONTAINER.DIFFERENT:
        GOTO LOWERCASE.%PutOrSlip

    LOWERCASE.PUT:
        var PutOrSlip put
        GOTO CITYCHECKER
    LOWERCASE.SLIP:
        var PutOrSlip slip
        GOTO CITYCHECKER


##################################################################
#####                                                        #####
#####              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|Feta|Yulugri|Thipbeet/
        matchre SETTIGER /Tiger Clan Home/
        matchre SETAESRY /Aesry|Taernen|Miakoda|Nakuge|Raeloka|Tilaya|Shoiya|Zenastara|Teshi/
        matchre SETAESRY /Woodbyne|Joirin|Bayanzi|Field of Shields|Kilora|Martrem|Rummeltum|Erianthe/
        matchre SETLETH /Leth Deriel|Morikai|Madame Orris|Alberdeen|Yerui|Ongadine/
        matchre SETLETH /Sinjian|Blanca|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|Imadrail/
        matchre SETSTEEL /Quintan|Struan|Steelclaw/
        matchre SETHAVEN /Riverhaven|Alayle|Enfermine|Noel Razoreye|Cecelia|Zanthron|Ss'Thran|Smaragdaus/
        matchre SETHAVEN /Beeanna|Adaerna|Thringol|Tibvaov|Crin's Herbal|City Togs|Friar Othorp|Bantheld|Seli's/
        match SETHORSE Zaldi Taipa
        match BADLOCATION Obvious
        put look
        GOTO UniversalMatch

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

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

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

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

    SETHAVEN:
        var citycode HAVEN
        var provcode THG
        GOTO CLASS

    SETRATHA:
        var citycode RATHA
        var provcode QIR
        GOTO CLASS

    SETAESRY:
        var citycode AESRY
        var provcode QIR
        GOTO CLASS

    SETSHARD:
        var citycode SHARD
        var provcode ILI
        GOTO CLASS

    SETSTEEL:
        var citycode STEEL
        var provcode ILI
        GOTO CLASS

    SETHORSE:
        var citycode HORSE
        var 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:
        ECHO
        ECHO ***********************************************
        ECHO ***
        ECHO *** Sorry, just a teaser!
        ECHO ***
        ECHO *** Forfedhdar has not been implemented yet.
        ECHO ***
        ECHO ***********************************************
        ECHO
        GOTO END

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


    CLASS:
        match THIEF Guild: Thief
        match EMPATH Guild: Empath
        match NONTHIEF Encumbrance
        match CLASS ...wait
        put info
        GOTO UniversalMatch

    THIEF:
        var class thief
        var BinOrBucket bin
        GOTO HANDCHECK

    NONTHIEF:
        var class nonthief
        GOTO HANDCHECK

    EMPATH:
        var class empath
        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:
        matchre remove_And_Stow_1 \s+%armor.types
        match SKILLCHECK You aren't wearing
        put inv combat
        matchwait 10
        GOTO UniversalMatch

    remove_And_Stow_1:
			var armor $1

		remove_Armor_1:
			var LAST remove_Armor_1
			matchre stow_Armor_1 You work|You remove|You pull|You take|You loosen|You sling|You slide
			put remove %armor
			matchwait

		stow_Armor_1:
			var LAST stow_Armor_1
			match ARMORCheck You put your
			matchre stow_Armor_2 any more room in|closed|no matter how you arrange
			put put %armor in my %armor.stow
			matchwait


##################################################################
#####                                                        #####
#####            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 %Difficulty, 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 /y:      |g:     1/
        matchre RANK1 /y:     [2-3][0-9] /
        matchre RANK2 /y:     [4-5]/
        matchre RANK3 /y:     [6-9]/
        matchre RANK4 /y:    1[0-4]/
        matchre RANK5 /y:    1[5-9]/
        matchre RANK6 /y:    2[0-4]/
        matchre RANK7 /y:    2[5-9]/
        matchre RANK8 /y:    3[0-4]/
        matchre RANK9 /y:    3[5-9]/
        matchre RANK10 /y:    [4-9]|g:   [1-9]/
        counter set 0
        put skill thiev
        GOTO UniversalMatch

    RANK10:
        counter add 1
    RANK9:
        counter add 1
    RANK8:
        counter add 1
    RANK7:
        counter add 1
    RANK6:
        counter add 1
    RANK5:
        counter add 1
    RANK4:
        counter add 1
    RANK3:
        counter add 1
    RANK2:
        counter add 1
    RANK1:
        counter add 1
        GOTO RANKADJUSTER

    RANKADJUSTER:
        pause 1
        counter add %Difficulty
        GOTO %provcode.RANK.%c

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

    BAGS.STOW:
        matchre COUNTTOOHIGH /Sell[0-9][0-9][0-9]|Bin[0-9][0-9][0-9]|Bin[5-9][0-9]/
        put echo %Sell%SellItemCount %Bin%BinItemCount
    BAGS.STOW.1:
        counter add 1
        var container %container%c
        match BAGFULL lot of other stuff
        matchre BAGWARN /%SellItem1|%SellItem2|%SellItem3|%SellItem4|%SellItem5|%SellItem16|%SellItem7|%SellItem8/
        matchre BAGWARN /%SellItem9|%SellItem10|%SellItem11|%SellItem12|%SellItem13|%SellItem14|%SellItem15|%SellItem16/
        matchre BAGWARN /%SellItem17|%SellItem18|%SellItem19|%SellItem20|%SellItem21|%SellItem22|%SellItem23/
        matchre BAGWARN /%SellItem24|%SellItem25|%SellItem26|%SellItem27|%SellItem28|%SellItem29|%SellItem30/
        matchre BAGWARN /%SellItem31|%SellItem32|%SellItem33|%SellItem34|%SellItem35|%SellItem36|%SellItem37/
        matchre BAGWARN /%SellItem38|%SellItem39|%SellItem40|%SellItem41|%SellItem42|%SellItem43|%SellItem44/
        matchre BAGWARN /%SellItem45|%SellItem46|%SellItem47|%SellItem48|%SellItem49|%SellItem50|%SellItem51/
        matchre BAGWARN /%SellItem52|%SellItem53|%SellItem54|%SellItem55|%SellItem56|%SellItem57|%SellItem58/
        matchre BAGWARN /%SellItem59|%SellItem60|%SellItem61|%SellItem62|%SellItem63|%SellItem64|%SellItem65/
        matchre BAGWARN /%SellItem66|%SellItem67|%SellItem68|%SellItem69|%SellItem70|%SellItem71|%SellItem72/
        matchre BAGWARN /%SellItem73|%SellItem74|%SellItem75|%SellItem76|%SellItem77|%SellItem78|%SellItem79/
        matchre BAGWARN /%SellItem80|%SellItem81|%SellItem82|%SellItem83|%SellItem84|%SellItem85|%SellItem86/
        matchre BAGWARN /%SellItem87|%SellItem88|%SellItem89|%SellItem90|%SellItem91|%SellItem92|%SellItem93%/
        matchre BAGWARN /%SellItem94|%SellItem95|%SellItem96|%SellItem97|%SellItem98|%SellItem99%/
        matchre BAGWARN /%BinItem1|%BinItem2|%BinItem3|%BinItem4|%BinItem5|%BinItem16|%BinItem7%/
        matchre BAGWARN /%BinItem8|%BinItem9|%BinItem10|%BinItem11|%BinItem12|%BinItem13|%BinItem14%/
        matchre BAGWARN /%BinItem15|%BinItem16|%BinItem17|%BinItem18|%BinItem19|%BinItem20|%BinItem21%/
        matchre BAGWARN /%BinItem22|%BinItem23|%BinItem24|%BinItem25|%BinItem26|%BinItem27|%BinItem28%/
        matchre BAGWARN /%BinItem29|%BinItem30|%BinItem31|%BinItem32|%BinItem33|%BinItem34|%BinItem35%/
        matchre BAGWARN /%BinItem36|%BinItem37|%BinItem38|%BinItem39|%BinItem40|%BinItem41|%BinItem42%/
        matchre BAGWARN /%BinItem43|%BinItem44|%BinItem45|%BinItem46|%BinItem47|%BinItem48|%BinItem49%/
        GOTO %provcode.BAGCHECK

    BAGS.STOW.2:
        var container %container1
        GOTO SNEAK.%sneak

    BAGS.DROP:
        GOTO SNEAK.%sneak

    BEGGAR:
        pause 1
        ECHO ***********************************************
        ECHO *** You aren't worthy yet. Hit the beggar or steal
        ECHO *** some water until you have at least 20 ranks.
        ECHO ***********************************************
        GOTO END

    BEGGAR.MOD:
        pause 1
        ECHO ***********************************************
        ECHO *** Sorry, but using the EASY command to modify your rank
        ECHO *** bracket below the 20-39 bracket is not possible.
        ECHO ***********************************************
        GOTO END

    BAGWARN:
        ECHO ***********************************************
        ECHO *** WARNING: Your %container appears to contain items
        ECHO *** that will be pawned or binned.  This MAY include items
        ECHO *** saved from previous runs that did not reach the pawn
        ECHO *** shop or thief bin. If you are SURE nothing important to
        ECHO *** you is in danger by being in this container, type YES.
        ECHO ***
        ECHO *** Note: This can also 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 BAGS.STOW.%c good positive attitude
        GOTO UniversalMatch

    BAGFULL:
        ECHO ***********************************************
        ECHO *** Your bags are too full for the script to check them
        ECHO *** to ensure nothing will be mistakenly pawned. Please
        ECHO *** clean them out if you want to use the stow option.
        ECHO ***********************************************
        GOTO END

    COUNTTOOHIGH:
        var BinItemCount 0
        var SellItemCount 0
        ECHO ***********************************************
        ECHO *** Due to lack of pawning/binning, the script has accumulated
        ECHO *** too many item variables for it to match against the contents
        ECHO *** of your containers. Your counters have been reset to 0 and you
        ECHO *** will need to manually get rid of any items left over from
        ECHO *** previous stealing runs. Continuing in 5 seconds.
        ECHO ***********************************************
        pause 5
        GOTO BAGS.STOW


##################################################################
#####                                                        #####
#####             KHRI CHECK AND SNEAK SETTINGS              #####
#####                                                        #####
##################################################################


    SNEAK.SNEAK:
    SNEAK.YES:
        var sneak sneak
        GOTO KHRICHECK.%class

    SNEAK.NOSNEAK:
    SNEAK.NO:
        var sneak nosneak
        GOTO KHRICHECK.%class

    KHRICHECK.NONTHIEF:
    KHRICHECK.EMPATH:
        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
        wait
        counter set 0
        matchre KHRISTART /n: +[2-9][0-9][0-9] /
        matchre KHRISTART /n: +[1][2-9][0-9] /
        matchre KHRI100 /n: +[1][0-1][0-9] /
        matchre KHRI80 /n: +[8-9][0-9] /
        matchre KHRI60 /n: +[6-7][0-9] /
        matchre KHRI40 /n: +[4-5][0-9] /
        matchre KHRI20 /n: +[1-3][0-9] /
        matchre KHRI0 /n: +[0-9] /
        put focus
        GOTO UniversalMatch

    KHRI0:
        counter add 30
    KHRI20:
        counter add 30
    KHRI40:
        counter add 30
    KHRI60:
        counter add 30
    KHRI80:
        counter add 30
    KHRI100:
        counter add 30
        ECHO ***********************************************
        ECHO *** Pausing %c seconds for concentration
        ECHO ***********************************************
        pause %c
        GOTO KHRISTART

    KHRISTART:
        put khri start %skulk
        wait
        put khri start focus
        wait
        put khri start plunder
        wait
        put khri start hasten
        wait
        put khri start guile
        wait
        put khri start darken
        wait
        put khri start calm
        wait
        put khri start dampen
        wait
        GOTO SLIPCHECK.%sneak

    SLIPCHECK.SNEAK:
        pause 1
        match SLIP2 SNEAK
        match %citycode noslip
        put slip help
        put echo noslip
        GOTO UniversalMatch

    SLIPCHECK.NOSNEAK:
        GOTO %citycode

    SLIP2:
        var sneak sneak
        GOTO %citycode


##################################################################
#####                                                        #####
#####            PRIMARY SHOP STEALING ENGINE                #####
#####                                                        #####
##################################################################


    SETSTORE:
        var shopdiff %%storecode%Quant
        match FIXSTART waitandsee
        match SETSTORE.%Profit okstart
        put echo %startlocation okstart
        GOTO UniversalMatch

    SETSTORE.PROFIT:
        var item %%storecode%P
        unvar %%storecode%P
        match SETSTORE.NORMAL %storecode%P
        match %MRS nonprofit
        put echo %item nonprofit
        GOTO UniversalMatch

    SETSTORE.NORMAL:
        var item %%storecode
        GOTO %MRS

# 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). The echo checks for two
# other conditions: 1) if we match the shop that we started in and
# therefore want to move on, or 2) if we are set to steal "nothing"
# from the shop and should skip it.

    SHOPCHECK1:
        var MRS shopcheck
        GOTO SHOPCHECK2

    SHOPCHECK:
        GOTO SHOP.%TravelOrShop
      SHOP.TRAVEL:
        var TravelOrShop shop
      SHOP.SHOP:
        match MOVEON.STARTLOC %startlocation
    SHOPCHECK2:
        match MOVEON.HEALTH hand which appears completely useless
        match LEAVE nothing
        match GOODSHOP.%DropOrStow Time Development
        match MOVEON.EXP mind lock
        put health
        put echo %storecode %item %update
        put skill thiev
        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. %Quantity adds or
# subtracts 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.

    GOODSHOP.STOW:
        counter set %SellItemCount
        counter add 1
        var SellItemCount %c
        var SellItem%c %item
    GOODSHOP.DROP:
        counter set %Quantity
        counter add %shopdiff
        counter multiply 100
        var StealCount %c
        GOTO ENTER.%sneak

    ENTER.SNEAK:
        pause 1
        matchre ENTER.SNEAK /...wait|had time to find another/
        matchre ENTER.SLIP /You melt|You slip|You blend|But you/
        matchre ENTER.NOSNEAK /ruining your|Behind what/
        match HUMSTOP too busy performing
        put hide
        GOTO UniversalMatch

    ENTER.SLIP:
        pause 1
        match ENTER.SLIP ...wait
        match ENTER.SNEAK Sneaking is an
        match ENTER.NOSNEAK You can't sneak
        matchre ACTION.%action /You sneak|In which direction/
        put sneak %entrance
        GOTO UniversalMatch

    ENTER.NOSNEAK:
        pause 1
        matchre MOVEERROR /You can't go there|referring/
        match HIDE Obvious
        put go %entrance
        GOTO UniversalMatch

    HIDE:
        pause 1
        matchre HIDE /...wait|had time to find another/
        matchre ACTION.%action /ruining your|Behind what|You melt|You slip|You blend|But you|You look around/
        put hide
        GOTO UniversalMatch

    ACTION.STEAL:
        pause 1
        counter set 0
        var StowStatus 1
        var StealOrNext next
        match ACTION.STEAL ...wait
        match ENTER.NOSNEAK nailed to the ground
        matchre %DropOrStow.ITEM /Guards!|begins to shout|trivial|should back off/
        matchre NEXT /You haven't picked|You can't steal/
        match HANDSFULL You need at least one
        match STEALCOUNT Roundtime
        put steal %item %itemlocation
        GOTO UniversalMatch

    STEALCOUNT:
        counter set %StealCount
        counter add 1
        var StealCount %c
        GOTO STEALCOUNT%c

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

# Has completed 2nd or 4th steal and is about to attempt again after double stow
    STEALCOUNT302:
    STEALCOUNT402:
    STEALCOUNT502:
    STEALCOUNT602:
    STEALCOUNT504:
    STEALCOUNT604:
        counter set 2
        var StowStatus 2
        var StealOrNext rehide
        GOTO %DropOrStow.ITEM

# Has completed 1st/3rd/5th steal, is finished, and is about to stow the odd item
    STEALCOUNT-599:
    STEALCOUNT-499:
    STEALCOUNT-399:
    STEALCOUNT-299:
    STEALCOUNT-199:
    STEALCOUNT-99:
    STEALCOUNT1:
    STEALCOUNT101:
    STEALCOUNT303:
    STEALCOUNT505:
        counter set 1
        var StowStatus 1
        GOTO %DropOrStow.ITEM

# Has completed 2nd/4th/6th steal, is finished, and is about to double stow
    STEALCOUNT202:
    STEALCOUNT404:
    STEALCOUNT606:
        counter set 2
        var StowStatus 2
        var StealOrNext next
        GOTO %DropOrStow.ITEM

    STEALCOUNT1301:
        counter subtract 100
    STEALCOUNT1201:
        counter subtract 100
    STEALCOUNT1101:
        counter subtract 100
    STEALCOUNT1001:
        counter subtract 100
    STEALCOUNT901:
        counter subtract 100
    STEALCOUNT801:
        counter subtract 100
    STEALCOUNT701:
        counter subtract 100
        GOTO STEALCOUNT%c

    STOW.REPEAT:
        counter add 1
    STOW.ITEM:
    STOW.2:
    STOW.1:
        pause 1
        counter subtract 1
        matchre STOW.REPEAT /...wait|You silently slip out/
        matchre STOW.%c /You put|Perhaps you should|into your/
        match SLIPTOPUT Slipping and falling
        matchre CONTAINER.SWAP /any more room|no matter how you|to fit in the/
        matchre DROP.ITEM /referring|Slip how|capable|You need a/
        put %PutOrSlip my %item in my %container
        GOTO UniversalMatch
    STOW.0:
    STOW.-1:
        GOTO %StealOrNext

    CONTAINER.SWAP:
        GOTO CONTAINER.%swap
    CONTAINER.1:
        var swap 2
        var container %container2
        counter set %StowStatus
        GOTO STOW.ITEM
    CONTAINER.2:
        var swap 1
        var container %container1
    CONTAINER.3:
        GOTO DROP.ITEM

    DROP.ITEM:
        match DROP.ITEM ...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 UniversalMatch

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

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

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

    HANDSFULL:
        var StealOrNext action.steal
        counter add 1
        GOTO %DropOrStow.ITEM

    LOWER:
        put lower my %item
        wait
        GOTO DROP.ITEM

    SLIPTOPUT:
        var PutOrSlip put
        GOTO STOW.REPEAT

    REHIDE:
        pause 1
        matchre REHIDE /...wait|had time to find another/
        matchre JAILCHECK.REHIDE /Maybe you should|You look around/
        matchre ACTION.STEAL /You melt|You slip|You blend|But you|ruining your/
        put hide
        GOTO UniversalMatch

    NEXT:
        GOTO NEXT.%sneak

    NEXT.SNEAK:
        pause 1
        matchre NEXT.SNEAK /...wait|had time to find another/
        matchre NEXT.SLIP /You melt|You slip|You blend|But you/
        matchre JAILCHECK.NEXT /Maybe you should|You look around/
        match RUNTONEXT ruining your
        put hide
        GOTO UniversalMatch

    NEXT.SLIP:
        pause 1
        match NEXT.SLIP ...wait
        match NEXT.SNEAK Sneaking is an
        matchre JAILCHECK.NEXT /Maybe you should|You look around/
        matchre ALTLEAVE /You can't sneak|Sneaking isn't allowed|In which direction/
        match LEAVE Obvious
        put sneak out
        GOTO UniversalMatch

    NEXT.NOSNEAK:
        GOTO RUNTONEXT

    LEAVE:
    LEAVE.MOVEON:
    LEAVE.SHOPCHECK:
    LEAVE.SHOPCHECK1:
        var itemlocation
        GOTO LEAVE.%storecode

    ALTLEAVE:
        var itemlocation
        GOTO ALTLEAVE.%storecode


##################################################################
#####                                                        #####
#####              OPTIONAL ACTIONS PER SHOP                 #####
#####                                                        #####
##################################################################


    ACTION.PAUSE:
        ECHO
        ECHO ***********************************************
        ECHO *** Script pausing before stealing. When you are ready, type YES.
        ECHO ***********************************************
        ECHO
        waitfor good positive attitude
        GOTO ACTION.STEAL

    ACTION.MARK:
        pause 1
        match ACTION.MARK ...wait
        matchre NEXT.%sneak /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|looks your way suspiciously|Guards!/
        matchre ACTION.STEAL /Roundtime|You trace|You can not|to take unwanted notice of you/
        put mark %item %itemlocation
        GOTO UniversalMatch

    PREPERC:
        pause 2
    ACTION.PERC:
        pause 1
        match ACTION.PERC ...wait
        match PREPERC You're not ready to
        matchre NOPERC /You aren't trained|USAGE/
        matchre ACTION.STEAL /You close your eyes|interfering|stops you from being able/
        put perc health
        GOTO UniversalMatch
    NOPERC:
        ECHO ***********************************************
        ECHO ***       Not able to perceive health.
        ECHO ***     Trying power perception instead.
        ECHO ***********************************************
        pause 1
        var action power
        GOTO ACTION.POWER

    ACTION.POWER:
        pause 1
        match ACTION.POWER ...wait
        matchre MMPOWER.SET /Xibar|Yavash|Katamba/
        matchre NOPOWER /You aren't trained|USAGE/
        matchre ACTION.STEAL /Roundtime|stops you from being able/i
        put power
        GOTO UniversalMatch
    NOPOWER:
        ECHO ***********************************************
        ECHO ***    Non-magic user set to perceive power.
        ECHO ***       De-activating power perception.
        ECHO ***********************************************
        pause 1
        var action steal
        GOTO ACTION.STEAL

    MMPOWER.SET:
        ECHO ***********************************************
        ECHO ***     Moon mage detected. Switching to
        ECHO ***        moon mage power perception.
        ECHO ***********************************************
        pause 1
        var action mmpower
        var mmanalyze predict analyze
        var mmpower %mmanalyze
        var mmrotate 0
        GOTO ACTION.STEAL

    ACTION.MMPOWER:
        pause 1
        match ACTION.MMPOWER ...wait
        match MMANALYZEOFF but you detect no active predictions.
        match MMUNHIDE You will have to reveal yourself
        match MMROTATE Roundtime
        put %mmpower
        GOTO UniversalMatch

    MMROTATE:
        var counthold %c
        counter set %mmrotate
        counter add 1
        var mmrotate %c
        counter set %counthold
        GOTO MM%mmrotate

    MMUNHIDE:
        put unhide
        GOTO ACTION.MMPOWER
    MMHIDE:
        matchre MMHIDE /...wait|had time to find another/
        matchre ACTION.STEAL /ruining your|Behind what|You melt|You slip|You blend|But you|You look around/
        put hide
        GOTO UniversalMatch

    MMANALYZEOFF:
        var mmanalyze perc planet
        var mmpower %mmanalyze
        GOTO ACTION.MMPOWER

    MM1:
        var mmpower perc moonlight
        GOTO MMHIDE
    MM2:
        var mmpower perc psychic
        GOTO ACTION.MMPOWER
    MM3:
        var mmpower perc perception
        GOTO ACTION.MMPOWER
    MM4:
        var mmpower perc transduction
        GOTO ACTION.MMPOWER
    MM5:
        var mmpower perc stellar
        GOTO ACTION.MMPOWER
    MM6:
        var mmpower perc xibar
        GOTO ACTION.STEAL
    MM7:
        var mmpower perc yavash
        GOTO ACTION.MMPOWER
    MM8:
        var mmpower perc katamba
        GOTO ACTION.MMPOWER
    MM9:
        var mmpower %mmanalyze
        var mmrotate 0
        GOTO ACTION.STEAL


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


    CROSS.BEGGAR:
        var npcname beggar
        GOTO NPC.%npcoption
    CROSS.MINSTREL:
        var npcname minstrel
        GOTO NPC.%npcoption
    CROSS.VETERAN:
        var npcname veteran
        GOTO NPC.%npcoption
    RATHA.SAILOR:
        var npcname sailor
        GOTO NPC.%npcoption

    NPC.NO:
        GOTO %citycode.%c

    NPC.YES:
    NPC.1:
        matchre NPC.1 /...wait|had time to find another/
        match NPC.2 Roundtime
        match %citycode.%c You look around
        put hide
        GOTO UniversalMatch

    NPC.2:
        match NPC.2 ...wait
        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.STAND:
        match %citycode.%c You stand
        matchre NPC.STAND /...wait|type ahead|Roundtime/i
        put kneel
        put stand
        GOTO UniversalMatch


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


    START:
        var startlocation %storecode
        GOTO %citycode.%c

    FIXSTART:
        var startlocation %storecode
        GOTO SETSTORE

    HUMSTOP:
        put stop hum
        GOTO HIDE

    JAILCHECK.ACTION:
        matchre JAILWAIT /jail|heavily barred door|Holding Cell|Guardhouse|Great Tower, Cell|Gallows Tree, Cell/i
        matchre ENTER.NOSNEAK /It appears to be the local tobacco shop|a Halfling-sized burrow/
        matchre PREPLEA /Justice/
        match ACTION.%action Obvious
        put look
        GOTO UniversalMatch

    JAILCHECK.REHIDE:
        matchre JAILWAIT /jail|heavily barred door|Holding Cell|Guardhouse|Great Tower, Cell|Gallows Tree, Cell/i
        matchre PREPLEA /Justice/
        match ACTION.STEAL Obvious
        put look
        GOTO UniversalMatch

    JAILCHECK.NEXT:
        matchre JAILWAIT /jail|heavily barred door|Holding Cell|Guardhouse|Great Tower, Cell|Gallows Tree, Cell/i
        matchre ALTLEAVE.%storecode /Shaefferty|Chabalu|Froissart|Windawn|Marachek|Beeanna|Feta|Yulugri|Sklaar'ishht|Woodbyne|Enescu/
        matchre PREPLEA /Justice/
        match NEXT.%sneak Obvious
        put look
        GOTO UniversalMatch

    JAILWAIT:
        var ResumeStore %storecode
        var MRS resume
        var CountdownType resume
        GOTO UniversalMatch

    PREPLEA:
        var ResumeStore %storecode
        var MRS resume
        var CountdownType resume
    PLEA:
        var arrest true
        match %citycode.FREE You plead for forgiveness!
        match %citycode.DEBT you do not have
        matchre %citycode.FREE /You are free to go|Your things are dumped on the ground/
        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:
        GOTO TRAVEL.%TravelOrShop
    TRAVEL.SHOP:
        var TravelOrShop travel
    TRAVEL.TRAVEL:
        counter add 1
        match MOVEERROR You can't go there.
        match BACKTRACK ...wait
        match GUARDSTOP Although tempted to move
        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
        matchre %citycode.%c /Obvious|It's pitch dark/
        GOTO UniversalMatch

    FATIGUE:
        ECHO ***********************************************
        ECHO *** Pausing 10 seconds for fatigue to recover
        ECHO ***********************************************
        pause 10
        GOTO FATIGUE.%TravelOrShop
    FATIGUE.TRAVEL:
        GOTO BACKTRACK
    FATIGUE.SHOP:
        GOTO %MRS

    GUARDSTOP:
        put guard stop
        GOTO BACKTRACK

    BACKTRACK:
        counter subtract 1
        pause 1
        GOTO %citycode.%c

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

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

    RUNTONEXT:
        put out
        match RUNTONEXT ...wait
        matchre RETREAT.SHOP /pole weapon range|melee range/
        match LEAVE Obvious
        match ALTLEAVE.%storecode You can't go there.
        GOTO UniversalMatch

    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:
        var MRS moveon
        var LorM moveon
        var MoveOnReason HEALTH
        var npcoption no
        pause 10
        GOTO STAND

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

    STAND.TRAVEL:
        var ResumeStore %storecode
        GOTO BACKTRACK

    STAND.SHOP:
        var ResumeStore %storecode
        GOTO %DropOrStow.ITEM

    SHORTSTAND:
        counter subtract 1
        match STAND roundtime
        matchre %storecode.SHORT /You stand|You are already standing/
        put stand
        GOTO UniversalMatch

# 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:
        match HEALTHCHECK You are still stunned
        match HEALTHCHECK do that while kneeling
        matchre RETREAT.%TravelOrShop /pole weapon range|melee range|you are engaged/
        match FATIGUE too tired to
        matchre LEAVE.%MRS /You stop as you realize|is locked|You realize the shop is closed|You smash your nose/
        matchre EMERGENCY.FLEE.%flee /You are a ghost/
        matchre JAILCHECK.ACTION /Maybe you should|You look around|Stop right there|do that while lying|You can't do that/
        matchre PREPLEA /You don't seem to be able to move/
        match PLEA PLEAD INNOCENT or PLEAD GUILTY
        matchwait

    MOVEERROR:
        matchre JAILWAIT /jail|heavily barred door|Holding Cell|Guardhouse|Great Tower, Cell|Gallows Tree, Cell/i
        matchre HIDE /Thipbeet|Skrawt Stal|Shaefferty|Chabalu|Froissart|Marachek|vendor's cart with a vial/
        matchre HIDE /Feta|Yulugri Wala, Smok|Sklaar'ishht|Woodbyne|Enescu|Posimur|Bandicoot|Yithye|Kilam|Beeanna/
        match MOVEERROR2 Obvious
        put look
        GOTO UniversalMatch

    MOVEERROR2:
        counter subtract 1
        ECHO
        ECHO *************************************************
        ECHO *** You don’t seem to be where you are supposed to be. You were at
        ECHO *** %citycode.%c, version %update. Please note this and submit
        ECHO ***       a brief log of how you got here 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

    COUNTDOWN:
    50:
    49:
    48:
    47:
    46:
    45:
    44:
    43:
    42:
    41:
    40:
    39:
    38:
    37:
    36:
    35:
    34:
    33:
    32:
    31:
    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:
    1:
        GOTO COUNTDOWN.%CountdownType.CONTINUE

    0:
        GOTO COUNTDOWN.%CountdownType.DONE

    -1:
    -2:
    -3:
    -4:
    -5:
    -6:
    -7:
    -8:
    -9:
    -10:
        match BINCOUNTFIX BinItemCount-
        match SELLCOUNTFIX SellItemCount-
        put echo SellItemCount%SellItemCount BinItemCount%BinItemCount
        GOTO UniversalMatch

    BINCOUNTFIX:
        var BinItemCount 0
        GOTO COUNTDOWN.%CountdownType.DONE

    SELLCOUNTFIX:
        var SellItemCount 0
        GOTO COUNTDOWN.%CountdownType.DONE

##################################################################
#####                                                        #####
#####             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
        var Countdown %c
        GOTO %Countdown

    COUNTDOWN.RESUME.CONTINUE:
        GOTO LEAVE

    COUNTDOWN.RESUME.DONE:
        var MRS shopcheck
        var LorM leave
        var npcoption yes
        GOTO %MRS

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

    MOVEON.EXP:
        var MoveOnReason EXP
        var npcoption no
        ECHO *************************************************
        ECHO *** Activated MOVEON.%storecode due to mind lock
        ECHO *************************************************
        GOTO MOVEON.SET

    MOVEON.HEALTH:
        var MoveOnReason HEALTH
        var ResumeStore %storecode
        var 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:
        var MRS moveon
        var LorM moveon
    MOVEON:
        GOTO LEAVE


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


    PAWN:
        var labelerr realerror
        GOTO PAWN.STOW

    PAWN.DROP:
        GOTO END

    PAWN.STOW:
        var CountdownType pawn
        var sellorbin sellget
        GOTO COUNTDOWN.PAWN.CONTINUE

    COUNTDOWN.PAWN.CONTINUE:
        var sellitem %SellItem%SellItemCount
        GOTO %sellorbin
    COUNTDOWN.PAWN.DONE:
        GOTO %citycode.PAWNFINISH.%class

    SELLGET:
        match SELLGET ...wait
        match SELLING You get
        matchre SELLGET2 /referring|Please rephrase/
        put get my %sellitem from my %container1
        GOTO UniversalMatch

    SELLGET2:
        match SELLGET2 ...wait
        match SELLING2 You get
        matchre SELLCYCLE /referring|Please rephrase/
        put get my %sellitem from my %container2
        GOTO UniversalMatch

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

    SELLING2:
        match SELLGET2 takes your
        matchre TRASH.%class /worth|idiots|Waste all|no need|scowls and says/
        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 NOBUCKET referring
        put put my %sellitem in bucket
        GOTO UniversalMatch

    NOBUCKET:
        GOTO TRASH.THIEF

    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 set %SellItemCount
        unvar SellItem%c
        counter subtract 1
        var SellItemCount %c
        put echo sellcycle%c continue
        match SELLCOUNTFIX sellcycle-
        match COUNTDOWN.%CountdownType.DONE sellcycle0
        match COUNTDOWN.%CountdownType.CONTINUE continue
        GOTO UniversalMatch

    TRASH.THIEF:
        match TRASH.THIEF ...wait
        matchre TRASH.THIEF2 /any more room in|no matter how you|to fit in the/
        match ADDTOBINLIST 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 ADDTOBINLIST You put
        put put my %sellitem in my %container2
        GOTO UniversalMatch

    ADDTOBINLIST:
        counter set %BinItemCount
        counter add 1
        var BinItemCount %c
        var BinItem%c %sellitem
        GOTO SELLCYCLE


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


    BIN:
        var CountdownType bin
        var labelerr realerror
        var sellorbin binget
        var contact true
        matchre BINCOUNTSET /bin 0|BinItemCount/
        match COUNTDOWN.BIN.CONTINUE binready
        put echo bin %BinItemCount binready
        GOTO UniversalMatch

    BINCOUNTSET:
        var BinItemCount %SellItemCount
        GOTO COUNTDOWN.BIN.CONTINUE

    PAWN.BIN:
        var CountdownType bin
        var sellorbin binget
        var contact true
        GOTO COUNTDOWN.BIN.CONTINUE

    COUNTDOWN.BIN.CONTINUE:
        var sellitem %BinItem%BinItemCount
        GOTO %sellorbin
    COUNTDOWN.BIN.DONE:
        GOTO %citycode.BINFINISH.%class

    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 BINCYCLE referring
        match BINGET2 ...wait
        put get my %sellitem from my %container2
        GOTO UniversalMatch

    BINDROP:
        matchre BINGET /falls into the|You drop/
        match THIEFSTOW not fooling anyone
        match BINDROP ...wait
        match BINTYPE.%BinOrBucket referring
        put put my %sellitem in %BinOrBucket
        GOTO UniversalMatch

    BINDROP2:
        matchre BINGET2 /falls into the|You drop/
        match THIEFSTOW not fooling anyone
        match BINDROP2 ...wait
        match BINTYPE.%BinOrBucket referring
        put put my %sellitem in %BinOrBucket
        GOTO UniversalMatch

    THIEFSTOW:
        put empty right
        wait
        put empty left
        GOTO BINCYCLE

    BINCYCLE:
        counter set %BinItemCount
        unvar BinItem%c
        counter subtract 1
        var BinItemCount %c
        put echo bincycle%c continue
        match BINCOUNTFIX bincycle-
        match COUNTDOWN.%CountdownType.DONE bincycle0
        match COUNTDOWN.%CountdownType.CONTINUE continue
        GOTO UniversalMatch

    BINTYPE.BUCKET:
        var BinOrBucket bin
        GOTO BINDROP
    BINTYPE.BIN:
        var BinOrBucket basket
        GOTO BINDROP
    BINTYPE.BASKET:
        var BinOrBucket recept
        GOTO BINDROP
    BINTYPE.RECEPT:
        var BinOrBucket hole
        GOTO BINDROP
    BINTYPE.HOLE:
        ECHO
        ECHO ***********************************************
        ECHO *** Script was unable to find a receptacle for you unpawnable goods.
        ECHO ***********************************************
        ECHO
        pause 2
        GOTO %citycode.BINFINISH.%class


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


    GETSACK:
        put get %name sack
        matchre SACKCHECK1 /referring|You reach|You realize/
        GOTO UniversalMatch

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

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

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

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

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

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

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

    SACKDROP:
        matchre SACKCHECK2 /You drop|referring/
        put drop my %item
        GOTO UniversalMatch

    SACKWEAR1:
        put wear my %largeitem1
        wait
        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/
        put glance
        GOTO UniversalMatch

    SACKWEAR2:
        put wear my %largeitem2
        wait
        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/
        put glance
        GOTO UniversalMatch

    SACKSTOW1:
        put stow my %largeitem1
        wait
        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/
        put glance
        GOTO UniversalMatch

    SACKSTOW2:
        put stow my %largeitem2
        wait
        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/
        put glance
        GOTO UniversalMatch

    SACKSCREWED:
        ECHO
        ECHO ***********************************************
        ECHO ***    Script was unable to retrieve your items after arrest.
        ECHO ***            When you have fixed this, type YES.
        ECHO ***********************************************
        ECHO
        waitfor good positive attitude
        GOTO %citycode.ITEMCHECK


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

    EMPATH.HEALSELF:

    RH:
        var 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:
        var TargetWound Head
        GOTO HEALWOUNDS
    N:
        var TargetWound Neck
        GOTO HEALWOUNDS
    RA:
        var TargetWound Right Arm
        GOTO HEALWOUNDS
    LA:
        var TargetWound Left Arm
        GOTO HEALWOUNDS
    RL:
        var TargetWound Right Leg
        GOTO HEALWOUNDS
    LL:
        var TargetWound Left Leg
        GOTO HEALWOUNDS
    LH:
        var TargetWound Left Hand
        GOTO HEALWOUNDS
    C:
        var TargetWound Chest
        GOTO HEALWOUNDS
    B:
        var TargetWound Back
        GOTO HEALWOUNDS
    A:
        var TargetWound Abdomen
        GOTO HEALWOUNDS
    RE:
        var TargetWound Right Eye
        GOTO HEALWOUNDS
    LE:
        var TargetWound Left Eye
        GOTO HEALWOUNDS
    S:
        var TargetWound Skin
        GOTO HEALWOUNDS

    HEALWOUNDS:
        var HealSpell hw
        GOTO PREPSPELL

    HEALSCARS:
        var 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.RANK.1:
        var skillrange 20-39
        var ADbard <nothing>
        var ADbardQuant 1
        var ADodd <nothing>
        var ADoddQuant 1
        var ADthread <nothing>
        var ADthreadQuant 1
        var ADfash <nothing>
        var ADfashQuant 1
        var ADweap <nothing>
        var ADweapQuant 1
        var ADtartE <nothing>
        var ADtartEQuant 1
        var ADtartC <nothing>
        var ADtartCQuant 1
        var ADtartM <nothing>
        var ADtartMQuant 1
        var ADtartL <nothing>
        var ADtartLQuant 1
        var ADtartF <nothing>
        var ADtartFQuant 1
        var ADmap <nothing>
        var ADmapQuant 1
        var ADsmok <nothing>
        var ADsmokQuant 1
        var ADfeta biscuit
        var ADfetaQuant 1
        var Ctann <nothing>
        var CtannQuant 1
        var Cstit <nothing>
        var CstitQuant 1
        var Cbath reed
        var CbathItemLoc
        var CbathQuant 1
        var Chab <nothing>
        var ChabQuant 1
        var Ccobb <nothing>
        var CcobbQuant 1
        var Calch water
        var CalchQuant 2
        var Cbota <nothing>
        var CbotaQuant 1
        var Cbloss rose
        var CblossQuant 1
        var Cgen bark
        var CgenQuant 1
        var Cgem hairpin
        var CgemQuant 1
        var Cweap sling
        var CweapQuant 1
        var Carm gloves
        var CarmQuant 1
        var Clock slim lockpick
        var ClockQuant 1
        var Carti <nothing>
        var CartiQuant 1
        var Cbard pick
        var CbardQuant 1
        var Ccleric chamomile
        var CclericQuant 1
        var Lmorik <nothing>
        var LmorikQuant 1
        var Lperf <nothing>
        var LperfQuant 1
        var Lgen <nothing>
        var LgenQuant 1
        var Lbow flights
        var LbowQuant 1
        var Lweap <nothing>
        var LweapQuant 1
        var Lwick <nothing>
        var LwickQuant 1
        var Lcloth <nothing>
        var LclothQuant 1
        var Lbard <nothing>
        var LbardQuant 1
        var Lwood <nothing>
        var LwoodQuant 1
        var Lgami <nothing>
        var LgamiQuant 1
        var TCweap <nothing>
        var TCweapItemLoc in catalog
        var TCweapQuant 1
        var TCpedd <nothing>
        var TCpeddQuant 1
        var TCherb <nothing>
        var TCherbQuant 1
        GOTO RANKREPORT

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

    ZOL.RANK.3:
        var skillrange 60-99
        var ADbard rag
        var ADbardQuant 2
        var ADodd <nothing>
        var ADoddQuant 2
        var ADthread needle
        var ADthreadQuant 2
        var ADfash snood
        var ADfashQuant 2
        var ADweap hood
        var ADweapQuant 2
        var ADtartE <nothing>
        var ADtartEQuant 1
        var ADtartC tart
        var ADtartCQuant 1
        var ADtartM tart
        var ADtartMQuant 1
        var ADtartL <nothing>
        var ADtartLQuant 1
        var ADtartF tart
        var ADtartFQuant 1
        var ADmap <nothing>
        var ADmapQuant 1
        var ADsmok sungrown cigar
        var ADsmokQuant 2
        var ADfeta herb cheese
        var ADfetaQuant 1
        var Ctann thread
        var CtannQuant 2
        var Cstit cloche
        var CstitQuant 2
        var Cbath soap
        var CbathItemLoc in basin
        var CbathQuant 2
        var Chab skullcap
        var ChabQuant 2
        var Ccobb moccasins
        var CcobbQuant 2
        var Calch pestle
        var CalchQuant 2
        var Cbota <nothing>
        var CbotaQuant 2
        var Cbloss <nothing>
        var CblossQuant 2
        var Cgen flint
        var CgenQuant 2
        var Cgem anklet
        var CgemQuant 2
        var Cweap dagger
        var CweapQuant 2
        var Carm leather aventail
        var CarmP leather gloves
        var CarmQuant 2
        var Clock stout lockpick
        var ClockQuant 2
        var Carti <nothing>
        var CartiQuant 2
        var Cbard rag
        var CbardQuant 2
        var Ccleric wine
        var CclericP chalice
        var CclericQuant 2
        var Lmorik <nothing>
        var LmorikQuant 2
        var Lperf <nothing>
        var LperfQuant 2
        var Lgen <nothing>
        var LgenQuant 2
        var Lbow <nothing>
        var LbowQuant 2
        var Lweap <nothing>
        var LweapQuant 2
        var Lwick <nothing>
        var LwickQuant 2
        var Lcloth <nothing>
        var LclothQuant 2
        var Lbard <nothing>
        var LbardQuant 2
        var Lwood <nothing>
        var LwoodQuant 2
        var Lgami white paper
        var LgamiQuant 2
        var TCweap <nothing>
        var TCweapItemLoc in catalog
        var TCweapQuant 2
        var TCpedd <nothing>
        var TCpeddQuant 2
        var TCherb <nothing>
        var TCherbQuant 2
        GOTO RANKREPORT

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

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

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

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

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

    ZOL.RANK.-5:
    ZOL.RANK.-4:
    ZOL.RANK.-3:
    ZOL.RANK.-2:
    ZOL.RANK.-1:
    ZOL.RANK.0:
        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 /%ADtartE|%ADtartC|%ADtartM|%ADtartL|%ADtartF|%ADmap|%ADsmok|%ADfeta%/
        matchre BAGWARN /%Lmorik|%Lperf|%Lgen|%Lbow|%Lweap|%Lwick|%Lcloth|%Lbard|%Lwood|%Lgami%/
        match BAGS.STOW.%c You glance
        put look in my %container
        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]
#        match ARTHE.START.TART Thipbeet's Tart Boutique, Lobby
        match ARTHE.START.MAP Yulugri Wala, Lobby
        match ARTHE.START.SMOK Yulugri Wala, Smoking Room
        match ARTHE.START.FETA Feta's Kitchen
    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              Arthe Dale Yulugri Wala
        ECHO *** Crossing Cleric Shop             Arthe Dale Feta's Kitchen
        ECHO *** Crossing Cobbler Shop
        ECHO *** Crossing Florist
        ECHO *** Crossing Gem Shop                Tiger Clan Inside Gate
        ECHO *** Crossing General Store           Tiger Clan Forge
        ECHO *** Crossing Haberdashery            Tiger Clan Peddler's Wagon
        ECHO *** Crossing Herbalist               Tiger Clan Midwife's Herbs
        ECHO *** Crossing Locksmith
        ECHO *** Crossing Pawn Shop               Leth Deriel Origami Tent
        ECHO *** Crossing Stitchery               Leth Deriel Bowyer's Shop
        ECHO *** Crossing Tannery Supply Room     Leth Deriel Morikai's Shop
        ECHO *** Crossing Weapon Shop             Leth Deriel Perfume Shop
        ECHO *** Crossing Guard House             Leth Deriel General Store
        ECHO *** Crossing Jail Cell               Leth Deriel Woodcraft Shop
        ECHO *** Crossing Chamber of Justice      Leth Deriel Clothing Shop
        ECHO ***                                  Leth Deriel Bard Shop
        ECHO *** Leth Deriel Inside Gates         Leth Deriel Wickerworks
        ECHO *** Leth Deriel Town Center          Leth Deriel Weapon Shop
        ECHO ***
        ECHO *****************************************************************
        put echocolumn /off
        waitfor EchoColumn
        GOTO END

    CROSS.START.TANN:
        counter set 291
        var storecode Ctann
        GOTO START

    CROSS.START.ALCH:
        counter set 41
        var storecode Calch
        put out
        GOTO START

    CROSS.START.BOTA:
        counter set 44
        var storecode Cbota
        put out
        GOTO START

    CROSS.START.COBB:
        counter set 279
        var storecode Ccobb
        put out
        GOTO START

    CROSS.START.BLOSS:
        counter set 59
        var storecode Cbloss
        put out
        GOTO START

    CROSS.START.WEAP:
        counter set 64
        var storecode Cweap
        put out
        GOTO START

    CROSS.START.ARM:
        counter set 66
        var storecode Carm
        put out
        GOTO START

    CROSS.START.GEN:
        counter set 69
        var storecode Cgen
        put out
        GOTO START

    CROSS.START.GEM:
        counter set 72
        var storecode Cgem
        put out
        GOTO START

    CROSS.START.STIT:
        counter set 75
        var storecode Cstit
        put out
        GOTO START

    CROSS.START.CLERIC:
        counter set 85
        var storecode Ccleric
        put out
        GOTO START

    CROSS.START.BARD:
        counter set 89
        var storecode Cbard
        put out
        GOTO START

    CROSS.START.BATH:
        counter set 93
        var storecode Cbath
        put out
        GOTO START

    CROSS.START.LOCK:
        counter set 98
        var storecode Clock
        put out
        GOTO START

    CROSS.START.ARTI:
        counter set 112
        var storecode Carti
        put out
        GOTO START

    CROSS.START.HAB:
        counter set 115
        var storecode Chab
        put out
        GOTO START

    TIGER.START.WEAP:
        counter set 18
        var storecode TCweap
        put out
        GOTO START

    TIGER.START.PEDD:
        counter set 22
        var storecode TCpedd
        put out
        GOTO START

    TIGER.START.HERB:
        counter set 26
        var storecode TCherb
        put out
        GOTO START

    CROSS.START.NE:
        counter set 1
      CROSS.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:
        counter set 6
      CROSS.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:
        counter set 10
      CROSS.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:
        counter set 16
      CROSS.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:
        counter set 20
      CROSS.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:
        counter set 24
      CROSS.24:
        put out
        GOTO TRAVEL
      CROSS.25:
        put w
        GOTO TRAVEL

    CROSS.START.GUARD:
        counter set 27
      CROSS.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:
        counter set 52
      TIGER.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:
        counter set 32
      CROSS.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:
        put n
        GOTO TRAVEL
      CROSS.41:
        var storecode Calch
        var entrance shop
        GOTO SETSTORE

    LEAVE.CALCH:
        counter set 42
      CROSS.42:
        put e
        GOTO TRAVEL
      CROSS.43:
        put s
        GOTO TRAVEL
      CROSS.44:
        var storecode Cbota
        var entrance shop
        GOTO SETSTORE

    LEAVE.CBOTA:
        GOTO %LorM.CBOTA.1
    LEAVE.CBOTA.1:
        counter set 45
      CROSS.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:
        counter set 153
      CROSS.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:
        counter set 332
      CROSS.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:
        counter set 139
      CROSS.139:
        put e
        GOTO TRAVEL
      CROSS.140:
        put go arch
        GOTO TRAVEL
      CROSS.141:
        GOTO CROSS.HOSPITAL.%class

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

    CROSS.EMPATH.TO.RESUME.FROM.CBOTA:
        counter set 330
      CROSS.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:
        counter set 52
      CROSS.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:
        put s
        GOTO TRAVEL
      CROSS.59:
        var storecode Cbloss
        var entrance shop
        GOTO SETSTORE

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

    MOVEON.CCOBB.HEALTH:
        counter set 142
      CROSS.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:
        counter set 60
      CROSS.60:
        put s
        GOTO TRAVEL
      CROSS.61:
        put go bazaar
        GOTO TRAVEL
      CROSS.62:
        put go path
        GOTO TRAVEL
      CROSS.63:
        put w
        GOTO TRAVEL
      CROSS.64:
        var storecode Cweap
        var entrance shop
        GOTO SETSTORE

    LEAVE.CWEAP:
        counter set 65
      CROSS.65:
        put w
        GOTO TRAVEL
      CROSS.66:
        var storecode Carm
        var entrance shop
        GOTO SETSTORE

    LEAVE.CARM:
        counter set 67
      CROSS.67:
        put se
        GOTO TRAVEL
      CROSS.68:
        put s
        GOTO TRAVEL
      CROSS.69:
        var storecode Cgen
        var entrance store
        GOTO SETSTORE

    LEAVE.CGEN:
        counter set 70
      CROSS.70:
        put e
        GOTO TRAVEL
      CROSS.71:
        put e
        GOTO TRAVEL
      CROSS.72:
        var storecode Cgem
        var entrance shop
        GOTO SETSTORE

    LEAVE.CGEM:
        counter set 73
      CROSS.73:
        put n
        GOTO TRAVEL
      CROSS.74:
        put e
        GOTO TRAVEL
      CROSS.75:
        var storecode Cstit
        var entrance stit
        GOTO SETSTORE

    LEAVE.CSTIT:
        counter set 76
      CROSS.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:
        put w
        GOTO TRAVEL
      CROSS.85:
        var storecode Ccleric
        var entrance shop
        GOTO SETSTORE

    LEAVE.CCLERIC:
        counter set 86
      CROSS.86:
        put w
        GOTO TRAVEL
      CROSS.87:
        put n
        GOTO TRAVEL
      CROSS.88:
        put n
        GOTO TRAVEL
      CROSS.89:
        var storecode Cbard
        var entrance shop
        GOTO SETSTORE

    LEAVE.CBARD:
        counter set 90
      CROSS.90:
        put s
        GOTO TRAVEL
      CROSS.91:
        put s
        GOTO TRAVEL
      CROSS.92:
        put w
        GOTO TRAVEL
      CROSS.93:
        var storecode Cbath
        var entrance bath
        var itemlocation %CbathItemLoc
        GOTO SETSTORE

    LEAVE.CBATH:
        counter set 94
      CROSS.94:
        put w
        GOTO TRAVEL
      CROSS.95:
        put w
        GOTO TRAVEL
      CROSS.96:
        put n
        GOTO TRAVEL
      CROSS.97:
        put n
        GOTO TRAVEL
      CROSS.98:
        var storecode Clock
        var entrance door
        GOTO SETSTORE

    LEAVE.CLOCK:
        counter set 99
      CROSS.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
        GOTO TRAVEL
      CROSS.112:
        var storecode Carti
        var entrance shop
        GOTO SETSTORE

    LEAVE.CARTI:
        counter set 113
      CROSS.113:
        put s
        GOTO TRAVEL
      CROSS.114:
        put e
        GOTO TRAVEL
      CROSS.115:
        var storecode Chab
        var entrance haber
        GOTO SETSTORE

    LEAVE.CHAB:
        GOTO %LorM.CHAB.1
    LEAVE.CHAB.1:
        counter set 116
      CROSS.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:
        var clanoption NO
        GOTO LEAVE.CHAB.CLAN.NO.1

    LEAVE.CHAB.CLAN.YES.2:
        counter set 123
      CROSS.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:
        counter set 292
      CROSS.292:
        put go gate
        GOTO TRAVEL

      CROSS.293:
        counter set 1
        var citycode TIGER
      TIGER.1:
        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
        GOTO TRAVEL
      TIGER.18:
        var storecode TCweap
        var entrance building
        var itemlocation %TCweapItemLoc
        GOTO SETSTORE

    LEAVE.TCWEAP:
        counter set 19
      TIGER.19:
        put se
        GOTO TRAVEL
      TIGER.20:
        put s
        GOTO TRAVEL
      TIGER.21:
        put sw
        GOTO TRAVEL
      TIGER.22:
        counter set 57
      TIGER.57:
        put go wagon
        var storecode TCpedd
        GOTO TRAVEL
      TIGER.58:
        var entrance wagon
        GOTO SETSTORE

    ALTLEAVE.TCPEDD:
        counter set 55
      TIGER.55:
        put out
        GOTO TRAVEL
      TIGER.56:
    LEAVE.TCPEDD:
        counter set 23
      TIGER.23:
        match ALTLEAVE.TCPEDD referring
        put go green
        GOTO TRAVEL
      TIGER.24:
        put nw
        GOTO TRAVEL
      TIGER.25:
        put go toft
        GOTO TRAVEL
      TIGER.26:
        var storecode TCherb
        var entrance cottage
        GOTO SETSTORE

    LEAVE.TCHERB:
        counter set 27
      TIGER.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:
        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:
        var citycode CROSS
      CROSS.128:
        counter set 129
      CROSS.129:
        put e
        GOTO TRAVEL
      CROSS.130:
        put e
        GOTO TRAVEL
      CROSS.131:
        counter set 280
      CROSS.280:
        put e
        GOTO TRAVEL
      CROSS.281:
        put e
        GOTO TRAVEL
    LEAVE.CHAB.CLAN.NO.1:
        counter set 282
      CROSS.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
        GOTO TRAVEL
      CROSS.291:
        var storecode Ctann
        var entrance shed
        GOTO SETSTORE

    MOVEON.CHAB.1:
        counter set 132
      CROSS.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:
        var storecode Cpawn
        put nw
        GOTO TRAVEL
      CROSS.137:
        put go shop
        GOTO TRAVEL
      CROSS.138:
        match CROSS.PAWN.TO.HOSPITAL hand which appears completely useless
        matchre PAWN.%DropOrStow /mind lock|nearly locked/
        match LEAVE.CPAWN.%class Time Development
        put health
        put skill thiev
        GOTO UniversalMatch

    LEAVE.CPAWN.THIEF:
        GOTO CROSSLETH.%lethcross

    CROSSLETH.LETH:
    LEAVE.CPAWN.EMPATH:
    LEAVE.CPAWN.NONTHIEF:
        GOTO PAWN.%DropOrStow

    CROSSLETH.CROSS:
        var citycode LETH
        var LorM leave
        var MRS shopcheck1
        var npcoption yes
        counter set 380
      LETH.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:
        counter set 294
      CROSS.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:
        counter set 306
      CROSS.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:
        counter set 317
      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:
        counter set 324
      CROSS.324:
        put out
        GOTO TRAVEL
      CROSS.325:
        var SelfHealLoc Cpawn
        GOTO EMPATH.HEALSELF

    CROSS.EMPATH.TO.RESUME.FROM.CPAWN:
        counter set 326
      CROSS.326:
        put w
        GOTO TRAVEL


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


    ARTHE.START.WEAP:
        counter set 66
        var storecode ADweap
        GOTO START

    ARTHE.START.BARD:
        counter set 16
        var storecode ADbard
        put out
        GOTO START

    ARTHE.START.ODD:
        counter set 18
        var storecode ADodd
        put out
        GOTO START

    ARTHE.START.FASH:
        counter set 20
        var storecode ADfash
        put out
        GOTO START

    ARTHE.START.THREAD:
        counter set 21
        var storecode ADthread
        put out
        GOTO START

    ARTHE.START.TART:
        counter set 41
        var storecode ADtartE
        GOTO START

    ARTHE.START.MAP:
        counter set 56
        var storecode ADmap
        put out
        GOTO START

    ARTHE.START.SMOK:
        counter set 60
        var storecode ADsmok
        GOTO START

    ARTHE.START.FETA:
        counter set 67
        var storecode ADfeta
        GOTO START

      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
      CROSS.170:
        counter set 1
        var citycode ARTHE
      ARTHE.1:
        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:
        counter set 5
      ARTHE.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:
        put ne
        GOTO TRAVEL
      ARTHE.14:
        counter set 100
      ARTHE.100:
        put e
        GOTO TRAVEL
      ARTHE.101:
        var storecode ADmap
        var entrance door
        GOTO SETSTORE

      ARTHE.35:
        put e
        GOTO TRAVEL
      ARTHE.36:
        put n
        GOTO TRAVEL
      ARTHE.37:
        put e
        GOTO TRAVEL
      ARTHE.38:
        put e
        GOTO TRAVEL
      ARTHE.39:
        put ne
        GOTO TRAVEL
      ARTHE.40:
        put go knoll
        GOTO TRAVEL
      ARTHE.41:
        var storecode ADtartE
        var entrance w
        GOTO SETSTORE


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


    LEAVE.ADTARTE:
        counter set 73
      ARTHE.73:
        put w
        GOTO TRAVEL
      ARTHE.74:
        put n
        GOTO TRAVEL
      ARTHE.75:
    ALTLEAVE.ADTARTE:
        var storecode ADtartC
        var entrance n
        GOTO SETSTORE

    LEAVE.ADTARTC:
        counter set 44
      ARTHE.44:
        put e
        GOTO TRAVEL
      ARTHE.45:
    ALTLEAVE.ADTARTC:
        var storecode ADtartM
        var entrance e
        GOTO SETSTORE

    LEAVE.ADTARTM:
        counter set 46
      ARTHE.46:
        put n
        GOTO TRAVEL
      ARTHE.47:
    ALTLEAVE.ADTARTM:
        var storecode ADtartL
        var entrance n
        GOTO SETSTORE

    LEAVE.ADTARTL:
        counter set 48
      ARTHE.48:
        put se
        GOTO TRAVEL
      ARTHE.49:
    ALTLEAVE.ADTARTL:
        var storecode ADtartF
        var entrance se
        GOTO SETSTORE

    ALTLEAVE.ADTARTF:
    LEAVE.ADTARTF:
        counter set 50
      ARTHE.50:
        put sw
        GOTO TRAVEL
      ARTHE.51:
        put go door
        GOTO TRAVEL
      ARTHE.52:
        put sw
        GOTO TRAVEL
      ARTHE.53:
        put w
        GOTO TRAVEL
      ARTHE.54:
        put w
        GOTO TRAVEL
      ARTHE.55:
        put s
        GOTO TRAVEL
      ARTHE.56:
        var storecode ADmap
        var entrance door
        GOTO SETSTORE

    LEAVE.ADMAP:
        counter set 57
      ARTHE.57:
        put go door
        GOTO TRAVEL
      ARTHE.58:
        put w
        GOTO TRAVEL
      ARTHE.59:
        put climb stair
        GOTO TRAVEL
      ARTHE.60:
        var storecode ADsmok
        var entrance climb stair
        GOTO SETSTORE

    ALTLEAVE.ADSMOK:
    LEAVE.ADSMOK:
        counter set 62
      ARTHE.61:
        put climb stair
        GOTO TRAVEL
      ARTHE.63:
        put e
        GOTO TRAVEL
      ARTHE.64:
        put o
        GOTO TRAVEL
      ARTHE.65:
        put w
        GOTO TRAVEL
      ARTHE.66:
        put go shack
        GOTO TRAVEL
      ARTHE.67:
        var storecode ADfeta
        var entrance shack
        GOTO SETSTORE

    ALTLEAVE.ADFETA:
        counter set 68
      ARTHE.68:
        put out
        GOTO TRAVEL
      ARTHE.69:
    LEAVE.ADFETA:
        counter set 70
      ARTHE.70:
        put sw
        match ALTLEAVE.ADFETA You can't go
        GOTO TRAVEL
      ARTHE.71:
        var storecode ADweap
        put go entry
        GOTO TRAVEL
      ARTHE.72:
        var entrance entry
        GOTO SETSTORE

    ALTLEAVE.ADWEAP:
        counter set 32
      ARTHE.32:
        put out
        GOTO TRAVEL
      ARTHE.33:
    LEAVE.ADWEAP:
        counter set 15
      ARTHE.15:
        put sw
        match ALTLEAVE.ADWEAP You can't go
        GOTO TRAVEL
      ARTHE.16:
        var storecode ADbard
        var entrance building
        GOTO SETSTORE

    LEAVE.ADBARD:
        counter set 17
      ARTHE.17:
        put w
        GOTO TRAVEL
      ARTHE.18:
        var storecode ADodd
        var entrance door
        GOTO SETSTORE

    LEAVE.ADODD:
        counter set 19
      ARTHE.19:
        put w
        GOTO TRAVEL
      ARTHE.20:
        var storecode ADthread
        var entrance door
        GOTO SETSTORE

    LEAVE.ADTHREAD:
      ARTHE.21:
        var storecode ADfash
        var entrance cottage
        GOTO SETSTORE

    LEAVE.ADFASH:
        counter set 22
      ARTHE.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:
        counter set 171
        var citycode CROSS
      CROSS.171:
        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:
        counter set 276
      CROSS.276:
        put w
        GOTO TRAVEL
      CROSS.277:
        put s
        GOTO TRAVEL
      CROSS.278:
        put s
        GOTO TRAVEL
      CROSS.279:
        var storecode Ccobb
        var entrance shop
        GOTO SETSTORE


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


    LETH.START.MORIKAI:
        counter set 95
        var storecode Lmorik
        put out
        GOTO START

    LETH.START.PERFUME:
        counter set 26
        var storecode Lperf
        put out
        GOTO START

    LETH.START.GENERAL:
        counter set 33
        var storecode Lgen
        put out
        GOTO START

    LETH.START.BOWYER:
        counter set 89
        var storecode Lbow
        put out
        GOTO START

    LETH.START.WEAPON:
        counter set 80
        var storecode Lweap
        GOTO START

    LETH.START.WICKER:
        counter set 103
        var storecode Lwick
        put out
        GOTO START

    LETH.START.CLOTH:
        counter set 47
        var storecode Lcloth
        put out
        GOTO START

    LETH.START.BARD:
        counter set 71
        var storecode Lbard
        put out
        GOTO START

    LETH.START.WOOD:
        counter set 67
        var storecode Lwood
        put go door
        GOTO START

    LETH.START.ORIGAMI:
        counter set 42
        var storecode Lgami
        put out
        GOTO START

    LETH.START.NW:
        counter set 1
      LETH.1:
        put se
        GOTO TRAVEL
      LETH.2:
        put sw
        GOTO TRAVEL
      LETH.3:
        put go hut
        GOTO TRAVEL
      LETH.4:
        GOTO LETH.START.MORIKAI

    LETH.START.SW:
        counter set 5
      LETH.5:
        put ne
        GOTO TRAVEL
      LETH.6:
        put se
        GOTO TRAVEL
      LETH.7:
        put se
        GOTO TRAVEL
      LETH.8:
        put go hut
        GOTO TRAVEL
      LETH.9:
        GOTO LETH.START.WICKER

    LETH.START.TOWNCENTER:
        counter set 10
      LETH.10:
        put s
        GOTO TRAVEL
      LETH.11:
        put s
        GOTO TRAVEL
      LETH.12:
        put go hole
        GOTO TRAVEL
      LETH.13:
        GOTO LETH.START.CLOTH


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


    LEAVE.LMORIK:
        GOTO %LorM.LMORIK.1
    LEAVE.LMORIK.1:
        counter set 18
      LETH.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:
        put go path
        GOTO TRAVEL
      LETH.26:
        var storecode Lperf
        var entrance shack
        GOTO SETSTORE

    LEAVE.LPERF:
        counter set 27
      LETH.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:
        put e
        GOTO TRAVEL
      LETH.33:
        var storecode Lgen
        var entrance stump
        GOTO SETSTORE

    LEAVE.LGEN:
        counter set 34
      LETH.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:
        put se
        GOTO TRAVEL
      LETH.42:
        var storecode Lgami
        var entrance tent
        GOTO SETSTORE

    LEAVE.LGAMI:
        counter set 43
      LETH.43:
        put se
        GOTO TRAVEL
      LETH.44:
        put se
        GOTO TRAVEL
      LETH.45:
        put se
        GOTO TRAVEL
      LETH.46:
        put n
        GOTO TRAVEL
      LETH.47:
        var storecode Lcloth
        var entrance hole
        GOTO SETSTORE

    LEAVE.LCLOTH:
        counter set 65
      LETH.65:
        put s
        GOTO TRAVEL
      LETH.66:
        put ne
        GOTO TRAVEL
      LETH.67:
        var storecode Lwood
        var entrance door
        GOTO SETSTORE

    ALTLEAVE.LWOOD:
        counter set 48
      LETH.48:
        put go door
        GOTO TRAVEL
      LETH.49:
    LEAVE.LWOOD:
        counter set 68
      LETH.68:
        put sw
        GOTO TRAVEL
      LETH.69:
        put s
        GOTO TRAVEL
      LETH.70:
        put s
        GOTO TRAVEL
      LETH.71:
        var storecode Lbard
        var entrance knot
        GOTO SETSTORE

    LEAVE.LBARD:
        counter set 100
      LETH.100:
        put s
        GOTO TRAVEL
      LETH.101:
        put w
        GOTO TRAVEL
      LETH.102:
        put nw
        GOTO TRAVEL
      LETH.103:
        var storecode Lwick
        var entrance hut
        GOTO SETSTORE

    LEAVE.LWICK:
        counter set 75
      LETH.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:
        put go shack
        GOTO TRAVEL
      LETH.80:
        var storecode Lweap
        var entrance shack
        GOTO SETSTORE

    ALTLEAVE.LWEAP:
        counter set 465
      LETH.465:
        put out
        GOTO TRAVEL
      LETH.466:
    LEAVE.LWEAP:
        counter set 81
      LETH.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:
        put go path
        GOTO TRAVEL
      LETH.89:
        var storecode Lbow
        var entrance door
        GOTO SETSTORE

    LEAVE.LBOW:
        counter set 90
      LETH.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:
        put ne
        GOTO TRAVEL
      LETH.95:
        var storecode Lmorik
        var entrance hut
        GOTO SETSTORE

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


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

    LETH.MOVEON.EMPATH:
    LETH.MOVEON.NONTHIEF:
        counter set 455
      LETH.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:
        GOTO PAWN.%DropOrStow

    LETH.MOVEON.THIEF:
        counter set 298
      LETH.298:
        put ne
        GOTO TRAVEL
      LETH.299:
        put nw
        GOTO TRAVEL
      LETH.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:
        counter set 378
      LETH.378:
        put go house
        GOTO TRAVEL
      LETH.379:
        var MRS shopcheck1
        var LorM leave
        var npcoption yes
        var citycode CROSS
        GOTO CROSS.START.GUARD

    LETHCROSS.CROSS:
        counter set 369
      LETH.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:
        var citycode CROSS
        GOTO PAWN.%DropOrStow


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


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

    CROSS.PAWNFINISH.THIEF:
        counter set 187
      CROSS.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:
        GOTO PAWN.BIN

    CROSS.BINFINISH.THIEF:
        counter set 205
      CROSS.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:
        GOTO END

    ARTHE.BINFINISH.THIEF:
    ARTHE.BINFINISH.NONTHIEF:
    ARTHE.BINFINISH.EMPATH:
        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:
        var citycode CROSS
    CROSS.DEBT:
        counter set 223
      CROSS.223:
        put w
        GOTO TRAVEL
      CROSS.224:
        put w
        GOTO TRAVEL
    CROSS.DEBT2:
        counter set 225
      CROSS.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
        counter set 239
      CROSS.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
        counter set 247
      CROSS.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
        counter set 255
      CROSS.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:
        GOTO GETSACK

    ARTHE.FREE:
        var citycode CROSS
    CROSS.FREE:
        counter set 269
      CROSS.269:
        put w
        GOTO TRAVEL
      CROSS.270:
        put w
        GOTO TRAVEL
      CROSS.271:
        GOTO GETSACK

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

    CROSS.MISSINGSTART:
        var startlocation Chab
        var ResumeStore Chab
        GOTO CROSS.FREE3

    CROSS.FREE3:
        counter set 272
      CROSS.272:
        put out
        GOTO TRAVEL
      CROSS.273:
        put e
        GOTO TRAVEL
      CROSS.274:
        put n
        GOTO TRAVEL
      CROSS.275:
        counter set 1
        var 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.ADFETA:
        counter add 1
    RESUME.ADSMOK:
        counter add 1
    RESUME.ADMAP:
        counter add 1
    RESUME.ADTARTF:
        counter add 1
    RESUME.ADTARTL:
        counter add 1
    RESUME.ADTARTM:
        counter add 1
    RESUME.ADTARTC:
        counter add 1
    RESUME.ADTARTE:
        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
        var 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:
        counter set 198
      LETH.198:
        put u
        GOTO TRAVEL
    LETH.DEBT2:
        counter set 199
      LETH.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.238:
        GOTO GETSACK

    LETH.FREE:
        counter set 245
      LETH.245:
        put u
        GOTO TRAVEL
      LETH.246:
        GOTO GETSACK

    LETH.FREE2:
        pause 1
        match LETH.MISSINGSTART waitandsee
        match LETH.FREE3 okstart
        put echo %startlocation
        put echo okstart
        GOTO UniversalMatch

    LETH.MISSINGSTART:
        var startlocation Lmorik
        var ResumeStore Lmorik
        GOTO LETH.FREE3

    LETH.FREE3:
        counter set 241
      LETH.241:
        put out
        GOTO TRAVEL
      LETH.242:
        put nw
        GOTO TRAVEL
      LETH.243:
        put sw
        GOTO TRAVEL
      LETH.244:
        counter set 1
        var 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
        var Countdown %c
        GOTO RESUME



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


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

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

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

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

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

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

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

    ILI.RANK.11:
    ILI.RANK.12:
    ILI.RANK.13:
    ILI.RANK.14:
    ILI.RANK.15:
        ECHO ***********************************************
        ECHO ***        Sorry, but there isn't anything harder yet!
        ECHO ***********************************************
    ILI.RANK.10:
    ILI.RANK.9:
    ILI.RANK.8:
        var skillrange 300+
        var Sgene great helm
        var SgeneQuant 1
        var Sweap stiletto
        var SweapQuant 2
        var Sstit coat
        var SstitQuant 2
        var Scleric bell
        var SclericQuant 2
        var Salch cauldron
        var SalchQuant 2
        var Sherb ithor potion
        var SherbQuant 2
        var Sreag elbaite runestone
        var SreagQuant 2
        var Sbard gilded mandolin
        var SbardQuant 1
        var Slock ivory lockpick
        var SlockQuant 2
        var Sarmo helmet
        var SarmoQuant 1
        var Scoin coin case
        var ScoinQuant 2
        var Stoke <nothing>
        var StokeQuant 1
        var Sfril doll
        var SfrilQuant 1
        var Shera ordinary shield
        var SheraQuant 2
        var Stour dagger
        var StourItemLoc on table
        var StourQuant 1
        var Stoyb black book
        var StoybQuant 1
        var Sbarb horn-handled razor
        var SbarbQuant 1
        var Smuse slippers
        var SmuseQuant 1
        var Sbake <nothing>
        var SbakeQuant 2
        var Sbows barbed arrows
        var SbowsQuant 2
        var Stann potion
        var StannQuant 2
        var Ssupb razor arrowhead
        var SsupbQuant 2
        var Ssupf stone mortar
        var SsupfQuant 2
        var Smarw rapier
        var SmarwQuant 2
        var Smarg cloth backtube
        var SmargQuant 3
        var Senes ithor potion
        var SenesQuant 3
        var SCCleat chanfron
        var SCCleatQuant 1
        var SCCweap spear
        var SCCweapQuant 1
        var HCfelt amulet
        var HCfeltQuant 1
        var HCequi white blanket
        var HCequiQuant 1
        var HCfalc <nothing>
        var HCfalcQuant 2
        var HCjaht <nothing>
        var HCjahtQuant 2
        var HCcash ring
        var HCcashQuant 2
        var HCbow1 <nothing>
        var HCbow1Quant 2
        var HCbow2 <nothing>
        var HCbow2Quant 1
        GOTO RANKREPORT

    ILI.RANK.-5:
    ILI.RANK.-4:
    ILI.RANK.-3:
    ILI.RANK.-2:
    ILI.RANK.-1:
    ILI.RANK.0:
        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|%Scleric%/
        matchre BAGWARN /%Smuse|%Sbake|%Sbows|%Stann|%Ssupb|%Ssupf|%Smarw|%Smarg|%Senes%/
        matchre BAGWARN /%SCCleat|%SCCweap|%HCfelt|%HCequi|%HCfalc|%HCjaht|%HCcash|%HCbow1|%HCbow2%/
        match BAGS.STOW.%c You glance
        put look in my %container
        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.CLER Imadrail
        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
        var 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 *** Sister Imadrail's Emporium
        ECHO ***
        ECHO *******************************************************
        put echocolumn /off
        waitfor EchoColumn
        GOTO END

    SHARD.START.GENE:
        counter set 254
        var storecode Sgene
        put out
        GOTO START

    SHARD.START.WEAP:
        counter set 37
        var storecode Sweap
        put out
        GOTO START

    SHARD.START.STIT:
        counter set 42
        var storecode Sstit
        put out
        GOTO START

    SHARD.START.CLER:
        counter set 49
        var storecode Scleric
        put out
        GOTO START

    SHARD.START.HERB:
        match SHARD.START.ALCH Obvious
        put out
        GOTO UniversalMatch
    SHARD.START.ALCH:
        counter set 345
        var storecode Salch
        put out
        GOTO START

    SHARD.START.REAG:
        counter set 61
        var storecode Sreag
        put out
        GOTO START

    SHARD.START.LOCK:
        match SHARD.START.BARD Obvious
        put go trapdoor
        GOTO UniversalMatch
    SHARD.START.BARD:
        counter set 64
        var storecode Sbard
        put out
        GOTO START

    SHARD.START.ARMO:
        counter set 72
        var storecode Sarmo
        put out
        GOTO START

    SHARD.START.COIN:
        counter set 79
        var storecode Scoin
        put go door
        GOTO START

    SHARD.START.TOKE:
        counter set 81
        var storecode Stoke
        put go door
        GOTO START

    SHARD.START.FRIL:
        counter set 83
        var storecode Sfril
        put go door
        GOTO START

    SHARD.START.HERA:
        counter set 86
        var storecode Shera
        put go door
        GOTO START

    SHARD.START.TOUR:
        counter set 89
        var storecode Stour
        put go door
        GOTO START

    SHARD.START.TOYB:
        counter set 92
        var storecode Stoyb
        put go door
        GOTO START

    SHARD.START.BARB:
        counter set 94
        var storecode Sbarb
        put go door
        GOTO START

    SHARD.START.MUSE:
        counter set 107
        var storecode Smuse
        put out
        GOTO START

    SHARD.START.BAKE:
        counter set 112
        var storecode Sbake
        put out
        GOTO START

    SHARD.START.BOWS:
        counter set 120
        var storecode Sbows
        put out
        GOTO START

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

    SHARD.START.MARW:
    SHARD.START.MARG:
        match SHARD.START.MARA Obvious
        put go door
        GOTO UniversalMatch
    SHARD.START.MARA:
        counter set 205
        var storecode Smarw
        GOTO START

    SHARD.START.ENES:
        counter set 214
        var storecode Senes
        GOTO START

    STEEL.START.LEAT:
        counter set 462
        var storecode SCCleat
        put n
        GOTO START

    STEEL.START.WEAP:
        counter set 470
        var storecode SCCweap
        put out
        GOTO START

    HORSE.START.FELT:
        counter set 580
        var storecode HCfelt
        put go flap
        GOTO START

    HORSE.START.EQUI.W:
        match HORSE.START.EQUI.E Obvious
        put e
        GOTO UniversalMatch
    HORSE.START.EQUI.E:
        counter set 589
        var storecode HCequi
        put w
        GOTO START

    HORSE.START.FALC:
        counter set 595
        var storecode HCfalc
        put go flap
        GOTO START

    HORSE.START.JAHT.1:
        match HORSE.START.JAHT.2 Obvious
        put go corner
        GOTO UniversalMatch
    HORSE.START.JAHT.2:
        counter set 598
        var storecode HCjaht
        put go tent
        GOTO START

    HORSE.START.CASH:
        counter set 605
        var storecode HCcash
        put go flap
        GOTO START

    HORSE.START.BOW2:
        match HORSE.START.BOW1 Obvious
        put go curtain
        GOTO UniversalMatch
    HORSE.START.BOW1:
        counter set 608
        var storecode HCbow1
        put go flap
        GOTO START

    SHARD.START.NG:
        counter set 1
      SHARD.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:
        counter set 6
      SHARD.6:
        put s
        GOTO TRAVEL
      SHARD.7:
        put se
        GOTO TRAVEL
      SHARD.8:
        var storecode Sarmo
        put go building
        GOTO TRAVEL
      SHARD.9:
        GOTO SHARD.START.ARMO

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

    SHARD.START.SG:
        counter set 14
      SHARD.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:
        counter set 383
      SHARD.383:
        put out
        GOTO TRAVEL
      SHARD.384:
        counter set 18
      SHARD.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:
        counter set 385
      SHARD.385:
        put out
        GOTO TRAVEL
      SHARD.386:
        counter set 23
      SHARD.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:
        counter set 735
      SHARD.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:
        counter set 749
      SHARD.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:
        counter set 27
      SHARD.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:
        var storecode Sweap
        put ne
        GOTO TRAVEL
      SHARD.37:
        var entrance shop
        GOTO SETSTORE

    LEAVE.SWEAP:
        counter set 38
      SHARD.38:
        put sw
        GOTO TRAVEL
      SHARD.39:
        put sw
        GOTO TRAVEL
      SHARD.40:
        put se
        GOTO TRAVEL
      SHARD.41:
        var storecode Sstit
        put e
        GOTO TRAVEL
      SHARD.42:
        var entrance home
        GOTO SETSTORE

    LEAVE.SSTIT:
        counter set 43
      SHARD.43:
        put go bridge
        GOTO TRAVEL
      SHARD.44:
        put w
        GOTO TRAVEL
      SHARD.45:
        put w
        GOTO TRAVEL
      SHARD.46:
        put go temple
        GOTO TRAVEL
      SHARD.47:
        put n
        GOTO TRAVEL
      SHARD.48:
        put go div arch
        GOTO TRAVEL
      SHARD.49:
        var storecode Scleric
        var entrance door
        GOTO SETSTORE

    LEAVE.SCLERIC:
        counter set 337
      SHARD.337:
        put go arch
        GOTO TRAVEL
      SHARD.338:
        put s
        GOTO TRAVEL
      SHARD.339:
        put go door
        GOTO TRAVEL
      SHARD.340:
        put w
        GOTO TRAVEL
      SHARD.341:
        put n
        GOTO TRAVEL
      SHARD.342:
        put nw
        GOTO TRAVEL
      SHARD.343:
        put w
        GOTO TRAVEL
      SHARD.344:
        put w
        GOTO TRAVEL
      SHARD.345:
        var storecode Salch
        var entrance door
        GOTO SETSTORE

    LEAVE.SALCH:
        counter set 52
      SHARD.52:
        put go door
        GOTO TRAVEL
      SHARD.53:
        var storecode Sherb
        var entrance iron door
        GOTO SETSTORE

    LEAVE.SHERB:
        counter set 54
      SHARD.54:
        put out
        GOTO TRAVEL
      SHARD.55:
        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:
        put se
        GOTO TRAVEL
      SHARD.61:
        var storecode Sreag
        var entrance building
        GOTO SETSTORE

    LEAVE.SREAG:
        counter set 62
      SHARD.62:
        put sw
        GOTO TRAVEL
      SHARD.63:
        var storecode Sbard
        put sw
        GOTO TRAVEL
      SHARD.64:
        var entrance shop
        GOTO SETSTORE

    LEAVE.SBARD:
        counter set 65
      SHARD.65:
        var 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:
        matchre KILAM4 /...wait|type ahead|Roundtime/i
        match SETSTORE You stand back up.
        put kneel
        put stand
        GOTO UniversalMatch

    LEAVE.SLOCK:
        counter set 68
      SHARD.68:
        match ALTLEAVE.SLOCK You can't go there.
        put sw
        GOTO TRAVEL
      SHARD.69:
        put sw
        GOTO TRAVEL
      SHARD.70:
        put go bridge
        GOTO TRAVEL
      SHARD.71:
        var storecode Sarmo
        put nw
        GOTO TRAVEL
      SHARD.72:
        var entrance building
        GOTO SETSTORE

    LEAVE.SARMO:
        counter set 73
      SHARD.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:
        put w
        GOTO TRAVEL
      SHARD.79:
        var storecode Scoin
        var entrance building
        GOTO SETSTORE

    LEAVE.SCOIN:
        counter set 80
      SHARD.80:
        put s
        GOTO TRAVEL
      SHARD.81:
        var storecode Stoke
        var entrance shop
        GOTO SETSTORE

    LEAVE.STOKE:
        counter set 82
      SHARD.82:
        put s
        GOTO TRAVEL
      SHARD.83:
        var storecode Sfril
        var entrance shop
        GOTO SETSTORE

    LEAVE.SFRIL:
        counter set 84
      SHARD.84:
        put s
        GOTO TRAVEL
      SHARD.85:
        put s
        GOTO TRAVEL
      SHARD.86:
        var storecode Shera
        var entrance building
        GOTO SETSTORE

    LEAVE.SHERA:
        counter set 87
      SHARD.87:
        put e
        GOTO TRAVEL
      SHARD.88:
        put e
        GOTO TRAVEL
      SHARD.89:
        var storecode Stour
        var entrance shop
        var itemlocation %StourItemLoc
        GOTO SETSTORE

    LEAVE.STOUR:
        counter set 90
      SHARD.90:
        put n
        GOTO TRAVEL
      SHARD.91:
        put n
        GOTO TRAVEL
      SHARD.92:
        var storecode Stoyb
        var entrance shop
        GOTO SETSTORE

    LEAVE.STOYB:
        counter set 93
      SHARD.93:
        put n
        GOTO TRAVEL
      SHARD.94:
        var storecode Sbarb
        var entrance shop
        GOTO SETSTORE

    LEAVE.SBARB:
        counter set 95
      SHARD.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:
        var storecode Smuse
        put go building
        GOTO TRAVEL
      SHARD.107:
        var entrance arch
        GOTO SETSTORE

    LEAVE.SMUSE:
        counter set 108
      SHARD.108:
        put out
        GOTO TRAVEL
      SHARD.109:
        put go gate
        GOTO TRAVEL
      SHARD.110:
        put n
        GOTO TRAVEL
      SHARD.111:
        var storecode Sbake
        put se
        GOTO TRAVEL
      SHARD.112:
        var entrance bakery
        GOTO SETSTORE

    LEAVE.SBAKE:
        counter set 113
      SHARD.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:
        var storecode Sbows
        put ne
        GOTO TRAVEL
      SHARD.120:
        var entrance shop
        GOTO SETSTORE

    LEAVE.SBOWS:
        GOTO %LorM.SBOWS.1
    LEAVE.SBOWS.1:
        counter set 121
      SHARD.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:
        put go building
        GOTO TRAVEL
      SHARD.139:
        var storecode Stann
        var entrance building
        GOTO SETSTORE

    ALTLEAVE.STANN:
    LEAVE.STANN:
        put out
        wait
        var storecode Ssupb
        var entrance tree
        GOTO SETSTORE

    LEAVE.SSUPB:
        counter set 140
      SHARD.140:
        put go tree
        GOTO TRAVEL
      SHARD.141:
        var storecode Ssupf
        var entrance curtain
        GOTO SETSTORE

    ALTLEAVE.SSUPF:
        counter set 380
      SHARD.380:
        put out
        GOTO TRAVEL
      SHARD.381:
        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:
        counter set 743
      SHARD.743:
        put ne
        GOTO TRAVEL
      SHARD.744:
        counter set 172
      SHARD.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:
        put go blue door
        GOTO TRAVEL
      SHARD.205:
        var storecode Smarw
        var entrance blue door
        GOTO SETSTORE

    LEAVE.SMARW:
        counter set 206
      SHARD.206:
        match ALTLEAVE.SMARW referring
        put go green door
        GOTO TRAVEL
      SHARD.207:
        var storecode Smarg
        var entrance green door
        GOTO SETSTORE

    LEAVE.SMARG:
        counter set 208
      SHARD.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:
        put go tree
        GOTO TRAVEL
      SHARD.214:
        var storecode Senes
        var entrance tree
        GOTO SETSTORE

    ALTLEAVE.SENES:
        counter set 387
      SHARD.387:
        put out
        GOTO TRAVEL
      SHARD.388:
    LEAVE.SENES:
        counter set 215
      SHARD.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.SENES.1
    LEAVE.SENES.1:
        GOTO SHARD.CLAN.%clanoption

    MOVEON.SENES.1:
    SHARD.CLAN.NO.1:
        counter set 733
      SHARD.733:
        put sw
        GOTO TRAVEL
      SHARD.734:
        counter set 234
      SHARD.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:
        var clanoption NO
        GOTO SHARD.CLAN.NO.1

    SHARD.CLAN.YES.2:
        counter set 452
      SHARD.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
        GOTO TRAVEL
      SHARD.462:
        var storecode SCCleat
        var entrance south
        GOTO SETSTORE

    LEAVE.SCCLEAT:
        counter set 463
      SHARD.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
        GOTO TRAVEL
      SHARD.470:
        var storecode SCCweap
        var entrance building
        GOTO SETSTORE

    LEAVE.SCCWEAP:
        counter set 471
      SHARD.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
        GOTO TRAVEL
      SHARD.580:
        var storecode HCfelt
        var entrance tent
        GOTO SETSTORE

    LEAVE.HCFELT:
        counter set 581
      SHARD.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
        GOTO TRAVEL
      SHARD.589:
        var storecode HCequi
        var entrance east
        GOTO SETSTORE

    LEAVE.HCEQUI:
        counter set 590
      SHARD.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
        GOTO TRAVEL
      SHARD.595:
        var storecode HCfalc
        var entrance tent
        GOTO SETSTORE

    LEAVE.HCFALC:
        counter set 596
      SHARD.596:
        put sw
        GOTO TRAVEL
      SHARD.597:
        put go tent
        GOTO TRAVEL
      SHARD.598:
        var storecode HCjaht
        var entrance corner
        GOTO SETSTORE

    LEAVE.HCJAHT:
        counter set 599
      SHARD.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
        GOTO TRAVEL
      SHARD.605:
        var storecode HCcash
        var entrance tent
        GOTO SETSTORE

    LEAVE.HCCASH:
        counter set 606
      SHARD.606:
        put n
        GOTO TRAVEL
      SHARD.607:
        put nw
        GOTO TRAVEL
      SHARD.608:
        var storecode HCbow1
        var entrance tent
        GOTO SETSTORE

    LEAVE.HCBOW1:
        var storecode HCbow2
        GOTO SETSTORE

    LEAVE.HCBOW2:
        counter set 745
      SHARD.745:
        put go flap
        match SHARD.746 referring
        GOTO TRAVEL
      SHARD.746:
        counter set 609
      SHARD.609:
        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:
        var SelfHealLoc HorseClan
        GOTO EMPATH.HEALSELF

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

    HORSE.HEALTH.THIEF:
    HORSE.HEALTH.NONTHIEF:
    LEAVE.HCBOW2.2:
        counter set 805
      SHARD.805:
        put nw
        GOTO TRAVEL
      SHARD.806:
        counter set 617
      SHARD.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:
        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:
        counter set 670
      SHARD.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:
        counter set 245
      SHARD.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:
        put s
        GOTO TRAVEL
      SHARD.254:
        var storecode Sgene
        var entrance shop
        GOTO SETSTORE

    MOVEON.SBOWS.1:
        counter set 260
      SHARD.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 PAWN.%DropOrStow You glance
        put health
        put glance
        GOTO UniversalMatch

    MOVEON.SGENE.1:
        counter set 760
      SHARD.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:
        counter set 768
      SHARD.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:
        counter set 794
      SHARD.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:
        var SelfHealLoc ShardTowerSE
        GOTO EMPATH.HEALSELF
    SHARD.EMPATH.TO.RESUME.FROM.SHARDTOWERSE:
        counter set 799
      SHARD.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:
        counter set 773
      SHARD.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:
        counter set 780
      SHARD.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:
      SHARD.255:
        counter set 255
        put go door
        GOTO TRAVEL
      SHARD.256:
        GOTO LEAVE.%storecode

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

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

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

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

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

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


##################################################################
#####                                                        #####
#####                    ILITHI BINNING                      #####
#####                                                        #####
##################################################################


    SHARD.PAWNFINISH.NONTHIEF:
    SHARD.PAWNFINISH.EMPATH:
        GOTO END

    SHARD.PAWNFINISH.THIEF:
        counter set 272
      SHARD.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:
        GOTO PAWN.BIN

    SHARD.BINFINISH.THIEF:
        counter set 304
      SHARD.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:
        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:
        counter set 389
      SHARD.389:
        put go hallway
        GOTO TRAVEL
    SHARD.DEBT2:
        counter set 390
      SHARD.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 go 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
        counter set 403
      SHARD.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:
        counter set 334
      SHARD.334:
        put e
        GOTO TRAVEL
      SHARD.335:
        put go entr
        GOTO TRAVEL
      SHARD.336:
        counter set 413
      SHARD.413:
        put go pass
        GOTO TRAVEL
      SHARD.414:
        put pay 5000
        wait
        counter set 415
      SHARD.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 go 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
        counter set 428
      SHARD.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.440:
        GOTO GETSACK

    SHARD.FREE:
        counter set 270
      SHARD.270:
        put go hall
        GOTO TRAVEL
      SHARD.271:
        GOTO GETSACK

    SHARD.FREE2:
        pause 1
        match SHARD.MISSINGSTART waitandsee
        match SHARD.FREE3 okstart
        put echo %startlocation
        put echo okstart
        GOTO UniversalMatch

    SHARD.MISSINGSTART:
        var startlocation Sgene
        var ResumeStore Sgene
        GOTO SHARD.FREE3

    SHARD.FREE3:
        counter set 442
      SHARD.442:
        put out
        GOTO TRAVEL
      SHARD.443:
        put n
        GOTO TRAVEL
      SHARD.444:
        put go arch
        GOTO TRAVEL
    SHARD.QUENTIN.RESUME:
        counter set 445
      SHARD.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
        var 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.SCLERIC:
        counter add 1
    RESUME.SSTIT:
        counter add 1
    RESUME.SWEAP:
        counter add 1
    RESUME.SGENE:
        counter add 1
        var Countdown %c
        GOTO RESUME


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


     THG.RANK.1:
        var skillrange 20-39
        var RHcloth <nothing>
        var RHclothQuant 1
        var RHgen purse
        var RHgenQuant 1
        var RHarms <nothing>
        var RHarmsQuant 1
        var RHflow black orchid
        var RHflowQuant 1
        var RHart <nothing>
        var RHartQuant 1
        var RHlock ordinary lockpick
        var RHlockQuant 1
        var RHjoy chocolate
        var RHjoyQuant 1
        var RHtobac <nothing>
        var RHtobacQuant 1
        var RHmirg <nothing>
        var RHmirgQuant 1
        var RHweap <nothing>
        var RHweapQuant 1
        var RHcler1 grey-brown feather
        var RHcler1Quant 1
        var RHcler2 <nothing>
        var RHcler2Quant 1
        var RHbard1 pick
        var RHbard1Quant 1
        var RHbard2 <nothing>
        var RHbard2Quant 2
        var RHnap <nothing>
        var RHnapQuant 1
        var RHherb water
        var RHherbQuant 2
        var RHtog1 <nothing>
        var RHtog1Quant 1
        var RHtog2 <nothing>
        var RHtog2Quant 1
        var RHseli <nothing>
        var RHseliQuant 1
        var RHiron <nothing>
        var RHironQuant 1
        GOTO RANKREPORT

    THG.RANK.2:
        var skillrange 40-59
        var RHcloth <nothing>
        var RHclothQuant 2
        var RHgen flint
        var RHgenQuant 2
        var RHarms dart
        var RHarmsQuant 1
        var RHflow black orchid
        var RHflowQuant 2
        var RHart <nothing>
        var RHartQuant 2
        var RHlock ordinary lockpick
        var RHlockQuant 2
        var RHjoy <nothing>
        var RHjoyQuant 2
        var RHtobac pouch
        var RHtobacQuant 2
        var RHmirg <nothing>
        var RHmirgQuant 2
        var RHweap <nothing>
        var RHweapQuant 2
        var RHcler1 incense
        var RHcler1Quant 2
        var RHcler2 <nothing>
        var RHcler2Quant 2
        var RHbard1 pick
        var RHbard1Quant 2
        var RHbard2 <nothing>
        var RHbard2Quant 2
        var RHnap <nothing>
        var RHnapQuant 2
        var RHherb mixing stick
        var RHherbQuant 2
        var RHtog1 <nothing>
        var RHtog1Quant 2
        var RHtog2 <nothing>
        var RHtog2Quant 2
        var RHseli <nothing>
        var RHseliQuant 2
        var RHiron <nothing>
        var RHironQuant 2
        GOTO RANKREPORT

    THG.RANK.3:
        var skillrange 60-99
        var RHcloth sash
        var RHclothQuant 2
        var RHgen bark
        var RHgenQuant 2
        var RHarms bolts
        var RHarmsP dart
        var RHarmsQuant 2
        var RHflow black orchid
        var RHflowQuant 2
        var RHart <nothing>
        var RHartQuant 2
        var RHlock stout lockpick
        var RHlockQuant 2
        var RHjoy <nothing>
        var RHjoyQuant 2
        var RHtobac sungrown cigar
        var RHtobacP pouch
        var RHtobacQuant 2
        var RHmirg <nothing>
        var RHmirgQuant 2
        var RHweap <nothing>
        var RHweapQuant 2
        var RHcler1 candle
        var RHcler1Quant 2
        var RHcler2 <nothing>
        var RHcler2Quant 2
        var RHbard1 drum stick
        var RHbard1Quant 2
        var RHbard2 <nothing>
        var RHbard2Quant 2
        var RHnap <nothing>
        var RHnapQuant 1
        var RHherb oil
        var RHherbQuant 2
        var RHtog1 <nothing>
        var RHtog1Quant 2
        var RHtog2 <nothing>
        var RHtog2Quant 2
        var RHseli claw gloves
        var RHseliQuant 1
        var RHiron <nothing>
        var RHironQuant 2
        GOTO RANKREPORT

    THG.RANK.4:
        var skillrange 100-149
        var RHcloth gloves
        var RHclothQuant 2
        var RHgen spade
        var RHgenQuant 2
        var RHarms stiletto
        var RHarmsQuant 2
        var RHflow <nothing>
        var RHflowQuant 2
        var RHart <nothing>
        var RHartQuant 2
        var RHlock stout lockpick
        var RHlockQuant 2
        var RHjoy <nothing>
        var RHjoyQuant 1
        var RHtobac apple pipe
        var RHtobacQuant 2
        var RHmirg <nothing>
        var RHmirgQuant 2
        var RHweap <nothing>
        var RHweapQuant 2
        var RHcler1 violets
        var RHcler1P chalice
        var RHcler1Quant 2
        var RHcler2 <nothing>
        var RHcler2Quant 2
        var RHbard1 linen cloth
        var RHbard1P drum stick
        var RHbard1Quant 2
        var RHbard2 <nothing>
        var RHbard2Quant 2
        var RHnap <nothing>
        var RHnapQuant 1
        var RHherb pestle
        var RHherbQuant 2
        var RHtog1 <nothing>
        var RHtog1Quant 2
        var RHtog2 <nothing>
        var RHtog2Quant 2
        var RHseli claw gloves
        var RHseliQuant 2
        var RHiron <nothing>
        var RHironQuant 2
        GOTO RANKREPORT

    THG.RANK.5:
        var skillrange 150-199
        var RHcloth blouse
        var RHclothQuant 2
        var RHgen dagger sheath
        var RHgenQuant 2
        var RHarms kris
        var RHarmsQuant 2
        var RHflow silk orchid
        var RHflowQuant 1
        var RHart simple talisman
        var RHartQuant 2
        var RHlock slim lockpick
        var RHlockQuant 2
        var RHjoy kitten
        var RHjoyQuant 1
        var RHtobac lanival pipe
        var RHtobacQuant 2
        var RHmirg <nothing>
        var RHmirgQuant 2
        var RHweap club
        var RHweapQuant 1
        var RHcler1 herbs
        var RHcler1Quant 2
        var RHcler2 <nothing>
        var RHcler2Quant 2
        var RHbard1 blouse
        var RHbard1Quant 2
        var RHbard2 <nothing>
        var RHbard2Quant 2
        var RHnap naphtha
        var RHnapQuant 1
        var RHherb jar
        var RHherbQuant 2
        var RHtog1 beaded slippers
        var RHtog1Quant 2
        var RHtog2 <nothing>
        var RHtog2Quant 2
        var RHseli legwraps
        var RHseliQuant 2
        var RHiron <nothing>
        var RHironQuant 2
        GOTO RANKREPORT

    THG.RANK.6:
        var skillrange 200-249
        var RHcloth skirt
        var RHclothQuant 2
        var RHgen scabbard
        var RHgenQuant 2
        var RHarms rapier
        var RHarmsQuant 2
        var RHflow silk orchid
        var RHflowQuant 2
        var RHart simple talisman
        var RHartQuant 2
        var RHlock slim lockpick
        var RHlockQuant 2
        var RHjoy bunny
        var RHjoyQuant 2
        var RHtobac olvio pipe
        var RHtobacQuant 2
        var RHmirg <nothing>
        var RHmirgQuant 2
        var RHweap club
        var RHweapQuant 2
        var RHcler1 bottle
        var RHcler1Quant 2
        var RHcler2 <nothing>
        var RHcler2Quant 2
        var RHbard1 alpargatas
        var RHbard1Quant 2
        var RHbard2 <nothing>
        var RHbard2Quant 2
        var RHnap naphtha
        var RHnapQuant 2
        var RHherb jadice flower
        var RHherbQuant 2
        var RHtog1 ivory shirt
        var RHtog1Quant 2
        var RHtog2 <nothing>
        var RHtog2Quant 2
        var RHseli hood
        var RHseliQuant 2
        var RHiron <nothing>
        var RHironQuant 2
        GOTO RANKREPORT

    THG.RANK.7:
        var skillrange 250-299
        var RHcloth houpelande
        var RHclothQuant 2
        var RHgen shears
        var RHgenQuant 2
        var RHarms composite bow
        var RHarmsQuant 1
        var RHflow wreath
        var RHflowQuant 2
        var RHart cambrinth ring
        var RHartQuant 1
        var RHlock <nothing>
        var RHlockQuant 2
        var RHjoy bunny
        var RHjoyQuant 3
        var RHtobac riverhaven tobacco
        var RHtobacQuant 2
        var RHmirg anklet
        var RHmirgQuant 2
        var RHweap thorny mace
        var RHweapQuant 2
        var RHcler1 chalice
        var RHcler1Quant 2
        var RHcler2 <nothing>
        var RHcler2Quant 2
        var RHbard1 refill
        var RHbard1Quant 2
        var RHbard2 <nothing>
        var RHbard2Quant 2
        var RHnap naphtha
        var RHnapQuant 2
        var RHherb riolur leaf
        var RHherbQuant 2
        var RHtog1 linen shirt
        var RHtog1Quant 2
        var RHtog2 <nothing>
        var RHtog2Quant 2
        var RHseli bronze gauntlets
        var RHseliQuant 2
        var RHiron bronze gauntlets
        var RHironQuant 2
        GOTO RANKREPORT

    THG.RANK.11:
    THG.RANK.12:
    THG.RANK.13:
    THG.RANK.14:
    THG.RANK.15:
        ECHO ***********************************************
        ECHO ***        Sorry, but there isn't anything harder yet!
        ECHO ***********************************************
    THG.RANK.10:
    THG.RANK.9:
    THG.RANK.8:
        var skillrange 300+
        var RHcloth dress
        var RHclothQuant 2
        var RHgen stove
        var RHgenQuant 2
        var RHarms sword
        var RHarmsQuant 2
        var RHflow silk orchid
        var RHflowQuant 2
        var RHart cambrinth ring
        var RHartQuant 2
        var RHlock <nothing>
        var RHlockQuant 2
        var RHjoy bunny
        var RHjoyQuant 3
        var RHtobac baron tobacco
        var RHtobacQuant 2
        var RHmirg toe-bells
        var RHmirgQuant 2
        var RHweap goat-head mace
        var RHweapQuant 2
        var RHcler1 pomander
        var RHcler1Quant 2
        var RHcler2 <nothing>
        var RHcler2Quant 2
        var RHbard1 mandolin
        var RHbard1Quant 2
        var RHbard2 <nothing>
        var RHbard2Quant 2
        var RHnap naphtha
        var RHnapQuant 2
        var RHherb ithor potion
        var RHherbQuant 2
        var RHtog1 linen shirt
        var RHtog1Quant 2
        var RHtog2 <nothing>
        var RHtog2Quant 2
        var RHseli aventail
        var RHseliQuant 2
        var RHiron chain greaves
        var RHironQuant 2
        GOTO RANKREPORT

    THG.RANK.-5:
    THG.RANK.-4:
    THG.RANK.-3:
    THG.RANK.-2:
    THG.RANK.-1:
    THG.RANK.0:
        GOTO BEGGAR.MOD

    THG.BAGCHECK:
        matchre BAGWARN /%RHcloth|%RHgen|%RHarms|%RHflow|%RHart|%RHlock|%RHjoy|%RHiron%/
        matchre BAGWARN /%RHtobac|%RHmirg|%RHweap|%RHseli|%RHnap|%RHherb%/
        matchre BAGWARN /%RHtog1|%RHtog2|%RHbard1|%RHbard2|%RHcler1|%RHcler2%/
        match BAGS.STOW.%c You glance
        put look in my %container
        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.SELI [Seli's Armory, Sales Room]
        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.CLER1 [Riverhaven, Cleric Shop]
        match HAVEN.START.CLER2 [Cleric Shop, Storage Room and Supplies]
        match HAVEN.START.BARD1 [House of Bardic Blues, Wayfarer's Den]
        match HAVEN.START.BARD2 [House of Bardic Blues, Baubles and Bits]
        match HAVEN.START.NAP vendor's cart with a vial of naphtha
        match HAVEN.START.HERB [Crin's Herbal Shop, Salesroom]
        match HAVEN.START.TOG1 [City Togs, Sales Room]
        match HAVEN.START.TOG2 [City Togs, Storeroom]
        match HAVEN.START.IRON [Bantheld's Ironworks, Salesroom]
        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 *** Seli's Armory
        ECHO *** Bantheld's Ironworks
        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 437
        var storecode RHcloth
        put out
        GOTO START

    HAVEN.START.GEN:
        counter set 27
        var storecode RHgen
        put out
        GOTO START

    HAVEN.START.ARMS:
        counter set 34
        var storecode RHarms
        put out
        GOTO START

    HAVEN.START.FLOW:
        counter set 39
        var storecode RHflow
        put out
        GOTO START

    HAVEN.START.ART:
        counter set 46
        var storecode RHart
        put out
        GOTO START

    HAVEN.START.LOCK:
        counter set 47
        var storecode RHlock
        put out
        GOTO START

    HAVEN.START.SELI:
        counter set 53
        var storecode RHseli
        put out
        GOTO START

    HAVEN.START.JOY:
        counter set 426
        var storecode RHjoy
        put out
        GOTO START

    HAVEN.START.TOBAC:
        counter set 61
        var storecode RHtobac
        put out
        GOTO START

    HAVEN.START.MIRG:
        counter set 65
        var storecode RHmirg
        put out
        GOTO START

    HAVEN.START.WEAP:
        counter set 69
        var storecode RHweap
        put out
        GOTO START

    HAVEN.START.BARD1:
        counter set 78
        var storecode RHbard1
        put out
        GOTO START

    HAVEN.START.BARD2:
        counter set 428
        var storecode RHbard2
        put go curtain
        GOTO START

    HAVEN.START.CLER1:
        counter set 435
        var storecode RHcler1
        put out
        GOTO START

    HAVEN.START.CLER2:
        counter set 81
        var storecode RHcler2
        put go opening
        GOTO START

    HAVEN.START.NAP:
        counter set 87
        var storecode RHnap
        GOTO START

    HAVEN.START.HERB:
        counter set 94
        var storecode RHherb
        put out
        GOTO START

    HAVEN.START.TOG1:
        counter set 98
        var storecode RHtog1
        put go door
        GOTO START

    HAVEN.START.TOG2:
        counter set 413
        var storecode RHtog2
        put go curtain
        GOTO START

    HAVEN.START.IRON:
        counter set 108
        var storecode RHiron
        put o
        GOTO START

    HAVEN.START.BANK:
        counter set 1
      HAVEN.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.BARD1

    HAVEN.START.PIER:
        counter set 6
      HAVEN.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:
        counter set 11
      HAVEN.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.TOG1

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

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

    HAVEN.START.PAWN:
        counter set 419
      HAVEN.419:
        put out
        GOTO TRAVEL
      HAVEN.420:
        put go arms
        GOTO TRAVEL
      HAVEN.421:
        GOTO HAVEN.START.ARMS

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


    LEAVE.RHCLOTH:
        counter set 25
      HAVEN.25:
        put w
        GOTO TRAVEL
      HAVEN.26:
        put w
        GOTO TRAVEL
      HAVEN.27:
        var storecode RHgen
        var entrance store
        GOTO SETSTORE

    LEAVE.RHGEN:
        counter set 30
      HAVEN.30:
        put w
        GOTO TRAVEL
      HAVEN.31:
        put w
        GOTO TRAVEL
      HAVEN.32:
        put w
        GOTO TRAVEL
      HAVEN.33:
        put n
        GOTO TRAVEL
      HAVEN.34:
        var storecode RHarms
        var entrance arms
        GOTO SETSTORE

    LEAVE.RHARMS:
        GOTO %LorM.RHARMS.1
    LEAVE.RHARMS.1:
        counter set 37
      HAVEN.37:
        put n
        GOTO TRAVEL
      HAVEN.38:
        put n
        GOTO TRAVEL
      HAVEN.39:
        var storecode RHflow
        var entrance shop
        GOTO SETSTORE

    MOVEON.RHARMS.1:
        counter set 120
      HAVEN.120:
        put go pawn
        GOTO TRAVEL
      HAVEN.121:
        GOTO PAWN.%DropOrStow

    LEAVE.RHFLOW:
        counter set 42
      HAVEN.42:
        put n
        GOTO TRAVEL
      HAVEN.43:
        put se
        GOTO TRAVEL
      HAVEN.44:
        put se
        GOTO TRAVEL
      HAVEN.45:
        put se
        GOTO TRAVEL
      HAVEN.46:
        var storecode RHart
        var entrance art shop
        GOTO SETSTORE

    LEAVE.RHART:
      HAVEN.47:
        var storecode RHlock
        var entrance ord shop
        GOTO SETSTORE

    LEAVE.RHLOCK:
        counter set 50
      HAVEN.50:
        put se
        GOTO TRAVEL
      HAVEN.51:
        put se
        GOTO TRAVEL
      HAVEN.52:
        put s
        GOTO TRAVEL
      HAVEN.53:
        var storecode RHseli
        var entrance shop
        GOTO SETSTORE

    LEAVE.RHSELI:
        counter set 422
      HAVEN.422:
        put n
        GOTO TRAVEL
      HAVEN.423:
        put e
        GOTO TRAVEL
      HAVEN.424:
        put ne
        GOTO TRAVEL
      HAVEN.425:
        put e
        GOTO TRAVEL
      HAVEN.426:
        var storecode RHjoy
        var entrance door
        GOTO SETSTORE

    LEAVE.RHJOY:
        counter set 58
      HAVEN.58:
        put s
        GOTO TRAVEL
      HAVEN.59:
        put s
        GOTO TRAVEL
      HAVEN.60:
        var storecode RHtobac
        put kneel
        wait
    RHTOBAC.SHORT:
        put go shop
        match SHORTSTAND You must be standing
        GOTO TRAVEL
      HAVEN.61:
        var entrance shop
        GOTO SETSTORE

    ALTLEAVE.RHTOBAC:
        counter set 417
      HAVEN.417:
        put out
        GOTO TRAVEL
      HAVEN.418:
    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:
        counter set 63
      HAVEN.63:
        put w
        GOTO TRAVEL
      HAVEN.64:
        put w
        GOTO TRAVEL
      HAVEN.65:
        var storecode RHmirg
        var entrance shop
        GOTO SETSTORE

    LEAVE.RHMIRG:
        counter set 68
      HAVEN.68:
        put se
        GOTO TRAVEL
      HAVEN.69:
        var storecode RHweap
        var entrance shop
        GOTO SETSTORE

    LEAVE.RHWEAP:
        counter set 72
      HAVEN.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:
        put n
        GOTO TRAVEL
      HAVEN.78:
        var storecode RHbard1
        var entrance shop
        GOTO SETSTORE

    LEAVE.RHBARD1:
        counter set 427
      HAVEN.427:
        put go shop
        GOTO TRAVEL
      HAVEN.428:
        var storecode RHbard2
        var entrance curtain
        GOTO SETSTORE

    ALTLEAVE.RHBARD2:
        counter set 429
      HAVEN.429:
        put go curtain
        GOTO TRAVEL
      HAVEN.430:
    LEAVE.RHBARD2:
        counter set 431
      HAVEN.431:
        put o
        GOTO TRAVEL
      HAVEN.432:
        put n
        GOTO TRAVEL
      HAVEN.433:
        put n
        GOTO TRAVEL
      HAVEN.434:
        put n
        GOTO TRAVEL
      HAVEN.435:
        var storecode RHcler1
        var entrance shop
        GOTO SETSTORE

    LEAVE.RHCLER1:
        counter set 80
      HAVEN.80:
        put go shop
        GOTO TRAVEL
      HAVEN.81:
        var storecode RHcler2
        var entrance curtain
        GOTO SETSTORE

    ALTLEAVE.RHCLER2:
        counter set 82
      HAVEN.82:
        put go opening
        GOTO TRAVEL
      HAVEN.83:
    LEAVE.RHCLER2:
        counter set 84
      HAVEN.84:
        put o
        GOTO TRAVEL
      HAVEN.85:
        counter set 85
        put n
        GOTO TRAVEL
      HAVEN.86:
        put se
        GOTO TRAVEL
      HAVEN.87:
        var storecode RHnap
        var itemlocation on cart
        var entrance shop
        GOTO SETSTORE

    ALTLEAVE.RHNAP:
    LEAVE.RHNAP:
        counter set 90
      HAVEN.90:
        put se
        GOTO TRAVEL
      HAVEN.91:
        put se
        GOTO TRAVEL
      HAVEN.92:
        put se
        GOTO TRAVEL
      HAVEN.93:
        put se
        GOTO TRAVEL
      HAVEN.94:
        var storecode RHherb
        var entrance shop
        GOTO SETSTORE

    LEAVE.RHHERB:
        counter set 97
      HAVEN.97:
        put se
        GOTO TRAVEL
      HAVEN.98:
        var storecode RHtog1
        var entrance shop
        GOTO SETSTORE

    LEAVE.RHTOG1.1:
        counter set 410
      HAVEN.410:
        put go shop
        GOTO TRAVEL
      HAVEN.411:
    LEAVE.RHTOG1:
        counter set 412
      HAVEN.412:
        put go hall
        match LEAVE.RHTOG1.1 referring
        GOTO TRAVEL
      HAVEN.413:
    ALTLEAVE.RHTOG1:
        var storecode RHtog2
        var entrance hall
        GOTO SETSTORE

    ALTLEAVE.RHTOG2:
    LEAVE.RHTOG2:
        counter set 414
      HAVEN.414:
        put go hall
        GOTO TRAVEL
      HAVEN.415:
        put go door
        match LEAVE.RHTOG2 referring
        GOTO TRAVEL
      HAVEN.416:
        counter set 100
      HAVEN.100:
        put nw
        GOTO TRAVEL
      HAVEN.101:
        put nw
        GOTO TRAVEL
      HAVEN.102:
        put nw
        GOTO TRAVEL
      HAVEN.103:
        put nw
        GOTO TRAVEL
      HAVEN.104:
        put sw
        GOTO TRAVEL
      HAVEN.105:
        put sw
        GOTO TRAVEL
      HAVEN.106:
        put sw
        GOTO TRAVEL
      HAVEN.107:
        put nw
        GOTO TRAVEL
      HAVEN.108:
        var storecode RHiron
        var entrance shop
        GOTO SETSTORE

    LEAVE.RHIRON:
        counter set 109
      HAVEN.109:
        put se
        GOTO TRAVEL
      HAVEN.110:
        put sw
        GOTO TRAVEL
      HAVEN.111:
        put sw
        GOTO TRAVEL
      HAVEN.112:
        put sw
        GOTO TRAVEL
      HAVEN.113:
        put sw
        GOTO TRAVEL
      HAVEN.114:
        counter set 436
      HAVEN.436:
        put sw
        GOTO TRAVEL
      HAVEN.437:
        put w
        GOTO TRAVEL
      HAVEN.438:
        var storecode RHcloth
        var entrance shop
        GOTO SETSTORE


##################################################################
#####                                                        #####
#####          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:
        counter set 225
      HAVEN.225:
        put go door
        GOTO TRAVEL
    HAVEN.DEBT2:
        counter set 226
      HAVEN.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
        counter set 244
      HAVEN.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
        counter set 252
      HAVEN.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
        counter set 260
      HAVEN.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.277:
        GOTO GETSACK

    HAVEN.FREE:
        counter set 280
      HAVEN.280:
        put go door
        GOTO TRAVEL
      HAVEN.281:
        GOTO GETSACK

    HAVEN.FREE2:
        pause 1
        match HAVEN.MISSINGSTART waitandsee
        match HAVEN.FREE3 okstart
        put echo %startlocation
        put echo okstart
        GOTO UniversalMatch

    HAVEN.MISSINGSTART:
        var startlocation RHtog1
        var ResumeStore RHtog1
        GOTO HAVEN.FREE3

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

    RESUME.RHHERB:
        counter add 1
    RESUME.RHNAP:
        counter add 1
    RESUME.RHCLER2:
        counter add 1
    RESUME.RHCLER1:
        counter add 1
    RESUME.RHBARD2:
        counter add 1
    RESUME.RHBARD1:
        counter add 1
    RESUME.RHWEAP:
        counter add 1
    RESUME.RHMIRG:
        counter add 1
    RESUME.RHTOBAC:
        counter add 1
    RESUME.RHJOY:
        counter add 1
    RESUME.RHSELI:
        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.RHIRON:
        counter add 1
    RESUME.RHTOG2:
        counter add 1
    RESUME.RHTOG1:
        counter add 1
        var Countdown %c
        GOTO RESUME


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


    HAVEN.PAWNFINISH.NONTHIEF:
    HAVEN.PAWNFINISH.EMPATH:
        counter set 439
      HAVEN.439:
        put out
        GOTO TRAVEL
      HAVEN.440:
        put s
        GOTO TRAVEL
      HAVEN.441:
        put e
        GOTO TRAVEL
      HAVEN.442:
        put e
        GOTO TRAVEL
      HAVEN.443:
        put e
        GOTO TRAVEL
      HAVEN.444:
        put go store
        GOTO TRAVEL
      HAVEN.445:
        var BinOrBucket basket
        GOTO PAWN.BIN

    HAVEN.BINFINISH.NONTHIEF:
    HAVEN.BINFINISH.EMPATH:
        counter set 446
      HAVEN.446:
        put out
        GOTO TRAVEL
      HAVEN.447:
        put w
        GOTO TRAVEL
      HAVEN.448:
        put w
        GOTO TRAVEL
      HAVEN.449:
        put w
        GOTO TRAVEL
      HAVEN.450:
        put n
        GOTO TRAVEL
      HAVEN.451:
        put go pawn
        GOTO TRAVEL
      HAVEN.452:
        GOTO END

    HAVEN.PAWNFINISH.THIEF:
        var havenguild rook
    HAVEN.CONTACT.FALSE:
      HAVEN.GUILDFIND1:
        var knockdoor door
        var contact false
        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.TEST.%havenguild You glance
        put contact guild
        put glance
        GOTO UniversalMatch

    HAVEN.TEST.GUILDPAWN:
        GOTO HAVEN.ARTIFICER
    HAVEN.TEST.ARTIFICER:
        GOTO HAVEN.HALFLING
    HAVEN.TEST.HALFLING:
        GOTO HAVEN.COOP
    HAVEN.TEST.COOP:
        GOTO HAVEN.CRESCENT
    HAVEN.TEST.CRESCENT:
        GOTO HAVEN.ROOK
    HAVEN.TEST.ROOK:
        GOTO HAVEN.GUILDPAWN

    HAVEN.CONTACT.TRUE:
        GOTO END

    HAVEN.SEARCH:
        put search
        match HAVEN.KNOCK Success!
        match HAVEN.SEARCH Roundtime
        GOTO UniversalMatch

    HAVEN.KNOCK:
        pause 1
        put knock %knockdoor
        waitfor You knock
        put whisper %riverpass
        wait
        GOTO HAVEN.%havenguild.ENTER

    HAVEN.ARTIFICER:
        var havenguild artificer
        GOTO HAVEN.GUILDFIND2
    HAVEN.HALFLING:
        var havenguild halfling
        var knockdoor grat
        GOTO HAVEN.GUILDFIND2
    HAVEN.COOP:
        var havenguild coop
        GOTO HAVEN.GUILDFIND2
    HAVEN.CRESCENT:
        var havenguild crescent
        GOTO HAVEN.GUILDFIND2
    HAVEN.ROOK:
        var havenguild rook
        GOTO HAVEN.GUILDFIND2

    HAVEN.GUILDPAWN:
        var havenguild guildpawn
        counter set 300
      HAVEN.300:
        put out
        GOTO TRAVEL
      HAVEN.301:
        GOTO HAVEN.SEARCH
    HAVEN.GUILDPAWN.ENTER:
        counter set 302
      HAVEN.302:
        put climb stair
        GOTO TRAVEL
      HAVEN.303:
        put ne
        GOTO TRAVEL
      HAVEN.304:
        put go corner
        match PAWN.BIN thief Crow
        GOTO TRAVEL
      HAVEN.305:
        GOTO %havenguild.RHLEAVE

    HAVEN.GUILDFIND2:
        counter set 306
      HAVEN.306:
        put out
        GOTO TRAVEL
      HAVEN.307:
        put n
        GOTO TRAVEL
      HAVEN.308:
        put n
        GOTO TRAVEL
      HAVEN.309:
        put n
        GOTO TRAVEL
      HAVEN.310:
        put se
        GOTO TRAVEL
      HAVEN.311:
        put se
        GOTO TRAVEL
      HAVEN.312:
        put se
        GOTO TRAVEL
      HAVEN.313:
        GOTO HAVEN.%havenguild.2

    HAVEN.ARTIFICER.2:
        GOTO HAVEN.SEARCH
    HAVEN.ARTIFICER.ENTER:
        counter set 314
      HAVEN.314:
        put look floor
        wait
        put go door
        GOTO TRAVEL
      HAVEN.315:
        put go corner
        match PAWN.BIN thief Crow
        GOTO TRAVEL
      HAVEN.316:
        GOTO %havenguild.RHLEAVE

    HAVEN.HALFLING.2:
    HAVEN.COOP.2:
    HAVEN.CRESCENT.2:
    HAVEN.ROOK.2:
        counter set 317
      HAVEN.317:
        put se
        GOTO TRAVEL
      HAVEN.318:
        put se
        GOTO TRAVEL
      HAVEN.319:
        GOTO HAVEN.%havenguild.3

    HAVEN.HALFLING.3:
        counter set 320
      HAVEN.320:
        put e
        GOTO TRAVEL
      HAVEN.321:
        put ne
        GOTO TRAVEL
      HAVEN.322:
        put look door
        wait
        put go footpath
        GOTO TRAVEL
      HAVEN.323:
        GOTO HAVEN.SEARCH
    HAVEN.HALFLING.ENTER:
        counter set 324
      HAVEN.324:
        put go door
        GOTO TRAVEL
      HAVEN.325:
        put ne
        GOTO TRAVEL
      HAVEN.326:
        put go nook
        match PAWN.BIN thief Crow
        GOTO TRAVEL
      HAVEN.327:
        GOTO %havenguild.RHLEAVE

    HAVEN.COOP.3:
        counter set 328
      HAVEN.328:
        put se
        GOTO TRAVEL
      HAVEN.329:
        put e
        GOTO TRAVEL
      HAVEN.330:
        GOTO HAVEN.SEARCH
    HAVEN.COOP.ENTER:
        counter set 331
      HAVEN.331:
        put n
        GOTO TRAVEL
      HAVEN.332:
        put go corner
        match PAWN.BIN thief Crow
        GOTO TRAVEL
      HAVEN.333:
        GOTO %havenguild.RHLEAVE

    HAVEN.CRESCENT.3:
        counter set 334
      HAVEN.334:
        put s
        GOTO TRAVEL
      HAVEN.335:
        GOTO HAVEN.SEARCH
    HAVEN.CRESCENT.ENTER:
        counter set 336
      HAVEN.336:
        put sear shadow
        wait
        put go open
        GOTO TRAVEL
      HAVEN.337:
        put go corner
        match PAWN.BIN thief Crow
        GOTO TRAVEL
      HAVEN.338:
        GOTO %havenguild.RHLEAVE

    HAVEN.ROOK.3:
        counter set 339
      HAVEN.339:
        put se
        GOTO TRAVEL
      HAVEN.340:
        put se
        GOTO TRAVEL
      HAVEN.341:
        put se
        GOTO TRAVEL
      HAVEN.342:
        put ne
        GOTO TRAVEL
      HAVEN.343:
        put ne
        GOTO TRAVEL
      HAVEN.344:
        put ne
        GOTO TRAVEL
      HAVEN.345:
        put ne
        GOTO TRAVEL
      HAVEN.346:
        put ne
        GOTO TRAVEL
      HAVEN.347:
        put go alley
        GOTO TRAVEL
      HAVEN.348:
        put s
        GOTO TRAVEL
      HAVEN.349:
        put s
        GOTO TRAVEL
      HAVEN.350:
        put go reces
        GOTO TRAVEL
      HAVEN.351:
        GOTO HAVEN.SEARCH
    HAVEN.ROOK.ENTER:
        counter set 352
      HAVEN.352:
        put go arch
        GOTO TRAVEL
      HAVEN.353:
        put clim stai
        GOTO TRAVEL
      HAVEN.354:
        put go corner
        match PAWN.BIN thief Crow
        GOTO TRAVEL
      HAVEN.355:
        GOTO %havenguild.RHLEAVE


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


    HAVEN.BINFINISH.THIEF:
       GOTO %havenguild.RHLEAVE

    GUILDPAWN.RHLEAVE:
        counter set 356
      HAVEN.356:
        put out
        GOTO TRAVEL
      HAVEN.357:
        put sw
        GOTO TRAVEL
      HAVEN.358:
        put clim stair
        GOTO TRAVEL
      HAVEN.359:
        put go door
        GOTO TRAVEL
      HAVEN.360:
        put go pawn
        GOTO TRAVEL
      HAVEN.361:
        GOTO HAVEN.CONTACT.%contactguild

    HALFING.RHLEAVE:
        counter set 362
      HAVEN.362:
        put out
        GOTO TRAVEL
      HAVEN.363:
        put sw
        GOTO TRAVEL
      HAVEN.364:
        put go door
        GOTO TRAVEL
      HAVEN.365:
        put go grat
        GOTO TRAVEL
      HAVEN.366:
        put sw
        GOTO TRAVEL
      HAVEN.367:
        put w
        GOTO TRAVEL
      HAVEN.368:
        GOTO RHINTERSECTION2

    COOP.RHLEAVE:
        counter set 369
      HAVEN.369:
        put out
        GOTO TRAVEL
      HAVEN.370:
        put s
        GOTO TRAVEL
      HAVEN.371:
        put go door
        GOTO TRAVEL
      HAVEN.372:
        put w
        GOTO TRAVEL
      HAVEN.373:
        put nw
        GOTO TRAVEL
      HAVEN.374:
        GOTO RHINTERSECTION2

    CRESCENT.RHLEAVE:
        counter set 375
      HAVEN.375:
        put out
        GOTO TRAVEL
      HAVEN.376:
        put out
        GOTO TRAVEL
      HAVEN.377:
        put go door
        GOTO TRAVEL
      HAVEN.378:
        put n
        GOTO TRAVEL
      HAVEN.379:
        GOTO RHINTERSECTION2

    ROOK.RHLEAVE:
        counter set 380
      HAVEN.380:
        put out
        GOTO TRAVEL
      HAVEN.381:
        put climb stair
        GOTO TRAVEL
      HAVEN.382:
        put go arch
        GOTO TRAVEL
      HAVEN.383:
        put go door
        GOTO TRAVEL
      HAVEN.384:
        put go reces
        GOTO TRAVEL
      HAVEN.385:
        put n
        GOTO TRAVEL
      HAVEN.386:
        put n
        GOTO TRAVEL
      HAVEN.387:
        put sw
        GOTO TRAVEL
      HAVEN.388:
        put sw
        GOTO TRAVEL
      HAVEN.389:
        put sw
        GOTO TRAVEL
      HAVEN.390:
        put sw
        GOTO TRAVEL
      HAVEN.391:
        put sw
        GOTO TRAVEL
      HAVEN.392:
        put nw
        GOTO TRAVEL
      HAVEN.393:
        put nw
        GOTO TRAVEL
      HAVEN.394:
        put nw
        GOTO TRAVEL
      HAVEN.395:
        GOTO RHINTERSECTION2

    RHINTERSECTION2:
        counter set 396
      HAVEN.396:
        put nw
        GOTO TRAVEL
      HAVEN.397:
        put nw
        GOTO TRAVEL
      HAVEN.398:
        GOTO ARTIFICER2.RHLEAVE

    ARTIFICER.RHLEAVE:
        counter set 399
      HAVEN.399:
        put out
        GOTO TRAVEL
      HAVEN.400:
        put climb door
        GOTO TRAVEL
    ARTIFICER2.RHLEAVE:
        counter set 401
      HAVEN.401:
        put nw
        GOTO TRAVEL
      HAVEN.402:
        put nw
        GOTO TRAVEL
      HAVEN.403:
        put nw
        GOTO TRAVEL
      HAVEN.404:
        put s
        GOTO TRAVEL
      HAVEN.405:
        put s
        GOTO TRAVEL
      HAVEN.406:
        put s
        GOTO TRAVEL
      HAVEN.407:
        put go pawn
        GOTO TRAVEL
      HAVEN.408:
        GOTO HAVEN.CONTACT.%contactguild


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


     QIR.RANK.1:
        var skillrange 20-39
        var Rbait worms
        var RbaitQuant 2
        var Rchan rope
        var RchanQuant 1
        var Rherb water
        var RherbQuant 2
        var Rforge <nothing>
        var RforgeQuant 1
        var Rbard pick
        var RbardQuant 1
        var Rhair unguent
        var RhairQuant 1
        var Rleather <nothing>
        var RleatherQuant 1
        var Rtailor stockings
        var RtailorQuant 1
        var Rgami <nothing>
        var RgamiQuant 1
        var Rmagik <nothing>
        var RmagikQuant 1
        var Rjewel <nothing>
        var RjewelQuant 1
        var Rthea <nothing>
        var RtheaQuant 1
        var Rcleric lavender
        var RclericQuant 1
        var Rexot <nothing>
        var RexotQuant 1
        var Atann <nothing>
        var AtannQuant 1
        var Aalch water
        var AalchQuant 2
        var Acloth <nothing>
        var AclothQuant 1
        var Ascript <nothing>
        var AscriptQuant 1
        var Acleric lanahh pao
        var AclericQuant 1
        var Agami <nothing>
        var AgamiQuant 1
        var Agem <nothing>
        var AgemQuant 1
        var Amagic <nothing>
        var AmagicQuant 1
        var Asling flights
        var AslingQuant 1
        var Apuzz <nothing>
        var ApuzzQuant 1
        var Afoot <nothing>
        var AfootQuant 1
        var Ashield <nothing>
        var AshieldQuant 1
        var Aweap <nothing>
        var AweapQuant 1
        var Aforge <nothing>
        var AforgeQuant 1
        var Agen charcoal
        var AgenQuant 1
        var Aflow <nothing>
        var AflowQuant 1
        var Abard pick
        var AbardQuant 1
        GOTO RANKREPORT

    QIR.RANK.2:
        var skillrange 40-59
        var Rbait cheese
        var RbaitQuant 2
        var Rchan biscuit
        var RchanQuant 2
        var Rherb alcohol
        var RherbQuant 2
        var Rforge <nothing>
        var RforgeQuant 2
        var Rbard rag
        var RbardQuant 2
        var Rhair unguent
        var RhairQuant 2
        var Rleather <nothing>
        var RleatherQuant 2
        var Rtailor stockings
        var RtailorQuant 2
        var Rgami <nothing>
        var RgamiQuant 2
        var Rmagik <nothing>
        var RmagikQuant 2
        var Rjewel <nothing>
        var RjewelQuant 2
        var Rthea <nothing>
        var RtheaQuant 2
        var Rcleric plume feather
        var RclericQuant 2
        var Rexot <nothing>
        var RexotQuant 2
        var Atann <nothing>
        var AtannQuant 2
        var Aalch stick
        var AalchQuant 2
        var Acloth <nothing>
        var AclothQuant 2
        var Ascript <nothing>
        var AscriptQuant 2
        var Acleric sage
        var AclericQuant 2
        var Agami <nothing>
        var AgamiQuant 2
        var Agem <nothing>
        var AgemQuant 2
        var Amagic <nothing>
        var AmagicQuant 2
        var Asling fishtail arrowhead
        var AslingQuant 2
        var Apuzz beanbags
        var ApuzzQuant 1
        var Afoot socks
        var AfootQuant 1
        var Ashield <nothing>
        var AshieldQuant 2
        var Aweap <nothing>
        var AweapQuant 2
        var Aforge <nothing>
        var AforgeQuant 2
        var Agen flint
        var AgenQuant 2
        var Aflow <nothing>
        var AflowQuant 2
        var Abard pick
        var AbardQuant 2
        GOTO RANKREPORT

    QIR.RANK.3:
        var skillrange 60-99
        var Rbait pole
        var RbaitQuant 1
        var Rchan lobscouse stew
        var RchanQuant 2
        var Rherb pestle
        var RherbQuant 2
        var Rforge <nothing>
        var RforgeQuant 2
        var Rbard cloth
        var RbardQuant 2
        var Rhair hairbrush
        var RhairQuant 2
        var Rleather <nothing>
        var RleatherQuant 2
        var Rtailor shirt
        var RtailorQuant 2
        var Rgami <nothing>
        var RgamiQuant 2
        var Rmagik <nothing>
        var RmagikQuant 2
        var Rjewel ear-frill
        var Rjewel chain
        var RjewelQuant 2
        var Rthea <nothing>
        var RtheaQuant 2
        var Rcleric wine
        var RclericP plume feather
        var RclericQuant 2
        var Rexot <nothing>
        var RexotQuant 2
        var Atann thread
        var AtannQuant 1
        var Aalch pestle
        var AalchQuant 1
        var Acloth britches
        var AclothQuant 1
        var Ascript <nothing>
        var AscriptQuant 2
        var Acleric incense
        var AclericQuant 2
        var Agami <nothing>
        var AgamiQuant 2
        var Agem <nothing>
        var AgemQuant 2
        var Amagic <nothing>
        var AmagicQuant 2
        var Asling shaper
        var AslingQuant 1
        var Apuzz beanbags
        var ApuzzQuant 2
        var Afoot socks
        var AfootQuant 2
        var Ashield <nothing>
        var AshieldQuant 2
        var Aweap <nothing>
        var AweapQuant 2
        var Aforge <nothing>
        var AforgeQuant 2
        var Agen trowel
        var AgenQuant 2
        var Aflow <nothing>
        var AflowQuant 1
        var Abard rag
        var AbardQuant 2
        GOTO RANKREPORT

    QIR.RANK.4:
        var skillrange 100-149
        var Rbait pole
        var RbaitQuant 1
        var Rchan polish
        var RchanQuant 2
        var Rherb large jar
        var RherbQuant 2
        var Rforge dagger
        var RforgeQuant 2
        var Rbard tambourine
        var RbardQuant 2
        var Rhair clippers
        var RhairP razor
        var RhairQuant 2
        var Rleather <nothing>
        var RleatherQuant 2
        var Rtailor sash
        var RtailorQuant 2
        var Rgami plain paper
        var RgamiQuant 1
        var Rmagik <nothing>
        var RmagikQuant 2
        var Rjewel bangle
        var RjewelQuant 2
        var Rthea <nothing>
        var RtheaQuant 2
        var Rcleric candle
        var RclericP vial
        var RclericQuant 2
        var Rexot <nothing>
        var RexotQuant 2
        var Atann thread
        var AtannQuant 2
        var Aalch pestle
        var AalchQuant 2
        var Acloth britches
        var AclothQuant 2
        var Ascript trimmed scroll
        var AscriptQuant 1
        var Acleric candle
        var AclericQuant 2
        var Agami <nothing>
        var AgamiQuant 2
        var Agem <nothing>
        var AgemQuant 2
        var Amagic <nothing>
        var AmagicQuant 2
        var Asling shaper
        var AslingP canvas sling
        var AslingQuant 2
        var Apuzz basic puzzle
        var ApuzzQuant 2
        var Afoot pouch
        var AfootQuant 2
        var Ashield <nothing>
        var AshieldQuant 2
        var Aweap <nothing>
        var AweapQuant 2
        var Aforge <nothing>
        var AforgeQuant 2
        var Agen tinderbox
        var AgenQuant 2
        var Aflow wristlet
        var AflowQuant 2
        var Abard cloth
        var AbardQuant 2
        GOTO RANKREPORT

    QIR.RANK.5:
        var skillrange 150-199
        var Rbait pole
        var RbaitQuant 2
        var Rchan breaker
        var RchanQuant 2
        var Rherb cebi root
        var RherbQuant 2
        var Rforge dagger
        var RforgeQuant 2
        var Rbard flute
        var RbardQuant 2
        var Rhair clippers
        var RhairQuant 2
        var Rleather <nothing>
        var RleatherQuant 2
        var Rtailor tunic
        var RtailorQuant 2
        var Rgami plain paper
        var RgamiQuant 2
        var Rmagik <nothing>
        var RmagikQuant 2
        var Rjewel clasp
        var RjewelQuant 2
        var Rthea <nothing>
        var RtheaQuant 2
        var Rcleric vial
        var RclericQuant 2
        var Rexot <nothing>
        var RexotQuant 2
        var Atann bodkin
        var AtannQuant 2
        var Aalch cebi root
        var AalchQuant 2
        var Acloth tunic
        var AclothQuant 2
        var Ascript trimmed scroll
        var AscriptQuant 2
        var Acleric wine
        var AclericQuant 2
        var Agami plain paper
        var AgamiQuant 1
        var Agem <nothing>
        var AgemQuant 2
        var Amagic <nothing>
        var AmagicQuant 2
        var Asling small rocks
        var AslingP leather sling
        var AslingQuant 1
        var Apuzz intermediate puzzle
        var ApuzzQuant 2
        var Afoot woolen tights
        var AfootQuant 2
        var Ashield <nothing>
        var AshieldQuant 2
        var Aweap <nothing>
        var AweapQuant 2
        var Aforge <nothing>
        var AforgeQuant 2
        var Agen razor
        var AgenQuant 2
        var Aflow necklace
        var AflowQuant 2
        var Abard bow
        var AbardQuant 2
        GOTO RANKREPORT

    QIR.RANK.6:
        var skillrange 200-249
        var Rbait pole
        var RbaitQuant 2
        var Rchan strap
        var RchanQuant 2
        var Rherb riolur leaf
        var RherbQuant 2
        var Rforge sap
        var RforgeQuant 2
        var Rbard six strings
        var RbardQuant 2
        var Rhair <nothing>
        var RhairQuant 2
        var Rleather gauntlets
        var RleatherQuant 1
        var Rtailor trousers
        var RtailorQuant 2
        var Rgami white paper
        var RgamiQuant 2
        var Rmagik simple talisman
        var RmagikQuant 1
        var Rjewel silver chain
        var RjewelQuant 2
        var Rthea <nothing>
        var RtheaQuant 2
        var Rcleric censer
        var RclericQuant 2
        var Rexot <nothing>
        var RexotQuant 2
        var Atann scraper
        var AtannQuant 2
        var Aalch nemoih root
        var AalchQuant 2
        var Acloth shirt
        var AclothQuant 2
        var Ascript painted scroll
        var AscriptQuant 2
        var Acleric sandals
        var AclericQuant 2
        var Agami plain paper
        var AgamiQuant 2
        var Agem bracelet
        var AgemQuant 2
        var Amagic <nothing>
        var AmagicQuant 2
        var Asling small rocks
        var AslingQuant 2
        var Apuzz bunny
        var ApuzzQuant 2
        var Afoot lace stockings
        var AfootQuant 2
        var Ashield <nothing>
        var AshieldQuant 2
        var Aweap <nothing>
        var AweapQuant 2
        var Aforge <nothing>
        var AforgeQuant 2
        var Agen pruning knife
        var AgenQuant 2
        var Aflow circlet
        var AflowQuant 2
        var Abard four strings
        var AbardQuant 2
        GOTO RANKREPORT

    QIR.RANK.7:
        var skillrange 250-299
        var Rbait pole
        var RbaitQuant 3
        var Rchan ditty bag
        var RchanQuant 2
        var Rherb ithor potion
        var RherbQuant 2
        var Rforge sap
        var RforgeQuant 2
        var Rbard refill
        var RbardQuant 2
        var Rhair <nothing>
        var RhairQuant 2
        var Rleather gauntlets
        var RleatherQuant 2
        var Rtailor vest
        var RtailorQuant 2
        var Rgami blue paper
        var RgamiQuant 2
        var Rmagik simple talisman
        var RmagikQuant 2
        var Rjewel collar
        var RjewelQuant 1
        var Rthea <nothing>
        var RtheaQuant 2
        var Rcleric censer
        var RclericQuant 2
        var Rexot <nothing>
        var RexotQuant 2
        var Atann shears
        var AtannQuant 2
        var Aalch ithor potion
        var AalchQuant 2
        var Acloth trousers
        var AclothQuant 2
        var Ascript canvas scroll
        var AscriptQuant 1
        var Acleric armband
        var AclericQuant 1
        var Agami white paper
        var AgamiQuant 2
        var Agem earcuff
        var AgemQuant 2
        var Amagic marble
        var AmagicQuant 2
        var Asling canvas sling
        var AslingQuant 2
        var Apuzz wand
        var ApuzzQuant 2
        var Afoot lace stockings
        var AfootQuant 2
        var Ashield <nothing>
        var AshieldQuant 2
        var Aweap telek
        var AweapQuant 2
        var Aforge <nothing>
        var AforgeQuant 2
        var Agen mirror
        var AgenQuant 2
        var Aflow wreath
        var AflowQuant 2
        var Abard seven strings
        var AbardQuant 2
        GOTO RANKREPORT

    QIR.RANK.11:
    QIR.RANK.12:
    QIR.RANK.13:
    QIR.RANK.14:
    QIR.RANK.15:
        ECHO ***********************************************
        ECHO ***        Sorry, but there isn't anything harder yet!
        ECHO ***********************************************
    QIR.RANK.10:
    QIR.RANK.9:
    QIR.RANK.8:
        var skillrange 300+
        var Rbait pole
        var RbaitQuant 3
        var Rchan sailcloth quiver
        var RchanQuant 2
        var Rherb tincture jar
        var RherbQuant 2
        var Rforge sap
        var RforgeQuant 2
        var Rbard lyre
        var RbardQuant 2
        var Rhair <nothing>
        var RhairQuant 2
        var Rleather gauntlets
        var RleatherQuant 2
        var Rtailor kilt
        var RtailorQuant 2
        var Rgami bird instructions
        var RgamiQuant 2
        var Rmagik cambrinth ring
        var RmagikQuant 1
        var Rjewel collar
        var RjewelQuant 2
        var Rthea <nothing>
        var RtheaQuant 2
        var Rcleric oil
        var RclericQuant 2
        var Rexot <nothing>
        var RexotQuant 2
        var Atann potion
        var AtannQuant 2
        var Aalch seolarn weed
        var AalchQuant 2
        var Acloth doublet
        var AclothQuant 2
        var Ascript canvas scroll
        var AscriptQuant 2
        var Acleric armband
        var AclericQuant 2
        var Agami blue paper
        var AgamiQuant 2
        var Agem haedor
        var AgemQuant 2
        var Amagic cube
        var AmagicQuant 2
        var Asling needle arrows
        var AslingQuant 2
        var Apuzz rings
        var ApuzzQuant 2
        var Afoot spidersilk stockings
        var AfootQuant 2
        var Ashield <nothing>
        var AshieldQuant 2
        var Aweap garz
        var AweapQuant 2
        var Aforge chausses
        var AforgeQuant 2
        var Agen lantern
        var AgenQuant 2
        var Aflow pillow
        var AflowQuant 2
        var Abard drum pouch
        var AbardQuant 2
        GOTO RANKREPORT

    QIR.RANK.-5:
    QIR.RANK.-4:
    QIR.RANK.-3:
    QIR.RANK.-2:
    QIR.RANK.-1:
    QIR.RANK.0:
        GOTO BEGGAR.MOD

    QIR.BAGCHECK:
        matchre BAGWARN /%Rbait|%Rchan|%Rherb|%Rforge|%Rbard|%Rhair|%Rthea%/
        matchre BAGWARN /%Rleather|%Rtailor|%Rgami|%Rmagik|%Rjewel|%Rcleric|%Rexot%/
        matchre BAGWARN /%Atann|%Aalch|%Acloth|%Ascript|%Acleric|%Agami|%Agem|%Agen|%Aflow%/
        matchre BAGWARN /%Amagic|%Asling|%Apuzz|%Afoot|%Ashield|%Aweap|%Aforge|%Abard%/
        match BAGS.STOW.%c You glance
        put look in my %container
        put glance
        GOTO UniversalMatch


##################################################################
#####                                                        #####
#####                  RATHA 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
        var citycode ratha
        put look
        GOTO UniversalMatch

    QIR.BADLOCATION:
        put echocolumn /on
        waitfor EchoColumn
        ECHO ***********************************************
        ECHO *** Not a valid starting location.
        ECHO *** Starting locations in Qi'Reshalia are:
        ECHO ***
        ECHO *** Ratha Bank Atrium        Aesry Outside Bank
        ECHO *** Outside Ratha sewers     Aesry West Gate
        ECHO *** Truffenyi's Green        Aesry Pawn Shop
        ECHO *** Ratha Pawn Shop          Aesry Tannery
        ECHO *** Ratha Bait Shop          Aesry Herb & Alchemist
        ECHO *** Ratha Chandlery          Aesry Clothing Shop
        ECHO *** Ratha Herb & Alchemist   Aesry Scriptorium
        ECHO *** Ratha Forge              Aesry Cleric Shop
        ECHO *** Ratha Bard Shop          Aesry Origami Boutique
        ECHO *** Ratha Hair Care          Aesry Jewelry Shop
        ECHO *** Ratha Leatherwork        Aesry Magic Shop
        ECHO *** Ratha Tailor             Aesry Slings and Arrows
        ECHO *** Ratha Origami Shop       Aesry General Store
        ECHO *** Ratha Magik Shop         Aesry Flower Shop
        ECHO *** Ratha Jewelry Shop       Aesry Instrument Shop
        ECHO *** Ratha Cleric Shop        Aesry Martrem's Forge
        ECHO *** Ratha Exotics Shop       Aesry Kilora's Weaponry
        ECHO *** Ratha Theater            Aesry Field of Shields
        ECHO ***    Rehearsal Hall        Aesry Footwear (Cordwainer's)
        ECHO ***                          Aesry Puzzle Shop
        ECHO ***
        ECHO ***********************************************
        put echocolumn /off
        waitfor EchoColumn
        GOTO END

    RATHA.START.GREEN:
        var upperlower upper
        counter set 540
      RATHA.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:
        var upperlower upper
        counter set 545
      RATHA.545:
        put go grat
        GOTO TRAVEL
      RATHA.546:
        var 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:
        counter set 551
      RATHA.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:
        var upperlower lower
        counter set 557
      RATHA.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:
        var upperlower lower
        counter set 564
      RATHA.564:
        put go drain
        GOTO TRAVEL
      RATHA.565:
        put go open
        GOTO TRAVEL

    RATHA.START.BANK:
        var upperlower lower
        counter set 567
      RATHA.567:
        put go door
        GOTO TRAVEL
      RATHA.568:
        put climb stair
        GOTO TRAVEL
      RATHA.569:
        put sw
        GOTO TRAVEL
      RATHA.563:
        counter set 570
      RATHA.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:
        var storecode Rbait
        put w
        GOTO TRAVEL
      RATHA.576:
      RATHA.594:
        var startlocation %storecode
      RATHA.538:
        var entrance shop
        GOTO SETSTORE

    RATHA.START.PAWN:
        var 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:
        var storecode Rbait
        put ne
        GOTO TRAVEL

    RATHA.START.BAIT:
        counter set 576
        var upperlower lower
        var storecode Rbait
        put out
        GOTO START

    RATHA.START.CHAN:
        counter set 10
        var upperlower lower
        var storecode Rchan
        put out
        GOTO START

    RATHA.START.HERB:
        counter set 26
        var upperlower lower
        var storecode Rherb
        put out
        GOTO START

    RATHA.START.FORGE:
        counter set 46
        var upperlower lower
        var storecode Rforge
        put out
        GOTO START

    RATHA.START.BARD:
        counter set 70
        var upperlower lower
        var storecode Rbard
        put out
        GOTO START

    RATHA.START.HAIR:
        counter set 77
        var upperlower lower
        var storecode Rhair
        put out
        GOTO START

    RATHA.START.LEATHER:
        counter set 82
        var upperlower lower
        var storecode Rleather
        put out
        GOTO START

    RATHA.START.TAILOR:
        counter set 91
        var upperlower lower
        var storecode Rtailor
        put out
        GOTO START

    RATHA.START.GAMI:
        counter set 104
        var upperlower upper
        var storecode Rgami
        put out
        GOTO START

    RATHA.START.MAGIK:
        counter set 111
        var upperlower upper
        var storecode Rmagik
        put out
        GOTO START

    RATHA.START.JEWEL:
        counter set 119
        var upperlower upper
        var storecode Rjewel
        put out
        GOTO START

    RATHA.START.THEA:
        counter set 123
        var upperlower upper
        var storecode Rthea
        put go arch
        GOTO START

    RATHA.START.EXOT:
        counter set 336
        var upperlower upper
        var storecode Rexot
        put out
        GOTO START

    RATHA.START.CLERIC:
        counter set 340
        var upperlower upper
        var storecode Rcleric
        put out
        GOTO START

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


    LEAVE.RBAIT:
        GOTO %LorM.RBAIT.1
    LEAVE.RBAIT.1:
        counter set 1
      RATHA.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:
        put n
        GOTO TRAVEL
      RATHA.10:
        var storecode Rchan
        var entrance shop
        GOTO SETSTORE

    LEAVE.RCHAN:
        counter set 12
      RATHA.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:
        put sw
        GOTO TRAVEL
      RATHA.26:
        var storecode Rherb
        var entrance shop
        GOTO SETSTORE

    LEAVE.RHERB:
        counter set 27
      RATHA.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:
        put se
        GOTO TRAVEL
      RATHA.46:
        var storecode Rforge
        var entrance forge
        GOTO SETSTORE

    LEAVE.RFORGE:
        counter set 47
      RATHA.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:
        put s
        GOTO TRAVEL
      RATHA.70:
        var storecode Rbard
        var entrance shop
        GOTO SETSTORE

    LEAVE.RBARD:
        counter set 71
      RATHA.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:
        put e
        GOTO TRAVEL
      RATHA.77:
        var storecode Rhair
        var entrance shop
        GOTO SETSTORE

    LEAVE.RHAIR:
        counter set 78
      RATHA.78:
        put e
        GOTO TRAVEL
      RATHA.79:
        put s
        GOTO TRAVEL
      RATHA.80:
        put se
        GOTO TRAVEL
      RATHA.81:
        put e
        GOTO TRAVEL
      RATHA.82:
        var storecode Rleather
        var entrance shop
        GOTO SETSTORE

    LEAVE.RLEATHER:
        counter set 83
      RATHA.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:
        put e
        GOTO TRAVEL
      RATHA.91:
        var storecode Rtailor
        var entrance shop
        GOTO SETSTORE

    LEAVE.RTAILOR:
        counter set 92
      RATHA.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
        var upperlower upper
        GOTO TRAVEL
      RATHA.103:
        put sw
        GOTO TRAVEL
      RATHA.104:
        var storecode Rgami
        var entrance struct
        GOTO SETSTORE

    LEAVE.RGAMI:
        counter set 105
      RATHA.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:
        put n
        GOTO TRAVEL
      RATHA.111:
        var storecode Rmagik
        var entrance shop
        GOTO SETSTORE

    LEAVE.RMAGIK:
        counter set 112
      RATHA.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:
        put ne
        GOTO TRAVEL
      RATHA.119:
        var storecode Rjewel
        var entrance shop
        GOTO SETSTORE

    LEAVE.RJEWEL:
        counter set 120
      RATHA.120:
        put e
        GOTO TRAVEL
      RATHA.121:
        put go building
        GOTO TRAVEL
      RATHA.122:
        put w
        GOTO TRAVEL
      RATHA.123:
        var storecode Rthea
        var entrance arch
        GOTO SETSTORE

    LEAVE.RTHEA:
        counter set 328
      RATHA.328:
        put e
        GOTO TRAVEL
      RATHA.329:
        put out
        GOTO TRAVEL
      RATHA.330:
        put w
        GOTO TRAVEL
      RATHA.331:
        put sw
        GOTO TRAVEL
      RATHA.332:
        put se
        GOTO TRAVEL
      RATHA.333:
        put e
        GOTO TRAVEL
      RATHA.334:
        put e
        GOTO TRAVEL
      RATHA.335:
        var storecode Rexot
        put e
        GOTO TRAVEL
      RATHA.336:
        var entrance shop
        GOTO SETSTORE

    LEAVE.REXOT:
        counter set 337
      RATHA.337:
        put w
        GOTO TRAVEL
      RATHA.338:
        put w
        GOTO TRAVEL
      RATHA.339:
        put s
        GOTO TRAVEL
      RATHA.340:
        var storecode Rcleric
        var entrance shop
        GOTO SETSTORE

    LEAVE.RCLERIC:
        counter set 125
      RATHA.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
        var 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:
        counter set 535
      RATHA.535:
        put w
        GOTO TRAVEL
      RATHA.536:
        put nw
        GOTO TRAVEL
      RATHA.537:
        var storecode Rbait
        put w
        GOTO TRAVEL

    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:
        counter set 341
      RATHA.341:
        put go arch
        GOTO TRAVEL
      RATHA.342:
        GOTO LEAVE.RTHEA
    ALTLEAVE.REXOT:
        counter set 356
      RATHA.356:
        put out
        GOTO TRAVEL
      RATHA.357:
        GOTO LEAVE.REXOT


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


    MOVEON.RBAIT.1:
      RATHA.178:
        counter set 152
      RATHA.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:
        put go building
        GOTO TRAVEL
      RATHA.169:
        GOTO PAWN.%DropOrStow

##################################################################
#####                                                        #####
#####                     RATHA BINNING                      #####
#####                                                        #####
##################################################################


    RATHA.PAWNFINISH.NONTHIEF:
    RATHA.PAWNFINISH.EMPATH:
        GOTO END

    RATHA.PAWNFINISH.THIEF:
        counter set 758
      RATHA.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:
        GOTO PAWN.BIN

    RATHA.BINFINISH.THIEF:
        GOTO END


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

    RATHA.FREE:
        put get %name sack
        matchre SACKCHECK1 /referring|You reach|You realize/
        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:
        var upperlower lower
        counter set 603
      RATHA.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|You realize/
        GOTO UniversalMatch

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

    RATHA.LOWER.MISSINGSTART:
        var startlocation Rbait
        var ResumeStore Rbait
        GOTO RATHA.LOWER.FREE2

    RATHA.LOWER.FREE2:
        counter set 254
      RATHA.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
        var 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
        var 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:
        var upperlower upper
        counter set 717
      RATHA.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|You realize/
        GOTO UniversalMatch

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

    RATHA.UPPER.MISSINGSTART:
        var startlocation Rgami
        var ResumeStore Rgami
        GOTO RATHA.UPPER.FREE2

    RATHA.UPPER.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
        var 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
        var Countdown %c
        GOTO RESUME


##################################################################
#####                                                        #####
#####                  AESRY START LOCATION                  #####
#####                                                        #####
##################################################################


    AESRY:
        match AESRY.START.BANK a ragtag peddler
        match AESRY.START.GATE prayer gate dedicated to Eluned
        match AESRY.START.PAWN Ishh stands
        match AESRY.START.TANN Sklaar'ishht
        match AESRY.START.ALCH Taernen
        match AESRY.START.CLOTH Miakoda
        match AESRY.START.SCRIPT Nakuge
        match AESRY.START.CLERIC Raeloka
        match AESRY.START.GAMI Tilaya
        match AESRY.START.GEM Shoiya
        match AESRY.START.MAGIC Zenastara
        match AESRY.START.SLING Woodbyne
        match AESRY.START.PUZZ Joirin
        match AESRY.START.FOOT Bayanzi
        match AESRY.START.SHIELD Field of Shields
        match AESRY.START.WEAP Kilora
        match AESRY.START.FORGE Martrem
        match AESRY.START.GEN Rummeltum
        match AESRY.START.FLOW Erianthe
        match AESRY.START.BARD Teshi
        match QIR.BADLOCATION Obvious
        var citycode AESRY
        put look
        GOTO UniversalMatch

    AESRY.START.TANN:
        counter set 133
        var storecode Atann
        GOTO START

    AESRY.START.ALCH:
        counter set 20
        var storecode Aalch
        put out
        GOTO START

    AESRY.START.CLOTH:
        counter set 33
        var storecode Acloth
        put out
        GOTO START

    AESRY.START.SCRIPT:
        counter set 36
        var storecode Ascript
        put out
        GOTO START

    AESRY.START.CLERIC:
        counter set 40
        var storecode Acleric
        put out
        GOTO START

    AESRY.START.GAMI:
        counter set 43
        var storecode Agami
        put out
        GOTO START

    AESRY.START.GEM:
        counter set 46
        var storecode Agem
        put out
        GOTO START

    AESRY.START.MAGIC:
        counter set 50
        var storecode Amagic
        put go door
        GOTO START

    AESRY.START.SLING:
        counter set 66
        var storecode Asling
        GOTO START

    AESRY.START.PUZZ:
        counter set 84
        var storecode Apuzz
        put out
        GOTO START

    AESRY.START.FOOT:
        counter set 88
        var storecode Afoot
        put out
        GOTO START

    AESRY.START.SHIELD:
        counter set 90
        var storecode Ashield
        put out
        GOTO START

    AESRY.START.WEAP:
        counter set 94
        var storecode Aweap
        put out
        GOTO START

    AESRY.START.FORGE:
        counter set 97
        var storecode Aforge
        put out
        GOTO START

    AESRY.START.GEN:
        counter set 100
        var storecode Agen
        put out
        GOTO START

    AESRY.START.FLOW:
        counter set 103
        var storecode Aflow
        put out
        GOTO START

    AESRY.START.BARD:
        counter set 109
        var storecode Abard
        put out
        GOTO START

    AESRY.START.BANK:
        counter set 1
      AESRY.1:
        put w
        GOTO TRAVEL
    AESRY.START.GATE:
        counter set 2
      AESRY.2:
        put s
        GOTO TRAVEL
      AESRY.3:
        put s
        GOTO TRAVEL
      AESRY.4:
        put climb step
        GOTO TRAVEL
      AESRY.5:
        put s
        GOTO TRAVEL
      AESRY.6:
        put go store
        GOTO TRAVEL
      AESRY.7:
        GOTO AESRY.START.GEN

    AESRY.START.PAWN:
        counter set 138
      AESRY.138:
        put go door
        GOTO TRAVEL
      AESRY.139:
        counter set 8
      AESRY.8:
        put sw
        GOTO TRAVEL
      AESRY.9:
        put s
        GOTO TRAVEL
      AESRY.10:
        put sw
        GOTO TRAVEL
      AESRY.11:
        put go shop
        GOTO TRAVEL
      AESRY.12:
        GOTO AESRY.START.PUZZ


##################################################################
#####                                                        #####
#####                  AESRY LEAVING SHOPS                   #####
#####                                                        #####
##################################################################


    ALTLEAVE.ATANN:
    LEAVE.ATANN:
        counter set 13
      AESRY.13:
        put e
        GOTO TRAVEL
      AESRY.14:
        put o
        GOTO TRAVEL
      AESRY.15:
        put go gate
        GOTO TRAVEL
      AESRY.16:
        put e
        GOTO TRAVEL
      AESRY.17:
        put ne
        GOTO TRAVEL
      AESRY.18:
        put n
        GOTO TRAVEL
      AESRY.19:
        put ne
        GOTO TRAVEL
      AESRY.20:
        var storecode Aalch
        var entrance shop
        GOTO SETSTORE

    LEAVE.AALCH:
        counter set 21
      AESRY.21:
        put sw
        GOTO TRAVEL
      AESRY.22:
        put s
        GOTO TRAVEL
      AESRY.23:
        put sw
        GOTO TRAVEL
      AESRY.24:
        put w
        GOTO TRAVEL
      AESRY.25:
        put s
        GOTO TRAVEL
      AESRY.26:
        put climb stair
        GOTO TRAVEL
      AESRY.27:
        put s
        GOTO TRAVEL
      AESRY.28:
        put s
        GOTO TRAVEL
    MOVEON.ABARD.1:
        counter set 29
      AESRY.29:
        put e
        GOTO TRAVEL
      AESRY.30:
        put ne
        GOTO TRAVEL
      AESRY.31:
        put n
        GOTO TRAVEL
      AESRY.32:
        put ne
        GOTO TRAVEL
      AESRY.33:
        var storecode Acloth
        var entrance shop
        GOTO SETSTORE

    LEAVE.ACLOTH:
        counter set 34
      AESRY.34:
        put ne
        GOTO TRAVEL
      AESRY.35:
        put e
        GOTO TRAVEL
      AESRY.36:
        var storecode Ascript
        var entrance shop
        GOTO SETSTORE

    LEAVE.ASCRIPT:
        counter set 37
      AESRY.37:
        put ne
        GOTO TRAVEL
      AESRY.38:
        put e
        GOTO TRAVEL
      AESRY.39:
        put se
        GOTO TRAVEL
      AESRY.40:
        var storecode Acleric
        var entrance shop
        GOTO SETSTORE

    LEAVE.ACLERIC:
        counter set 41
      AESRY.41:
        put e
        GOTO TRAVEL
      AESRY.42:
        put se
        GOTO TRAVEL
      AESRY.43:
        var storecode Agami
        var entrance building
        GOTO SETSTORE

    LEAVE.AGAMI:
        counter set 44
      AESRY.44:
        put se
        GOTO TRAVEL
      AESRY.45:
        put s
        GOTO TRAVEL
      AESRY.46:
        var storecode Agem
        var entrance shop
        GOTO SETSTORE

    LEAVE.AGEM:
        counter set 47
      AESRY.47:
        put se
        GOTO TRAVEL
      AESRY.48:
        put e
        GOTO TRAVEL
      AESRY.49:
        put n
        GOTO TRAVEL
      AESRY.50:
        var storecode Amagic
        var entrance shop
        GOTO SETSTORE

    ALTLEAVE.AMAGIC:
        counter set 51
      AESRY.51:
        put go door
        GOTO TRAVEL
      AESRY.52:
    LEAVE.AMAGIC:
        counter set 53
      AESRY.53:
        put s
        GOTO TRAVEL
      AESRY.54:
        put s
        GOTO TRAVEL
      AESRY.55:
        put climb stair
        GOTO TRAVEL
      AESRY.56:
        put s
        GOTO TRAVEL
      AESRY.57:
        put s
        GOTO TRAVEL
      AESRY.58:
        put s
        GOTO TRAVEL
      AESRY.59:
        GOTO %LorM.AMAGIC.1

    LEAVE.AMAGIC.1:
        counter set 136
      AESRY.136:
        put go foot
        GOTO TRAVEL
      AESRY.137:
        counter set 60
      AESRY.60:
        put se
        GOTO TRAVEL
      AESRY.61:
        put se
        GOTO TRAVEL
      AESRY.62:
        put ne
        GOTO TRAVEL
      AESRY.63:
        put se
        GOTO TRAVEL
      AESRY.64:
        put ne
        GOTO TRAVEL
      AESRY.65:
        var storecode Asling
        put kneel
        wait
    ASLING.SHORT:
        put go burrow
        match SHORTSTAND You must be standing
        GOTO TRAVEL
      AESRY.66:
        var entrance shop
        GOTO SETSTORE

    ALTLEAVE.ASLING:
    LEAVE.ASLING:
        counter set 67
      AESRY.67:
        put go opening
        match AESRY.68 referring
        GOTO TRAVEL
      AESRY.68:
        matchre AESRY.68 /...wait|type ahead|Roundtime/i
        matchre LEAVE.ASLING.2 /You stand|already standing/
        put stand
        GOTO UniversalMatch
    LEAVE.ASLING.2:
        counter set 69
      AESRY.69:
        put sw
        GOTO TRAVEL
      AESRY.70:
        put nw
        GOTO TRAVEL
      AESRY.71:
        put sw
        GOTO TRAVEL
      AESRY.72:
        put nw
        GOTO TRAVEL
      AESRY.73:
        put nw
        GOTO TRAVEL
      AESRY.74:
        put w
        GOTO TRAVEL
    MOVEON.AMAGIC.1:
        counter set 75
      AESRY.75:
        put s
        GOTO TRAVEL
      AESRY.76:
        put s
        GOTO TRAVEL
      AESRY.77:
        put climb step
        GOTO TRAVEL
      AESRY.78:
        put s
        GOTO TRAVEL
      AESRY.79:
        put w
        GOTO TRAVEL
      AESRY.80:
        GOTO %LorM.ASLING.1
    LEAVE.ASLING.1:
        counter set 81
      AESRY.81:
        put sw
        GOTO TRAVEL
      AESRY.82:
        put s
        GOTO TRAVEL
      AESRY.83:
        put sw
        GOTO TRAVEL
      AESRY.84:
        var storecode Apuzz
        var entrance shop
        GOTO SETSTORE

    LEAVE.APUZZ:
        GOTO %LorM.APUZZ.1
    LEAVE.APUZZ.1:
        counter set 85
      AESRY.85:
        put sw
        GOTO TRAVEL
      AESRY.86:
        put w
        GOTO TRAVEL
      AESRY.87:
        put sw
        GOTO TRAVEL
      AESRY.88:
        var storecode Afoot
        var entrance shop
        GOTO SETSTORE

    LEAVE.AFOOT:
        counter set 89
      AESRY.89:
        put w
        GOTO TRAVEL
      AESRY.90:
        var storecode Ashield
        var entrance shop
        GOTO SETSTORE

    LEAVE.ASHIELD:
        counter set 91
      AESRY.91:
        put nw
        GOTO TRAVEL
      AESRY.92:
        put w
        GOTO TRAVEL
      AESRY.93:
        put nw
        GOTO TRAVEL
      AESRY.94:
        var storecode Aweap
        var entrance shop
        GOTO SETSTORE

    LEAVE.AWEAP:
        counter set 95
      AESRY.95:
        put nw
        GOTO TRAVEL
      AESRY.96:
        put n
        GOTO TRAVEL
      AESRY.97:
        var storecode Aforge
        var entrance forge
        GOTO SETSTORE

    LEAVE.AFORGE:
        counter set 98
      AESRY.98:
        put nw
        GOTO TRAVEL
      AESRY.99:
        put w
        GOTO TRAVEL
      AESRY.100:
        var storecode Agen
        var entrance store
        GOTO SETSTORE

    LEAVE.AGEN:
        GOTO %LorM.AGEN.1
    LEAVE.AGEN.1:
        counter set 101
      AESRY.101:
        put s
        GOTO TRAVEL
      AESRY.102:
        put s
        GOTO TRAVEL
      AESRY.103:
        var storecode Aflow
        var entrance shop
        GOTO SETSTORE

    LEAVE.AFLOW:
        counter set 105
      AESRY.105:
        put climb stair
        GOTO TRAVEL
      AESRY.106:
        put s
        GOTO TRAVEL
      AESRY.107:
        put e
        GOTO TRAVEL
      AESRY.108:
        put se
        GOTO TRAVEL
      AESRY.109:
        var storecode Abard
        var entrance shop
        GOTO SETSTORE

    LEAVE.ABARD:
        counter set 110
      AESRY.110:
        put nw
        GOTO TRAVEL
      AESRY.111:
        put w
        GOTO TRAVEL
      AESRY.112:
        put n
        GOTO TRAVEL
      AESRY.113:
        put climb stair
        GOTO TRAVEL
      AESRY.114:
        put n
        GOTO TRAVEL
      AESRY.115:
        put n
        GOTO TRAVEL
      AESRY.116:
        put n
        GOTO TRAVEL
      AESRY.117:
        put climb step
        GOTO TRAVEL
      AESRY.118:
        put n
        GOTO TRAVEL
      AESRY.119:
        put n
        GOTO TRAVEL
      AESRY.120:
        put n
        GOTO TRAVEL
      AESRY.121:
        put n
        GOTO TRAVEL
      AESRY.122:
        put n
        GOTO TRAVEL
      AESRY.123:
        put climb step
        GOTO TRAVEL
      AESRY.124:
        put n
        GOTO TRAVEL
      AESRY.125:
        GOTO %LorM.ABARD.1

    LEAVE.ABARD.1:
        counter set 126
      AESRY.126:
        put n
        GOTO TRAVEL
      AESRY.127:
        put n
        GOTO TRAVEL
      AESRY.128:
        put climb stair
        GOTO TRAVEL
      AESRY.129:
        put n
        GOTO TRAVEL
      AESRY.130:
        put go gate
        GOTO TRAVEL
      AESRY.131:
        put go door
        GOTO TRAVEL
      AESRY.132:
        put w
        GOTO TRAVEL
      AESRY.133:
        var storecode Atann
        var entrance w
        GOTO SETSTORE

    MOVEON.AGEN.1:
        counter set 209
      AESRY.209:
        put e
        GOTO TRAVEL
      AESRY.210:
        put se
        GOTO TRAVEL
      AESRY.211:
        put s
        GOTO TRAVEL
      AESRY.212:
        put se
        GOTO TRAVEL
      AESRY.213:
        put se
        GOTO TRAVEL
      AESRY.214:
        put e
        GOTO TRAVEL
      AESRY.215:
        put se
        GOTO TRAVEL
      AESRY.216:
        put e
        GOTO TRAVEL
      AESRY.217:
        put ne
        GOTO TRAVEL
      AESRY.218:
        put e
        GOTO TRAVEL
      AESRY.219:
        put ne
        GOTO TRAVEL
      AESRY.220:
        GOTO MOVEON.APUZZ.1

    MOVEON.APUZZ.1:
        counter set 205
      AESRY.205:
        put ne
        GOTO TRAVEL
      AESRY.206:
        put n
        GOTO TRAVEL
      AESRY.207:
        put ne
        GOTO TRAVEL
      AESRY.208:
        GOTO MOVEON.ASLING.1

    MOVEON.ASLING.1:
        counter set 134
      AESRY.134:
        put go shop
        GOTO TRAVEL
      AESRY.135:
        GOTO PAWN.%DropOrStow


##################################################################
#####                                                        #####
#####                  AESRY PAWN AND BIN                    #####
#####                                                        #####
##################################################################


    AESRY.PAWNFINISH.NONTHIEF:
    AESRY.PAWNFINISH.EMPATH:
    AESRY.PAWNFINISH.THIEF:
        counter set 224
      AESRY.224:
        put go door
        GOTO TRAVEL
      AESRY.225:
        put e
        GOTO TRAVEL
      AESRY.226:
        put n
        GOTO TRAVEL
      AESRY.227:
        put climb step
        GOTO TRAVEL
      AESRY.228:
        put n
        GOTO TRAVEL
      AESRY.229:
        put n
        GOTO TRAVEL
      AESRY.230:
        put w
        GOTO TRAVEL
      AESRY.231:
        put sw
        GOTO TRAVEL
      AESRY.232:
        put s
        GOTO TRAVEL
      AESRY.233:
        put sw
        GOTO TRAVEL
      AESRY.234:
        put sw
        GOTO TRAVEL
      AESRY.235:
        put go foot
        GOTO TRAVEL
      AESRY.236:
        put sw
        GOTO TRAVEL
      AESRY.237:
        put w
        GOTO TRAVEL
      AESRY.238:
        put nw
        GOTO TRAVEL
      AESRY.239:
        put w
        GOTO TRAVEL
      AESRY.240:
        put nw
        GOTO TRAVEL
      AESRY.241:
        put nw
        GOTO TRAVEL
      AESRY.242:
        put n
        GOTO TRAVEL
      AESRY.243:
        put nw
        GOTO TRAVEL
      AESRY.244:
        put go gate
        GOTO TRAVEL
      AESRY.245:
        put go door
        GOTO TRAVEL
      AESRY.246:
        put n
        GOTO TRAVEL
      AESRY.247:
        put w
        GOTO TRAVEL
      AESRY.248:
        var BinOrBucket basket
        GOTO PAWN.BIN

    AESRY.BINFINISH.NONTHIEF:
    AESRY.BINFINISH.EMPATH:
    AESRY.BINFINISH.THIEF:
        GOTO END


##################################################################
#####                                                        #####
#####               AESRY JUSTICE AND RESUMING               #####
#####                                                        #####
##################################################################


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

    AESRY.DEBT:
        counter set 150
      AESRY.150:
        put n
        GOTO TRAVEL
      AESRY.151:
        put n
        GOTO TRAVEL
    AESRY.DEBT2:
        counter set 152
      AESRY.152:
        put go door
        GOTO TRAVEL
      AESRY.153:
        put go gate
        GOTO TRAVEL
      AESRY.154:
        put s
        GOTO TRAVEL
      AESRY.155:
        put sw
        GOTO TRAVEL
      AESRY.156:
        put s
        GOTO TRAVEL
      AESRY.157:
        put go gate
        GOTO TRAVEL
      AESRY.158:
        put go door
        GOTO TRAVEL
      AESRY.159:
        put n
        GOTO TRAVEL
      AESRY.160:
        put wit 500 bronze lirums
        wait
        counter set 161
      AESRY.161:
        put s
        GOTO TRAVEL
      AESRY.162:
        put go door
        GOTO TRAVEL
      AESRY.163:
        put go gate
        GOTO TRAVEL
      AESRY.164:
        put n
        GOTO TRAVEL
      AESRY.165:
        put ne
        GOTO TRAVEL
      AESRY.166:
        put n
        GOTO TRAVEL
      AESRY.167:
        put ne
        GOTO TRAVEL
      AESRY.168:
        put ne
        GOTO TRAVEL
      AESRY.169:
        put e
        GOTO TRAVEL
      AESRY.170:
        put go gate
        GOTO TRAVEL
      AESRY.171:
        put pay 5000
        wait
        counter set 172
      AESRY.172:
        put o
        GOTO TRAVEL
      AESRY.173:
        put w
        GOTO TRAVEL
      AESRY.174:
        put sw
        GOTO TRAVEL
      AESRY.175:
        put sw
        GOTO TRAVEL
      AESRY.176:
        put s
        GOTO TRAVEL
      AESRY.177:
        put sw
        GOTO TRAVEL
      AESRY.178:
        put s
        GOTO TRAVEL
      AESRY.179:
        put go gate
        GOTO TRAVEL
      AESRY.180:
        put go door
        GOTO TRAVEL
      AESRY.181:
        put n
        GOTO TRAVEL
      AESRY.182:
        put dep all
        wait
        counter set 183
      AESRY.183:
        put s
        GOTO TRAVEL
      AESRY.184:
        put go door
        GOTO TRAVEL
      AESRY.185:
        put go gate
        GOTO TRAVEL
      AESRY.186:
        put n
        GOTO TRAVEL
      AESRY.187:
        put ne
        GOTO TRAVEL
      AESRY.188:
        put n
        GOTO TRAVEL
      AESRY.189:
        put go gate
        GOTO TRAVEL
      AESRY.190:
        put go door
        GOTO TRAVEL
      AESRY.191:
        GOTO GETSACK

    AESRY.FREE:
        counter set 221
      AESRY.221:
        put n
        GOTO TRAVEL
      AESRY.222:
        put n
        GOTO TRAVEL
      AESRY.223:
        GOTO GETSACK

    AESRY.FREE2:
        pause 1
        match AESRY.MISSINGSTART waitandsee
        match AESRY.FREE3 okstart
        put echo %startlocation
        put echo okstart
        GOTO UniversalMatch

    AESRY.MISSINGSTART:
        var startlocation Agen
        var ResumeStore Agen
        GOTO AESRY.FREE3

    AESRY.FREE3:
        counter set 194
      AESRY.194:
        put go door
        GOTO TRAVEL
      AESRY.195:
        put go gate
        GOTO TRAVEL
      AESRY.196:
        put s
        GOTO TRAVEL
      AESRY.197:
        put sw
        GOTO TRAVEL
      AESRY.198:
        put s
        GOTO TRAVEL
      AESRY.199:
        put w
        GOTO TRAVEL
      AESRY.200:
        put s
        GOTO TRAVEL
      AESRY.201:
        put s
        GOTO TRAVEL
      AESRY.202:
        put climb step
        GOTO TRAVEL
      AESRY.203:
        put s
        GOTO TRAVEL
      AESRY.204:
        counter set 1
        var storecode Agen
        GOTO RESUME.%ResumeStore

    RESUME.AFORGE:
        counter add 1
    RESUME.AWEAP:
        counter add 1
    RESUME.ASHIELD:
        counter add 1
    RESUME.AFOOT:
        counter add 1
    RESUME.APUZZ:
        counter add 1
    RESUME.ASLING:
        counter add 1
    RESUME.AMAGIC:
        counter add 1
    RESUME.AGEM:
        counter add 1
    RESUME.AGAMI:
        counter add 1
    RESUME.ACLERIC:
        counter add 1
    RESUME.ASCRIPT:
        counter add 1
    RESUME.ACLOTH:
        counter add 1
    RESUME.AALCH:
        counter add 1
    RESUME.ATANN:
        counter add 1
    RESUME.ABARD:
        counter add 1
    RESUME.AFLOW:
        counter add 1
    RESUME.AGEN:
        counter add 1
        var Countdown %c
        GOTO RESUME


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


    LabelError:
        GOTO %labelerr
    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) <command1> <command2> <command3> ...
        ECHO ***
        ECHO *** COMMAND LINE ONLY:
        ECHO ***
        ECHO ***    PROFIT: User will try to select items that will pawn for cash.
        ECHO ***    PAUSE:  Script will wait for user confirmation before stealing
        ECHO ***            at each shop.
        ECHO ***    PAWN:   Used to directly run the pawn function.
        ECHO ***    BIN:    Used to deposit items at any bin or trash receptacle.
        ECHO ***    EASY:   For each "easy", user's rank will be modified to steal
        ECHO ***            items set from one rank bracket lower.
        ECHO ***    HARD:   For each "hard", user's rank will be modified to steal
        ECHO ***            items set from one rank bracket higher.
        ECHO ***    LESS:   For each "less", user will steal one less item per shop
        ECHO ***            (minimum of 1).
        ECHO ***    MORE:   For each "more", user will steal one more item per shop
        ECHO ***            (maximum of 6).
        ECHO ***
        ECHO *** TOGGLE OVERRIDES: (variables set by editing the top of script but
        ECHO ***       can be overridden through entering them in the command line)
        ECHO ***
        ECHO ***    STEAL: The default for non-magic users; steals with no extra
        ECHO ***           actions in shops.
        ECHO ***    MARK:  Allows thieves to also MARK their target items (and skip
        ECHO ***           any that are too hard) before they attempt to steal them.
        ECHO ***    PERC:  Assumes the user is an Empath and will perceive health
        ECHO ***           in each shop before attempting to steal.
        ECHO ***    POWER: This toggle can be used by Empaths or any other magic
        ECHO ***           user, and will POWER before stealing. Moon mages will
        ECHO ***           cycle through a specialized perceive list.
        ECHO ***    STOW:  This toggle will stow stolen items to be pawned
        ECHO ***           or (for thieves) binned later if they're rejected.
        ECHO ***    DROP:  This toggle will drop all items instead of stowing.
        ECHO ***    PUT:   User will simply PUT stowed items into their containers.
        ECHO ***    SLIP:  User will attempt to SLIP items into their containers.
        ECHO ***    SKULK: For thieves, option to use khri skulk before the other
        ECHO ***           default khri.
        ECHO ***    SNEAK: This will turn on sneaking into and out of shops.
        ECHO ***  NOSNEAK: This will turn off sneaking into and out of shops.
        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 whether to drop or stow and pawn/bin items
        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 *** - Aesry inside any shop, outside bank, or inside gate
        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, if you choose the option to stow and
        ECHO *** pawn/bin your pilfered goods, you must set the containers
        ECHO *** in which you will be storing them. The script will
        ECHO *** check these in advance to ensure they do not contain
        ECHO *** any items of the same type that you will later be
        ECHO *** 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
        #var stealinghelp notfirstrun
        GOTO notfirstrun

    REALERROR:
        ECHO
        ECHO
        ECHO
        ECHO ***********************************************
        ECHO ***   Unfortunately there has been an unrecoverable label error. Please
        ECHO ***    submit a bug report including a brief log of the circumstances
        ECHO ***       that produced this error. Version %update, %citycode.%c.
        ECHO ***********************************************
        GOTO END

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

    ARREST.TRUE:
        ECHO ***********************************************
        ECHO ***      Don't forget to restart your gweths and/or
        ECHO ***         albredine rings due to your arrest.
        ECHO ***********************************************
        ECHO
        ECHO
        ECHO
    ARREST.FALSE:
        GOTO END.%class

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

    LASTNUMBER:
        ECHO CROSS.336
        ECHO ARTHE.75
        ECHO TIGER.54
        ECHO LETH.466
        ECHO HAVEN.452
        ECHO AESRY.248
        ECHO RATHA.858 (358-534 empty)
        ECHO SHARD.806 (346-379 empty)
        exit

		armor_Check1:
				matchre wear_Armor %armor.types
				match armor_Check2 Encumbrance
				put look in my %armor.stow;enc
				matchwait

		armor_Check2:
				matchre wear_Armor %armor.types
				match RETURN Encumbrance
				put look in my %armor.stow;enc
				matchwait

		wear_Armor:
				var armor $1
				get_It:
					var LAST get_It
					matchre wear_It You work|You remove|You pull|You take|You get|But that is
					put get my %armor
					matchwait
				wear_It:
					var LAST wear_It
					matchre armor_Check1 You slip|You put|You work|You hang|You pull|You slide|You attach|You sling|You strap
					put wear my %armor
					matchwait

		RETURN:
			return