Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #debuglevel 5
- include stealVariables.Inc
- #--------------------------------------------------------------------------------------------------------
- # ULTIMATE GENIE3 PROGRESSIVE STEALING SCRIPT v6.7 for Dragonrealms. Updated 12/17/16
- # By Shroom of TF / Azothy of Prime. With code contributions from Pelic/Rubinium.
- # © 2005-2016 Chris Sansalone, all rights reserved. Not for resale or distribution without author's consent.
- # If you purchased this you CAN use it for multiple characters that YOU own.
- # Any unauthorized sharing of this script with OTHERS will result in you losing all future updates.
- # Send any bug reports/feedback to: skultamaphon@gmail.com / Shroomismschism @ AIM
- #--------------------------------------------------------------------------------------------------------
- var version 6.7
- # ------------------------ IMPORTANT INFO / PREREQUISITES ------------------------------------------------
- # MANDATORY - Requires stealVariables.inc (a separate script)
- # LATEST VERSION - http://pastebin.com/Kb231wiE
- # This contains all your custom variables. Script will NOT work without this.
- # This makes it easy to update the script without having to copy/paste or type in your variables after every update.
- #
- # MANDATORY - You need to make sure you have the latest version of Automapper and maps.
- # See this thread on the Genie forums for syncing your Genie maps folder to the map repository, so you can always have the most updated maps
- # http://www.genieclient.com/bulletin/topic/3592-how-to-use-the-genie-map-repository/
- #
- # MANDATORY - Requires my modified travel script. This script is for city to city travel.
- # LATEST VERSION HERE - http://pastebin.com/tVwTjDQP
- #
- # MANDATORY - ExpTracker 3.0 Plugin for Genie
- # http://www.genieclient.com/bulletin/files/file/26-experience-tracker/
- #
- # MAY REQUIRE using my modified Automapper script - http://pastebin.com/wx1cM7ty
- # NOTE - I NOW SYNC THIS WITH THE MAP REPO, NOT NECESSARY IF YOU UPDATE WITH THE REPO
- #--------------------------------------------------------------------------------------------------------
- # ----------------------------- SCRIPT NOTES AND FUNCTIONALITY ------------------------------------------
- # SUPPORTED CITIES: (Can start in any location in any of these cities)
- # - Therenborough, Riverhaven, Arthe Dale, Crossing, Leth Deriel, Shard, Hib, Ratha, Aesry
- #
- # - STEALS from every shop in every supported city, moving from city to city until mind locked
- # - Automatically determines optimal items to steal based on your thievery level. NEVER change item variables!
- # - As you progress in Thievery ranks, the script progressively steals harder items. Trains from ~0~ ranks to 1750.
- #
- # - ARMOR SUPPORT - Will remove all your armor before the run, put it in your safe container,
- # - Remembers your armor and puts it all back on when the script finishes.
- #
- # - SMART BAG SCAN - AUTOMATICALLY HIDES/STASHES YOUR IMPORTANT ITEMS BEFORE THE RUN - NEVER LOSE YOUR PERSONAL ITEMS!
- # - Before the stealing run, if any of your current items in your loot bags match names with items you will steal... it will stash those away
- # - (Example, you have a 'mirror sword" in your bag, and the script will be stealing a "sword")
- # - It will pull that item out and store it in your SAFE_CONTAINER and keep it closed during the run.
- # - This will prevent ever accidentally binning or pawning any of your personal items!
- #
- # - JAIL SUPPORT - If you go to JAIL, it will plead, pay your fine, recover your items and continue where it left off.
- # - Has support for almost all items that persist through jail.. however if you run across one that doesn't work please let me know!
- #
- # - THIEVES will mark ALL items before stealing, leave the shop if there is too much heat.
- # - THIEVES will Bin 50% and Pawn 50% by default. Or Bin 100% by setting var PAWN OFF
- # - THIEVES Will also make use of Khris and Thief passages for travel to Leth and contacts for finding haven guild.
- # - Thieves MUST use THREE (3) separate bags if you are both binning and pawning items. 2 for bin and pawn and 1 for your safe items.
- #
- # - NON-THIEVES: Will only steal 1-4 times per shop (depending on difficulty)
- # - **** NOTE - Non-Thieves can now choose to set a Custom stealcount in the variables if they want.
- # - NON-THIEVES: Will PAWN ALL ITEMS and dump those that can't sell.
- # - NON-THIEVES: Will cast buffs as well, if they help with stealing.
- #
- # - NECROS will stay invisible as much as possible and keep up ROC to keep social outrage down
- # - NECROS will never cast buffs in a room with other people. It will search for an empty room first.
- #
- # CITY TRAVEL LOGIC:
- # - Typically the script will move city to city in a linear fashion - North to South or South to North, depending where you start
- # - Hib -> HC -> Shard -> Leth -> Arthe/Xing -> Haven -> Theren - or reverse in the other direction
- # SCRIPT USAGE -
- # 1) .steal
- # There are more advanced methods of running the script if I need you to help me with tracking down a bug
- # But for all intents and purposes unless you are troubleshooting something you should never start the script with any variables.
- #
- # IF YOU WANT TO SKIP DIRECTLY TO PAWNING/BINNING IN THE MIDDLE OF THE SCRIPT:
- # TYPE: GOPAWNYO or GOBINYO
- # THIS WILL STOP THE CURRENT CITY RUN, SKIP TO PAWN/BIN EVERYTHING AND FINISH THE SCRIPT!
- #
- # ---------------------------------------- DISCLAIMER -------------------------------------------------------------------------
- # ~~ I AM NOT RESPONSIBLE FOR ANY LOST ITEMS. IT IS **HIGHLY RECOMMENDED** TO REGISTER YOUR MOST VALUABLE ITEMS.
- # ~~ ALTHOUGH THIS SCRIPT DOES ~EVERYTHING POSSIBLE~ TO MAKE SURE IT DOESN'T LOSE YOUR ITEMS..
- # ~~ THERE IS ALWAYS A TINY CHANCE (HOWEVER SMALL) THAT SOMETHING MAY GO WRONG.
- # ~~ IF YOU WANT TO BE 100% SAFE, PUT YOUR MOST IMPORTANT ITEMS IN YOUR VAULT, OR A CLOSED CONTAINER,
- # ~~ HOWEVER! THIS SCRIPT AUTOMATICALLY STASHES ANY VULNERABLE ITEMS IN YOUR SAFE CONTAINER! SO IT SHOULD NEVER LOSE ANYTHING!
- # ~~ I TEST THIS SCRIPT WITH MULTIPLE SUPER RARE ITEMS~ I HAVE ONLY EVER LOST 1 or 2 ITEMS IN THOUSANDS OF RUNS,
- # ~~ DUE TO A BUG WHICH I FIXED YEARS AGO, ~BEFORE~ I HAD THIS AUTO-STASH FEATURE - NOW IT IS BASICALLY BULLETPROOF.
- # ~~ NEVERTHELESS - REGISTER YOUR MOST IMPORTANT STUFF TO BE SURE. BETTER TO BE SAFE THEN SORRY!
- #------------------------------------------------------------------------------------------------------------------------------
- ###############################################################################################################################
- #
- ## BEGIN SCRIPT - DO NOT TOUCH ANYTHING BELOW!
- gosub DefaultVariables
- put #var save
- #############################################################################################################################################
- INIT.ACTIONS:
- var LAST INIT.ACTIONS
- action math Pawned add 1 when You sell your|he hands you
- action math Binned add 1 when Nice work, $charactername
- action math Charges add 1 when begins to shout for help|begins to shout loudly for help
- action var nosell $1 when ^\w+ shakes his head (.+)$
- action var nosteal ON when ^You stop as you realize that the
- action var goPawn ON; put #echo >Log Yellow ** USER INPUT INTERRUPT - Skipping directly to pawning after next check when ^GOPAWNYO|^GOBINYO
- action var stolen 6; var caught 1; put #echo >log Red *** Busted in %SHOP stealing: %item - on grab %grabbed @ $Thievery.Ranks ranks when notices you attempting|begins to shout loudly|Guards\! Guards\!
- action put #echo >log Purple *** Stealing Mind Locked! Not learning anymore when You feel that for the moment you've learned all you can
- action var noLearn ON; put #echo >Log OrangeRed *** Not learning from %item in %SHOP @ $Thievery.Ranks ranks when You don't feel you learned anything useful
- action put #echo >log Yellow ***Not learning so great from %item in %SHOP @ $Thievery.Ranks ranks when ^You learned very poorly
- action instant echo *** LEGENDARY GRAB!! when ^You learned exceptionally well from this
- action instant echo *** Epic grab! when ^You learned very well from this
- action instant echo *** Awesome! when ^You learned rather well from this
- action instant echo *** Good grab! when ^You learned acceptably from this
- #JAIL
- action instant goto TOO.MANY.FINES when ^You think about stealing for a moment
- action instant goto %LAST when SHOP IS CLOSED
- action instant goto JAIL.CHECK when a sound not unlike that of a tomb|binds you in chains|firmly off to jail|drag you off to jail|brings you to the jail
- action instant goto JAIL.CHECK when your belongings have been stripped|in a jail cell wearing a set of heavy manacles|strip you of all your possessions|binds your hands behind your back
- action instant goto JAIL.CHECK when the last thing you see before you black out|your possessions have been stripped|Do not resist, for your crimes must be answered for
- action instant goto JAIL.CHECK when Your silence shall be taken as an indication of your guilt|The eyes of the court are upon you|Your silence can only be taken as evidence of your guilt
- action instant goto JAIL.CHECK when all your belongings have been stripped|^The guard brings you to the jail
- #DISCONNECT
- action goto DISCONNECTED when eval $connected = 0
- action goto DISCONNECTED when ^Reconnect aborted|^Unable to contact Genie Key server|^Please make sure that your internet connection|^Connection closed|(ConnectionTimedOut)
- action goto DISCONNECTED when ^Connection lost|^ConnectionAborted|^Socket Error|connection dropped|connection closed|^ReceiveCallback Exception|Unable to contact Genie Key server
- action goto CONNECTED when ^You look around, taking a moment to get your bearings|^Welcome to DragonRealms|reconnect now
- action goto CONNECTED when Please check for new or updated items in NEWS\!
- #NECRO
- action var Eyes ON when ^Your spell subtly alters|^You feel an unsteady|^Your spell injects more psychic corruption
- action var Eyes OFF when ^Your corruptive mutation fades|^Your corruption fades
- action var Rite ON when ^You weave a field of sublime|^The Rite of Contrition matrix redoubles
- action var Rite OFF when ^The Rite of Contrition matrix loses
- # action send exit when eval $health < 50
- # action goto CLAN.HEAL when I now pronounce sentenc
- #############################################################################################################################################
- INIT.SETUP:
- if ("%PREMIUM" = "ON") then gosub PREMIUM.CHECK
- gosub HEALTH.CHECK
- gosub GUILD.CHECK
- gosub CITY.CHECK
- gosub SKILL.CHECK
- gosub STEAL.LIST.SETUP
- gosub WELCOME
- gosub ARMOR.CHECK
- pause 0.1
- send stance evasion
- pause 0.5
- if_1 then var command %1
- if matchre("rob", tolower("%command")) then goto ROB.TOP
- if_1 then
- {
- ECHO
- ECHO *********** WARNING!!! *********** WARNING!!!! *********** WARNING!!! ***********
- ECHO *** YOU STARTED SCRIPT WITH VARIABLES!
- ECHO *** THIS IS FOR TROUBLESHOOTING/TESTING PURPOSES **ONLY**!!!!
- ECHO *** ( OR FOR STARTING SCRIPT MIDWAY AND JUMPING STRAIGHT TO A LABEL )
- ECHO *****************************************************************************
- ECHO
- pause 2
- ECHO *****************************************************************************************
- ECHO *** USAGE:
- ECHO *** Variable 1 - Skip to specified Label
- ECHO ****Variable 2 - Starting City
- ECHO *** Variable 3 - Type anything here to SKIP inital bag check and turn on debugmode
- ECHO *** Use of Third Variable is so you don't stash already stolen items!!
- ECHO *** If restarting script in the middle of a stealing run
- ECHO
- ECHO *** ex: .steal SHARD.TO.LOCK SHARD OK
- ECHO *** - skips to SHARD.TO.LOCK label, sets SHARD as starting city, and skips the bag check
- ECHO
- ECHO *** ex: .steal CROSS CROSSING
- ECHO *** - starts at CROSS label, sets CROSSING as starting city, DOES do the initial bag check
- ECHO ******************************************************************************************
- ECHO
- ECHO *** TYPE "OK" TO START SCRIPT NOW!
- ECHO *** ABORT SCRIPT NOW IF YOU ARE NOT DOING THIS ON PURPOSE - CONTINUNE AT OWN RISK
- ECHO
- waitforre ^OK|ok
- }
- DEBUG.INIT.GO:
- if_2 then
- {
- var CITY %2
- }
- if_3 then
- {
- debuglevel 5
- ECHO
- ECHO ****************************************************************************************
- ECHO *** WARNING!!! SKIPPING INITIAL BAG CHECK !!!!
- ECHO *** THIS FEATURE IS ONLY INTENDED FOR TESTING/TROUBLESHOOTING PURPOSES!!!
- ECHO *** OR FOR RESTARTING SCRIPT HALFWAY THROUGH A RUN, SO YOU DON'T STASH ALREADY STOLEN ITEMS
- ECHO ***
- ECHO *** IF YOU DID NOT DO THIS ON PURPOSE THEN QUIT NOW!
- ECHO *** YOU MAY LOSE ITEMS IF YOU DIDN'T ALREADY STASH YOUR IMPORTANT ITEMS!!!
- ECHO ****************************************************************************************
- pause 8
- ECHO
- ECHO *** ~~~~ DEBUG MODE ENABLED ~~~~
- ECHO *** STARTING SCRIPT FROM %1 LABEL...
- ECHO
- pause 1
- goto START
- }
- CHECKING.BAGS:
- var LAST CHECKING.BAGS
- ECHO
- ECHO ****** PRE-RUN BAG CHECK!
- ECHO ****** SCANNING YOUR BAGS FOR ANY VULNERABLE ITEMS..
- ECHO ****** WILL STASH ITEMS IN YOUR %SAFE_CONTAINER
- ECHO
- ECHO
- pause 2
- gosub BAG.CHECK %PAWN_CONTAINER
- gosub BAG.CHECK %BIN_CONTAINER
- START:
- var LAST START
- ECHO
- ECHO *** THIEVERY SKILL RANGE - %skillrange
- ECHO
- pause 0.5
- if ("%BIN" = "OFF") then
- {
- ECHO
- ECHO *** PAWNING ALL ITEMS FOR MAX PROFIT...
- ECHO
- pause 0.5
- }
- timer start
- gosub CITY.CHECK
- gosub PUT close my %SAFE_CONTAINER
- pause 0.5
- if_1 then goto %1
- goto MAINLOOP
- #################################################################################################################################################################################################################
- STEAL.LIST.SETUP:
- echo *** Initializing stealing list....
- var LIST.THEREN %T.Tarsha|%T.Rose|%T.Music|%T.Hats|%T.Arm|%T.Gift|%T.Sweet|%T.Cupcake|%T.Gen|%T.Krrish|%T.Lense|%T.Cleric|%T.Men|%T.Women|%T.Cloth|%T.Armory|%T.Forge
- var LIST.HAVEN %RH.Herb|%RH.Iron|%RH.Naph|%RH.Flow|%RH.Seli|%RH.Arms|%RH.Gen|%RH.Cloth|%RH.Artif|%RH.Joy|%RH.Smoke|%RH.Weap|%RH.Bard|%RH.Bard2|%RH.Cleric|%RH.Cleric2|%RH.Lock|%RH.Tog|%RH.Tog2|%RH.Mirg
- var LIST.ARTHE %AD.Feta|%AD.Thread|%AD.Fash|%AD.Odds|%AD.Bard|%AD.Map|%AD.Arm|%AD.Tart.E|%KA.Grek|%AD.Smoke|%KA.Grek
- var LIST.CROSS %C.Alch|%C.Artif|%C.Bath|%C.Card|%C.Gen|%C.Weap|%C.Arm|%C.Music|%C.Music2|%C.Lock|%C.Empath|%C.Empath2|%C.Empath3|%C.Cler|%C.Haber|%C.Script|%C.Tann|%C.Jewel|%C.Stitch|%C.Cobb|%C.Herb|%C.Flow
- var LIST.LETH %L.Skin|%L.Bow|%L.Orig|%L.Weap|%L.Wick|%L.Bard|%L.Bard2|%L.Cloth|%L.Wood|%L.Gen|%L.Gen.Alt|%L.Perf
- var LIST.SHARD %S.Gen|%S.Weap|%S.Cleric|%S.Stitch|%S.Alch|%S.Herb|%S.Artif|%S.Music|%S.Armor|%S.Reed|%S.Bow|%S.Lock|%S.Coin|%S.Frill|%S.Herald|%S.Gift|%S.Spire|%S.Toy|%S.Memory|%S.Token|%S.Museum|%S.Barber|%S.Tanner|%S.Surv|%S.Surv.Alt|%S.Surv2|%S.Surv2.Alt
- var LIST.HIB %SC.Weap|%H.Shield|%H.Jewel|%H.Tog|%H.Herb|%H.Sund|%H.Lamp|%H.Music|%H.Alch|%H.Forge|%RP.Gen|%RP.Tobac
- var LIST.RATHA %R.Bait|%R.Gen|%R.Herb|%R.Forge|%R.Tailor|%R.Hair|%R.Leather|%R.Music|%R.Magic|%R.Origami|%R.Jewelry|%R.Ring
- var LIST.AESRY %A.Herb|%A.Tanner|%A.Clothing|%A.Script|%A.Cleric|%A.Origami|%A.Jewelry|%A.Magic|%A.Slings|%A.Puzzle|%A.Footwear|%A.Shields|%A.Weapon|%A.Armor|%A.Gen|%A.Flower|%A.Music
- var LIST.HORSE %HC.Jahtinit|%HC.Falconer|%HC.Yasnah|%HC.Bowyer|%HC.Bowyer2|%HC.Equine|%HC.Felterie|%HC.Felterie2
- var ODD.ITEMS cigar|scroll|naphtha|sling|mining helm|mining cap|ordinary shield|torque|tobacco|bagpipes|cowl|dwarven hammer|lamp|robes|string|oil|holy oil|sacramental wine|repair kit|refill|linen cuirass|stylus|kris
- var ALT.ITEMS %ALT1|%ALT2|%ALT3|%ALT3|%ALT4|%ALT5|%ALT6|%ALT7|%ALT8|%ALT9
- var LARGE.ITEMS cauldron|stove|spear|wayerd pyramid|longbow
- var STEAL.LIST %LIST.THEREN|%LIST.HAVEN|%LIST.ARTHE|%LIST.CROSS|%LIST.LETH|%LIST.SHARD|%LIST.HORSE|%LIST.HIB|%LIST.RATHA|%LIST.AESRY|%ODD.ITEMS|%ALT.ITEMS
- RETURN
- ############################################################################################
- ############################################################################################
- #### BEGIN STEALING SECTION #####
- ############################################################################################
- ############################################################################################
- MAINLOOP:
- STEALING.RUN:
- var LAST STEALING.RUN
- put #echo >Log Lime **** Starting Stealing Run from: %CITY ****
- pause 0.5
- gosub STOWING
- if ("$guild" = "Necromancer") then gosub NECRO.START
- goto %CITY.STEAL
- ######################################################
- # THERENGIA STEALING (THEREN/ROSSMAN/RIVERHAVEN #
- ######################################################
- ### THERENBOROUGH
- TO.THEREN:
- var LAST TO.THEREN
- put .travel theren
- waitforre ^REACHED YOUR DESTINATION
- if ($zoneid = 40) then gosub AUTOMOVE theren
- THEREN.STEAL:
- var CURRENT_CITY THEREN
- var LAST THEREN.STEAL
- var PawnLoc GO.PAWN.THEREN
- if ("%POWER" = "ON") || ("%PercHealth" = "ON") || ("%GuardianSpirit" = "ON") || ("ROC" = "ON") || ("EOTB" = "ON") then
- {
- ECHO *** NOT CASTING ANY SPELLS WHILE IN THEREN!
- ECHO *** TOO MANY MAGICALLY INERT ROOMS! THEREN SUCKS!
- pause 3
- }
- if matchre("$roomobjs","(Baronial guardsman)") then put surrender guard
- pause 0.5
- pause 0.1
- gosub KHRI
- THEREN.EXP.CHECK.0:
- if $Thievery.Ranks < 50 then goto THEREN.NOSTEAL
- if $Thievery.Ranks >= 690 then goto THEREN.TO.ROSE
- THEREN.TO.TARSHA:
- var LAST THEREN.TO.ROSE
- gosub AUTOMOVE clothing
- THEREN.TARSHA:
- var RETRY THEREN.TARSHA
- var shopcode T.Tarsha
- var SHOP Tarsha's Emporium
- gosub STEAL %T.Tarsha
- THEREN.TO.ROSE:
- var LAST THEREN.TO.MUSIC
- gosub AUTOMOVE theatre
- THEREN.ROSE:
- var RETRY THEREN.ROSE
- var shopcode T.Rose
- var SHOP Rose of the Theater - Attire
- gosub STEAL %T.Rose
- THEREN.TO.MUSIC:
- var LAST THEREN.EXP.CHECK.1:
- gosub AUTOMOVE music
- THEREN.MUSIC:
- var RETRY THEREN.MUSIC
- var shopcode T.Music
- var SHOP Rose of the Theater - Instruments
- gosub STEAL %T.Music.Num %T.Music
- THEREN.EXP.CHECK.1:
- if $Thievery.Ranks >= 590 then goto THEREN.TO.ARMOR
- THEREN.TO.HATS:
- var LAST THEREN.EXP.CHECK.2
- gosub AUTOMOVE hats
- THEREN.HATS:
- var RETRY THEREN.HATS
- var shopcode T.Hats
- var SHOP Theren Hats
- gosub STEAL %T.Hats
- THEREN.EXP.CHECK.2:
- if ($Thievery.LearningRate > 32) && ("%STEALTH" != "ON") then goto GO.PAWN.THEREN
- if $Thievery.Ranks >= 230 then goto THEREN.TO.ARMOR
- THEREN.TO.SWEET:
- var LAST THEREN.TO.CUPCAKE
- gosub AUTOMOVE sweet
- THEREN.SWEET:
- var RETRY THEREN.SWEET
- var shopcode T.Sweet
- var SHOP Theren Sweet Delights
- gosub STEAL %T.Sweet
- THEREN.TO.CUPCAKE:
- var LAST THEREN.TO.ARMOR
- gosub AUTOMOVE cup
- THEREN.CUPCAKE:
- var RETRY THEREN.CUPCAKE
- var shopcode T.Cupcake
- var SHOP Theren Cupcake
- gosub STEAL %T.Cupcake
- THEREN.TO.ARMOR:
- var LAST THEREN.TO.GIFT
- gosub AUTOMOVE armor
- THEREN.ARMOR:
- var RETRY THEREN.ARMOR
- var shopcode T.Arm
- var SHOP Theren Armor
- gosub STEAL %T.Arm
- THEREN.TO.GIFT:
- var LAST THEREN.EXP.CHECK.3
- gosub AUTOMOVE gift
- THEREN.GIFT:
- var RETRY THEREN.GIFT
- var shopcode T.Gift
- var SHOP Theren Gift Shop
- gosub STEAL %T.Gift
- THEREN.EXP.CHECK.3:
- if ($Thievery.LearningRate > 32) && ("%STEALTH" != "ON") then goto GO.PAWN.THEREN
- if $Thievery.Ranks >= 700 then goto THEREN.TO.KRRISH
- THEREN.TO.GENERAL:
- var LAST THEREN.TO.KRRISH
- gosub AUTOMOVE general
- THEREN.GENERAL:
- var RETRY THEREN.GENERAL
- var shopcode T.Gen
- var SHOP Theren General Store
- gosub STEAL %T.Gen
- THEREN.TO.KRRISH:
- var LAST THEREN.TO.LENSE
- gosub AUTOMOVE Krrish's home
- THEREN.KRRISH:
- var RETRY THEREN.KRRISH
- var shopcode T.Krrish
- var SHOP Theren Krissh
- gosub STEAL %T.Krrish
- THEREN.TO.LENSE:
- var LAST THEREN.EXP.CHECK.4
- gosub AUTOMOVE lense
- THEREN.LENSE:
- var RETRY THEREN.LENSE
- var shopcode T.Lense
- var SHOP Theren Konezu's Lenses
- gosub STEAL %T.Lense
- THEREN.EXP.CHECK.4:
- if ($Thievery.LearningRate > 32) && ("%STEALTH" != "ON") then goto GO.PAWN.THEREN
- if $Thievery.Ranks >= 460 then goto THEREN.TO.MEN
- THEREN.TO.CLERIC:
- var LAST THEREN.TO.MEN
- gosub AUTOMOVE cleric
- THEREN.CLERIC:
- var RETRY THEREN.CLERIC
- var shopcode T.Cleric
- var SHOP Theren Cleric Shop
- gosub STEAL %T.Cleric
- THEREN.TO.MEN:
- if ($Thievery.LearningRate > 32) && ("%STEALTH" != "ON") then goto GO.PAWN.THEREN
- var LAST THEREN.TO.WOMEN
- gosub AUTOMOVE men's
- THEREN.MEN:
- var RETRY THEREN.MEN
- var shopcode T.Men
- var SHOP Theren Courtly Men's Study
- gosub STEAL %T.Men
- THEREN.TO.WOMEN:
- var LAST THEREN.TO.CLOTHING
- gosub AUTOMOVE women's
- THEREN.WOMEN:
- var RETRY THEREN.WOMEN
- var shopcode T.Women
- var SHOP Theren Courtly Women's Parlor
- gosub STEAL %T.Women
- THEREN.TO.CLOTHING:
- if ($Thievery.LearningRate > 32) && ("%STEALTH" != "ON") then goto GO.PAWN.THEREN
- var LAST THEREN.EXP.CHECK.5
- gosub AUTOMOVE clothing
- THEREN.CLOTHING:
- var RETRY THEREN.CLOTHING
- var shopcode T.Cloth
- var SHOP Theren Courtly Clothing
- gosub STEAL %T.Cloth
- THEREN.EXP.CHECK.5:
- if ($Thievery.LearningRate > 32) && ("%STEALTH" != "ON") then goto GO.PAWN.THEREN
- ## THEREN KEEP BYPASS
- goto GO.PAWN.THEREN
- ## THEREN KEEP BYPASS
- THEREN.TO.ARMORY:
- var LAST THEREN.TO.ARMORY
- gosub AUTOMOVE 102
- gosub AUTOMOVE moat
- gosub AUTOMOVE 116
- gosub AUTOMOVE 162
- THEREN.TO.DUNG:
- gosub AUTOMOVE dungeon
- THEREN.TO.ARMORY.CONT:
- gosub AUTOMOVE armory
- THEREN.ARMORY:
- var RETRY THEREN.ARMORY
- var shopcode T.Armory
- var SHOP Theren Keep Armory
- gosub STEAL %T.Armory
- THEREN.LEAVE:
- var LAST THEREN.LEAVE
- gosub AUTOMOVE 69
- send jump moat
- ECHO *** STUNNED!! Pausing to recover....
- pause 11
- THEREN.STUNNED:
- var LAST THEREN.STUNNED
- pause
- if $stunned = 1 then goto THEREN.STUNNED
- gosub STAND
- pause 0.5
- GO.PAWN.THEREN:
- var CURRENT_CITY THEREN
- var LAST GO.PAWN.THEREN
- if ("%PAWN" = "OFF") then goto THEREN.TO.BANK
- gosub AUTOMOVE PAWN
- pause 0.5
- if ("$guild" = "Necromancer") then gosub NECRO.PREP
- gosub PAWN.GOODS
- THEREN.TO.BANK:
- var LAST THEREN.TO.BANK
- #if ("$guild" = "Thief") then send khri stop
- if ("$guild" = "Necromancer") then goto THEREN.TELLER
- if ("%EXCHANGE" != "ON") then goto THEREN.TELLER
- gosub AUTOMOVE exchange
- gosub LIRUMS
- THEREN.TELLER:
- gosub AUTOMOVE teller
- gosub BANK
- gosub MOVE s
- gosub MOVE out
- if ("$guild" = "Necromancer") then gosub NECRO.PREP
- THEREN.DECIDE:
- pause 0.5
- gosub AUTOMOVE 2
- if ("%BIN" = "ON") then goto TO.RIVERHAVEN
- if ("%SINGLE_RUN" = "ON") || ($Thievery.LearningRate > 32) || ("%EndEarly" = "ON") then goto FINISHED.SCRIPT
- if ("%CITY" = "SHARD") || ("%CITY" = "CROSSING") || ("%CITY" = "HIB") || ("%CITY" = "LETH") || ("%CITY" = "HAVEN") || ("%CITY" = "ARTHE") then goto FINISHED.SCRIPT
- goto TO.RIVERHAVEN
- TO.RIVERHAVEN:
- var LAST TO.RIVERHAVEN
- pause 0.5
- ECHO *** TRAVELLING TO RIVERHAVEN!!
- send .%TRAVEL_SCRIPT haven
- waitforre ^REACHED YOUR DESTINATION
- pause 0.5
- ############################################
- # RIVERHAVEN STEALING
- ############################################
- RIVERHAVEN.STEAL:
- HAVEN.STEAL:
- var LAST HAVEN.STEAL
- var CURRENT_CITY RIVERHAVEN
- var PawnLoc GO.PAWN.HAVEN
- if ($Thievery.LearningRate > 32) then goto GO.PAWN.HAVEN
- if matchre("$roomobjs","(Riverhaven Warden)") then put surrender warden
- pause 0.5
- pause 0.1
- gosub KHRI
- if ("$guild" = "Necromancer") then gosub NECRO.PREP
- gosub TIME.CHECK
- HAVEN.TO.TOG:
- var LAST HAVEN.EXP.CHECK.0
- gosub AUTOMOVE city tog
- HAVEN.TOG:
- var RETRY HAVEN.TOG
- var shopcode RH.Tog
- var SHOP Riverhaven Togs
- gosub STEAL %RH.Tog
- HAVEN.EXP.CHECK.0:
- if $Thievery.Ranks >= 340 then goto HAVEN.EXP.CHECK.1
- if ($Thievery.LearningRate > 32) && ("%STEALTH" != "ON") then goto GO.PAWN.HAVEN
- if ($Thievery.LearningRate > 32) && ($Stealth.LearningRate > 32) then goto GO.PAWN.HAVEN
- HAVEN.TO.HERB:
- var LAST HAVEN.EXP.CHECK.1
- gosub AUTOMOVE herb
- HAVEN.HERB:
- var RETRY HAVEN.HERB
- var shopcode RH.Herb
- var SHOP Riverhaven Herbs
- gosub STEAL %RH.Herb
- HAVEN.EXP.CHECK.1:
- if $Thievery.Ranks >= 385 then goto HAVEN.EXP.CHECK.2
- HAVEN.TO.NAPHTHA:
- var LAST HAVEN.EXP.CHECK.2
- gosub AUTOMOVE Naptha
- HAVEN.NAPHTHA:
- var RETRY HAVEN.NAPHTHA
- var shopcode RH.Naph
- var SHOP Riverhaven Naptha Cart
- var itemLocation %RH.Naph.Loc
- gosub STEAL %RH.Naph
- HAVEN.EXP.CHECK.2:
- var itemLocation
- if $Thievery.Ranks >= 600 then goto HAVEN.TO.ARMS
- HAVEN.TO.FLOWER:
- var LAST HAVEN.TO.ARMS
- gosub AUTOMOVE cecel
- HAVEN.FLOWER:
- var RETRY HAVEN.FLOWER
- var shopcode RH.Flow
- var SHOP Riverhaven Florist
- gosub STEAL %RH.Flow
- HAVEN.TO.ARMS:
- var LAST HAVEN.EXP.CHECK.3
- gosub AUTOMOVE noel
- HAVEN.ARMS:
- var RETRY HAVEN.ARMS
- var shopcode RH.Arms
- var SHOP Riverhaven Noel's Arms
- gosub STEAL %RH.Arms
- HAVEN.EXP.CHECK.3:
- if $Thievery.Ranks >= 650 then goto HAVEN.EXP.CHECK.4
- if ($Thievery.LearningRate > 32) && ("%STEALTH" != "ON") then goto GO.PAWN.HAVEN
- if ($Thievery.LearningRate > 32) && ($Stealth.LearningRate > 32) then goto GO.PAWN.HAVEN
- HAVEN.TO.GENERAL:
- var LAST HAVEN.EXP.CHECK.4
- gosub AUTOMOVE general
- HAVEN.GENERAL:
- var RETRY HAVEN.GENERAL
- var shopcode RH.Gen
- var SHOP Riverhaven General Store
- gosub STEAL %RH.Gen
- HAVEN.EXP.CHECK.4:
- if $Thievery.Ranks >= 600 then goto HAVEN.EXP.CHECK.5
- HAVEN.TO.CLOTH:
- var LAST HAVEN.EXP.CHECK.5
- gosub AUTOMOVE cloth
- HAVEN.CLOTH:
- var RETRY HAVEN.CLOTH
- var shopcode RH.Cloth
- var SHOP Riverhaven Clothiers
- gosub STEAL %RH.Cloth
- HAVEN.EXP.CHECK.5:
- # if $Thievery.Ranks >= 1200 then goto HAVEN.TO.JOY
- HAVEN.TO.ARTIFICER:
- var LAST HAVEN.EXP.CHECK.6
- gosub AUTOMOVE artif
- HAVEN.ARTIFICER:
- var RETRY HAVEN.ARTIFICER
- var shopcode RH.Artif
- var SHOP Riverhaven Artificer
- gosub STEAL %RH.Artif
- HAVEN.EXP.CHECK.6:
- if $Thievery.Ranks >= 138 then goto HAVEN.EXP.CHECK.7
- HAVEN.TO.LOCKSMITH:
- var LAST HAVEN.EXP.CHECK.7
- gosub AUTOMOVE locks
- HAVEN.LOCKSMITH:
- var RETRY HAVEN.LOCKSMITH
- var shopcode RH.Lock
- var SHOP Riverhaven Locksmith
- gosub STEAL %RH.Lock
- HAVEN.EXP.CHECK.7:
- if ($Thievery.LearningRate > 32) && ("%STEALTH" != "ON") then goto GO.PAWN.HAVEN
- if ($Thievery.LearningRate > 32) && ($Stealth.LearningRate > 32) then goto GO.PAWN.HAVEN
- if $Thievery.Ranks >= 414 then goto HAVEN.EXP.CHECK.8
- HAVEN.TO.JOY:
- var LAST HAVEN.EXP.CHECK.8
- gosub AUTOMOVE smara
- HAVEN.JOY:
- var RETRY HAVEN.JOY
- var shopcode RH.Joy
- var SHOP Riverhaven Joy Shop
- gosub STEAL %RH.Joy
- gosub MOVE out
- pause 0.5
- HAVEN.EXP.CHECK.8:
- if $Thievery.Ranks >= 238 then goto HAVEN.TO.MIRG
- HAVEN.TIME.0:
- gosub TIME.CHECK
- if ("%TIME" = "DAY") then goto HAVEN.TO.SMOKE
- goto HAVEN.TO.MIRG
- HAVEN.TO.SMOKE:
- var LAST HAVEN.TO.MIRG
- gosub AUTOMOVE 42
- send kneel
- send go shop
- HAVEN.SMOKE:
- var RETRY HAVEN.SMOKE
- var shopcode RH.Smoke
- var SHOP Riverhaven Smoke Shop
- gosub STEAL %RH.Smoke
- send out
- pause
- gosub STAND
- gosub HIDE
- HAVEN.TO.MIRG:
- var LAST HAVEN.TO.WEAPON
- gosub AUTOMOVE jewel
- HAVEN.MIRG:
- var RETRY HAVEN.MIRG
- var shopcode RH.Mirg
- var SHOP Riverhaven Goldsmiths
- gosub STEAL %RH.Mirg
- HAVEN.EXP.CHECK.9:
- if ($Thievery.LearningRate > 32) && ("%STEALTH" != "ON") then goto GO.PAWN.HAVEN
- if ($Thievery.LearningRate > 32) && ($Stealth.LearningRate > 32) then goto GO.PAWN.HAVEN
- HAVEN.TO.WEAPON:
- var LAST HAVEN.TO.BARD
- gosub AUTOMOVE weapon
- HAVEN.WEAPON:
- var RETRY HAVEN.WEAPON
- var shopcode RH.Weap
- var SHOP Riverhaven Weapon Shop
- gosub STEAL %RH.Weap
- HAVEN.TO.BARD:
- var LAST HAVEN.TO.BARD2
- gosub AUTOMOVE bard
- HAVEN.BARD:
- var RETRY HAVEN.BARD
- var shopcode RH.Bard
- var SHOP Riverhaven Bard Shop
- gosub STEAL %RH.Bard
- HAVEN.TO.BARD2:
- var LAST HAVEN.EXP.CHECK.10
- gosub AUTOMOVE bard
- gosub MOVE go curt
- HAVEN.BARD2:
- var RETRY HAVEN.BARD2
- var shopcode RH.Bard2
- var SHOP Riverhaven Bard2 Shop
- gosub STEAL %RH.Bard2
- HAVEN.EXP.CHECK.10:
- if ($Thievery.LearningRate > 32) && ("%STEALTH" != "ON") then goto GO.PAWN.HAVEN
- if ($Thievery.LearningRate > 32) && ($Stealth.LearningRate > 32) then goto GO.PAWN.HAVEN
- HAVEN.TO.IRON:
- var LAST HAVEN.TO.CLERIC
- gosub AUTOMOVE iron
- HAVEN.IRONWORKS:
- var RETRY HAVEN.IRONWORKS
- var shopcode RH.Iron
- var SHOP Riverhaven Ironworks
- gosub STEAL %RH.Iron
- HAVEN.TO.CLERIC:
- var LAST HAVEN.TO.CLERIC2
- gosub AUTOMOVE cleric shop
- HAVEN.EXP.CHECK.11:
- if $Thievery.Ranks >= 465 then goto HAVEN.TO.CLERIC2
- HAVEN.CLERIC:
- var RETRY HAVEN.CLERIC
- var shopcode RH.Cleric
- var SHOP Riverhaven Cleric Shop
- gosub STEAL %RH.Cleric
- HAVEN.TO.CLERIC2:
- var LAST GO.PAWN.HAVEN
- if !matchre("$guild","(Thief|Empath|Cleric)") then goto GO.PAWN.HAVEN
- gosub MOVE go curt
- HAVEN.CLERIC2:
- var RETRY HAVEN.CLERIC2
- var shopcode RH.Cleric2
- var SHOP Riverhaven Cleric2 Shop
- gosub STEAL %RH.Cleric2
- GO.PAWN.HAVEN:
- var CURRENT_CITY RIVERHAVEN
- var LAST GO.PAWN.HAVEN
- if ("%PAWN" = "OFF") then goto HAVEN.TO.BANK
- gosub AUTOMOVE PAWN
- pause 0.5
- if ("$guild" = "Necromancer") then gosub NECRO.PREP
- gosub PAWN.GOODS
- HAVEN.TO.BANK:
- var LAST HAVEN.TO.BANK
- #if ("$guild" = "Thief") then send khri stop
- if ("$guild" = "Necromancer") then goto HAVEN.TELLER
- if ("%PREMIUM" = "ON") && ("%EXCHANGE" = "ON") then goto HAVEN.PREMIUM
- if ("%EXCHANGE" != "ON") then goto HAVEN.TELLER
- gosub AUTOMOVE exchange
- gosub LIRUMS
- goto HAVEN.TELLER
- HAVEN.PREMIUM:
- gosub AUTOMOVE premium exchange
- gosub LIRUMS
- HAVEN.TELLER:
- gosub AUTOMOVE teller
- var Banked 1
- gosub BANK
- if ("$guild" = "Thief") then gosub PUT with 4 silver
- gosub MOVE go arch
- if ("$guild" = "Necromancer") then gosub NECRO.PREP
- gosub MOVE out
- if ("$guild" != "Thief") then goto DONE.STEALING.HAVEN
- if ("%BIN" = "OFF") then goto DONE.STEALING.HAVEN
- GO.BIN_HAVEN:
- HAVEN.GO.BIN:
- HAVEN.FIND.GUILD:
- var LAST HAVEN.FIND.GUILD
- var BIN_HAVEN 0
- pause 0.5
- match hole1 selling off some stolen goods
- match hole2 Crescent Way
- match hole3 Silvermoon Road
- match hole4 the boss is with his own kind
- match hole5 cooped up
- match hole6 around the rookery
- matchre NO.CONTACTS Apparently there are too many eyes on you|USAGE|walks off|look of disgust
- send contact guild
- matchwait 10
- goto NO.CONTACTS
- NO.CONTACTS:
- var HAVEN_LOCATION LOST
- hole1:
- var LAST hole1
- gosub AUTOMOVE 33
- gosub SEARCH
- pause $roundtime
- pause 0.5
- gosub PUT knock door
- gosub PUT whisper door %HAVEN_PW
- gosub MOVE climb stair
- gosub MOVE ne
- gosub MOVE go corner
- athole1:
- if matchre("$roomobjs","(Crow|Lady Swan)") then
- {
- var BIN_HAVEN 1
- gosub BIN.GOODS
- gosub CIRCLE.CHECK
- }
- gosub MOVE out
- gosub MOVE sw
- send climb stair
- pause 0.5
- send go door
- pause 0.5
- if ("%HAVEN_LOCATION" = "LOST") && ("%BIN_HAVEN" = "0") then goto hole2
- goto HAVEN.DONE.ASSESS
- hole2:
- var LAST hole2
- gosub AUTOMOVE 47
- gosub SEARCH
- pause $roundtime
- pause 0.5
- gosub PUT knock door
- gosub PUT whisper door %HAVEN_PW
- gosub PUT look shadow
- gosub PUT search shadow
- pause 0.5
- gosub MOVE go open
- gosub MOVE go cor
- athole2:
- if matchre("$roomobjs","(Crow|Lady Swan)") then
- {
- var BIN_HAVEN 1
- gosub BIN.GOODS
- gosub CIRCLE.CHECK
- }
- gosub MOVE out
- gosub MOVE out
- gosub MOVE go door
- if ("%HAVEN_LOCATION" = "LOST") && ("%BIN_HAVEN" = "0") then goto hole3
- goto HAVEN.DONE.ASSESS
- hole3:
- var LAST hole3
- gosub AUTOMOVE 36
- gosub SEARCH
- pause $roundtime
- gosub PUT knock door
- gosub PUT whisper door %HAVEN_PW
- gosub PUT look floor
- gosub MOVE go door
- gosub MOVE go cor
- athole3:
- if matchre("$roomobjs","(Crow|Lady Swan)") then
- {
- var BIN_HAVEN 1
- gosub BIN.GOODS
- gosub CIRCLE.CHECK
- }
- gosub MOVE out
- send climb door
- pause 0.5
- gosub MOVE out
- if ("%HAVEN_LOCATION" = "LOST") && ("%BIN_HAVEN" = "0") then goto hole4
- goto HAVEN.DONE.ASSESS
- hole4:
- var LAST hole4
- gosub AUTOMOVE 302
- gosub SEARCH
- pause $roundtime
- gosub PUT knock grat
- gosub PUT whisper grat %HAVEN_PW
- gosub MOVE go door
- gosub MOVE ne
- gosub MOVE go nook
- athole4:
- if matchre("$roomobjs","(Crow|Lady Swan)") then
- {
- var BIN_HAVEN 1
- gosub BIN.GOODS
- gosub CIRCLE.CHECK
- }
- gosub MOVE out
- gosub MOVE sw
- gosub MOVE go door
- gosub MOVE go grate
- gosub MOVE out
- if ("%HAVEN_LOCATION" = "LOST") && ("%BIN_HAVEN" = "0") then goto hole5
- goto HAVEN.DONE.ASSESS
- hole5:
- var LAST hole5
- gosub AUTOMOVE 41
- gosub SEARCH
- pause $roundtime
- pause 0.5
- gosub PUT knock door
- gosub PUT whisper door %HAVEN_PW
- gosub MOVE n
- gosub MOVE go corn
- athole5:
- if matchre("$roomobjs","(Crow|Lady Swan)") then
- {
- var BIN_HAVEN 1
- gosub BIN.GOODS
- gosub CIRCLE.CHECK
- }
- gosub MOVE out
- gosub MOVE s
- gosub MOVE go door
- if ("%HAVEN_LOCATION" = "LOST") && ("%BIN_HAVEN" = "0") then goto hole6
- goto HAVEN.DONE.ASSESS
- hole6:
- var LAST hole6
- gosub AUTOMOVE 305
- gosub SEARCH
- pause $roundtime
- gosub PUT knock door
- gosub PUT whisper door %HAVEN_PW
- gosub MOVE go arch
- gosub MOVE climb st
- gosub MOVE go cor
- athole6:
- if matchre("$roomobjs","(Crow|Lady Swan)") then
- {
- var BIN_HAVEN 1
- gosub BIN.GOODS
- gosub CIRCLE.CHECK
- }
- gosub MOVE out
- gosub MOVE climb sta
- gosub MOVE go arc
- gosub MOVE go door
- goto HAVEN.DONE.ASSESS
- HAVEN.DONE.ASSESS:
- var LAST HAVEN.DONE.ASSESS
- math RunsCompleted add 1
- send exp
- waitforre ^EXP HELP for more information
- DONE.STEALING.HAVEN:
- var LAST DONE.STEALING.HAVEN
- gosub AUTOMOVE town
- if ("%SINGLE_RUN" = "ON") || ($Thievery.LearningRate >= 32) || ("%EndEarly" = "ON") || ("%HAVEN_RUN" = "ON") then goto FINISHED.SCRIPT
- if ("%CITY" = "SHARD") || ("%CITY" = "CROSSING") || ("%CITY" = "HIB") || ("%CITY" = "LETH") && ("%FAR_CITIES" = "OFF") then goto FINISHED.SCRIPT
- if ("%CITY" = "SHARD") || ("%CITY" = "CROSSING") || ("%CITY" = "HIB") || ("%CITY" = "LETH") && ("%FAR_CITIES" = "ON") then goto TO.THEREN
- if ("%CITY" = "RIVERHAVEN") || ("%CITY" = "ROSSMAN") || ("%CITY" = "THEREN") && ($Thievery.LearningRate < 30) then goto TO.ARTHE
- goto TO.ARTHE
- ############################################################################
- ## ZOLUREN STEALING SECTION (ARTHE / CROSSING / LETH ) ##
- ############################################################################
- # ARTHE DALE
- CROSSING.STEAL:
- ARTHE.STEAL:
- TO.ARTHE:
- var ARTHE ON
- var LAST TO.ARTHE
- if ($zoneid = 30) && ($roomid != 8) then gosub AUTOMOVE 8
- if ($zoneid = 1) && ($roomid != 42) then gosub AUTOMOVE 42
- if ($zoneid = 7) then goto ARTHE
- send .%TRAVEL_SCRIPT arthe
- waitforre ^REACHED YOUR DESTINATION
- pause
- ARTHE:
- var CURRENT_CITY ARTHE
- var LAST CROSSING
- var PawnLoc GO.PAWN.CROSS
- gosub AUTOMOVE glaysker
- pause 0.5
- ECHO
- ECHO *** STEALING FROM ARTHE DALE!
- ECHO
- gosub KHRI
- if ("$guild" = "Necromancer") then gosub NECRO.PREP
- ARTHE.EXP.CHECK.0:
- if $Thievery.Ranks >= 460 then goto ARTHE.TO.ODDS
- ARTHE.TO.PATTERN:
- var LAST ARTHE.TO.FASHION
- gosub AUTOMOVE embroid
- ARTHE.THREADS:
- var RETRY ARTHE.THREADS
- var shopcode AD.Thread
- var SHOP Arthe Dale Thread Shop
- gosub STEAL %AD.Thread
- ARTHE.TO.FASHION:
- var LAST ARTHE.TO.ODDS
- gosub AUTOMOVE clothing
- ARTHE.FASHION:
- var RETRY ARTHE.FASHION
- var shopcode AD.Fash
- var SHOP Arthe Dale Fashion Shop
- gosub STEAL %AD.Fash
- ARTHE.TO.ODDS:
- var LAST ARTHE.EXP.CHECK.1
- gosub AUTOMOVE Odds
- ARTHE.ODDS:
- var RETRY ARTHE.ODDS
- var shopcode AD.Odds
- var SHOP Arthe Dale Odds'n'Ends Shop
- gosub STEAL %AD.Odds
- if $hidden then gosub unhide
- gosub MOVE out
- ARTHE.EXP.CHECK.1:
- if $Thievery.Ranks >= 600 then goto ARTHE.TIME.0
- ARTHE.TO.BARD:
- var LAST ARTHE.TIME.0
- gosub AUTOMOVE music
- ARTHE.BARD:
- var RETRY ARTHE.BARD
- var shopcode AD.Bard
- var SHOP Arthe Dale Bard Shop
- gosub STEAL %AD.Bard
- gosub MOVE out
- ARTHE.TIME.0:
- gosub TIME.CHECK
- if ("%TIME" = "NIGHT") then goto ARTHE.EXP.CHECK.2
- ARTHE.TO.ARMOR:
- var LAST ARTHE.EXP.CHECK.2
- gosub AUTOMOVE Armor
- ARTHE.ARMOR:
- var RETRY ARTHE.ARMOR
- var shopcode AD.Arm
- var SHOP Arthe Dale Armor Shop
- gosub STEAL %AD.Arm
- ARTHE.EXP.CHECK.2:
- if $Thievery.Ranks >= 300 then goto ARTHE.TO.YULUGRI
- ARTHE.TO.FETA:
- var LAST ARTHE.TO.YULUGRI
- gosub AUTOMOVE feta
- ARTHE.FETA:
- var RETRY ARTHE.FETA
- var shopcode AD.Feta
- var itemLocation %AD.FETA.Loc
- var SHOP Arthe Dale Feta's Kitchen
- gosub STEAL %AD.Feta
- ARTHE.TO.YULUGRI:
- var LAST ARTHE.EXP.CHECK.3
- gosub AUTOMOVE Yulugri
- ARTHE.YULUGRI:
- var RETRY ARTHE.YULUGRI
- var shopcode AD.Map
- var SHOP Arthe Dale Yulugri
- gosub STEAL %AD.Map
- ARTHE.EXP.CHECK.3:
- if $Thievery.Ranks >= 360 then goto LEAVE.ARTHE
- ARTHE.TO.SMOKE:
- var LAST ARTHE.EXP.CHECK.4
- gosub AUTOMOVE smoking
- ARTHE.SMOKE:
- var RETRY ARTHE.SMOKE
- var shopcode AD.Smoke
- var SHOP Arthe Dale Smoke Shop
- gosub STEAL %AD.Smoke
- ARTHE.EXP.CHECK.4:
- if $Thievery.Ranks >= 260 then goto LEAVE.ARTHE
- if $Thievery.Ranks >= 220 then goto ARTHE.EXP.CHECK.7
- ARTHE.TO.TART:
- var LAST ARTHE.EXP.CHECK.5
- gosub AUTOMOVE 631
- ARTHE.TART:
- var RETRY ARTHE.TART
- var shopcode AD.Tart.E
- var SHOP Arthe Dale TART E
- gosub STEAL %AD.Tart.E
- ARTHE.EXP.CHECK.5:
- if $Thievery.Ranks >= 195 then goto ARTHE.EXP.CHECK.6
- ARTHE.TO.TART.C:
- var LAST ARTHE.EXP.CHECK.6
- gosub AUTOMOVE 630
- ARTHE.TART.C:
- var RETRY ARTHE.TART.C
- var shopcode AD.Tart.C
- var SHOP Arthe Dale TART C
- gosub STEAL %AD.Tart.E
- ARTHE.EXP.CHECK.6:
- if $Thievery.Ranks >= 212 then goto ARTHE.EXP.CHECK.7
- ARTHE.TO.TART.M:
- var LAST ARTHE.EXP.CHECK.7
- gosub AUTOMOVE 629
- ARTHE.TART.M:
- var RETRY ARTHE.TART.M
- var shopcode AD.Tart.M
- var SHOP Arthe Dale TART M
- gosub STEAL %AD.Tart.E
- ARTHE.EXP.CHECK.7:
- if $Thievery.Ranks >= 230 then goto LEAVE.ARTHE
- ARTHE.TO.TART.L:
- var LAST ARTHE.EXP.CHECK.8
- gosub AUTOMOVE 628
- ARTHE.TART.L:
- var RETRY ARTHE.TART.L
- var shopcode AD.Tart.L
- var SHOP Arthe Dale TART L
- gosub STEAL %AD.Tart.E
- ARTHE.EXP.CHECK.8:
- if $Thievery.Ranks >= 181 then goto LEAVE.ARTHE
- ARTHE.TO.TART.F:
- gosub AUTOMOVE 627
- ARTHE.TART.F:
- var RETRY ARTHE.TART.F
- var shopcode AD.Tart.F
- var SHOP Arthe Dale TART F
- gosub STEAL %AD.Tart.E
- LEAVE.ARTHE:
- var LAST ARTHE.EXP.CHECK.9
- if $hidden = 1 then gosub unhide
- pause 0.1
- ARTHE.EXP.CHECK.9:
- if $Thievery.Ranks >= 890 then goto DONE.KAERNA
- ARTHE.TO.KAERNA:
- var LAST DONE.KAERNA
- gosub AUTOMOVE grek
- KAERNA.GENERAL:
- var RETRY KAERNA.GENERAL
- var shopcode KA.Grek
- var SHOP Kaerna General
- gosub STEAL %KA.Grek
- DONE.KAERNA:
- var ARTHE OFF
- if $hidden = 1 then gosub unhide
- if ("$guild" = "Thief") then
- {
- gosub KHRI.START meditate
- }
- pause 0.5
- goto TO.CROSSING
- ##################################
- #### CROSSINGS
- ##################################
- TO.CROSSING:
- gosub AUTOMOVE crossing
- gosub AUTOMOVE 152
- goto WARRANT.CHECK.CROSS
- XING:
- CROSS:
- CROSSING:
- CROSSINGS:
- WARRANT.CHECK.CROSS:
- var LAST CROSSINGS
- var CURRENT_CITY CROSSING
- var PawnLoc GO.PAWN.CROSS
- ECHO
- ECHO *** STEALING FROM CROSSING!
- ECHO
- if matchre("$roomobjs","(town guard)") then put surrender guard
- pause 0.5
- CROSSING.EXP.CHECK.0:
- if ($Thievery.LearningRate > 32) && ("%STEALTH" != "ON") then goto GO.CROSS.PAWN
- if ($Thievery.LearningRate > 32) && ($Stealth.LearningRate > 32) then goto GO.CROSS.PAWN
- gosub KHRI
- if ("$guild" = "Necromancer") then gosub NECRO.PREP
- pause 0.2
- CROSSING.TO.SCRIPT:
- var CURRENT_CITY CROSSING
- var LAST CROSSING.EXP.CHECK.1
- gosub AUTOMOVE Temple
- gosub AUTOMOVE Script
- CROSSING.SCRIPTORIUM:
- var RETRY CROSSING.SCRIPTORIUM
- var shopcode C.Script
- var SHOP Crossing Scriptorium
- gosub STEAL %C.Script.Num %C.Script
- if $hidden then gosub unhide
- gosub AUTOMOVE cross
- pause 0.5
- CROSSING.EXP.CHECK.1:
- if $Thievery.Ranks >= 487 then goto CROSSING.EXP.CHECK.2
- if ($Thievery.LearningRate > 32) && ("%STEALTH" != "ON") then goto GO.CROSS.PAWN
- if ($Thievery.LearningRate > 32) && ($Stealth.LearningRate > 32) then goto GO.CROSS.PAWN
- CROSSING.TO.CARD:
- var LAST CROSSING.EXP.CHECK.2
- gosub AUTOMOVE Card shop
- CROSSING.CARD:
- var RETRY CROSSING.CARD
- var shopcode C.Card
- var SHOP Crossing Card Shop
- gosub STEAL %C.Card
- CROSSING.EXP.CHECK.2:
- if $Thievery.Ranks >= 400 then goto CROSSING.EXP.CHECK.3
- if ($Thievery.LearningRate > 32) && ("%STEALTH" != "ON") then goto GO.CROSS.PAWN
- if ($Thievery.LearningRate > 32) && ($Stealth.LearningRate > 32) then goto GO.CROSS.PAWN
- CROSSING.TO.CLOTHING:
- var LAST CROSSING.EXP.CHECK.3
- if $Thievery.LearningRate > 32 then goto GO.CROSS.PAWN
- gosub AUTOMOVE clothing
- CROSSING.CLOTHING:
- var RETRY CROSSING.CLOTHING
- var shopcode C.Stitch
- var SHOP Crossing Clothing Shop
- gosub STEAL %C.Stitch
- CROSSING.EXP.CHECK.3:
- if $Thievery.Ranks >= 610 then goto CROSSING.EXP.CHECK.4
- if ($Thievery.LearningRate > 32) && ("%STEALTH" != "ON") then goto GO.CROSS.PAWN
- if ($Thievery.LearningRate > 32) && ($Stealth.LearningRate > 32) then goto GO.CROSS.PAWN
- CROSSING.TO.JEWELRY:
- var LAST CROSSING.EXP.CHECK.4
- gosub AUTOMOVE jewel
- CROSSING.JEWELRY:
- var RETRY CROSSING.JEWELRY
- var shopcode C.Jewel
- var SHOP Crossing Jewelry Shop
- gosub STEAL %C.Jewel
- CROSSING.EXP.CHECK.4:
- if $Thievery.Ranks >= 750 then goto CROSSING.EXP.CHECK.5
- if ($Thievery.LearningRate > 32) && ("%STEALTH" != "ON") then goto GO.CROSS.PAWN
- if ($Thievery.LearningRate > 32) && ($Stealth.LearningRate > 32) then goto GO.CROSS.PAWN
- CROSSING.TO.GENERAL:
- var LAST CROSSING.EXP.CHECK.5
- gosub AUTOMOVE General
- CROSSING.GENERAL:
- var RETRY CROSSING.GENERAL
- var shopcode C.Gen
- var SHOP Crossing General Store
- gosub STEAL %C.Gen
- CROSSING.EXP.CHECK.5:
- if $Thievery.Ranks >= 481 then goto CROSSING.EXP.CHECK.6
- if ($Thievery.LearningRate > 32) && ("%STEALTH" != "ON") then goto GO.CROSS.PAWN
- if ($Thievery.LearningRate > 32) && ($Stealth.LearningRate > 32) then goto GO.CROSS.PAWN
- CROSSING.TO.CLERIC:
- var LAST CROSSING.EXP.CHECK.6
- gosub AUTOMOVE duran
- CROSSING.CLERIC:
- var RETRY CROSSING.CLERIC
- var shopcode C.Cler
- var SHOP Crossing Cleric Shop
- gosub STEAL %C.Cler
- CROSSING.EXP.CHECK.6:
- if matchre("$guild","Cleric") && ($Thievery.Ranks >= 487) then goto CROSSING.TO.CLERIC2
- if ($Thievery.LearningRate > 32) && ("%STEALTH" != "ON") then goto GO.CROSS.PAWN
- if ($Thievery.LearningRate > 32) && ($Stealth.LearningRate > 32) then goto GO.CROSS.PAWN
- goto CROSSING.EXP.CHECK.7
- CROSSING.TO.CLERIC2:
- var LAST CROSSING.EXP.CHECK.7
- gosub AUTOMOVE 957
- CROSSING.CLERIC2:
- var RETRY CROSSING.CLERIC2
- var shopcode C.Cler2
- var SHOP Crossing Cleric2 Shop
- gosub STEAL %C.Cler2
- CROSSING.EXP.CHECK.7:
- if ($Thievery.LearningRate > 32) && ("%STEALTH" != "ON") then goto GO.CROSS.PAWN
- if ($Thievery.LearningRate > 32) && ($Stealth.LearningRate > 32) then goto GO.CROSS.PAWN
- if $Thievery.Ranks >= 520 then goto CROSSING.TO.MUSIC
- CROSSING.TO.BATH:
- var LAST CROSSING.TO.LOCK
- gosub AUTOMOVE bathhouse
- CROSSING.BATHHOUSE:
- var RETRY CROSSING.BATHHOUSE
- var shopcode C.Bath
- var SHOP Crossing Bathhouse
- var itemLocation %C.Bath.Loc
- gosub STEAL %C.Bath.Num %C.Bath
- CROSSING.TO.LOCK:
- var itemLocation
- var LAST CROSSING.TO.MUSIC
- if ($Thievery.LearningRate > 32) && ("%STEALTH" != "ON") then goto GO.CROSS.PAWN
- if ($Thievery.LearningRate > 32) && ($Stealth.LearningRate > 32) then goto GO.CROSS.PAWN
- if $Thievery.Ranks >= 150 && $Thievery.Ranks < 250 then goto CROSSING.TO.MUSIC
- gosub AUTOMOVE locks
- CROSSING.LOCKSMITH:
- var RETRY CROSSING.LOCKSMITH
- var shopcode C.Lock
- var SHOP Crossing Locksmith
- gosub STEAL %C.Lock
- CROSSING.TO.MUSIC:
- var LAST CROSSING.TO.ARMOR
- gosub AUTOMOVE Music
- CROSSING.EXP.CHECK.8:
- if ($Thievery.LearningRate > 32) && ("%STEALTH" != "ON") then goto GO.CROSS.PAWN
- if ($Thievery.LearningRate > 32) && ($Stealth.LearningRate > 32) then goto GO.CROSS.PAWN
- if $Thievery.Ranks >= 600 then goto CROSSING.TO.MUSIC.BACKROOM
- CROSSING.MUSIC:
- var RETRY CROSSING.MUSIC
- var shopcode C.Music
- var SHOP Crossing Music Shop
- gosub STEAL %C.Music
- CROSSING.TO.MUSIC.BACKROOM:
- var LAST CROSSING.TO.ARMOR
- if $hidden then gosub unhide
- gosub MOVE go curtain
- CROSSING.MUSIC.BACKROOM:
- var RETRY CROSSING.MUSIC.BACKROOM
- var shopcode C.Music2
- var SHOP Xing music shop backroom
- var LAST CROSSING.TO.ARMOR
- gosub STEAL %C.Music2
- gosub MOVE go curtain
- CROSSING.TO.ARMOR:
- var LAST CROSSING.TO.WEAPON
- gosub AUTOMOVE Armor
- CROSSING.ARMOR:
- var RETRY CROSSING.ARMOR
- var shopcode C.Arm
- var SHOP Crossing Armor Shop
- gosub STEAL %C.Arm
- CROSSING.TO.WEAPON:
- var LAST CROSSING.EXP.CHECK.9
- gosub AUTOMOVE Weapon
- CROSSING.WEAPON:
- var RETRY CROSSING.WEAPON
- var shopcode C.Weap
- var SHOP Crossing Weapon Shop
- gosub STEAL %C.Weap
- CROSSING.EXP.CHECK.9:
- if $Thievery.Ranks >= 350 then goto CROSSING.EXP.CHECK.10
- if ($Thievery.LearningRate > 32) && ("%STEALTH" != "ON") then goto GO.CROSS.PAWN
- if ($Thievery.LearningRate > 32) && ($Stealth.LearningRate > 32) then goto GO.CROSS.PAWN
- CROSSING.TO.FLORIST:
- var LAST CROSSING.EXP.CHECK.10
- if ($Thievery.LearningRate > 52) then
- {
- if ($Thievery.LearningRate < 150) then goto CROSSING.EXP.CHECK.10
- }
- gosub AUTOMOVE Florist
- CROSSING.FLORIST:
- var RETRY CROSSING.FLORIST
- var shopcode C.Flow
- var SHOP Crossing Florist
- gosub STEAL %C.Flow
- CROSSING.EXP.CHECK.10:
- if $Thievery.Ranks >= 300 then goto CROSSING.TO.EMPATH
- if ($Thievery.LearningRate > 32) && ("%STEALTH" != "ON") then goto GO.CROSS.PAWN
- if ($Thievery.LearningRate > 32) && ($Stealth.LearningRate > 32) then goto GO.CROSS.PAWN
- CROSSING.TO.SHOE:
- var LAST CROSSING.TO.EMPATH
- gosub AUTOMOVE Shoe
- CROSSING.SHOES:
- var RETRY CROSSING.SHOES
- var shopcode C.Cobb
- var SHOP Crossing Shoe Shop
- gosub STEAL %C.Cobb
- CROSSING.TO.EMPATH:
- var LAST CROSSING.TO.EMPATH2
- if ($Thievery.LearningRate > 32) && ("%STEALTH" != "ON") then goto GO.CROSS.PAWN
- if ($Thievery.LearningRate > 32) && ($Stealth.LearningRate > 32) then goto GO.CROSS.PAWN
- if !matchre("$guild","(Thief|Empath)") then goto CROSSING.EXP.CHECK.11
- gosub AUTOMOVE Emmiline
- CROSSING.EMPATH:
- var RETRY CROSSING.EMPATH
- var shopcode C.Empath
- var SHOP Crossing Empath Shop
- var SECOND_ITEM 1
- var secondary %C.Empath.Alt
- gosub STEAL %C.Empath
- CROSSING.TO.EMPATH2:
- var LAST CROSSING.TO.EMPATH3
- gosub MOVE w
- CROSSING.EMPATH2:
- var RETRY CROSSING.EMPATH2
- var shopcode C.Empath2
- var SHOP Crossing Empath Shop 2
- gosub STEAL %C.Empath2
- CROSSING.TO.EMPATH3:
- var LAST CROSSING.EXP.CHECK.11
- gosub MOVE e
- gosub MOVE go arch
- CROSSING.EMPATH3:
- var RETRY CROSSING.EMPATH3
- var shopcode C.Empath3
- var SHOP Crossing Empath Shop 3
- var SECOND_ITEM 1
- var itemLocation %C.Empath3.Loc
- var secondary %C.Empath3.Alt
- gosub STEAL %C.Empath3
- gosub MOVE go arch
- gosub MOVE go door
- gosub MOVE go step
- CROSSING.EXP.CHECK.11:
- if ($Thievery.LearningRate > 32) && ("%STEALTH" != "ON") then goto GO.CROSS.PAWN
- if ($Thievery.LearningRate > 32) && ($Stealth.LearningRate > 32) then goto GO.CROSS.PAWN
- if $Thievery.Ranks >= 334 then goto CROSSING.TO.ALCHEMY
- CROSSING.TO.HERBS:
- var LAST CROSSING.TO.ALCHEMY
- gosub AUTOMOVE Herb
- CROSSING.HERBS:
- var RETRY CROSSING.HERBS
- var shopcode C.Herb
- var SHOP Crossing Herb Shop
- gosub STEAL %C.Herb
- CROSSING.TO.ALCHEMY:
- if $Thievery.Ranks >= 1050 then goto CROSSING.EXP.CHECK.13
- var LAST CROSSING.EXP.CHECK.12
- gosub AUTOMOVE Chizil
- CROSSING.ALCHEMY:
- var RETRY CROSSING.ALCHEMY
- var shopcode C.Alch
- var itemLocation %C.Alch.Loc
- var SHOP Crossing Alchemy Shop
- gosub STEAL %C.Alch
- CROSSING.EXP.CHECK.12:
- if $Thievery.Ranks >= 640 then goto CROSSING.EXP.CHECK.13
- if ($Thievery.LearningRate > 32) && ("%STEALTH" != "ON") then goto GO.CROSS.PAWN
- if ($Thievery.LearningRate > 32) && ($Stealth.LearningRate > 32) then goto GO.CROSS.PAWN
- CROSSING.TO.TANNER:
- var LAST CROSSING.EXP.CHECK.13
- if $hidden then gosub unhide
- gosub AUTOMOVE tanner
- CROSSING.TANNER:
- var RETRY CROSSING.TANNER
- var shopcode C.Tann
- var SHOP Crossing Tanner
- var itemLocation %C.Tann.Loc
- gosub STEAL %C.Tann
- CROSSING.EXP.CHECK.13:
- if $Thievery.Ranks >= 670 then goto CROSSING.TO.ARTIFICE
- if ($Thievery.LearningRate > 32) && ("%STEALTH" != "ON") then goto GO.CROSS.PAWN
- if ($Thievery.LearningRate > 32) && ($Stealth.LearningRate > 32) then goto GO.CROSS.PAWN
- CROSSING.TO.HABER:
- var LAST CROSSING.TO.ARTIFICE
- gosub AUTOMOVE haber
- CROSSING.HABERDASHERY:
- var RETRY CROSSING.HABERDASHERY
- var shopcode C.Haber
- var SHOP Crossing Haberdashery
- gosub STEAL %C.Haber
- CROSSING.TO.ARTIFICE:
- var LAST GO.CROSS.PAWN
- #if $Thievery.Ranks >= 975 then goto GO.CROSS.PAWN
- gosub AUTOMOVE magic
- CROSSING.ARTIFICER:
- var RETRY CROSSING.ARTIFICER
- var shopcode C.Artif
- var SHOP Crossing Artificer
- gosub STEAL %C.Artif
- GO.PAWN.CROSS:
- GO.CROSS.PAWN:
- var CURRENT_CITY CROSSING
- var LAST GO.CROSS.PAWN
- if $hidden then gosub unhide
- #if ("$guild" = "Thief") then send khri stop
- if $zoneid = 7 then gosub AUTOMOVE crossing
- if $zoneid = 1 then gosub AUTOMOVE 152
- if ("%PAWN" = "OFF") then goto GO.CROSS.BIN
- gosub AUTOMOVE pawn
- gosub PAWN.GOODS
- ### OLD OBSOLETE SAND SPIT METHOD TO THIEF GUILD - Accounts for both Prime and TF room differences
- #gosub AUTOMOVE sand spit tavern
- #gosub MOVE go back area
- #gosub MOVE climb ladder
- #if matchre("$roomobjs" , "^You also see a witchclaw door with a large stone archway, a dark yew door, some old barrels, a rickety ladder and an old barrel with a thieves guild sign carved into the side") then
- # {
- # gosub MOVE go other barrel
- # goto GO.BIN.CONT
- # }
- #if matchre("$roomobjs" , "^You also see some old barrels") then
- # {
- # gosub MOVE go other barrel
- # goto GO.BIN.CONT
- # }
- #if matchre("$roomobjs" , "^You also see an old barrel with a thieves guild sign") then
- # {
- # gosub MOVE go barrel
- # goto GO.BIN.CONT
- # }
- GO.CROSS.BIN:
- var LAST GO.CROSS.BIN
- if ("$guild" != "Thief") then goto DONE.STEALING.CROSS2
- if ("%BIN" = "OFF") then goto DONE.STEALING.CROSS2
- gosub AUTOMOVE 72
- gosub AUTOMOVE 549
- gosub PUT tap knocker
- pause 0.5
- GO.BIN.CONT:
- gosub AUTOMOVE bin
- gosub BIN.GOODS
- DONE.STEALING.CROSS:
- var LAST DONE.STEALING.CROSS
- gosub MOVE go door
- gosub CIRCLE.CHECK
- pause 0.5
- gosub MOVE go door
- # Leaving the THIEF GUILD
- DONE.STEALING.CROSS2:
- var LAST DONE.STEALING.CROSS2
- if ("%PREMIUM" = "ON") && ("%EXCHANGE" = "ON") then goto CROSS.PREMIUM
- if ("%EXCHANGE" != "ON") then goto CROSS.TELLER
- gosub AUTOMOVE exchange
- gosub KRONARS
- goto CROSS.TELLER
- CROSS.PREMIUM:
- gosub AUTOMOVE premium exchange
- gosub KRONARS
- CROSS.TELLER:
- gosub AUTOMOVE teller
- gosub BANK
- send with 10 silver
- gosub MOVE out
- if ("$guild" = "Necromancer") then gosub NECRO.PREP
- gosub MOVE out
- CROSSING.DECIDE:
- if ($roomid != 42) then gosub AUTOMOVE 42
- if ("%SINGLE_RUN" = "ON") || ($Thievery.LearningRate >= 32) || ("%EndEarly" = "ON") then goto FINISHED.SCRIPT
- if ("%CITY" = "SHARD") || ("%CITY" = "HIB") || ("%CITY" = "CROSSING") || ("%CITY" = "LETH") && ($Thievery.LearningRate < 30) then goto TO.RIVERHAVEN
- if ("%CITY" = "RIVERHAVEN") || ("%CITY" = "ROSSMAN") || ("%CITY" = "THEREN") && ($Thievery.LearningRate < 30) then goto TO.LETH
- goto TO.LETH
- #####################################
- ## LETH DERIEL
- #####################################
- TO.LETH:
- if ($zoneid = 1) && ($roomid != 42) then gosub AUTOMOVE 42
- send .%TRAVEL_SCRIPT leth
- waitforre ^REACHED YOUR DESTINATION
- LETH.STEAL:
- WARRANT.CHECK.LETH:
- var LAST LETH.STEAL
- var CURRENT_CITY LETH
- var PawnLoc GO.PAWN.LETH
- if matchre("$roomobjs","(Elven Warden)") then put surrender warden
- pause 0.5
- ECHO
- ECHO *** STEALING FROM LETH DERIEL!
- ECHO
- gosub KHRI
- if ("$guild" = "Necromancer") then gosub NECRO.PREP
- LETH.EXP.CHECK.0:
- if ($Thievery.LearningRate > 32) && ("%STEALTH" != "ON") then goto DONE.STEALING.LETH
- if ($Thievery.LearningRate > 32) && ($Stealth.LearningRate > 32) then goto DONE.STEALING.LETH
- if $Thievery.Ranks >= 500 then goto LETH.TO.BOWYER
- LETH.TO.SKIN:
- var LAST LETH.TO.BOWYER
- gosub AUTOMOVE morik
- LETH.SKIN:
- var RETRY LETH.SKIN
- var shopcode L.Skin
- var SHOP Leth Skin Shop
- gosub STEAL %L.Skin
- LETH.TO.BOWYER:
- var LAST LETH.TO.ORIGAMI
- gosub AUTOMOVE Bow
- LETH.BOWYER:
- var RETRY LETH.BOWYER
- var shopcode L.Bow
- var SHOP Leth Bowyer
- gosub STEAL %L.Bow
- LETH.TO.ORIGAMI:
- var LAST LETH.EXP.CHECK.1
- gosub AUTOMOVE Origami
- LETH.ORIGAMI:
- var RETRY LETH.ORIGAMI
- var shopcode L.Orig
- var SHOP Leth Origami
- gosub STEAL %L.Orig.Num %L.Orig
- LETH.EXP.CHECK.1:
- if ($Thievery.LearningRate > 32) && ("%STEALTH" != "ON") then goto DONE.STEALING.LETH
- if ($Thievery.LearningRate > 32) && ($Stealth.LearningRate > 32) then goto DONE.STEALING.LETH
- if ($Thievery.Ranks > 400) then goto LETH.TO.WEAPON
- goto LETH.EXP.CHECK.2
- LETH.TO.WEAPON:
- var LAST LETH.EXP.CHECK.2
- if $hidden then gosub unhide
- gosub AUTOMOVE weapon
- LETH.WEAPON:
- var RETRY LETH.WEAPON
- var shopcode L.Weap
- var SHOP Leth Weapon Shop
- gosub STEAL %L.Weap
- LETH.EXP.CHECK.2:
- if $Thievery.Ranks >= 487 then goto LETH.TO.BARD2
- LETH.TO.WICKER:
- var LAST LETH.EXP.CHECK.3
- gosub AUTOMOVE Wicker
- LETH.WICKER:
- var RETRY LETH.WICKER
- var shopcode L.Wick
- var SHOP Leth Wicker Shop
- gosub STEAL %L.Wick
- LETH.EXP.CHECK.3:
- if $Thievery.Ranks >= 300 then goto LETH.TO.BARD2
- if ($Thievery.LearningRate > 32) && ("%STEALTH" != "ON") then goto DONE.STEALING.LETH
- if ($Thievery.LearningRate > 32) && ($Stealth.LearningRate > 32) then goto DONE.STEALING.LETH
- LETH.TO.BARD:
- var LAST LETH.TO.BARD2
- gosub AUTOMOVE music
- LETH.BARD:
- var RETRY LETH.BARD
- var shopcode L.Bard
- var SHOP Leth Bard Shop
- gosub STEAL %L.Bard
- LETH.TO.BARD2:
- var LAST LETH.EXP.CHECK.4
- if $Thievery.Ranks > 980 then goto LETH.EXP.CHECK.4
- gosub AUTOMOVE siny
- LETH.BARD2:
- var RETRY LETH.BARD2
- var shopcode L.Bard2
- var SHOP Leth Bard2 Shop
- gosub STEAL %L.Bard2
- LETH.EXP.CHECK.4:
- if $Thievery.LearningRate > 32 then goto DONE.STEALING.LETH
- if $Thievery.Ranks >= 700 then goto LETH.TO.WOOD
- LETH.TO.CLOTHES:
- var LAST LETH.TO.WOOD
- gosub AUTOMOVE Clothing
- LETH.CLOTHES:
- var RETRY LETH.CLOTHES
- var shopcode L.Cloth
- var SHOP Leth Clothes Shop
- gosub STEAL %L.Cloth
- if $hidden then gosub unhide
- LETH.TO.WOOD:
- var LAST LETH.TO.GENERAL
- if $hidden then gosub unhide
- gosub AUTOMOVE wood
- LETH.WOOD:
- var RETRY LETH.WOOD
- var shopcode L.Wood
- var SHOP Leth Wood Shop
- gosub STEAL %L.Wood
- LETH.TO.GENERAL:
- var LAST LETH.EXP.CHECK.5
- gosub AUTOMOVE General
- LETH.GENERAL:
- var RETRY LETH.GENERAL
- var shopcode L.Gen
- var SHOP Leth General Store
- var SECOND_ITEM 1
- var secondary %L.Gen.Alt
- gosub STEAL %L.Gen
- LETH.EXP.CHECK.5:
- if ($Thievery.LearningRate > 32) && ("%STEALTH" != "ON") then goto DONE.STEALING.LETH
- if ($Thievery.LearningRate > 32) && ($Stealth.LearningRate > 32) then goto DONE.STEALING.LETH
- if $Thievery.Ranks >= 465 then goto DONE.STEALING.LETH
- LETH.TO.PERFUME:
- var LAST DONE.STEALING.LETH
- gosub AUTOMOVE Perfume
- LETH.PERFUME:
- var RETRY LETH.PERFUME
- var shopcode L.Perf
- var SHOP Leth Perfume Shop
- gosub STEAL %L.Perf
- DONE.STEALING.LETH:
- LETH.BANK:
- var LAST LETH.BANK
- if ("%EXCHANGE" != "ON") then goto LETH.TELLER
- gosub AUTOMOVE exchange
- gosub KRONARS
- LETH.TELLER:
- gosub AUTOMOVE teller
- gosub BANK
- gosub PUT withdraw 3 silver
- GO.PAWN.LETH:
- GO.LETH.PAWN:
- var CURRENT_CITY LETH
- var LAST GO.LETH.PAWN
- if $hidden then gosub unhide
- #if ("$guild" = "Thief") then send khri stop
- if $zoneid = 61 then
- {
- gosub AUTOMOVE portal
- send .%TRAVEL_SCRIPT crossing
- waitforre ^REACHED YOUR DESTINATION
- }
- pause 0.5
- if ("%PAWN" = "OFF") then goto GO.LETH.BIN
- gosub AUTOMOVE PAWN
- gosub PAWN.GOODS
- GO.LETH.BIN:
- var LAST GO.LETH.BIN
- if ("$guild" != "Thief") then goto LETH.TO.XING.BANK
- if ("%BIN" = "OFF") then goto LETH.TO.XING.BANK
- gosub AUTOMOVE 72
- gosub AUTOMOVE 549
- gosub PUT tap knocker
- pause 0.5
- gosub AUTOMOVE bin
- gosub BIN.GOODS
- LETH.BIN:
- var LAST LETH.BIN
- # Leaving the THIEF GUILD
- gosub MOVE go door
- gosub CIRCLE.CHECK
- pause 0.5
- gosub MOVE go door
- LETH.TO.XING.BANK:
- var LAST LETH.TO.XING.BANK
- if ("%PREMIUM" = "ON") && ("%EXCHANGE" = "ON") then goto LETH.TO.XING.PREMIUM
- if ("%EXCHANGE" != "ON") then goto LETH.TO.XING.TELLER
- gosub AUTOMOVE exchange
- gosub KRONARS
- goto LETH.TO.XING.TELLER
- LETH.TO.XING.PREMIUM:
- gosub AUTOMOVE premium exchange
- gosub KRONARS
- LETH.TO.XING.TELLER:
- gosub AUTOMOVE teller
- gosub BANK
- LETH.DECIDE:
- if ($zoneid = 1) && ($roomid != 42) then gosub AUTOMOVE 42
- if ("%SINGLE_RUN" = "ON") || ($Thievery.LearningRate >= 32) || ("%EndEarly" = "ON") then goto FINISHED.SCRIPT
- if ("%CITY" = "CROSSING") || ("%CITY" = "RIVERHAVEN") || ("%CITY" = "ROSSMAN") || ("%CITY" = "THEREN") && ($Thievery.LearningRate < 30) then goto TO.SHARD
- if ("%CITY" = "SHARD") || ("%CITY" = "LETH") || ("%CITY" = "HIB") && ($Thievery.LearningRate < 30) then goto ARTHE.STEAL
- goto FINISHED.SCRIPT
- ############################################################################
- ## ILLITHI STEALING SECTION (SHARD / HIB / BOAR CLAN ETC ##
- ############################################################################
- TO.SHARD:
- var LAST TO.SHARD
- #if ("$guild" = "Thief") then send khri stop
- pause 0.5
- if ($zoneid = 61) && ($roomid != 18) then gosub AUTOMOVE 18
- send .%TRAVEL_SCRIPT shard
- waitforre ^REACHED YOUR DESTINATION
- OUTSIDE.SHARD:
- var LAST OUTSIDE.SHARD
- if $zoneid = 66 then gosub AUTOMOVE east
- pause 0.5
- pause 0.1
- if $zoneid = 66 then send go gate
- SHARD.STEAL:
- SHARD.STEALING:
- WARRANT.CHECK.SHARD:
- var LAST SHARD.STEAL
- var CURRENT_CITY SHARD
- var PawnLoc GO.PAWN.SHARD
- var horsePawn 0
- if matchre("$roomobjs","(Shard sentinel)") then put surrender sentin
- ECHO
- ECHO *** STEALING FROM SHARD!
- ECHO
- pause 0.5
- gosub TIME.CHECK
- if ("%TIME" = "NIGHT") && ("%SHARD_CITIZEN" != "ON") then
- {
- put #echo >Log Yellow *** Night time in Shard, many shops closed. Reduced stealing.
- put #echo >Log Yellow *** Become a Shard Citizen so you can steal from closed shops at night!
- }
- gosub KHRI
- if ("$guild" = "Necromancer") then gosub NECRO.PREP
- SHARD.TO.GENERAL:
- var LAST SHARD.TIME.0
- gosub AUTOMOVE general
- SHARD.GENERAL:
- var RETRY SHARD.GENERAL
- var shopcode S.Gen
- var SHOP Shard General Store
- gosub STEAL %S.Gen
- gosub PUT go door
- SHARD.TIME.0:
- if $Thievery.LearningRate > 32 then goto GO.PAWN.SHARD
- if ("%TIME" = "NIGHT") && ("%SHARD_CITIZEN" != "ON") then goto SHARD.TO.CLERIC
- SHARD.TO.WEAPON:
- var LAST SHARD.EXP.CHECK.0
- gosub AUTOMOVE fiona
- SHARD.WEAPON:
- var RETRY SHARD.WEAPON
- var shopcode S.Weap
- var SHOP Shard Weapon Shop
- gosub STEAL %S.Weap
- SHARD.EXP.CHECK.0:
- if $Thievery.LearningRate > 32 then goto GO.PAWN.SHARD
- if $Thievery.Ranks >= 655 then goto SHARD.TO.CLERIC
- SHARD.TO.CLOTHING:
- var LAST SHARD.TO.CLERIC
- gosub AUTOMOVE stitchery
- SHARD.CLOTHING:
- var RETRY SHARD.CLOTHING
- var shopcode S.Stitch
- var SHOP Shard Stitchery
- gosub STEAL %S.Stitch
- SHARD.TO.CLERIC:
- var LAST SHARD.TO.ALCHEMIST
- if $Thievery.Ranks >= 450 then goto SHARD.TO.ALCHEMIST
- gosub AUTOMOVE cleric shop
- SHARD.CLERIC:
- var RETRY SHARD.CLERIC
- var shopcode S.Cleric
- var SHOP Shard Cleric Shop
- gosub STEAL %S.Cleric
- SHARD.TO.ALCHEMIST:
- if $Thievery.Ranks >= 1050 then goto SHARD.EXP.CHECK.1
- var LAST SHARD.EXP.CHECK.1
- gosub AUTOMOVE zieq
- SHARD.ALCHEMIST:
- var RETRY SHARD.ALCHEMIST
- var shopcode S.Alch
- var SHOP Shard Alchemist
- gosub STEAL %S.Alch
- SHARD.EXP.CHECK.1:
- if $Thievery.Ranks >= 334 then goto SHARD.TIME.1
- if $Thievery.LearningRate > 32 then goto GO.PAWN.SHARD
- SHARD.TO.HERB:
- var LAST SHARD.TIME.1
- gosub AUTOMOVE herb
- SHARD.HERB:
- var RETRY SHARD.HERB
- var shopcode S.Herb
- var SHOP Shard Herb
- gosub STEAL %S.Herb
- gosub MOVE out
- SHARD.TIME.1:
- if ("%TIME" = "NIGHT") && ("%SHARD_CITIZEN" != "ON") then goto SHARD.TO.REED
- SHARD.TO.ARTIFICER:
- var LAST SHARD.TIME.2
- gosub AUTOMOVE magic
- SHARD.ARTIFICER:
- var RETRY SHARD.ARTIFICER
- var shopcode S.Artif
- var SHOP Shard Artificer
- gosub STEAL %S.Artif
- send out
- pause 0.5
- SHARD.TIME.2:
- if $Thievery.LearningRate > 32 then goto GO.PAWN.SHARD
- if ("%TIME" = "NIGHT") && ("%SHARD_CITIZEN" != "ON") then goto SHARD.TO.ARMORY
- SHARD.TO.MUSIC:
- var LAST SHARD.TO.LOCK
- gosub AUTOMOVE music
- SHARD.MUSIC:
- var RETRY SHARD.MUSIC
- var shopcode S.Music
- var SHOP Shard Music Shop
- gosub STEAL %S.Music
- SHARD.TO.LOCK:
- var LAST SHARD.TIME.3
- if ($invisible = 1) then gosub stopinvis
- pause 0.1
- if ($invisible = 1) then gosub stopinvis
- gosub PUT ask malik about thieves
- gosub PUT order pick
- pause 0.001
- gosub PUT offer 999999999
- gosub PUT offer 999999999
- pause 0.5
- pause 0.1
- gosub STAND
- SHARD.LOCK:
- var RETRY SHARD.LOCK
- var shopcode S.Lock
- var SHOP Shard Lockpick Shop
- gosub STEAL %S.Lock
- gosub PUT go trap
- pause 0.5
- SHARD.TIME.3:
- if $Thievery.LearningRate > 32 then goto GO.PAWN.SHARD
- if ("%TIME" = "NIGHT") && ("%SHARD_CITIZEN" != "ON") then goto SHARD.TO.REED
- SHARD.TO.ARMORY:
- var LAST SHARD.TO.REED
- gosub AUTOMOVE armor
- SHARD.ARMORY:
- var RETRY SHARD.ARMORY
- var shopcode S.Armor
- var SHOP Shard Armory
- gosub STEAL %S.Armor
- SHARD.TO.REED:
- if $Thievery.LearningRate > 32 then goto GO.PAWN.SHARD
- var LAST SHARD.TO.SCHOLAR
- gosub AUTOMOVE 593
- SHARD.REED:
- var RETRY SHARD.REED
- var shopcode S.Reed
- var SHOP Shard Reed
- gosub STEAL %S.Reed.Num %S.Reed
- SHARD.TO.SCHOLAR:
- var LAST SHARD.TIME.4
- gosub AUTOMOVE scholar
- SHARD.SCHOLAR:
- var RETRY SHARD.SCHOLAR
- var shopcode S.Museum
- var SHOP Shard Museum Gift Shop
- gosub STEAL %S.Museum
- SHARD.TIME.4:
- if $Thievery.LearningRate > 32 then goto GO.PAWN.SHARD
- if ("%TIME" = "NIGHT") && ("%SHARD_CITIZEN" != "ON") then goto SHARD.EXP.CHECK.2
- SHARD.TO.BOWS:
- var LAST SHARD.EXP.CHECK.2
- gosub AUTOMOVE bows
- SHARD.BOWS:
- var RETRY SHARD.BOWS
- var shopcode S.Bow
- var SHOP Shard Bowyer
- gosub STEAL %S.Bow
- pause 0.5
- pause 0.1
- send out
- pause 0.5
- pause 0.1
- SHARD.EXP.CHECK.2:
- if $Thievery.Ranks < 200 then goto SHARD.TO.COIN
- if $Thievery.LearningRate > 32 then goto GO.PAWN.SHARD
- SHARD.TO.SPIRE:
- var LAST SHARD.TO.COIN
- if ("%TIME" = "NIGHT") && ("%SHARD_CITIZEN" != "ON") then goto SHARD.TO.COIN
- gosub AUTOMOVE spire
- SHARD.SPIRE:
- var RETRY SHARD.SPIRE
- var shopcode S.Spire
- var SHOP Spires of Glory
- gosub STEAL %S.Spire
- SHARD.TO.COIN:
- if $Thievery.LearningRate > 32 then goto GO.PAWN.SHARD
- if $Thievery.Ranks > 500 then goto SHARD.TO.TOKEN
- var LAST SHARD.TO.TOKEN
- gosub AUTOMOVE coin
- SHARD.COIN:
- var RETRY SHARD.COIN
- var shopcode S.Coin
- var SHOP Coin of the Realm
- var itemLocation %S.Coin.Loc
- gosub STEAL %S.Coin
- SHARD.TO.TOKEN:
- var LAST SHARD.TO.BARBER
- gosub AUTOMOVE token
- SHARD.TOKEN:
- var RETRY SHARD.TOKEN
- var shopcode S.Token
- var SHOP Token Shop
- var itemLocation %S.Token.Loc
- gosub STEAL %S.Token
- SHARD.TO.BARBER:
- if $Thievery.LearningRate > 32 then goto GO.PAWN.SHARD
- if $Thievery.Ranks > 950 then goto SHARD.TO.FRILLS
- var LAST SHARD.TO.FRILLS
- gosub AUTOMOVE barber
- SHARD.BARBER:
- var RETRY SHARD.BARBER
- var shopcode S.Barber
- var SHOP Shard Barber Shop
- gosub STEAL %S.Barber
- SHARD.TO.FRILLS:
- if $Thievery.Ranks >= 1050 then goto SHARD.TO.HERALDRY
- var LAST SHARD.TO.HERALDRY
- gosub AUTOMOVE Little
- SHARD.FRILLS:
- var RETRY SHARD.FRILLS
- var shopcode S.Frill
- var SHOP Shard Little Frills
- gosub STEAL %S.Frill
- SHARD.TO.HERALDRY:
- var LAST SHARD.TO.GIFT
- gosub AUTOMOVE herald
- SHARD.HERALDRY:
- var RETRY SHARD.HERALDRY
- if $Thievery.LearningRate > 32 then goto GO.PAWN.SHARD
- var shopcode S.Herald
- var SHOP Shard Heraldry Shop
- var itemLocation %S.Herald.Loc
- gosub STEAL %S.Herald
- SHARD.TO.GIFT:
- var LAST SHARD.TO.TOY
- gosub AUTOMOVE gift
- SHARD.GIFT:
- var RETRY SHARD.GIFT
- var shopcode S.Gift
- var SHOP Shard Gift Shop
- var itemLocation %S.Gift.Loc
- gosub STEAL %S.Gift.Num %S.Gift
- SHARD.TO.TOY:
- if $Thievery.LearningRate > 32 then goto GO.PAWN.SHARD
- if $Thievery.Ranks >= 1050 then goto SHARD.TO.MEMORY
- var LAST SHARD.TO.MEMORY
- gosub AUTOMOVE toy
- SHARD.TOY:
- var RETRY SHARD.TOY
- var shopcode S.Toy
- var SHOP Shard Toy Shop
- var itemLocation %S.Toy.Loc
- gosub STEAL %S.Toy
- SHARD.TO.MEMORY:
- var LAST SHARD.TO.EASTGATE
- gosub AUTOMOVE 629
- SHARD.MEMORY:
- var RETRY SHARD.MEMORY
- var shopcode S.Memory
- var SHOP Shard Memories
- gosub STEAL %S.Memory.Num %S.Memory
- SHARD.TO.EASTGATE:
- var LAST SHARD.TO.EASTGATE
- if $Thievery.LearningRate > 32 then goto GO.PAWN.SHARD
- if $hidden then gosub unhide
- gosub AUTOMOVE East Gate
- SHARD.EXP.CHECK.3:
- if $Thievery.Ranks >= 600 then goto SHARD.TO.SURVIVAL
- if $Thievery.LearningRate > 32 then goto GO.PAWN.SHARD
- EASTGATE.TO.TANNER:
- gosub AUTOMOVE tanner
- SHARD.TANNER:
- var RETRY SHARD.TANNER
- var shopcode S.Tanner
- var SHOP Shard Tanner
- var itemLocation %S.Tanner.Loc
- gosub STEAL %S.Tanner
- SHARD.TO.SURVIVAL:
- var LAST GO.PAWN.SHARD
- if $Thievery.LearningRate > 32 then goto GO.PAWN.SHARD
- if $hidden then gosub unhide
- gosub AUTOMOVE survival
- SHARD.SURVIVAL:
- var RETRY SHARD.SURVIVAL
- var shopcode S.Surv
- var SHOP Shard Survivalist
- var itemLocation %S.Surv.Loc
- var SECOND_ITEM 1
- var secondary %S.Surv.Alt
- var secondaryLocation %S.Surv.Alt.Loc
- gosub STEAL %S.Surv
- SHARD.TO.SURVIVAL2:
- gosub AUTOMOVE 33
- SHARD.SURVIVAL2:
- var RETRY SHARD.SURVIVAL2
- var shopcode S.Surv2
- var SHOP Shard Survivalist Shop (Back)
- var itemLocation %S.Surv2.Loc
- var SECOND_ITEM 1
- var secondary %S.Surv2.Alt
- gosub STEAL %S.Surv2.Num %S.Surv2
- goto DONE.STEAL.SHARD
- TO.STEELCLAW.WEAPON:
- if $hidden then gosub unhide
- pause 0.5
- gosub AUTOMOVE struan
- STEELCLAW.WEAPON:
- var RETRY STEELCLAW.WEAPON
- var shopcode SC.Weap
- var SHOP Steelclaw Clan Weapons
- gosub STEAL %SC.Weap
- DONE.STEAL.SHARD:
- var LAST GO.PAWN.SHARD
- var CURRENT_CITY SHARD
- if $hidden then gosub unhide
- #if ("$guild" = "Thief") then send khri stop
- pause 0.5
- gosub AUTOMOVE East
- GO.PAWN.SHARD:
- var LAST GO.PAWN.SHARD
- if $zoneid = 66 then gosub automove east
- if ("%PAWN" = "OFF") then goto GO.BIN.SHARD
- gosub AUTOMOVE PAWN
- gosub PAWN.GOODS
- GO.BIN.SHARD:
- var LAST GO.BIN.SHARD
- if ("$guild" != "Thief") then goto SHARD.TO.BANK
- if ("%BIN" = "OFF") then goto SHARD.TO.BANK
- gosub AUTOMOVE 93
- gosub MOVE go well
- gosub MOVE climb ladder
- gosub MOVE w
- gosub MOVE out
- gosub MOVE w
- gosub MOVE se
- gosub MOVE go gap
- send knock door
- pause 0.5
- pause 0.5
- send '%SHARD_PW
- pause 0.5
- gosub MOVE go door
- gosub MOVE go arch
- gosub MOVE go door
- AT.SHARD.BIN:
- gosub BIN.GOODS
- DONE.STEALING.SHARD:
- var LAST DONE.STEALING.SHARD
- gosub CIRCLE.CHECK
- pause 0.5
- gosub MOVE go door
- gosub MOVE go arch
- gosub MOVE go door
- gosub MOVE n
- gosub MOVE nw
- gosub MOVE e
- gosub MOVE go fiss
- gosub MOVE e
- gosub MOVE climb ladder
- gosub MOVE up
- SHARD.TO.BANK:
- var LAST SHARD.TO.BANK
- if ("%EXCHANGE" != "ON") then goto SHARD.TELLER
- gosub AUTOMOVE exchange
- gosub DOKORAS
- SHARD.TELLER:
- gosub AUTOMOVE teller
- gosub BANK
- if ("$guild" = "Necromancer") then gosub NECRO.PREP
- DONE.SHARD:
- if (%horsePawn = 1) && ($Thievery.LearningRate < 32) then goto SHARD.STEAL
- if ($Thievery.LearningRate >= 32) || ("%SINGLE_RUN" = "ON") || ("%EndEarly" = "ON") then goto FINISHED.SCRIPT
- if ("%CITY" = "CROSSING") || ("%CITY" = "RIVERHAVEN") || ("%CITY" = "ROSSMAN") || ("%CITY" = "THEREN") && ("%FAR_CITIES" = "OFF") then goto FINISHED.SCRIPT
- if ("%CITY" = "HIB") || ("%CITY" = "SHARD") && ("%SHARD_RUN" = "ON") || ("%SINGLE_RUN" = "ON") then goto FINISHED.SCRIPT
- if ("%CITY" = "CROSSING") || ("%CITY" = "RIVERHAVEN") || ("%CITY" = "ROSSMAN") || ("%CITY" = "THEREN") || ("%CITY" = "LETH") && ("%FAR_CITIES" = "ON") then goto TO.HORSE
- SHARD.TO.CROSS:
- var LAST SHARD.TO.CROSS
- if ("%CITY" = "SHARD") || ("%CITY" = "HIB") then
- {
- gosub AUTOMOVE E Gate
- gosub AUTOMOVE 65
- }
- goto TO.LETH
- TO.CROSS:
- var LAST TO.CROSS
- var BIN.CROSS 1
- gosub AUTOMOVE E Gate
- gosub AUTOMOVE 65
- pause 0.5
- send .%TRAVEL_SCRIPT cross
- waitforre ^REACHED YOUR DESTINATION
- pause
- if ("%CITY" = "CROSSING") || ("%CITY" = "RIVERHAVEN") || ("%CITY" = "ROSSMAN") || ("%CITY" = "THEREN") then goto FINISHED.SCRIPT
- goto TO.ARTHE
- TO.HORSE:
- var LAST TO.HORSE
- var BIN.HIB 1
- gosub AUTOMOVE west
- gosub AUTOMOVE horse
- goto HORSE.STEAL
- ####################################
- # Horse Clan
- ####################################
- HORSE.STEAL:
- HORSE.TO.JAHTINIT:
- var CURRENT_CITY HORSE
- var LAST HORSE.STEAL
- var PawnLoc GO.PAWN.HORSE
- var itemLocation
- gosub AUTOMOVE horse
- ECHO
- ECHO **** STEALING FROM HORSE CLAN! ****
- ECHO *** TAKING ADVANTAGE OF NO JUSTICE SYSTEM!! ****
- ECHO *** MWAAHAHAHAHAHAHAHAHAHAHHAAAAAAA
- ECHO
- pause 3
- gosub KHRI
- if ("$guild" = "Necromancer") then gosub NECRO.PREP
- gosub AUTOMOVE jahtinit
- HORSE.JAHTINIT:
- var RETRY HORSE.JAHTINIT
- var shopcode HC.JAHTINIT
- var SHOP Horse Clan Jahtinit's Corner
- gosub STEAL %HC.Jahtinit
- HORSE.TO.FALCONER:
- if $Thievery.LearningRate > 32 then goto HORSE.DECIDE
- var LAST HORSE.TO.FALCONER
- gosub AUTOMOVE falconer
- HORSE.FALCONER:
- var RETRY HORSE.FALCONER
- var shopcode HC.FALCONER
- var SHOP Horse Clan Falconer's Chadir
- gosub STEAL %HC.Falconer.Num %HC.Falconer
- HORSE.TO.YASNAH:
- var LAST HORSE.TO.YASNAH
- gosub AUTOMOVE yasnah
- HORSE.YASNAH:
- var RETRY HORSE.YASNAH
- var shopcode HC.YASNAH
- var SHOP Horse Clan Yasnah's Cashmere
- gosub STEAL %HC.Yasnah
- HORSE.TO.BOWYER:
- if $Thievery.LearningRate > 32 then goto HORSE.DECIDE
- var LAST HORSE.TO.BOWYER
- gosub AUTOMOVE bowyer
- HORSE.BOWYER:
- var RETRY HORSE.BOWYER
- var shopcode HC.BOWYER
- var SHOP Horse Clan Bowyer
- gosub STEAL %HC.Bowyer
- HORSE.TO.BOWYER2:
- if $Thievery.LearningRate > 32 then goto HORSE.DECIDE
- var LAST HORSE.TO.BOWYER2
- gosub AUTOMOVE 215
- HORSE.BOWYER2:
- var RETRY HORSE.BOWYER2
- var shopcode HC.BOWYER2
- var SHOP Horse Clan Bowyer 2
- var itemLocation %HC.Bowyer2.Loc
- gosub STEAL %HC.Bowyer2
- HORSE.TO.EQUINE:
- if $Thievery.LearningRate > 32 then goto HORSE.DECIDE
- var LAST HORSE.TO.EQUINE
- gosub AUTOMOVE 218
- HORSE.EQUINE:
- var RETRY HORSE.EQUINE
- var shopcode HC.EQUINE
- var SHOP Horse Clan Ela's Equine Supplies
- gosub STEAL %HC.Equine
- HORSE.TO.FELTERIE:
- if $Thievery.LearningRate > 32 then goto HORSE.DECIDE
- var LAST HORSE.TO.FELTERIE
- gosub AUTOMOVE anaylisse
- HORSE.FELTERIE:
- var RETRY HORSE.FELTERIE
- var shopcode HC.FELTERIE
- var SHOP Horse Clan Anaylisse's Felterie
- gosub STEAL %HC.Felterie
- HORSE.TO.FELTERIE2:
- var LAST HORSE.TO.FELTERIE2
- gosub AUTOMOVE 220
- HORSE.FELTERIE2:
- var RETRY HORSE.FELTERIE2
- var shopcode HC.FELTERIE2
- var SHOP Horse Clan Anaylisse's Felterie 2
- gosub STEAL %HC.Felterie2
- HORSE.DECIDE:
- gosub AUTOMOVE 168
- if ($Thievery.LearningRate >= 32) || ("%SINGLE_RUN" = "ON") || ("%EndEarly" = "ON") then goto TO.SHARD.BIN
- if ("%CITY" = "CROSSING") || ("%CITY" = "SHARD") || ("%CITY" = "RIVERHAVEN") || ("%CITY" = "ROSSMAN") || ("%CITY" = "THEREN") || ("%CITY" = "LETH") && ("%FAR_CITIES" = "ON") then goto TO.HIB
- if ("%CITY" = "CROSSING") || ("%CITY" = "RIVERHAVEN") || ("%CITY" = "ROSSMAN") || ("%CITY" = "THEREN") && ("%FAR_CITIES" = "OFF") then goto TO.SHARD.BIN
- if ("%CITY" = "HIB") || ("%CITY" = "HORSE") then goto TO.SHARD.BIN
- TO.SHARD.BIN:
- gosub automove shard
- var horsePawn 1
- pause 0.1
- goto GO.PAWN.SHARD
- TO.HIB:
- pause 0.5
- send .travel hib
- waitforre ^REACHED YOUR DESTINATION
- ####################################
- # Hibarnhvidar
- ####################################
- HIB.STEAL:
- HIB.TO.SHIELD:
- var CURRENT_CITY HIB
- var LAST HIB.EXP.CHECK.0
- var PawnLoc GO.PAWN.HIB
- gosub AUTOMOVE 37
- ECHO
- ECHO **** STEALING FROM HIB! ****
- ECHO
- pause 0.5
- if matchre("$roomobjs","(Khal Gwaerd)") then put surrender gwaerd
- gosub KHRI
- pause 0.1
- if ("$guild" = "Necromancer") then gosub NECRO.PREP
- if $Thievery.LearningRate > 32 then goto DONE.STEAL.HIB
- gosub AUTOMOVE shield
- HIB.SHIELD:
- var RETRY HIB.SHIELD
- var shopcode H.Shield
- var SHOP Hib Shield Shop
- gosub STEAL %H.Shield %H.Shield.Loc
- HIB.EXP.CHECK.0:
- if $Thievery.LearningRate > 32 then goto DONE.STEAL.HIB
- if $Thievery.Ranks < 650 then goto HIB.TO.TOGGERY
- HIB.TO.JEWELRY:
- var LAST HIB.TO.TOGGERY
- gosub AUTOMOVE jewelry
- HIB.JEWELRY:
- var RETRY HIB.JEWELRY
- var shopcode H.Jewel
- var SHOP Hib Jewelry
- gosub STEAL %H.Jewel
- HIB.TO.TOGGERY:
- var LAST HIB.TO.SUNDRIES
- gosub AUTOMOVE togger
- HIB.TOGGERY:
- var RETRY HIB.TOGGERY
- var shopcode H.Tog
- var SHOP Hib Toggery
- gosub STEAL %H.Tog.Num %H.Tog
- HIB.TO.SUNDRIES:
- var LAST HIB.TO.LAMPS
- gosub AUTOMOVE general
- HIB.SUNDRIES:
- var RETRY HIB.SUNDRIES
- var shopcode H.Sund
- var itemLocation %H.Sund.Loc
- var SHOP Hib Sundries
- gosub STEAL %H.Sund
- gosub MOVE OUT
- HIB.TO.LAMPS:
- var LAST HIB.EXP.CHECK.1
- gosub AUTOMOVE lamp
- HIB.LAMPS:
- var RETRY HIB.LAMPS
- var shopcode H.Lamp
- var SHOP Hib Lamps
- gosub STEAL %H.Lamp
- HIB.EXP.CHECK.1:
- if $Thievery.LearningRate > 32 then goto DONE.STEAL.HIB
- if $Thievery.Ranks >= 450 then goto HIB.TO.MUSIC
- HIB.TO.HERBS:
- var LAST HIB.TO.MUSIC
- gosub AUTOMOVE herb
- HIB.HERBS:
- var RETRY HIB.HERBS
- var shopcode H.Herb
- var SHOP Hib Herbs
- gosub STEAL %H.Herb
- HIB.TO.MUSIC:
- var LAST HIB.TO.ALCHEMY
- gosub AUTOMOVE music
- HIB.MUSIC:
- var RETRY HIB.MUSIC
- var shopcode H.Music
- var SHOP Hib Music Store
- gosub STEAL %H.Music
- HIB.TO.ALCHEMY:
- var LAST HIB.EXP.CHECK.2
- gosub AUTOMOVE alchemy
- HIB.ALCHEMY:
- var RETRY HIB.ALCHEMY
- var shopcode H.Alch
- var SHOP Hib Alchemist
- gosub STEAL %H.Alch
- HIB.EXP.CHECK.2:
- if $Thievery.LearningRate > 32 then goto DONE.STEAL.HIB
- if $Thievery.Ranks >= 430 then goto DONE.STEAL.HIB
- HIB.TO.FORGE:
- var LAST DONE.STEAL.HIB
- gosub AUTOMOVE forge
- HIB.FORGE:
- var RETRY HIB.FORGE
- var shopcode H.Forge
- var SHOP Hib Forge
- var itemLocation %H.Forge.Loc
- gosub STEAL %H.Forge
- DONE.STEAL.HIB:
- var LAST GO.PAWN.HIB
- if $hidden then gosub unhide
- #if ("$guild" = "Thief") then send khri stop
- pause 0.5
- GO.PAWN.HIB:
- var CURRENT_CITY HIB
- var LAST GO.PAWN.HIB
- if ("%PAWN" = "OFF") then goto GO.BIN.HIB
- gosub AUTOMOVE PAWN
- gosub PAWN.GOODS
- GO.BIN.HIB:
- var CURRENT_CITY HIB
- var LAST GO.BIN.HIB
- if ("$guild" != "Thief") then goto HIB.TO.BANK
- if ("%BIN" = "OFF") then goto HIB.TO.BANK
- gosub AUTOMOVE Thief bin
- AT.HIB.BIN:
- gosub BIN.GOODS
- HIB.TO.BANK:
- var LAST HIB.TO.BANK
- if ("%EXCHANGE" != "ON") then goto HIB.TELLER
- gosub AUTOMOVE 1exch
- gosub DOKORAS
- HIB.TELLER:
- var LAST LEAVE.HIB
- gosub AUTOMOVE 1tell
- gosub BANK
- if ("$guild" = "Necromancer") then gosub NECRO.PREP
- HIB.DECIDE:
- if ($Thievery.LearningRate >= 32) || ("%SINGLE_RUN" = "ON") || ("%EndEarly" = "ON") then goto FINISHED.SCRIPT
- if ("%CITY" = "THEREN") || ("%CITY" = "CROSSING") || ("%CITY" = "LETH") || ("%CITY" = "HAVEN") || ("%CITY" = "ARTHE") || ("%CITY" = "ROSSMAN") || ("%CITY" = "SHARD") then goto FINISHED.SCRIPT
- LEAVE.HIB:
- var LAST LEAVE.HIB
- gosub AUTOMOVE 75
- gosub PUT open my %SAFE_CONTAINER
- pause 0.3
- if matchre("$roomobjs","(Khal Gwaerd)") then put surrender gwaerd
- pause 0.5
- pause 0.5
- send .%TRAVEL_SCRIPT raven
- waitforre ^REACHED YOUR DESTINATION
- pause 0.5
- gosub PUT close my %SAFE_CONTAINER
- pause 0.3
- pause 0.5
- RAVEN.STEAL:
- var LAST RAVEN.EXP.CHECK.0
- gosub AUTOMOVE 179
- RAVEN.GENERAL:
- var RETRY RAVEN.GENERAL
- var shopcode RP.Gen
- var SHOP Raven's Point General
- gosub STEAL %RP.Gen
- RAVEN.EXP.CHECK.0:
- if $Thievery.Ranks >= 530 then goto RETURN.TO.SHARD
- RAVEN.TO.TOBACCO:
- var LAST RETURN.TO.SHARD
- gosub AUTOMOVE 144
- RAVEN.TOBACCO:
- var RETRY RAVEN.TOBACCO
- var shopcode RP.Tobac
- var SHOP Raven's Point Tobacco
- gosub STEAL %RP.Tobac
- RETURN.TO.SHARD:
- HIB.TO.HORSE:
- var LAST HIB.TO.HORSE
- if $hidden then gosub unhide
- #if ("$guild" = "Thief") then send khri stop
- pause 0.5
- gosub AUTOMOVE 133
- send .%TRAVEL_SCRIPT horse
- waitforre ^REACHED YOUR DESTINATION
- goto HORSE.STEAL
- ####################################
- # RATHA STEALING
- ####################################
- RATHA.STEAL:
- var CURRENT_CITY RATHA
- var PawnLoc GO.PAWN.RATHA
- ECHO
- ECHO **** STEALING FROM RATHA! ****
- ECHO
- pause 0.5
- gosub KHRI
- if ("$guild" = "Necromancer") then gosub NECRO.PREP
- RATHA.EXP.CHECK.0:
- if $Thievery.Ranks < 500 then goto RATHA.TO.GENERAL
- RATHA.TO.BAIT:
- var LAST RATHA.TO.GENERAL
- gosub AUTOMOVE bait
- RATHA.BAIT:
- var RETRY RATHA.BAIT
- var shopcode R.Bait
- var SHOP Ratha Bait Shop
- gosub STEAL %R.Bait
- RATHA.TO.GENERAL:
- var LAST RATHA.TO.HERB
- gosub AUTOMOVE general
- RATHA.GENERAL:
- var RETRY RATHA.GENERAL
- var shopcode R.Gen
- var SHOP Ratha General Store
- gosub STEAL %R.Gen
- RATHA.TO.HERB:
- var LAST RATHA.TO.FORGE
- gosub AUTOMOVE herbalist
- RATHA.HERB:
- var RETRY RATHA.HERB
- var shopcode R.Herb
- var SHOP Ratha Herbalist
- gosub STEAL %R.Herb
- RATHA.TO.FORGE:
- var LAST RATHA.TO.TAILOR
- gosub AUTOMOVE weapon
- RATHA.FORGE:
- var RETRY RATHA.FORGE
- var shopcode R.Forge
- var SHOP Ratha Krrikt'k's Forge
- gosub STEAL %R.Forge
- gosub MOVE OUT
- RATHA.TO.TAILOR:
- var LAST RATHA.TO.LEATHER
- gosub AUTOMOVE tailor
- RATHA.TAILOR:
- var RETRY RATHA.TAILOR
- var shopcode R.Tailor
- var SHOP Ratha Tailor
- gosub STEAL %R.Tailor
- RATHA.TO.LEATHER:
- var LAST RATHA.TO.HAIR
- gosub AUTOMOVE leather
- RATHA.LEATHER:
- var RETRY RATHA.GENERAL
- var shopcode R.Leather
- var SHOP Ratha Leather
- gosub STEAL %R.Leather
- RATHA.EXP.CHECK.1:
- if $Thievery.Ranks >= 206 then goto RATHA.TO.MUSIC
- RATHA.TO.HAIR:
- var LAST RATHA.TO.MUSIC
- gosub AUTOMOVE hair
- RATHA.HAIR:
- var RETRY RATHA.HAIR
- var shopcode R.Hair
- var SHOP Ratha Hair Care
- gosub STEAL %R.Hair
- RATHA.TO.MUSIC:
- var LAST RATHA.TO.MAGIC
- gosub AUTOMOVE music
- RATHA.MUSIC:
- var RETRY RATHA.MUSIC
- var shopcode R.Music
- var SHOP Ratha Music Shop
- gosub STEAL %R.Music
- RATHA.TO.MAGIC:
- var LAST RATHA.TO.ORIGAMI
- gosub AUTOMOVE magic
- RATHA.MAGIC:
- var RETRY RATHA.MAGIC
- var shopcode R.Magic
- var SHOP Ratha Magic Supplies
- gosub STEAL %R.Magic
- RATHA.TO.ORIGAMI:
- var LAST RATHA.TO.JEWELRY
- gosub AUTOMOVE origami
- RATHA.ORIGAMI:
- var RETRY RATHA.ORIGAMI
- var shopcode R.Origami
- var SHOP Ratha Origami Shop
- var itemLocation %R.Origami.Loc
- gosub STEAL %R.Origami
- RATHA.TO.JEWELRY:
- var LAST RATHA.EXP.CHECK.2
- gosub AUTOMOVE jewelry
- RATHA.JEWELRY:
- var RETRY RATHA.JEWELRY
- var shopcode R.Jewelry
- var SHOP Ratha Jewelry Shop
- gosub STEAL %R.Jewelry
- RATHA.EXP.CHECK.2:
- #if $Thievery.Ranks >= 430 then goto RATHA.TO.RING
- RATHA.TO.CLERIC:
- var LAST RATHA.TO.CLERIC2
- gosub AUTOMOVE divine
- RATHA.CLERIC:
- var RETRY RATHA.CLERIC
- var shopcode R.Cleric
- var SHOP Ratha Cleric Shop
- gosub STEAL %R.Cleric
- RATHA.TO.CLERIC2:
- var LAST RATHA.TO.RING
- gosub AUTOMOVE odds
- RATHA.CLERIC2:
- var RETRY RATHA.CLERIC2
- var shopcode R.Cleric2
- var SHOP Ratha Cleric Shop
- gosub STEAL %R.Cleric2
- RATHA.TO.RING:
- var LAST GO.PAWN.RATHA
- gosub AUTOMOVE chabalu
- RATHA.RING:
- var RETRY RATHA.RING
- var shopcode R.Ring
- var SHOP Ratha Ring Shop
- gosub STEAL %R.Ring
- GO.PAWN.RATHA:
- GO.RATHA.PAWN:
- var CURRENT_CITY RATHA
- var LAST GO.RATHA.PAWN
- if $hidden then gosub unhide
- #if ("$guild" = "Thief") then send khri stop
- pause 0.5
- if ("%PAWN" = "OFF") then goto GO.RATHA.BIN
- gosub AUTOMOVE pawn
- gosub PAWN.GOODS
- GO.RATHA.BIN:
- var LAST GO.RATHA.BIN
- if ("$guild" != "Thief") then goto DONE.STEALING.RATHA2
- if ("%BIN" = "OFF") then goto DONE.STEALING.RATHA2
- gosub AUTOMOVE chabalu
- pause 0.5
- send ask chabalu about cellar
- wait
- pause 0.5
- gosub MOVE go trap door
- gosub MOVE go tunnel
- gosub MOVE west
- gosub AUTOMOVE GL Thief
- pause 0.5
- gosub BIN.GOODS
- DONE.STEALING.RATHA:
- var LAST DONE.STEALING.RATHA
- # Leaving the THIEF GUILD
- gosub CIRCLE.CHECK
- pause
- DONE.STEALING.RATHA2:
- var LAST DONE.STEALING.CROSS2
- if ("%PREMIUM" = "ON") && ("%EXCHANGE" = "ON) then goto RATHA.PREMIUM
- if ("%EXCHANGE" != "ON") then goto RATHA.TELLER
- gosub AUTOMOVE 1exchange
- gosub LIRUMS
- goto RATHA.TELLER
- RATHA.PREMIUM:
- gosub AUTOMOVE premium exchange
- gosub LIRUMS
- RATHA.TELLER:
- gosub AUTOMOVE 1teller
- gosub BANK
- #send with 10 silver
- #RATHA.SURRENDER:
- #var LAST RATHA.SURRENDER
- #gosub AUTOMOVE 1guard
- #if matchre("$roomobjs","(high guard)") then put surrender guard
- #pause 0.5
- #pause 0.5
- #gosub AUTOMOVE 252
- goto FINISHED.SCRIPT
- ####################################
- # AESRY STEALING
- ####################################
- AESRY.STEAL:
- AESRY.TO.HERB:
- var CURRENT_CITY AESRY
- var LAST AESRY.EXP.CHECK.0
- var PawnLoc GO.PAWN.AESRY
- ECHO
- ECHO **** STEALING FROM AESRY! ****
- ECHO
- pause 0.5
- gosub KHRI
- if ("$guild" = "Necromancer") then gosub NECRO.PREP
- gosub AUTOMOVE herb
- AESRY.HERB:
- var RETRY AESRY.HERB
- var shopcode A.Herb
- var SHOP Aesry Herb Shop
- gosub STEAL %A.Herb
- AESRY.EXP.CHECK.0:
- if $Thievery.Ranks < 600 then goto AESRY.TO.CLOTHING
- AESRY.TO.TANNER:
- var LAST AESRY.EXP.CHECK.1
- gosub AUTOMOVE tanning
- AESRY.TANNER:
- var RETRY AESRY.TANNER
- var shopcode A.Tanner
- var SHOP Aesry Tanning Supplies
- gosub STEAL %A.Tanner
- AESRY.EXP.CHECK.1:
- #if $Thievery.Ranks >= 700 then goto AESRY.TO.SCRIPT
- AESRY.TO.CLOTHING:
- var LAST AESRY.TO.SCRIPT
- gosub AUTOMOVE clothing
- AESRY.CLOTHING:
- var RETRY AESRY.CLOTHING
- var shopcode A.Clothing
- var SHOP Aesry Clothing Shop
- gosub STEAL %A.Clothing
- AESRY.TO.SCRIPT:
- var LAST AESRY.TO.CLERIC
- gosub AUTOMOVE script
- AESRY.SCRIPT:
- var RETRY AESRY.SCRIPT
- var shopcode A.Script
- var SHOP Aesry Scriptorium
- gosub STEAL %A.Script
- AESRY.TO.CLERIC:
- var LAST AESRY.TO.ORIGAMI
- gosub AUTOMOVE clerical
- AESRY.CLERIC:
- var RETRY AESRY.CLERIC
- var shopcode A.Cleric
- var SHOP Aesry Clerical Supplies
- gosub STEAL %A.Cleric
- AESRY.TO.ORIGAMI:
- var LAST AESRY.TO.JEWELRY
- gosub AUTOMOVE origami
- AESRY.ORIGAMI:
- var RETRY AESRY.ORIGAMI
- var shopcode A.Origami
- var SHOP Aesry Origami Shop
- gosub STEAL %A.Origami
- AESRY.TO.JEWELRY:
- var LAST AESRY.TO.MAGIC
- gosub AUTOMOVE jewelry
- AESRY.JEWELRY:
- var RETRY AESRY.JEWELRY
- var shopcode A.Jewelry
- var SHOP Aesry Jewelry Shop
- gosub STEAL %A.Jewelry
- AESRY.TO.MAGIC:
- var LAST AESRY.TO.SLINGS
- gosub AUTOMOVE magic
- AESRY.MAGIC:
- var RETRY AESRY.MAGIC
- var shopcode A.Magic
- var SHOP Aesry Magic Supplies
- gosub STEAL %A.Magic
- AESRY.TO.SLINGS:
- var LAST AESRY.TO.PUZZLE
- gosub AUTOMOVE bowyer
- AESRY.SLINGS:
- var RETRY AESRY.SLINGS
- var shopcode A.Slings
- var SHOP Aesry Slings and Arrows
- gosub STEAL %A.Slings
- gosub PUT kneel
- send go open
- gosub stand
- AESRY.TO.PUZZLE:
- var LAST AESRY.TO.FOOTWEAR
- gosub AUTOMOVE puzzle
- AESRY.EXP.CHECK.2:
- #if $Thievery.Ranks >= 430 then goto AESRY.TO.SHIELDS
- AESRY.PUZZLE:
- var RETRY AESRY.PUZZLE
- var shopcode A.Puzzle
- var SHOP Aesy Puzzle Shop
- gosub STEAL %A.Puzzle
- AESRY.TO.FOOTWEAR:
- var LAST AESRY.TO.SHIELDS
- gosub AUTOMOVE footwear
- AESRY.FOOTWEAR:
- var RETRY AESRY.FOOTWEAR
- var shopcode A.Footwear
- var SHOP Aesry Footwear
- gosub STEAL %A.Footwear
- AESRY.TO.SHIELDS:
- var LAST AESRY.TO.WEAPON
- gosub AUTOMOVE shield
- AESRY.SHIELDS:
- var RETRY AESRY.SHIELDS
- var shopcode A.Shields
- var SHOP Aesry Shields
- var itemLocation %A.Shields.Loc
- gosub STEAL %A.Shields
- AESRY.TO.WEAPON:
- var LAST AESRY.TO.ARMOR
- gosub AUTOMOVE weapon
- AESRY.WEAPON:
- var RETRY AESRY.WEAPON
- var shopcode A.Weapon
- var SHOP Aesry Weapon Shop
- gosub STEAL %A.Weapon
- AESRY.TO.ARMOR:
- var LAST AESRY.TO.GENERAL
- gosub AUTOMOVE armor
- AESRY.ARMOR:
- var RETRY AESRY.ARMOR
- var shopcode A.Armor
- var SHOP Aesry Armor Shop
- gosub STEAL %A.Armor
- AESRY.TO.GENERAL:
- var LAST AESRY.TO.FLOWER
- gosub AUTOMOVE general
- AESRY.GENERAL:
- var RETRY AESRY.GENERAL
- var shopcode A.General
- var SHOP Aesry General Store
- gosub STEAL %A.Gen
- AESRY.TO.FLOWER:
- var LAST AESRY.TO.MUSIC
- gosub AUTOMOVE flower
- AESRY.FLOWER:
- var RETRY AESRY.FLOWER
- var shopcode A.Flower
- var SHOP Aesry Flower Shop
- gosub STEAL %A.Flower
- AESRY.TO.MUSIC:
- var LAST GO.PAWN.AESRY
- gosub AUTOMOVE bardic
- AESRY.MUSIC:
- var RETRY AESRY.MUSIC
- var shopcode A.Music
- var SHOP Aesry Music Shop
- gosub STEAL %A.Music
- GO.PAWN.AESRY:
- GO.AESRY.PAWN:
- var CURRENT_CITY AESRY
- var LAST GO.PAWN.AESRY
- if $hidden then gosub unhide
- #if ("$guild" = "Thief") then send khri stop
- pause 0.5
- gosub AUTOMOVE pawn
- gosub PAWN.GOODS
- DONE.STEALING.AESRY:
- var LAST DONE.STEALING.AESRY
- if ("%PREMIUM" = "ON") && ("%EXCHANGE" = "ON") then goto AESRY.PREMIUM
- if ("%EXCHANGE" != "ON") then goto AESRY.TELLER
- gosub AUTOMOVE exchange
- gosub LIRUMS
- goto AESRY.TELLER
- AESRY.PREMIUM:
- gosub AUTOMOVE premium exchange
- gosub LIRUMS
- AESRY.TELLER:
- gosub AUTOMOVE teller
- gosub BANK
- goto FINISHED.SCRIPT
- ############################################################################################
- ############################################################################################
- FINISHED.SCRIPT:
- timer stop
- gosub TIME.CALC
- gosub COMBINE.BANK
- put #var StealingProfit %TotalProfit
- ECHO
- ECHO *** DONE STEALING!
- ECHO
- pause 0.1
- gosub PUT open my %SAFE_CONTAINER
- pause 0.1
- gosub PUT open my %BACKUP_CONTAINER
- pause 0.1
- put #echo >Log Lime ***************** FINAL STEALING REPORT ******************
- put #echo >Log Lime **** Guild: $guild - Circle: $circle - Script v.%version
- put #echo >Log Lime **** Thievery Ranks: $Thievery.Ranks - $Thievery.LearningRate/34
- put #echo >Log Lime **** Total Time: %runTime minutes
- put #echo >Log Lime **** Start City: %CITY | End City: %CURRENT_CITY
- put #echo >Log Lime **** %Charges Stealing Charge(s) %Jailed trip(s) to jail
- if ("$guild" = "Thief") then put #echo >Log Lime **** Binned: %Binned Items | Pawned: %Pawned Items
- if ("$guild" != "Thief") then put #echo >Log Lime **** Pawned: %Pawned Items
- put #echo >Log Lime **** Total Profit: %Plats Plat, %Golds Gold, %Silvers Silver, %Bronzes Bronze and %Coppers Copper
- put #echo >Log Lime ********************** END REPORT ***************************
- ECHO
- ECHO ********************* FINAL STEALING REPORT ****************************
- ECHO **** Guild: $guild - Circle: $circle - Script v.%version
- ECHO **** Thievery Ranks: $Thievery.Ranks -- $Thievery.LearningRate/34
- ECHO **** Total Time: %runTime minutes
- ECHO **** Start City: %CITY | End City: %CURRENT_CITY
- ECHO **** %Charges Stealing Charge(s). %Jailed trip(s) to jail
- if ("$guild" = "Thief") then ECHO **** Binned: %Binned Items | Pawned: %Pawned Items
- if ("$guild" != "Thief") then ECHO **** Pawned: %Pawned Items
- ECHO **** Total Profit: %Plats Plat, %Golds Gold, %Silvers Silver, %Bronzes Bronze and %Coppers Copper
- ECHO ***********************************************************************
- ECHO
- pause 3
- if ("%ARMOR_STOW" = "ON") then gosub WEAR.ARMOR
- if ("%RETURN_HOME" = "ON") then goto TRAVEL.HOME
- goto COMPLETE
- TRAVEL.HOME:
- ECHO
- ECHO ************************************************
- ECHO * Travelling back to your starting city!
- ECHO * Destination: %CITY
- ECHO ************************************************
- ECHO
- pause 2
- if ($zoneid = 1) then
- {
- if ("%CITY" != "CROSSING") then
- {
- gosub AUTOMOVE 42
- goto TRAVEL
- }
- else goto AT.STARTING.CITY
- }
- if ($zoneid = 30) then
- {
- if ("%CITY" != "RIVERHAVEN") then
- {
- gosub AUTOMOVE town
- goto TRAVEL
- }
- else goto AT.STARTING.CITY
- }
- if ($zoneid = 42) then
- {
- if ("%CITY" != "THEREN") then
- {
- gosub AUTOMOVE gate
- goto TRAVEL
- }
- else goto AT.STARTING.CITY
- }
- if ($zoneid = 61) then
- {
- if ("%CITY" != "LETH") then
- {
- gosub AUTOMOVE portal
- goto TRAVEL
- }
- else goto AT.STARTING.CITY
- }
- if ($zoneid = 67) then
- {
- if ("%CITY" != "SHARD") then
- {
- gosub AUTOMOVE east
- gosub AUTOMOVE 65
- goto TRAVEL
- }
- else goto AT.STARTING.CITY
- }
- if ($zoneid = 116) then
- {
- if ("%CITY" != "HIB") then
- {
- gosub AUTOMOVE 75
- goto TRAVEL
- }
- else goto AT.STARTING.CITY
- }
- if ($zoneid = 99) then goto ALREADY.THERE
- if ($zoneid = 90) then goto ALREADY.THERE
- pause 0.5
- goto COMPLETE
- ALREADY.THERE:
- ECHO
- ECHO *** YOU ARE ON AN ISLAND! THIS IS YOUR STARTING CITY DOOFUS!
- ECHO
- pause
- goto COMPLETE
- AT.STARTING.CITY:
- ECHO
- ECHO *** ALREADY AT YOUR STARTING CITY!
- ECHO
- pause
- goto COMPLETE
- TRAVEL:
- pause 0.5
- send .%TRAVEL_SCRIPT %CITY
- waitforre ^REACHED YOUR DESTINATION
- if ($zoneid = 66) then gosub automove east
- TRAVEL.COMPLETE:
- put #echo >Log MediumSpringGreen *** Returned to your Starting City: %CITY
- COMPLETE:
- ECHO
- ECHO **** DONE STEALING!!
- ECHO
- pause 0.5
- put #parse DONE PAWNING
- put #parse DONE STEALING
- exit
- #################################################################################
- #################################################################################
- #### END OF MAIN SCRIPT PATHS
- #################################################################################
- #################################################################################
- #################################################################################
- #### BEGIN SCRIPT ENGINE
- #################################################################################
- #################################################################################
- #######################
- #### STEALING SUB #
- #######################
- STEAL:
- delay 0.001
- var item $0
- var stolen 0
- var grabbed 0
- var marked 0
- var heat 0
- if ("$guild" != "Thief") then
- {
- if ("%CUSTOM_STEALCOUNT" = "OFF") then var STEALCOUNT %%shopcodeQuant
- }
- if ("$guild" = "Empath") && ("%POWER" = "ON") then gosub POWER.CHECK.NOOB
- if ("$guild" = "Empath") && ("%PercHealth" = "ON") then gosub PERC.HEALTH
- STEAL.1:
- if (%stolen >= %STEALCOUNT) then goto TOO.HOT
- if ("%noSteal" = "ON") then goto STEAL.RETURN
- if contains("%item" , "nothing") then goto STEAL.RETURN
- if ("$righthand" != "Empty") || ("$lefthand" != "Empty") then gosub stowing
- pause 0.001
- pause 0.001
- pause 0.001
- MARKING:
- delay 0.001
- math marked add 1
- if (%caught = 1) then goto TOO.HOT
- if ("$righthand" != "Empty") && ("$lefthand" != "Empty") then gosub stowing
- if ("$guild" != "Thief") || ("%marking" = "OFF") then goto STEALING
- if !$hidden then
- {
- gosub HIDE
- pause $roundtime
- pause 0.5
- pause 0.1
- }
- if $roundtime > 0 then pause
- pause 0.1
- pause 0.1
- pause 0.001
- pause 0.001
- matchre MARKING ^\.\.\.wait|^Sorry\,
- matchre MARK.LAST to take unwanted notice of you|You manage to avoid the shopkeep's notice this time|You trace an X across your chest
- matchre SECONDARY.CHECK Mark what\?|^Something appears different
- matchre HOT.STEAL perhaps it's a little risky|troublesome to be unnoticed|troublesome to lift|about even odds|looks your way suspiciously|should be possible
- matchre TOO.HOT you are being watched|looking for a reason to call the guards|beyond foolish|pretty sure you'll be caught
- matchre TOO.HOT it would likely be futile|judge's gavel echoes through your mind|feel the taste of bitter failure|paying far too much attention to it
- matchre TOO.HOT somewhat of a long shot|don't think well of your chances to lift it|quite the struggle|Guards\! Guards\!|points to where you lie concealed
- matchre TOO.HOT miracles occasionally happen|you'll be spotted pretty easily|maybe you shouldn't try it|begins to shout loudly for help
- matchre STEALING Roundtime|^You can not make marks on|it should be possible
- send mark %item %itemLocation
- matchwait 20
- put #echo >Log Red *** Missing Match Label in MARKING - %item ***
- put #log $datetime MISSING MATCH IN MARKING! - %item ***
- goto STEALING
- MARK.LAST:
- var marking OFF
- goto STEALING
- HOT.STEAL:
- math stolen add 1
- if ("%RISKY" != "ON") then goto TOO.HOT
- STEALING:
- if (%caught = 1) then goto TOO.HOT
- if ("$guild" != "Thief") && (%stolen >= %STEALCOUNT) then goto TOO.HOT
- if (%stolen >= %STEALCOUNT) then goto TOO.HOT
- math stolen add 1
- math grabbed add 1
- STEAL.REAL:
- delay 0.001
- if !$hidden then
- {
- gosub HIDE
- pause $roundtime
- pause 0.5
- pause 0.1
- }
- if $roundtime > 0 then pause 0.5
- pause 0.1
- pause 0.1
- pause 0.1
- pause 0.001
- matchre STEAL.REAL ^\.\.\.wait|^Sorry\,
- matchre STEAL.1 ^You need at least one hand free
- matchre STEAL.RETURN ^You haven't picked something|^You can't steal
- matchre TOO.HOT begins to shout loudly for help|realize that you are being watched|^Guards! Guards!
- matchre STEAL.CHECK Roundtime|^Something appears different
- send steal %item %itemLocation
- matchwait 20
- put #echo >Log Red *** Missing Match Label in STEAL.REAL ! ***
- put #log $datetime MISSING MATCH IN STEAL.REAL ***
- STEAL.CHECK:
- if ("%noLearn" = "ON") then goto STEAL.RETURN
- if (%stolen >= %STEALCOUNT) then goto TOO.HOT
- if (%stolen = 1) then goto MARKING
- if (%stolen = 2) then
- {
- gosub STOW
- goto MARKING
- }
- if (%stolen = 3) then goto MARKING
- if (%stolen = 4) then
- {
- if ("%MARK.ALL" = "ON") then
- {
- gosub STOW
- goto MARKING
- }
- gosub STOW
- goto STEALING
- }
- if (%stolen = 5) then goto MARKING
- if (%stolen = 6) then
- {
- if ("%MARK.ALL" = "ON") then
- {
- gosub STOW
- goto MARKING
- }
- gosub STOW
- goto STEALING
- }
- if (%stolen >= 7) then
- {
- gosub STOW
- goto STEAL.RETURN
- }
- SECONDARY.CHECK:
- if (%SECOND_ITEM = 0) then goto STEAL.RETURN
- ECHO
- ECHO *** OUT OF STOCK! CHECKING FOR SECONDARY ITEMS..
- ECHO
- var item %secondary
- var itemLocation
- if def(secondaryLocation) then put #var itemLocation %secondaryLocation
- var SECOND_ITEM 0
- goto STEAL.1
- TOO.HOT:
- pause 0.1
- if (%stolen >= %STEALCOUNT) then goto TOO.HOT2
- if (%marked > 2) then goto TOO.HOT2
- if ((%grabbed < 2) && (%marked < 3) && (%tweaked < 3) && (%caught = 0)) then goto MARK.ADJUST
- #if (%grabbed = 1) then put #echo >log Magenta Leaving %SHOP - %item too hot after %grabbed grab
- #if (%grabbed <> 1) then put #echo >log Magenta Leaving %SHOP - %item too hot after %grabbed grabs
- TOO.HOT2:
- put #echo >log Fuchsia Left %SHOP - Too hot! Made %grabbed grabs at: %item
- STEAL.RETURN:
- action remove You don't feel you learned anything useful from this trivial theft
- action remove notices you attempting to make the grab and begins to shout for help.
- gosub ITEM.STRIP
- if (%adjusted = 1) then
- {
- ECHO *** Adding temp item to stealing list..
- math AltCount add 1
- pause 0.001
- var ALT%AltCount %item
- gosub STEAL.LIST.SETUP
- gosub MARK.RESET
- gosub STEAL.LIST.SETUP
- }
- var stolen 0
- var grabbed 0
- var adjusted 0
- var marked 0
- var caught 0
- var heat 0
- var tweaked 0
- var noLearn OFF
- var noSteal OFF
- var itemLocation
- if ("$guild" = "Thief") then var marking ON
- if $hidden then if ("%SNEAK" = "OFF") then gosub unhide
- gosub stowing
- if ("$guild" = "Necromancer") && (%ROC = 0) then gosub NECRO.PREP
- RETURN
- ### MARK ADJUST
- MARK.ADJUST:
- gosub clear
- var adjusted 1
- math tweaked add 1
- put #echo >Log Yellow *** Retrying %SHOP - %item too hard! Adjusting down one level..
- if $Thievery.Ranks < 20 then gosub NOPE
- if $Thievery.Ranks >= 0 && $Thievery.Ranks < 20 then gosub NOPE
- if $Thievery.Ranks >= 20 && $Thievery.Ranks < 40 then gosub CLASS0
- if $Thievery.Ranks >= 40 && $Thievery.Ranks < 60 then gosub CLASS1
- if $Thievery.Ranks >= 60 && $Thievery.Ranks < 80 then gosub CLASS2
- if $Thievery.Ranks >= 80 && $Thievery.Ranks < 100 then gosub CLASS3
- if $Thievery.Ranks >= 100 && $Thievery.Ranks < 150 then gosub CLASS4
- if $Thievery.Ranks >= 150 && $Thievery.Ranks < 200 then gosub CLASS5
- if $Thievery.Ranks >= 200 && $Thievery.Ranks < 250 then gosub CLASS6
- if $Thievery.Ranks >= 250 && $Thievery.Ranks < 300 then gosub CLASS7
- if $Thievery.Ranks >= 300 && $Thievery.Ranks < 400 then gosub CLASS8
- if $Thievery.Ranks >= 400 && $Thievery.Ranks < 500 then gosub CLASS9
- if $Thievery.Ranks >= 500 && $Thievery.Ranks < 600 then gosub CLASS10
- if $Thievery.Ranks >= 600 && $Thievery.Ranks < 700 then gosub CLASS11
- if $Thievery.Ranks >= 700 && $Thievery.Ranks < 800 then gosub CLASS12
- if $Thievery.Ranks >= 800 && $Thievery.Ranks < 900 then gosub CLASS13
- if $Thievery.Ranks >= 900 && $Thievery.Ranks < 1000 then gosub CLASS14
- if $Thievery.Ranks >= 1000 && $Thievery.Ranks < 1200 then gosub CLASS15
- if $Thievery.Ranks >= 1200 then gosub CLASS16
- goto %RETRY
- MARK.ADJUST.UP:
- gosub clear
- var adjusted 1
- math tweaked add 1
- put #echo >Log Yellow *** Retrying %SHOP - %item too easy! Adjusting up one level..
- if $Thievery.Ranks < 20 then gosub CLASS0
- if $Thievery.Ranks >= 0 && $Thievery.Ranks < 20 then gosub CLASS1
- if $Thievery.Ranks >= 20 && $Thievery.Ranks < 40 then gosub CLASS2
- if $Thievery.Ranks >= 40 && $Thievery.Ranks < 60 then gosub CLASS3
- if $Thievery.Ranks >= 60 && $Thievery.Ranks < 80 then gosub CLASS4
- if $Thievery.Ranks >= 80 && $Thievery.Ranks < 100 then gosub CLASS5
- if $Thievery.Ranks >= 100 && $Thievery.Ranks < 150 then gosub CLASS6
- if $Thievery.Ranks >= 150 && $Thievery.Ranks < 200 then gosub CLASS7
- if $Thievery.Ranks >= 200 && $Thievery.Ranks < 250 then gosub CLASS8
- if $Thievery.Ranks >= 250 && $Thievery.Ranks < 300 then gosub CLASS9
- if $Thievery.Ranks >= 300 && $Thievery.Ranks < 400 then gosub CLASS10
- if $Thievery.Ranks >= 400 && $Thievery.Ranks < 500 then gosub CLASS11
- if $Thievery.Ranks >= 500 && $Thievery.Ranks < 600 then gosub CLASS12
- if $Thievery.Ranks >= 600 && $Thievery.Ranks < 700 then gosub CLASS13
- if $Thievery.Ranks >= 700 && $Thievery.Ranks < 800 then gosub CLASS14
- if $Thievery.Ranks >= 800 && $Thievery.Ranks < 900 then gosub CLASS15
- if $Thievery.Ranks >= 900 && $Thievery.Ranks < 1000 then gosub CLASS16
- if $Thievery.Ranks >= 1000 && $Thievery.Ranks < 1200 then gosub CLASS17
- if $Thievery.Ranks >= 1200 then gosub CLASS18
- goto %RETRY
- MARK.RESET:
- var adjusted 0
- if $Thievery.Ranks < 20 then gosub NOOB
- if $Thievery.Ranks >= 0 && $Thievery.Ranks < 20 then gosub CLASS0
- if $Thievery.Ranks >= 20 && $Thievery.Ranks < 40 then gosub CLASS1
- if $Thievery.Ranks >= 40 && $Thievery.Ranks < 60 then gosub CLASS2
- if $Thievery.Ranks >= 60 && $Thievery.Ranks < 80 then gosub CLASS3
- if $Thievery.Ranks >= 80 && $Thievery.Ranks < 100 then gosub CLASS4
- if $Thievery.Ranks >= 100 && $Thievery.Ranks < 150 then gosub CLASS5
- if $Thievery.Ranks >= 150 && $Thievery.Ranks < 200 then gosub CLASS6
- if $Thievery.Ranks >= 200 && $Thievery.Ranks < 250 then gosub CLASS7
- if $Thievery.Ranks >= 250 && $Thievery.Ranks < 300 then gosub CLASS8
- if $Thievery.Ranks >= 300 && $Thievery.Ranks < 400 then gosub CLASS9
- if $Thievery.Ranks >= 400 && $Thievery.Ranks < 500 then gosub CLASS10
- if $Thievery.Ranks >= 500 && $Thievery.Ranks < 600 then gosub CLASS11
- if $Thievery.Ranks >= 600 && $Thievery.Ranks < 700 then gosub CLASS12
- if $Thievery.Ranks >= 700 && $Thievery.Ranks < 800 then gosub CLASS13
- if $Thievery.Ranks >= 800 && $Thievery.Ranks < 900 then gosub CLASS14
- if $Thievery.Ranks >= 900 && $Thievery.Ranks < 1000 then gosub CLASS15
- if $Thievery.Ranks >= 1000 && $Thievery.Ranks < 1200 then gosub CLASS16
- if $Thievery.Ranks >= 1200 then gosub CLASS17
- RETURN
- ITEM.STRIP:
- #eval tempitem replace("%item","first", "")
- #eval tempitem replace("%item","second", "")
- #eval tempitem replace("%item","third", "")
- #eval tempitem replace("%item","fourth", "")
- #eval tempitem replace("%item","fifth", "")
- #eval tempitem replace("%item","sixth", "")
- #eval tempitem replace("%item","seventh", "")
- #eval tempitem replace("%item","eighth", "")
- #eval tempitem replace("%item","ninth", "")
- #eval tempitem replace("%item","cambrinth", "")
- eval item replacere("%item", "[\w'-]+\s", "")
- pause 0.001
- var item %item
- var shopcode %item
- RETURN
- ############################################################################################
- # ARMOR REMOVAL
- ############################################################################################
- ARMOR.CHECK:
- ARMOR.INIT:
- ECHO
- ECHO **** CHECKING WORN ARMOR...
- ECHO
- counter set 0
- gosub PUT open my %SAFE_CONTAINER
- gosub PUT open my %BACKUP_CONTAINER
- pause 0.2
- ARMOR.CHECK.1:
- delay 0.001
- pause 0.001
- pause 0.001
- matchre REMOVE.AND.STOW (gauntlet|gloves|steel mail gloves|parry stick|handwraps|hand claws|jacket|footwraps|aegis|buckler|\bhood\b|\bcowl\b|\bheater|pavise|scutum|shield|sipar|\btarge\b|aventail|backplate|balaclava|barbute|bascinet|breastplate|\bcap\b|coat|cowl|cuirass|fauld|greaves|hauberk|helm|\bhood\b|jerkin|leathers|lorica|mantle|mask|morion|pants|(?<=(field|fluted|full|half) )\bplate\b|handguards|robe|sallet|shirt|sleeves|tabard|tasset|thorakes|vambraces|vest|collar|coif|mitt|steel mail)
- matchre ARMOR.NONE You have nothing of that sort|You are wearing nothing of that sort|You aren't wearing anything like that
- send inv armor
- matchwait 10
- goto ARMOR.WARN
- ARMOR.CHECK.2:
- delay 0.001
- pause 0.001
- matchre REMOVE.AND.STOW (gauntlet|gloves|steel mail gloves|parry stick|handwraps|hand claws|jacket|footwraps|aegis|buckler|\bhood\b|\bcowl\b|\bheater|pavise|scutum|shield|sipar|\btarge\b|aventail|backplate|balaclava|barbute|bascinet|breastplate|\bcap\b|coat|cowl|cuirass|fauld|greaves|hauberk|helm|\bhood\b|jerkin|leathers|lorica|mantle|mask|morion|pants|(?<=(field|fluted|full|half) )\bplate\b|handguards|robe|sallet|shirt|sleeves|tabard|tasset|thorakes|vambraces|vest|collar|coif|mitt|steel mail)
- matchre ARMOR.COMPLETE You have nothing of that sort|You are wearing nothing of that sort|You aren't wearing anything like that
- send inv armor
- matchwait 10
- goto ARMOR.WARN
- REMOVE.AND.STOW:
- var armor $0
- REMOVE.ARMOR:
- delay 0.001
- pause 0.001
- pause 0.001
- var LAST REMOVE.ARMOR
- matchre REMOVE.ARMOR ^\.\.\.wait|^Sorry\,
- matchre STOW.ARMOR ^You remove|^You loosen the straps securing|^You take|^You slide
- matchre STOW.ARMOR ^You sling|^You work your way out of|^You pull|^You slip|^You aren't
- send remove %armor
- matchwait 10
- STOW.ARMOR:
- delay 0.001
- pause 0.1
- var LAST STOW.ARMOR
- matchre STOW.ARMOR ^\.\.\.wait|^Sorry\,
- matchre ARMOR.DONE ^You put|^You slip|^What were you
- matchre STOW.ARMOR.ALT any more room in|closed|no matter how you arrange|too heavy|too long
- send put %armor in my %SAFE_CONTAINER
- matchwait 10
- STOW.ARMOR.ALT:
- delay 0.001
- pause 0.1
- var LAST STOW.ARMOR.ALT
- matchre STOW.ARMOR.ALT ^\.\.\.wait|^Sorry\,
- matchre ARMOR.DONE ^You put|^You slip|^What were you
- matchre NO.MORE.STOWING any more room in|closed|no matter how you arrange|too heavy|too long
- send put %armor in my %BACKUP_CONTAINER
- matchwait 10
- ARMOR.DONE:
- counter add 1
- pause 0.5
- var total_armor %c
- var armor%c %armor
- goto ARMOR.CHECK.2
- ARMOR.NONE:
- ECHO **** NO ARMOR FOUND!
- var ARMOR_STOW OFF
- RETURN
- NO.MORE.STOWING:
- put #echo >Log Red *** WARNING! OUT OF ROOM IN %SAFE_CONTAINER TO STORE ARMOR! MAKE ROOM! ***
- ECHO
- ECHO ******************************************************************************************************
- ECHO *** WARNING!!! WARNING!!! WARNING!!! WARNING!!!
- ECHO *** YOU HAVE NO MORE FREE BAG SPACE TO STORE ARMOR! MAKE SOME ROOM OR GET BIGGER BAGS!
- ECHO *** YOU NEED TO MAKE SOME SPACE IN YOUR: %SAFE_CONTAINER
- ECHO *** GONNA GO FOR IT ANYWAY, YOUR STEALING WILL BE HINDERED! QUIT SCRIPT NOW IF YOU WANT TO ABORT!
- ECHO ******************************************************************************************************
- ECHO
- put wear %armor
- pause 7
- ECHO
- ECHO *************************************************************************
- ECHO *** CONTINUING SCRIPT IN 10 SECONDS IF YOU DO NOT ABORT SCRIPT
- ECHO *************************************************************************
- ECHO
- pause 10
- goto ARMOR.COMPLETE
- ARMOR.COMPLETE:
- var ARMOR_STOW ON
- ECHO #######################################
- ECHO # Saved Armor Count: %total_armor
- if %total_armor < 1 then
- {
- ECHO # NO ARMOR FOUND
- ECHO #######################################
- RETURN
- }
- ECHO # Armor1: %armor1
- if %total_armor < 2 then
- {
- ECHO #######################################
- RETURN
- }
- ECHO # Armor2: %armor2
- if %total_armor < 3 then
- {
- ECHO #######################################
- RETURN
- }
- ECHO # Armor3: %armor3
- if %total_armor < 4 then
- {
- ECHO #######################################
- RETURN
- }
- ECHO # Armor4: %armor4
- if %total_armor < 5 then
- {
- ECHO #######################################
- RETURN
- }
- ECHO # Armor5: %armor5
- if %total_armor < 6 then
- {
- ECHO #######################################
- RETURN
- }
- ECHO # Armor6: %armor6
- if %total_armor < 7 then
- {
- ECHO #######################################
- RETURN
- }
- ECHO # Armor7: %armor7
- if %total_armor < 8 then
- {
- ECHO #######################################
- RETURN
- }
- ECHO # Armor8: %armor8
- if %total_armor < 9 then
- {
- ECHO #######################################
- RETURN
- }
- ECHO # Armor9: %armor9
- if %total_armor < 10 then
- {
- ECHO #######################################
- RETURN
- }
- ECHO # Armor10: %armor10
- ECHO #######################################
- ECHO
- pause 0.2
- gosub PUT close my %SAFE_CONTAINER
- pause 0.5
- RETURN
- ############################################################################################
- WEAR.ARMOR:
- ECHO **** PUTTING YOUR ARMOR BACK ON! ****
- gosub PUT open my %SAFE_CONTAINER
- pause 0.5
- if %total_armor = 0 then RETURN
- if "%armor1" != "null" then
- {
- send get my %armor1 from my %SAFE_CONTAINER
- pause 0.5
- send wear my %armor1
- pause 0.5
- }
- if "%armor2" != "null" then
- {
- gosub stowing
- send get my %armor2 from my %SAFE_CONTAINER
- pause 0.5
- send wear my %armor2
- pause 0.5
- }
- if "%armor3" != "null" then
- {
- gosub stowing
- send get my %armor3 from my %SAFE_CONTAINER
- pause 0.5
- send wear my %armor3
- pause 0.5
- }
- if "%armor4" != "null" then
- {
- gosub stowing
- send get my %armor4 from my %SAFE_CONTAINER
- pause 0.5
- send wear my %armor4
- pause 0.5
- }
- if "%armor5" != "null" then
- {
- gosub stowing
- send get my %armor5 from my %SAFE_CONTAINER
- pause 0.5
- send wear my %armor5
- pause 0.5
- }
- if "%armor6" != "null" then
- {
- gosub stowing
- send get my %armor6 from my %SAFE_CONTAINER
- pause 0.5
- send wear my %armor6
- pause 0.5
- }
- if "%armor7" != "null" then
- {
- send get my %armor7 from my %SAFE_CONTAINER
- pause 0.5
- send wear my %armor7
- pause 0.5
- }
- if "%armor8" != "null" then
- {
- send get my %armor8 from my %SAFE_CONTAINER
- pause 0.5
- send wear my %armor8
- pause 0.5
- }
- if "%armor9" != "null" then
- {
- send get my %armor9 from my %SAFE_CONTAINER
- pause 0.5
- send wear my %armor9
- pause 0.5
- }
- if "%armor10" != "null" then
- {
- send get my %armor10 from my %SAFE_CONTAINER
- pause 0.5
- send wear my %armor10
- pause 0.5
- }
- RETURN
- ############################################################################################
- #### FOR PAWNING / BINNING STOLEN ITEMS
- BAG.EMPTY:
- var bag $0
- pause .0001
- var contents null
- action var contents $1 when ^You rummage through .+ and see (.*)\.
- action var contents $1 when ^In the .* you see (.*)\.
- send look in my %bag
- waitforre ^In the .* you see|^There is nothing in there\.|^You rummage
- action remove ^In the .* you see (.*)\.|^You rummage through .+ and see (.*)\.
- if "%contents" = "null" then RETURN
- pause .0001
- eval contents replace("%contents" , ", " , "|")
- eval contents replace("%contents" , " and a" , "|a")
- eval contents replace("%contents" , " and an" , "|an")
- eval contents replace("%contents" , " and some" , "|some")
- eval contents replace("%contents"," with a miner's lamp on it", "")
- eval contents replace("%contents"," with a wax label on it", "")
- eval contents replace("%contents"," on it", "")
- var contents |%contents|
- eval total count("%contents", "|")
- BAG.EMPTY.Loop:
- eval item element("%contents", 1)
- eval number count("%contents", "|%item")
- var count 0
- gosub BAG.EMPTY.RemoveLoop
- action setvariable item $1 when ^@(?:an?|some).* (\S+)$
- put #parse @%item
- counter set %count
- if matchre("%STEAL.LIST", "%item") then gosub BAG.EMPTY.ItemAction
- #if matchre(("%ALT1|%ALT2|%ALT3|%ALT4|%ALT5|%ALT6|%ALT7|%ALT8|%ALT9"), "%item") then gosub BAG.EMPTY.ItemAction
- # if contains("%STEAL.LIST", "%item") then gosub %BINORPAWN %item
- if "%contents" != "|" then goto BAG.EMPTY.Loop
- RETURN
- BAG.EMPTY.RemoveLoop:
- eval number count("%contents", "|%item|")
- eval contents replace("%contents" , "|%item|" , "|")
- eval contents replace("%contents" , "||" , "|")
- evalmath count %count + %number
- if !contains("%contents", "|%item|") then RETURN
- goto BAG.EMPTY.RemoveLoop
- BAG.EMPTY.ItemAction:
- gosub %BINORPAWN %item
- #counter subtract 1
- if %c < 1 then RETURN
- goto BAG.EMPTY.ItemAction
- ###############################################################################################
- #### UB3R 1337 CONTAINER CHECK
- ###############################################################################################
- #### PROTECTS YOUR PERSONAL ITEMS FROM BEING BINNED/PAWNED
- BAG.CHECK:
- var bag $0
- #var count 0
- pause 0.01
- var contents null
- gosub PUT open my %SAFE_CONTAINER
- gosub PUT open my %BACKUP_CONTAINER
- pause 0.5
- pause 0.1
- pause 0.001
- pause 0.001
- # action var contents $1 when ^You rummage through .+ and see (.*)\.
- action var contents $1 when ^In the .* you see (.*)\.
- send look in my %bag
- waitforre ^In the .* you see|^There is nothing in there\.
- action remove ^In the .* you see (.*)\.|^There is nothing in there\.
- pause 0.001
- pause 0.001
- if "%contents" = "null" then
- {
- gosub PUT close my %SAFE_CONTAINER
- pause 0.5
- RETURN
- }
- eval contents replace("%contents" , ", " , "|")
- eval contents replace("%contents" , " and a" , "|a")
- eval contents replace("%contents" , " and an" , "|an")
- eval contents replace("%contents" , " and some" , "|some")
- eval contents replace("%contents"," with a miner's lamp on it", "")
- eval contents replace("%contents"," with a wax label on it", "")
- eval contents replace("%contents"," on it", "")
- var contents |%contents|
- eval total count("%contents", "|")
- Loop:
- eval item element("%contents", 1)
- eval number count("%contents", "|%item")
- var count 0
- gosub RemoveLoop
- action var item $1 when ^@(?:an?|some) .* (\S+)$
- put #parse @%item
- counter set %count
- if contains("%IMPORTANT_ITEMS", "%item") then gosub storeitem
- if contains("%STEAL.LIST", "%item") then gosub storeitem
- if %contents != "|" then goto Loop
- gosub PUT close my %SAFE_CONTAINER
- pause 0.5
- gosub PUT close my %BACKUP_CONTAINER
- pause 0.001
- pause 0.001
- ECHO **** DONE STASHING ITEMS FROM %bag
- RETURN
- RemoveLoop:
- eval number count("%contents", "|%item|")
- eval contents replace("%contents", "|%item|", "|")
- eval contents replace("%contents", "||" "|")
- evalmath count %count + %number
- if !contains("%contents", "|%item|") then RETURN
- goto RemoveLoop
- storeitem:
- counter subtract 1
- gosub GET %item from my %bag
- gosub PUT.IT my %item in my %SAFE_CONTAINER
- pause 0.1
- pause 0.001
- if ("$righthand" != "Empty") || ("$lefthand" != "Empty") then gosub PUT.IT my %item in my %BACKUP_CONTAINER
- pause 0.1
- pause 0.001
- if ("$righthand" != "Empty") || ("$lefthand" != "Empty") then goto BAG.FULL
- if %c < 1 then RETURN
- goto storeitem
- ###############################################################################################
- #### Empties jail container of items with messed up syntaxes
- JAIL.EMPTY:
- var bag $0
- pause .0001
- var contents null
- action var contents $1 when ^You rummage through .+ and see (.*)\.
- action var contents $1 when ^In the .* you see (.*)\.
- send look in my %bag
- waitforre ^In the .* you see|^There is nothing in there\.|^You rummage
- action remove ^In the .* you see (.*)\.|^You rummage through .+ and see (.*)\.
- if "%contents" = "null" then RETURN
- pause .0001
- eval contents replace("%contents" , ", " , "|")
- eval contents replace("%contents" , " and a" , "|a")
- eval contents replace("%contents" , " and an" , "|an")
- eval contents replace("%contents" , " and some" , "|some")
- eval contents replace("%contents"," with a miner's lamp on it", "")
- eval contents replace("%contents"," with a wax label on it", "")
- eval contents replace("%contents"," on it", "")
- var contents |%contents|
- eval total count("%contents", "|")
- JAIL.EMPTY.Loop:
- eval item element("%contents", 1)
- eval number count("%contents", "|%item")
- var count 0
- gosub JAIL.EMPTY.RemoveLoop
- action setvariable item $1 when ^@(?:an?|some).* (\S+)$
- put #parse @%item
- counter set %count
- gosub JAIL.EMPTY.ItemAction
- if "%contents" != "|" then goto JAIL.EMPTY.Loop
- RETURN
- JAIL.EMPTY.RemoveLoop:
- eval number count("%contents", "|%item|")
- eval contents replace("%contents" , "|%item|" , "|")
- eval contents replace("%contents" , "||" , "|")
- evalmath count %count + %number
- if !contains("%contents", "|%item|") then RETURN
- goto JAIL.EMPTY.RemoveLoop
- JAIL.EMPTY.ItemAction:
- counter subtract 1
- gosub GET %item from my %bag
- #gosub WEAR my %item
- pause 0.1
- pause 0.2
- if ("%item" = "%SAFE_CONTAINER") then gosub PUT open my %SAFE_CONTAINER
- gosub PUT.IT my %item in my %BIN_CONTAINER
- if %c < 1 then RETURN
- goto JAIL.EMPTY.ItemAction
- ###############################################################
- #######################
- # PAWN SKIP
- #######################
- #### SKIPS STRAIGHT TO PAWNING
- PAWN.SKIP:
- gosub clear
- var goPawn OFF
- var EndEarly ON
- goto %PawnLoc
- #######################
- # PAWNING ROUTINE #
- #######################
- PAWN:
- var PAWN.ITEM $0
- PAWN.GET:
- if %c < 1 then RETURN
- pause 0.001
- pause 0.001
- matchre PAWN.GET ^\.\.\.wait|^Sorry\,
- matchre PAWN.BIN ^You need a free hand
- matchre PAWN.SELL ^You get
- matchre PAWN.SELL ^You are already
- matchre PAWN.SELL ^You pick up
- matchre RETURN ^What were you referring to\?
- matchre RETURN ^You aren't holding that\.
- matchre RETURN ^Please rephrase that command\.|^I could not
- send get my %PAWN.ITEM in my %bag
- matchwait
- PAWN.SELL:
- counter subtract 1
- if ($invisible = 1) then gosub stopinvis
- if ((matchre("%nosell", "$righthand")) || (matchre("%nosell", "$lefthand")) then goto PAWN.BIN
- matchre PAWN.SELL ^\.\.\.wait|^Sorry\,
- matchre PAWN.GET ^You sell your|he hands you
- matchre PAWN.BIN ^You can't pawn|not worth the effort
- matchre PAWN.BIN slit a throat for this|worth my time|shakes his head|no need
- matchre PAWN.BIN ^I could not find what you were referring to\.
- matchre PAWN.BIN ^Please rephrase that command\.
- matchre PAWN.BIN ^What were you referring to\?
- matchre BUCKET You'll want to empty that first
- send sell my %PAWN.ITEM
- matchwait 10
- put #echo >Log Red *** Missing match label - PAWN.SELL
- put #log $datetime MISSING MATCH IN PAWN.SELL ***
- PAWN.BIN:
- if ("%BIN" = "OFF") then goto BUCKET
- matchre PAWN.BIN ^\.\.\.wait|^Sorry\,
- matchre PAWN.GET ^You put
- matchre PAWN.GET ^What were you referring to\?
- matchre PAWN.GET ^You aren't holding that\.
- matchre PAWN.GET ^Please rephrase that command\.
- matchre BUCKET ^That's too heavy to go in there\!
- matchre BUCKET ^You can't put that in there\!
- matchre BUCKET ^There is no more room|too long to fit
- matchre BUCKET ^But that's closed\.
- matchre BUCKET ^What were you|^You can't do that
- matchre BUCKET ^There isn't enough room .* for your .* to fit\.
- if ("$lefthand" != "Empty") then send put my $lefthandnoun in my %BIN_CONTAINER
- if ("$righthand" != "Empty") then send put my $righthandnoun in my %BIN_CONTAINER
- matchwait 10
- BUCKET:
- if "$zoneid" = "30" then
- {
- gosub EMPTY.HANDS
- goto PAWN.GET
- }
- pause 0.1
- matchre BUCKET ^\.\.\.wait|^Sorry\,
- matchre PAWN.GET ^You put
- matchre PAWN.GET ^You drop
- matchre PAWN.GET ^You toss
- matchre DROP.IT ^You should be holding
- if ("$lefthand" != "Empty") then send put my $lefthandnoun in bucket
- if ("$righthand" != "Empty") then send put my $righthandnoun in bucket
- matchwait 10
- gosub EMPTY.HANDS
- goto PAWN.GET
- DROP.IT:
- delay 0.0001
- if ("$lefthand" != "Empty") then gosub empty left
- if ("$righthand" != "Empty") then gosub empty right
- goto PAWN.GET
- #######################
- # BINNING ROUTINE #
- #######################
- BIN:
- var BIN_ITEM $0
- BIN.GET:
- if %c < 1 then RETURN
- pause 0.001
- matchre BIN.GET ^\.\.\.wait|^Sorry\,
- matchre BIN.DROP ^You need a free hand
- matchre BIN.ITEM ^You get
- matchre BIN.ITEM ^You are already
- matchre BIN.ITEM ^You pick up
- matchre RETURN ^What were you referring to\?
- matchre RETURN ^You aren't holding that\.
- matchre RETURN ^Please rephrase that command\.
- send get my %BIN_ITEM in my %bag
- matchwait 10
- BIN.ITEM:
- counter subtract 1
- matchre BIN.ITEM ^\.\.\.wait|^Sorry\,
- matchre BIN.DROP \"You're not fooling anyone\, $charactername\.
- matchre BIN.DROP ^Swan raises an eyebrow
- matchre BIN.DROP ^Saishla raises an eyebrow in your direction
- matchre BIN.GET \"Nice work\, $charactername\.\"
- matchre RETURN ^What were you referring to\?
- matchre RETURN ^You aren't holding that\.
- matchre RETURN ^Please rephrase that command\.
- send put my %BIN_ITEM in bin
- matchwait 10
- BIN.DROP:
- gosub STOW.BIN
- gosub EMPTY.HANDS
- goto BIN.GET
- ################################
- # PAWNING / BINNING LOGIC #
- ################################
- PAWN.GOODS:
- ECHO
- ECHO #### GETTING SOME COIN! ####
- ECHO #### PAWNING %CURRENT_CITY HAUL! ####
- ECHO
- put #echo >Log Yellow *** Pawning %CURRENT_CITY Haul! ***
- pause 0.2
- var BINORPAWN PAWN
- gosub BAG.EMPTY %PAWN_CONTAINER
- pause 0.3
- if ("%BIN" = "OFF") then gosub BAG.EMPTY %BIN_CONTAINER
- pause 0.3
- gosub STOW
- gosub STOWING
- pause 0.2
- RETURN
- BIN.GOODS:
- ECHO
- ECHO ######## Binning %CURRENT_CITY Haul! ########
- ECHO
- put #echo >Log Yellow *** Binning %CURRENT_CITY Haul! ***
- pause 0.2
- var BINORPAWN BIN
- gosub BAG.EMPTY %BIN_CONTAINER
- pause 0.001
- gosub BAG.EMPTY %PAWN_CONTAINER
- pause 0.5
- # send dump junk
- gosub STOW
- gosub STOWING
- RETURN
- #############################
- # STOW ROUTINE #
- #############################
- STOW:
- delay 0.001
- if (("$righthand" = "Empty") && ("$lefthand" = "Empty")) then return
- math STOW.LOOP add 1
- pause 0.1
- pause 0.1
- if contains("$lefthand" "$righthand" , "%LARGE.ITEMS") then gosub EMPTY.HANDS
- if matchre("%item","(%BIN_CONTAINER|%PAWN_CONTAINER)") then gosub EMPTY.HANDS
- if %STOW.LOOP > 1 then goto SECOND.BAG
- matchre STOW ^\.\.\.wait|^Sorry\,
- matchre STOW.WTF ^Something appears different
- matchre SECOND.BAG /You just can't get|no matter how you arrange|^There isn't any more room|too wide|too heavy|too long to fit|won't fit|You can't do that\!
- matchre STOW.RETURN /You put|What were you|You can't do|I could not|Perhaps you|Stow what/i
- if ("$righthand" != "Empty") then send put my $righthandnoun in my %PAWN_CONTAINER
- if ("$lefthand" != "Empty") then send put my $lefthandnoun in my %BIN_CONTAINER
- matchwait 10
- RETURN
- SECOND.BAG:
- delay 0.001
- pause 0.5
- pause 0.2
- matchre SECOND.BAG ^\.\.\.wait|^Sorry\,
- matchre DROP.ITEM /You just can't get|no matter how you arrange|^There isn't any more room|too wide|too heavy|too long to fit|won't fit|You can't do that\!
- matchre STOW.RETURN /You put|What were you|I could not|Perhaps you|Stow what/i
- if ("$righthand" != "Empty") then send put my $righthandnoun in my %BIN_CONTAINER
- if ("$lefthand" != "Empty") then send put my $lefthandnoun in my %PAWN_CONTAINER
- matchwait 10
- RETURN
- STOW.WTF:
- delay 0.001
- if ("$righthand" != "Empty") then send stow right in my %PAWN_CONTAINER
- if ("$lefthand" != "Empty") then send stow left in my %BIN_CONTAINER
- pause 0.5
- pause 0.5
- STOW.RETURN:
- var STOW.LOOP 0
- RETURN
- DROP.ITEM:
- var STOW.LOOP 0
- gosub EMPTY.HANDS
- pause 0.1
- RETURN
- STOW.BIN:
- ECHO ##############################################################################
- ECHO * ### ITEM ALERT! ODD ITEM! ###
- ECHO * Found an odd non-binnable item
- ECHO * Probably just an expired stolen item
- ECHO * Putting in %Safe_Container for safe-keeping just in case!
- ECHO ##############################################################################
- pause
- pause 0.5
- gosub PUT open my %SAFE_CONTAINER
- pause 0.1
- pause 0.1
- pause 0.1
- matchre SECOND.BAG ^\.\.\.wait|^Sorry\,
- matchre DROP.ITEM /You just can't get|You can't do|no matter how you arrange|^There isn't any more room||too wide|too heavy|too long to fit|won't fit/i
- matchre STOW.BIN.RETURN /You put|What were you|I could not|Perhaps you|Stow what/i
- if ("$righthand" != "Empty") then send put my $righthandnoun in my %SAFE_CONTAINER
- if ("$lefthand" != "Empty") then send put my $lefthandnoun in my %SAFE_CONTAINER
- matchwait 10
- STOW.BIN.RETURN:
- pause 0.001
- gosub PUT close my %SAFE_CONTAINER
- pause 0.1
- pause 0.001
- RETURN
- #####################################
- # THIEF BUFFS
- #####################################
- KHRI:
- if ("$guild" = "Barbarian") then goto DANCE
- if ("$guild" != "Thief") then RETURN
- ECHO *** PUTTING UP KHRI ***
- if ($concentration < 70) then goto KHRI.BREAK
- gosub KHRI.START %khri1
- RETURN
- KHRI.START:
- var khri $0
- KHRI.START.CONTINUE:
- delay 0.001
- pause 0.001
- matchre KHRI.START.CONTINUE ^\.\.\.wait|^Sorry\,
- matchre KHRI.KNEEL ^Your mind and body are willing|Sitting, kneeling, or lying
- matchre KHRI.START.CONTINUE ^\.\.\.wait|^Sorry\,
- matchre KHRI.RETURN ^You're already using the .* meditation\.
- matchre KHRI.RETURN ^You already
- matchre KHRI.RETURN ^Roundtime\:?\s+\d+\s+sec(?:onds|s)?\.?
- matchre KHRI.RETURN ^\[Roundtime\:?\s+\d+\s+sec(?:onds|s)?\.?\]
- matchre KHRI.RETURN ^\(Roundtime\:?\s+\d+\s+sec(?:onds|s)?\.?\)
- matchre KHRI.RETURN ^Focusing|^With intense focus|^You carefully relax your mind|You are not|Your mind|valid khri|^Your thoughts
- matchre KHRI.BREAK You strain, but cannot focus|You have not recovered from|Your mind is already focused
- send khri %khri
- matchwait 20
- KHRI.BREAK:
- send khri stop
- KHRI.WAIT:
- pause 0.5
- ECHO
- ECHO *** WAITING FOR CONCENTRATION TO RECOVER.....
- ECHO
- if !$hidden then gosub hide
- pause
- send khri meditate
- pause 40
- if ($concentration < 60) then goto KHRI.WAIT
- KHRI.WAIT.CONT:
- matchre KHRI.WAIT preoccupying your thoughts
- matchre KHRI.BREAK.DONE ^You are under|^You are not currently under
- put khri check
- matchwait 7
- KHRI.BREAK.DONE:
- gosub EMPTY.HANDS
- goto KHRI
- KHRI.KNEEL:
- gosub PUT kneel
- gosub PUT khri %khri
- pause $roundtime
- pause 0.5
- pause 0.1
- gosub stand
- RETURN
- KHRI.RETURN:
- pause $roundtime
- pause .001
- delay .001
- RETURN
- #####################################
- # BARB BUFFS
- #####################################
- DANCE:
- ECHO *** BARB DANCE ***
- gosub PUT form monkey
- pause $roundtime
- pause 0.5
- pause 0.1
- gosub PUT form panther
- pause $roundtime
- pause 0.5
- pause 0.1
- gosub PUT berserk wildfire
- pause 0.5
- pause 0.1
- RETURN
- #####################################
- # MOONIE
- #####################################
- MOONIE.PREP:
- ECHO *** PUTTING UP RF ***
- pause 0.5
- send prep RF 22
- waitforre ^You feel fully prepared
- send cast
- pause 0.5
- RETURN
- #####################################
- # EMPATH BUFFS
- #####################################
- POWER.CHECK.NOOB:
- if ($Attunement.LearningRate > 30) then RETURN
- pause 0.5
- gosub PUT power
- pause
- pause
- POWER.STUN.CHECK:
- if ($stunned = 1) then
- {
- ECHO *** STUNNED! PAUSING...
- pause 5
- goto POWER.STUN.CHECK
- }
- RETURN
- PERC.HEALTH:
- if ($Empathy.LearningRate > 32) then RETURN
- if ($Attunement.LearningRate > 32) then RETURN
- if ("%GuardianSpirit" = "ON") then GOSUB POWER.CHECK
- if ($zoneid = 42) then RETURN
- ECHO *** PERCEIVING HEALTH ***
- pause 0.001
- pause 0.001
- gosub PUT perceive health
- pause
- POWER.STUN.CHECK2:
- if $stunned = 1 then
- {
- ECHO *** STUNNED! PAUSING...
- pause 5
- goto POWER.STUN.CHECK2
- }
- pause 0.001
- pause 0.001
- RETURN
- POWER.CHECK:
- if ($Attunement.LearningRate > 30) then RETURN
- if ($zoneid = 42) then RETURN
- pause 0.001
- pause 0.001
- matchre RETURN ^You sense the Guardian Spirit spell upon you
- matchre GUARDIAN.SPIRIT ^Roundtime
- send power
- matchwait 10
- GOTO GuardianSpirit
- GS1:
- pause 5
- GUARDIAN.SPIRIT:
- if (*"%GuardianSpirit" != "ON") then RETURN
- if ($zoneid = 42) then RETURN
- if ($Empathy.Ranks < 75) && ($Attunement.Ranks < 75) || ($Empathy.Ranks < 50) && ($Attunement.Ranks < 100) || ($Empathy.Ranks < 100) && ($Attunement.Ranks < 50) then
- {
- ECHO
- ECHO *** You do not appear to have enough combined Empathy or Attunement for Guardian Spirit ***
- ECHO *** If this is an error, please email/IM me with your Empathy and Attunement Ranks
- ECHO *** Turning Guardian Spirit OFF for now.
- pause 5
- var GuardianSpirit OFF
- RETURN
- }
- ECHO *** GUARDIAN SPIRIT ***
- pause 0.5
- gosub PREPARE gs %gsMana
- if (%ECastPause > 0) then gosub SPELL.WAIT
- else pause %ECastPause
- gosub SPELL.CAST
- RETURN
- #####################################
- # NECRO BUFFS
- #####################################
- NECRO.START:
- var Rite OFF
- var Eyes OFF
- action var $1 ON when ^You sense the (\w+)
- gosub PUT power
- pause 0.5
- pause 0.1
- action remove ^You sense the (\w+)
- NECRO.PREP:
- if ("$guild" != "Necromancer") then RETURN
- var cast $0
- pause 0.1
- gosub ROC
- gosub EOTB
- RETURN
- ROC:
- if ("%Rite" = "ON") then goto NECRO.DONE
- if ("%ROC" != "ON") then goto NECRO.DONE
- ECHO **** Checking ROC ****
- if ("$preparedspell" != "None") then gosub RELEASE
- if (((matchre("$roomobjs", "exchange board")) || (matchre("$roomname", "([T|t]eller|[E|e]xchange|[B|b]ank)")) || (matchre("$roomname", "(%donotcastlist)"))) then RETURN
- gosub NECRO.CHECKROOM
- gosub PREPARE roc %rocMana
- if (%castPause > 0) then gosub SPELL.WAIT
- else
- {
- pause %castPause
- if ((!("$roomplayers" = "")) && (matchre("$preparedspell", "(Rite of Contrition|Eyes of the Blind)")) then gosub MOVE.RANDOM
- gosub SPELL.CAST
- }
- RETURN
- EOTB:
- if ("%EOTB" != "ON") then goto NECRO.DONE
- if (("%Eyes" = "ON") && ($invisible = 1)) then goto NECRO.DONE
- ECHO **** Checking EOTB ****
- if ("$preparedspell" != "None") then gosub RELEASE
- ## ** Waits for invis pulse or casts the spell if invisible is off..
- if (("%Eyes" = "ON") && ($invisible = 0)) then
- {
- ## ** This return is slightly different, it will not wait for pulse inside the exchange.
- ## ** It will also not wait for a pulse if destination = exchange, account or any teller trips to the exchange when moving areas.
- ## ** It should wait for a pulse inside the teller if going anywhere else.
- if (((matchre("$roomobjs", "exchange rate board")) || (matchre("$roomname", "([T|t]eller|[E|e]xchange|[B|b]ank)")) || (matchre("$roomname", "(%donotcastlist)"))) && ((matchre("$roomname", "([T|t]eller|[E|e]xchange|[B|b]ank)")) && (matchre("%Destination", "(teller|exchange)")))) then RETURN
- matchre EOTB ^Your spell subtly|^Your corruptive mutation fades
- matchwait 30
- put #echo >log Red *** Error with EOTB not pulsing invis. Attempting to recast.
- }
- if ($invisible = 1) then RETURN
- ## ** If script made it to this section then EOTB must be recast.
- ## ** This will not cast while inside the bank or any other unapproved rooms.
- if (((matchre("$roomobjs", "exchange rate board")) || (matchre("$roomname", "([T|t]eller|[E|e]xchange|[B|b]ank)")) || (matchre("$roomname", "(%donotcastlist)"))) then RETURN
- if ($stamina < 50) then RETURN
- gosub NECRO.CHECKROOM
- gosub PREPARE eotb %eotbMana
- if (%castPause > 0) then gosub SPELL.WAIT
- else
- {
- pause %castPause
- if ((!("$roomplayers" = "")) && (matchre("$preparedspell", "(Rite of Contrition|Eyes of the Blind)")) then gosub MOVE.RANDOM
- gosub SPELL.CAST
- }
- RETURN
- NECRO.DONE:
- delay 0.0001
- RETURN
- NECRO.CHECKROOM:
- if !("$roomplayers" = "") then gosub MOVE.RANDOM
- send search
- waitforre ^Roundtime|^You scan the
- pause $roundtime
- pause 0.5
- if !("$roomplayers" = "") then gosub MOVE.RANDOM
- ECHO **** FOUND EMPTY ROOM! ***
- RETURN
- stopinvis:
- delay 0.001
- gosub PUT hum scale
- pause 0.2
- gosub PUT stop hum
- RETURN
- ############################################################################################
- ##########################
- # MOVEMENT ENGINE
- ##########################
- ##### AUTOMOVE SUBROUTINE #####
- AUTOMOVE:
- delay 0.0001
- var Destination $0
- var automovefailCounter 0
- if $roomid = 0 then GOSUB MOVE.RANDOM
- if (!$standing) then gosub AUTOMOVE.STAND
- if ("%goPawn" = "ON") then goto PAWN.SKIP
- if ("$roomid" = "%Destination") then return
- AUTOMOVE.GO:
- matchre AUTOMOVE.FAILED ^(?:AUTOMAPPER )?MOVE(?:MENT)? FAILED
- matchre AUTOMOVE.RETURN ^YOU HAVE ARRIVED(?:\!)?
- matchre AUTOMOVE.RETURN ^SHOP CLOSED(?:\!)?
- matchre AUTOMOVE.RETURN ^SHOP IS CLOSED(?:\!)?
- matchre AUTOMOVE.FAIL.BAIL ^DESTINATION NOT FOUND
- send #goto %Destination
- matchwait
- AUTOMOVE.STAND:
- pause 0.1
- matchre AUTOMOVE.STAND ^\.\.\.wait|^Sorry\,
- matchre AUTOMOVE.STAND ^Roundtime\:?|^\[Roundtime\:?|^\(Roundtime\:?
- matchre AUTOMOVE.STAND ^The weight of all your possessions prevents you from standing\.
- matchre AUTOMOVE.STAND ^You are still stunned\.
- matchre AUTOMOVE.STAND.PLAYING ^You are a bit too busy performing to do that\.
- matchre AUTOMOVE.RETURN ^You stand(?:\s*back)? up\.
- matchre AUTOMOVE.RETURN ^You are already standing\.
- matchre AUTOMOVE.RETURN ^You begin to get up and
- send stand
- matchwait
- AUTOMOVE.FAILED:
- evalmath automovefailCounter (automovefailCounter + 1)
- if (%automovefailCounter > 3) then goto AUTOMOVE.FAIL.BAIL
- send #mapper reset
- pause 0.5
- goto AUTOMOVE.GO
- AUTOMOVE.FAIL.BAIL:
- put #echo
- put #echo >$Log Crimson *** AUTOMOVE FAILED. ***
- put #echo >$Log Destination: %Destination
- put #echo Crimson *** AUTOMOVE FAILED. ***
- put #echo Crimson Destination: %Destination
- put #echo Crimson Skipping to next shop
- put #echo
- put #parse MOVE FAILED
- gosub clear
- goto %LAST
- AUTOMOVE.RETURN:
- if matchre("%Destination", "teller|exchange|debt|PAWN") then if $invisible = 1 then gosub stopinvis
- pause 0.001
- RETURN
- AUTOMOVE.STAND.PLAYING:
- matchre AUTOMOVE.STAND ^You stop playing your song\.|^In the name of love\?
- send stop play
- matchwait 10
- goto AUTOMOVE.STAND
- #####################################################################################################
- ####################################################################################
- MOVE:
- delay 0.0001
- var Direction $0
- var movefailCounter 0
- MOVE.RESUME:
- matchre MOVE.RESUME ^\.\.\.wait|^Sorry\,
- matchre MOVE.RESUME ^You make your way up the .*\.\s*Partway up\, you make the mistake of looking down\.\s*Struck by vertigo\, you cling to the .* for a few moments\, then slowly climb back down\.
- matchre MOVE.RESUME ^You pick your way up the .*\, but reach a point where your footing is questionable\.\s*Reluctantly\, you climb back down\.
- matchre MOVE.RESUME ^You approach the .*\, but the steepness is intimidating\.
- matchre MOVE.RESUME ^You struggle
- matchre MOVE.RESUME ^You blunder
- matchre MOVE.RESUME ^You slap
- matchre MOVE.RESUME ^You work
- matchre MOVE.RESUME make much headway
- matchre MOVE.RESUME ^You flounder around in the water\.
- matchre MOVE.RETREAT ^You are engaged to .*\!
- matchre MOVE.STAND ^You start up the .*\, but slip after a few feet and fall to the ground\!\s*You are unharmed but feel foolish\.
- matchre MOVE.STAND ^Running heedlessly over the rough terrain\, you trip over an exposed root and land face first in the dirt\.
- matchre MOVE.STAND ^You can't do that while lying down\.
- matchre MOVE.STAND ^You can't do that while sitting\!
- matchre MOVE.STAND ^You must be standing to do that\.
- matchre MOVE.STAND ^You must stand first\.
- matchre MOVE.STAND ^Stand up first.
- matchre MOVE.DIG ^You make no progress in the mud \-\- mostly just shifting of your weight from one side to the other\.
- matchre MOVE.DIG ^You find yourself stuck in the mud\, unable to move much at all after your pathetic attempts\.
- matchre MOVE.DIG ^You struggle forward\, managing a few steps before ultimately falling short of your goal\.
- matchre MOVE.DIG ^Like a blind\, lame duck\, you wallow in the mud in a feeble attempt at forward motion\.
- matchre MOVE.DIG ^The mud holds you tightly\, preventing you from making much headway\.
- matchre MOVE.DIG ^You fall into the mud with a loud \*SPLUT\*\.
- matchre MOVE.FAILED ^You can't go there
- matchre MOVE.FAILED ^I could not find what you were referring to\.
- matchre MOVE.FAILED ^What were you referring to\?
- matchre MOVE.RETURN ^It's pitch dark
- matchre MOVE.RETURN ^Obvious
- send %Direction
- matchwait
- MOVE.STAND:
- pause 0.1
- matchre MOVE.STAND ^\.\.\.wait|^Sorry\,
- matchre MOVE.STAND ^You are overburdened and cannot manage to stand\.
- matchre MOVE.STAND ^The weight
- matchre MOVE.STAND ^You try
- matchre MOVE.RETREAT ^You are already standing\.
- matchre MOVE.RETREAT ^You stand(?:\s*back)? up\.
- matchre MOVE.RETREAT ^You stand up\.
- send stand
- matchwait
- MOVE.RETREAT:
- pause 0.1
- matchre MOVE.RETREAT ^\.\.\.wait|^Sorry\,
- matchre MOVE.RETREAT ^You retreat back to pole range\.
- matchre MOVE.RETREAT ^You try to back away
- matchre MOVE.STAND ^You must stand first\.
- matchre MOVE.RESUME ^You retreat from combat\.
- matchre MOVE.RESUME ^You are already as far away as you can get\!
- send retreat
- matchwait
- MOVE.DIG:
- pause 0.1
- matchre MOVE.DIG ^\.\.\.wait|^Sorry\,
- matchre MOVE.DIG ^You struggle to dig off the thick mud caked around your legs\.
- matchre MOVE.STAND ^You manage to dig enough mud away from your legs to assist your movements\.
- matchre MOVE.DIG.STAND ^Maybe you can reach better that way\, but you'll need to stand up for that to really do you any good\.
- matchre MOVE.RESUME ^You will have to kneel
- send dig
- matchwait
- MOVE.DIG.STAND:
- pause 0.1
- matchre MOVE.DIG.STAND ^\.\.\.wait|^Sorry\,
- matchre MOVE.DIG.STAND ^The weight
- matchre MOVE.DIG.STAND ^You try
- matchre MOVE.DIG.STAND ^You are overburdened and cannot manage to stand\.
- matchre MOVE.DIG ^You stand(?:\s*back)? up\.
- matchre MOVE.DIG ^You are already standing\.
- send stand
- matchwait
- MOVE.FAILED:
- evalmath movefailCounter (movefailCounter + 1)
- if (%movefailCounter > 3) then goto MOVE.FAIL.BAIL
- pause 0.5
- goto MOVE.RESUME
- MOVE.FAIL.BAIL:
- put #echo
- put #echo >$Log Crimson *** MOVE FAILED. ***
- put #echo Crimson *** MOVE FAILED. ***
- put #echo Crimson Skipping to next shop
- put #echo
- put #parse MOVE FAILED
- gosub clear
- goto %LAST
- MOVE.RETURN:
- RETURN
- ##########################################################################################################################################
- # LOCATION CHECKING LOGIC
- ##########################################################################################################################################
- CITY.CHECK:
- if $zoneid = 66 then gosub AUTOMOVE east
- if $zoneid = 68 then gosub AUTOMOVE shard
- if $zoneid = 42 then gosub AUTOMOVE quad
- if $zoneid = 30 then gosub AUTOMOVE portal
- if $zoneid = 7 then gosub AUTOMOVE arthe
- if $zoneid = 61 then gosub AUTOMOVE portal
- if $zoneid = 67 then gosub AUTOMOVE 1
- if $zoneid = 116 then gosub AUTOMOVE 75
- pause 0.1
- if $zoneid = 69 then var CITY HORSE
- if $zoneid = 99 then var CITY AESRY
- if $zoneid = 90 then var CITY RATHA
- if $zoneid = 42 then var CITY THEREN
- if $zoneid = 30 then var CITY RIVERHAVEN
- if $zoneid = 7 then var CITY ARTHE
- if $zoneid = 1 then var CITY CROSSING
- if $zoneid = 61 then var CITY LETH
- if $zoneid = 67 then var CITY SHARD
- if $zoneid = 116 then var CITY HIB
- if !matchre("$zoneid","(1|7|42|30|61|66|67|68|69|90|99|116)") then goto UNKNOWN.LOCATION
- ECHO
- ECHO *** STARTING CITY: %CITY
- ECHO
- pause 0.1
- RETURN
- ##########################################################################################################################################
- ######################
- # Random Movement Subroutine
- ######################
- MOVE.RANDOM:
- delay 0.0001
- random 1 13
- if (%r = 1) && (!$north) then goto MOVE.RANDOM
- if (%r = 2) && (!$northeast) then goto MOVE.RANDOM
- if (%r = 3) && (!$east) then goto MOVE.RANDOM
- if (%r = 4) && (!$southeast) then goto MOVE.RANDOM
- if (%r = 5) && (!$south) then goto MOVE.RANDOM
- if (%r = 6) && (!$southwest) then goto MOVE.RANDOM
- if (%r = 7) && (!$west) then goto MOVE.RANDOM
- if (%r = 8) && (!$northwest) then goto MOVE.RANDOM
- if (%r = 9) && (!$out) then goto MOVE.RANDOM
- if (%r = 10) && (!$up) then goto MOVE.RANDOM
- if (%r = 11) && (!$down) then goto MOVE.RANDOM
- if (%r = 12) && !matchre("$roomobjs","doorway|door") then goto MOVE.RANDOM
- if (%r = 13) && !matchre("$roomobjs","archway|arch") then goto MOVE.RANDOM
- #
- if (%r = 1) then var Direction north
- if (%r = 2) then var Direction northeast
- if (%r = 3) then var Direction east
- if (%r = 4) then var Direction southeast
- if (%r = 5) then var Direction south
- if (%r = 6) then var Direction southwest
- if (%r = 7) then var Direction west
- if (%r = 8) then var Direction northwest
- if (%r = 9) then var Direction out
- if (%r = 10) then var Direction up
- if (%r = 11) then var Direction down
- if (%r = 12) then var Direction go door
- if (%r = 13) then var Direction go arch
- #
- if (%r = 1) then var Reverse.Direction south
- if (%r = 2) then var Reverse.Direction southwest
- if (%r = 3) then var Reverse.Direction west
- if (%r = 4) then var Reverse.Direction northwest
- if (%r = 5) then var Reverse.Direction north
- if (%r = 6) then var Reverse.Direction northeast
- if (%r = 7) then var Reverse.Direction east
- if (%r = 8) then var Reverse.Direction southeast
- if (%r = 9) then var Reverse.Direction out
- if (%r = 10) then var Reverse.Direction down
- if (%r = 11) then var Reverse.Direction up
- if (%r = 12) then var Reverse.Direction go door
- if (%r = 13) then var Reverse.Direction go arch
- #
- var Exits 0
- if ($north) then math Exits add 1
- if ($northeast) then math Exits add 1
- if ($east) then math Exits add 1
- if ($southeast) then math Exits add 1
- if ($south) then math Exits add 1
- if ($southwest) then math Exits add 1
- if ($west) then math Exits add 1
- if ($out) then math Exits add 1
- if ($up) then math Exits add 1
- if ($down) then math Exits add 1
- if matchre("$roomobjs","doorway|door") then math Exits add 1
- if matchre("$roomobjs","archway|arch") then math Exits add 1
- #
- # don't move "back" on a path unless we hit a dead end
- if (%Exits > 1) && ("%Last.Direction" = "%Reverse.Direction") then goto MOVE.RANDOM
- #
- var Last.Direction %Direction
- # Trigger to set variable for occupied room, when roaming.
- action instant var Occupied 1 when ^Also here\:|^Also in the room\:
- var Occupied 0
- gosub MOVE.RESUME
- #if (%Occupied) then goto MOVE.RANDOM
- RETURN
- ##########################################
- # UTILITY GOSUBS #
- ##########################################
- SKILL.CHECK:
- ECHO
- ECHO **** Checking Your Skillz....
- ECHO
- send skill thievery
- pause 0.3
- if $Thievery.Ranks < 20 then gosub NOOB
- if $Thievery.Ranks >= 0 && $Thievery.Ranks < 20 then goto CLASS0
- if $Thievery.Ranks >= 20 && $Thievery.Ranks < 40 then goto CLASS1
- if $Thievery.Ranks >= 40 && $Thievery.Ranks < 60 then goto CLASS2
- if $Thievery.Ranks >= 60 && $Thievery.Ranks < 80 then goto CLASS3
- if $Thievery.Ranks >= 80 && $Thievery.Ranks < 100 then goto CLASS4
- if $Thievery.Ranks >= 100 && $Thievery.Ranks < 150 then goto CLASS5
- if $Thievery.Ranks >= 150 && $Thievery.Ranks < 200 then goto CLASS6
- if $Thievery.Ranks >= 200 && $Thievery.Ranks < 250 then goto CLASS7
- if $Thievery.Ranks >= 250 && $Thievery.Ranks < 300 then goto CLASS8
- if $Thievery.Ranks >= 300 && $Thievery.Ranks < 400 then goto CLASS9
- if $Thievery.Ranks >= 400 && $Thievery.Ranks < 500 then goto CLASS10
- if $Thievery.Ranks >= 500 && $Thievery.Ranks < 600 then goto CLASS11
- if $Thievery.Ranks >= 600 && $Thievery.Ranks < 700 then goto CLASS12
- if $Thievery.Ranks >= 700 && $Thievery.Ranks < 800 then goto CLASS13
- if $Thievery.Ranks >= 800 && $Thievery.Ranks < 900 then goto CLASS14
- if $Thievery.Ranks >= 900 && $Thievery.Ranks < 1000 then goto CLASS15
- if $Thievery.Ranks >= 1000 && $Thievery.Ranks < 1200 then goto CLASS16
- if $Thievery.Ranks >= 1200 then goto CLASS17
- pause 0.3
- goto NOSKILLS
- ############################################################################################
- GUILD.CHECK:
- pause 0.1
- echo
- echo **** CHECKING GUILD...................
- echo
- action var guild $1;put #var guild $1 when Guild: (\S+)
- action var circle $1;put #var circle $1 when Circle: (\d+)
- send info;encum
- waitforre ^\s*Encumbrance\s*\:
- action remove Guild: (\S+)
- action remove Circle: (\d+)
- pause 0.1
- ECHO **** Guild: $guild *****
- ECHO **** Circle: $circle *****
- if ("$guild" = "Thief") then
- {
- var marking ON
- if ("%HAVEN_PW" = "null") || ("%SHARD_PW" = "null") then goto NO.PASSWORD
- if ("%BIN" = "ON") && ("%PAWN" = "ON") && ("%BIN_CONTAINER" = "%PAWN_CONTAINER") then goto BAG.ALERT
- #if (%STEALCOUNT > 4) && ($Thievery.Ranks < 120) then var STEALCOUNT 4
- }
- if ("$guild" != "Thief") then
- {
- var BIN OFF
- var marking OFF
- }
- if $gamename != DRF then var ClanItem NO
- put #var save
- RETURN
- ############################################################################################
- TIME.CALC:
- evalmath runTime (%t / 60)
- evalmath runTime round(%runTime,2)
- RETURN
- TIME.CHECK:
- ECHO **** CHECKING TIME....
- matchre NIGHT.TIME early evening|mid-evening|late evening|evening|midnight|night|dawn|sunset|approaching sunrise|sunrise|you can't tell
- matchre DAY.TIME early morning|mid-morning|midday|late morning|noon|early afternoon|mid-afternoon|late afternoon|dusk
- send time
- matchwait 10
- goto NIGHT.TIME
- DAY.TIME:
- put #var TIME DAY
- var TIME DAY
- send observe weather
- pause 0.5
- RETURN
- NO.TIME:
- NIGHT.TIME:
- put #var TIME NIGHT
- var TIME NIGHT
- send observe weather
- pause 0.5
- RETURN
- ##############################################################################################
- PREMIUM.CHECK:
- matchre PREMIUM.NO ^You are not currently a Premium
- matchre PREMIUM.YES ^Your premium service has been continuous
- put ltb info
- matchwait 10
- goto PREMIUM.NO
- PREMIUM.NO:
- var PREMIUM OFF
- ECHO *** PREMIUM ACCOUNT NOT ACTIVE
- ECHO *** USING REGULAR BANK TO EXCHANGE COINS
- pause
- RETURN
- PREMIUM.YES:
- var PREMIUM ON
- ECHO *** PREMIUM ACCOUNT ENABLED
- ECHO *** USING PREMIUM BANK TO EXCHANGE COINS
- pause
- RETURN
- ##############################################################################################
- EMPTY.HANDS:
- delay 0.0001
- if ("$lefthand" != "Empty") then gosub empty left
- if ("$righthand" != "Empty") then gosub empty right
- pause 0.1
- RETURN
- EMPTY:
- var hand $0
- EMPTY.IT:
- pause 0.1
- pause 0.1
- matchre EMPTY.IT ^\.\.\.wait|^Sorry\,
- matchre LOWER.HAND Whoah\!
- matchre LOWER.HAND If you still wish to drop it
- matchre WEBBED ^You can't do that while entangled in a web
- matchre IMMOBILE ^You don't seem to be able to move to do that
- matchre RETURN ^You drop
- matchre RETURN already empty
- matchre RETURN ^What were you referring to\?
- matchre RETURN ^Please rephrase that command\.
- matchre RETURN ^What were you referring to\?
- matchre RETURN ^But you aren't holding that\.
- matchre RETURN ^Roundtime
- matchre RETURN ^Having no further use for .*\, you discard it\.
- matchre RETURN ^I could not find what you were referring to\.
- matchre RETURN shatters
- send empty %hand
- matchwait
- LOWER.HAND:
- pause 0.1
- pause 0.1
- if "$righthand" != "Empty" then send lower $righthandnoun
- if "$lefthand" != "Empty" then send lower $lefthandnoun
- pause 0.1
- pause 0.1
- pause 0.1
- RETURN
- CIRCLE.CHECK:
- if $zoneid = 1 then var GL kalag
- if $zoneid = 30 then var GL crow
- if $zoneid = 67 then var GL saishla
- if $zoneid = 90 then var GL dwillig
- pause 0.5
- matchre CIRCLE.UP Excellent work, $charactername|Congrats, $charactername|$charactername, you made it to the next rank|I'll let it be known you've moved up in the underworld|You're ready to train for your next rank|You are ready to train for your next level
- matchre CIRCLE.RETURN You have some work to do|you should work on
- put ask %GL about exp
- put ask %GL about exp
- matchwait 9
- RETURN
- CIRCLE.UP:
- pause 0.1
- pause 0.1
- action var circle $1;put #var circle $1 when Circle: (\d+)
- send info;encum
- waitforre ^\s*Encumbrance\s*\:
- action remove Circle: (\d+)
- pause 0.1
- put #echo >Log DarkOrchid *******************************************
- put #echo >Log DarkOrchid *** DING! Leveled up! Circle $circle ! ****
- put #echo >Log DarkOrchid *******************************************
- goto CIRCLE.CHECK
- CIRCLE.RETURN:
- pause 0.1
- pause 0.1
- RETURN
- PAUSE:
- if ($roundtime > 0) then pause $roundtime
- pause 0.5
- pause 0.01
- RETURN
- KNEEL:
- pause 0.2
- send kneel
- pause 0.5
- STAND:
- pause 0.1
- pause 0.1
- matchre STAND ^Roundtime\:?|^\[Roundtime\:?|^\(Roundtime\:?
- matchre STAND.PLAYING ^You are a bit too busy performing
- matchre STAND ^\.\.\.wait|^Sorry\,
- matchre KNEEL ^You are so unbalanced you cannot manage to stand\.
- matchre KNEEL ^The weight of all your possessions prevents you from standing\.
- matchre KNEEL ^You are overburdened and cannot manage to stand\.
- matchre STAND ^You are still stunned
- matchre STAND ^You try
- matchre STUNNED ^You are still stunned
- matchre WEBBED ^You can't do that while entangled in a web
- matchre IMMOBILE ^You don't seem to be able to move to do that
- matchre RETURN ^You are already standing\.
- matchre RETURN ^You stand back up\.
- matchre RETURN ^You stand up\.
- matchre RETURN ^There doesn't seem to be anything to stand on here
- matchre RETURN ^You swim back up
- matchre RETURN ^You are already standing\.
- matchre RETURN ^You're unconscious
- send STAND
- matchwait 8
- goto STAND
- STAND.PLAYING:
- send stop play
- pause 0.1
- goto STAND
- RET.HIDE:
- put stop hum
- wait
- pause 0.1
- pause 0.1
- put ret
- put ret
- pause 0.5
- pause 0.2
- HIDE:
- pause 0.1
- pause 0.1
- matchre HIDE ^\.\.\.wait|^Sorry\,
- matchre RET.HIDE You are too close|^You are a bit|^You are too busy
- matchre STUNNED ^You are still stunned
- matchre WEBBED ^You can't do that while entangled in a web
- matchre IMMOBILE ^You don't seem to be able to move to do that
- matchre RETURN ^.* notices your attempt to hide\!
- matchre RETURN ^.* reveals you, ruining your hiding attempt\!|
- matchre RETURN ^.* discovers you, ruining your hiding place\!
- matchre RETURN ^You melt|^You blend|^Eh\?|^You slip|^Roundtime|You look around
- send hide
- matchwait 10
- RETURN
- SNEAK:
- var direction $0
- if (("$guild" = "Thief") && ($circle < 50)) then goto SNEAK.HIDE
- SNEAKING:
- pause 0.1
- matchre SNEAK.PAUSE ^\.\.\.wait|^Sorry\,
- matchre RETURN Roundtime|You sneak|You duck|You quickly slip
- send sneak %direction
- matchwait 10
- SNEAK.PAUSE:
- pause
- goto SNEAKING
- SNEAK.HIDE:
- pause 0.1
- pause 0.1
- matchre STUNNED ^You are still stunned
- matchre WEBBED ^You can't do that while entangled in a web
- matchre IMMOBILE ^You don't seem to be able to move to do that
- matchre SNEAK.HIDE notices your attempt|reveals you|ruining your hiding place|discovers you
- matchre SNEAKING ^You melt|^You blend|^Eh\?|^You slip|^Roundtime|You look around
- send hide
- matchwait
- UNHIDE:
- pause 0.1
- pause 0.1
- matchre UNHIDE ^\.\.\.wait|^Sorry\,
- matchre STUNNED ^You are still stunned
- matchre WEBBED ^You can't do that while entangled in a web
- matchre STAND ^You try to creep out of hiding but your injuries
- matchre IMMOBILE ^You don't seem to be able to move to do that
- matchre RETURN ^But you are not hidden\!
- matchre RETURN ^You come out of hiding\.
- matchre RETURN ^You slip out of hiding
- send UNHIDE
- matchwait 10
- RETURN
- STOWING:
- var location STOWING
- pause 0.1
- if "$righthandnoun" = "rope" then put coil my rope
- if "$righthand" = "bundle" || "$lefthand" = "bundle" then put wear bund;drop bun
- if matchre("$righthandnoun","(crossbow|bow|short bow)") then gosub unload
- #if matchre("$righthand","(partisan|shield|buckler|crossbow|lumpy bundle|halberd|staff|longbow|khuj)") then gosub wear my $1
- #if matchre("$lefthand","(partisan|shield|buckler|crossbow|lumpy bundle|halberd|staff|longbow|khuj)") then gosub wear my $1
- if matchre("$lefthand","(longbow|khuj)") then gosub stow my $1 in my %SHEATH
- if "$righthand" != "Empty" then GOSUB STOW right
- if "$lefthand" != "Empty" then GOSUB STOW left
- RETURN
- STOWIT:
- var location STOW1
- var todo $0
- STOW1:
- pause 0.1
- pause 0.1
- if matchre("$righthand","longbow") then goto stow4
- matchre STOW2 any more room|no matter how you arrange|^That's too heavy|too thick|too long|too wide|not designed to carry
- matchre RETURN ^Wear what\?|^Stow what\?
- matchre RETURN ^You put your|^You easily|^You strap
- matchre RETURN ^You stop as you realize
- matchre RETURN ^But that is already in your inventory\.
- matchre RETURN ^That can't be picked up
- matchre location.unload ^You should unload the
- matchre location.unload ^You need to unload the
- send stow %todo
- goto retry
- STOW2:
- pause 0.3
- pause 0.1
- var location STOW2
- matchre RETURN ^Wear what\?|^Stow what\?
- matchre RETURN ^You put your|^You easily|^You strap
- matchre RETURN ^But that is already in your inventory\.
- matchre STOW3 any more room|no matter how you arrange|^That's too heavy|too thick|too long|too wide|not designed to carry
- matchre location.unload ^You should unload the
- matchre location.unload ^You need to unload the
- send stow %todo in my %PAWN_CONTAINER
- goto retry
- STOW3:
- pause 0.3
- pause 0.1
- var location STOW3
- if "$lefthandnoun" = "bundle" then send drop bun
- if "$righthandnoun" = "bundle" then send drop bun
- matchre RETURN ^Wear what\?|^Stow what\?
- matchre RETURN ^You put your|^You easily|^You strap
- matchre RETURN ^But that is already in your inventory\.
- matchre STOW4 any more room|no matter how you arrange|^That's too heavy|too thick|too long|too wide|not designed to carry
- matchre location.unload ^You should unload the
- matchre location.unload ^You need to unload the
- send stow %todo in my %BIN_CONTAINER
- send stow %todo in my %BIN_CONTAINER
- goto retry
- STOW4:
- pause 0.5
- pause 0.1
- var location STOW4
- if "$lefthandnoun" = "bundle" then send drop bun
- if "$righthandnoun" = "bundle" then send drop bun
- matchre RETURN ^Wear what\?|^Stow what\?
- matchre RETURN ^You put your|^You easily|^You strap
- matchre RETURN ^But that is already in your inventory\.
- matchre STOW.DROP any more room|no matter how you arrange|^That's too heavy|too thick|too long|too wide
- matchre location.unload ^You should unload the
- matchre location.unload ^You need to unload the
- send stow %todo in my %PAWN_CONTAINER
- send stow %todo in my %SAFE_CONTAINER
- goto retry
- REM.WEAR:
- put rem bund
- put drop bund
- wait
- pause 0.5
- goto wear1
- #### WEAR SUB
- WEAR:
- delay 0.0001
- var stow $0
- var LOCATION WEAR.1
- WEAR.1:
- matchre WAIT ^\.\.\.wait|^Sorry\,
- matchre IMMOBILE ^You don't seem to be able to move to do that
- matchre WEBBED ^You can't do that while entangled in a web
- matchre STUNNED ^You are still stunned
- matchre STOW1 ^You can't wear that\!
- matchre STOW1 ^You can't wear any more items like that\.
- matchre STOW1 ^You need at least one free hand for that\.
- matchre STOW1 ^This .* can't fit over the .* you are already wearing which also covers and protects your .*\.
- matchre RETURN ^You (?:sling|put|slide|slip|attach|work|strap) .*\.
- matchre RETURN ^You are already wearing that\.
- matchre RETURN ^What were you referring to\?
- matchre RETURN ^Wear what\?
- send wear %stow
- matchwait 15
- put #echo >$Log Crimson $datetime *** MISSING MATCH IN WEAR! (utility.inc) ***
- put #echo >$Log Crimson $datetime Stow = %stow
- put #log $datetime MISSING MATCH IN WEAR (utility.inc)
- return
- search:
- var todo $0
- var location search
- matchre RETURN ^Success\!
- matchre RETURN ^Roundtime
- matchre RETURN ^You search around for a moment
- put search %todo
- matchwait 10
- goto retry
- retry:
- matchre location ^\.\.\.wait
- matchre location ^Sorry, you may
- matchre location ^Sorry, system is slow
- matchre location ^You don't seem to be able to move to do that
- matchre location.p ^It's all a blur
- matchre location.p ^You're unconscious\!
- matchre location.p ^You are still stunned
- matchre location.p There is no need for violence here\.
- matchre location.p ^You can't do that while entangled in a web
- matchre location.p ^You struggle against the shadowy webs to no avail\.
- matchre location.p ^You attempt that, but end up getting caught in an invisible box\.
- matchre location1 ^You should stop playing before you do that\.
- matchre location1 ^You are a bit too busy performing to do that\.
- matchre location1 ^You are concentrating too much upon your performance to do that\.
- matchwait
- location.unload:
- gosub unload
- var location stow1
- gosub stow1
- goto %location
- location.unload1:
- gosub unload
- var location wear1
- gosub wear1
- goto %location
- location1:
- gosub stop.humming1
- goto %location
- location.p:
- pause
- location:
- pause 0.3
- goto %location
- RETURN.p:
- pause 0.1
- unload:
- var location unload
- matchre RETURN ^You unload the
- matchre RETURN ^You remain concealed by your surroundings, convinced that your unloading
- matchre RETURN ^Roundtime:
- matchre RETURN ^But your
- matchre RETURN ^You don't have a
- matchre RETURN ^You can't unload such a weapon\.
- matchre RETURN ^Your
- send unload
- goto retry
- #### PUT SUB
- PUT:
- delay 0.0001
- var command $0
- var LOCATION PUT.1
- PUT.1:
- matchre WAIT ^\.\.\.wait|^Sorry\,
- matchre IMMOBILE ^You don't seem to be able to move to do that
- matchre WEBBED ^You can't do that while entangled in a web
- matchre STUNNED ^You are still stunned
- matchre PUT_STOW ^You need a free hand
- matchre WAIT ^\[Enter your command again if you want to\.\]
- matchre RETURN_CLEAR ^But that
- matchre RETURN_CLEAR ^Roundtime\:?|^\[Roundtime\:?|^\(Roundtime\:?
- matchre RETURN_CLEAR ^I could not find what you were referring to\.
- matchre RETURN_CLEAR ^Please rephrase that command\.
- matchre RETURN_CLEAR ^That is already|has already
- matchre RETURN_CLEAR ^What were you referring to\?
- matchre RETURN_CLEAR ^.* what\?
- matchre RETURN_CLEAR ^You (?:hand|slide|get|work|pull|attach|push|move|put|remove|wear|sling|whisper|lean|tap|pick|silently|slip|realize|stop|open|close|drop|place|knock|grab|fade|toss|set|add|offer|search|circle|fake|weave|shove|tie|try|must|wave|sit|fail|turn|are|can't|aren't|glance|bend|kneel|carefully|quietly|sense|begin|rub|sprinkle) .*(?:\.|\!|\?)
- matchre RETURN_CLEAR ^You sense that you are as pure of spirit as you can be\, and you are ready for whatever rituals might face you\.
- matchre RETURN_CLEAR ^Subservient type|^The shadows|^Close examination|^Try though
- matchre RETURN_CLEAR ^USAGE\:
- matchre RETURN_CLEAR ^Allows a Moon Mage
- matchre RETURN_CLEAR ^A slit across the door
- matchre RETURN_CLEAR ^Your (?:actions|dance).*\.
- matchre RETURN_CLEAR ^You.*analyze
- matchre RETURN_CLEAR ^Having no further use for .*\, you discard it\.
- matchre RETURN_CLEAR ^You don't have a .* coin on you\!\s*The .* spider looks at you in forlorn disappointment\.
- matchre RETURN_CLEAR ^The .* spider turns away\, looking like it's not hungry for what you're offering\.
- matchre RETURN_CLEAR ^Brother Durantine nods slowly\.
- matchre RETURN_CLEAR ^Durantine waves a small censer over a neatly-wrapped package and intones a short prayer before he hands it to you\.
- matchre RETURN_CLEAR ^After a moment\, .*\.
- matchre RETURN_CLEAR ^Quietly touching your lips with the tips of your fingers as you kneel\, you make the Cleric's sign with your hand\.
- matchre RETURN_CLEAR ^Maybe you should stand up\.
- matchre RETURN_CLEAR ^The clerk counts out .*\.
- matchre RETURN_CLEAR ^The gem pouch
- matchre RETURN_CLEAR ^An attendant
- matchre RETURN_CLEAR ^The .* is not damaged enough to warrant repair\.
- matchre RETURN_CLEAR ^There is no more room in .*\.
- matchre RETURN_CLEAR ^There is nothing in there\.
- matchre RETURN_CLEAR ^In the .* you see .*\.
- matchre RETURN_CLEAR ^This spell cannot be targeted\.
- matchre RETURN_CLEAR ^You cannot figure out how to do that\.
- matchre RETURN_CLEAR ^You will now store .* in your .*\.
- matchre RETURN_CLEAR ^That tool does not seem suitable for that task\.
- matchre RETURN_CLEAR ^There isn't any more room in .* for that\.
- matchre RETURN_CLEAR ^\[Ingredients can be added by using ASSEMBLE Ingredient1 WITH Ingredient2\]
- matchre RETURN_CLEAR ^\s*LINK ALL CANCEL\s*\- Breaks all links
- matchre RETURN_CLEAR STOW HELP
- matchre RETURN_CLEAR ^This ritual may only be performed on a corpse\.
- matchre RETURN_CLEAR ^There is nothing else to face\!
- matchre RETURN_CLEAR ^You're already stalking
- matchre RETURN_CLEAR ^There aren't
- matchre RETURN_CLEAR ^An offer
- matchre RETURN_CLEAR ^That area
- matchre RETURN_CLEAR ^Ylono (?:looks|frowns|smiles) .*(?:\.|\!|\?)
- matchre RETURN_CLEAR ^Malik (?:nods|shakes) .*(?:\.|\!|\?)
- matchre RETURN_CLEAR ^Obvious exits
- matchre RETURN_CLEAR ^Obvious paths
- matchre RETURN_CLEAR ^But the merchant can't see you|are invisible
- matchre STAND ^You should stand up first\.
- # matchre RETURN_CLEAR ^
- matchre RETURN ^\s*Encumbrance\s*\:
- send %command
- matchwait 15
- put #echo >$Log Crimson $datetime *** MISSING MATCH IN PUT! ***
- put #echo >$Log Crimson $datetime Command = %command
- put #log $datetime MISSING MATCH IN PUT
- RETURN
- PUT.STOW:
- gosub stow
- goto PUT.1
- #### GET SUB
- GET:
- delay 0.0001
- var get $0
- var LOCATION GET.1
- GET.1:
- matchre WAIT ^\.\.\.wait|^Sorry\,
- matchre WAIT ^You struggle with .* great weight but can't quite lift it\!
- matchre IMMOBILE ^You don't seem to be able to move to do that
- matchre WEBBED ^You can't do that while entangled in a web
- matchre STUNNED ^You are still stunned
- matchre HOLD.1 ^But that is already in your inventory\.
- # matchre RETURN ^\s*You get .*\.
- matchre RETURN ^You pick up .*\.
- matchre RETURN ^You carefully remove .* from the bundle\.
- matchre RETURN ^You are already holding that\.
- matchre RETURN ^Get what\?
- matchre RETURN ^I could not find what you were referring to\.
- matchre RETURN ^What were you referring to\?
- matchre RETURN ^You (?:get|grab) .*(?:\.|\!|\?)
- matchre RETURN ^As best it can\, .* moves in your direction\.
- send get %get
- matchwait 15
- put #echo >$Log Crimson $datetime *** MISSING MATCH IN GET! ***
- put #echo >$Log Crimson $datetime Get = %get
- put #log $datetime MISSING MATCH IN GET
- RETURN
- #### DOUBLE PUT SUB
- PUT.IT:
- delay 0.0001
- var putit $0
- var LOCATION PUT.IT.1
- PUT.IT.1:
- matchre WAIT ^\.\.\.wait|^Sorry\,
- matchre IMMOBILE ^You don't seem to be able to move to do that
- matchre WEBBED ^You can't do that while entangled in a web
- matchre STUNNED ^You are still stunned
- matchre RETURN ^You (?:hand|push|move|put|whisper|lean|tap|pick|silently|slip|stop|open|close|drop|place|knock|grab|fade|toss|set|add|offer|search|circle|fake|weave|shove|try|must|wave|sit|fail|turn|are already|can't|glance|bend|kneel|carefully|quietly|sense|begin|rub|sprinkle) .*(?:\.|\!|\?)
- matchre RETURN ^Please rephrase that command\.
- matchre RETURN ^.* what\?
- matchre RETURN ^That's too heavy
- matchre RETURN ^There isn't
- matchre RETURN ^I could not find what you were referring to\.
- matchre RETURN ^What were you referring to\?
- matchre RETURN ^Perhaps you should be holding that first\.
- send put %putit
- matchwait 15
- put #echo >$Log Crimson $datetime *** MISSING MATCH IN PUT.IT! ***
- put #echo >$Log Crimson $datetime PutIt = %putit
- put #log $datetime MISSING MATCH IN PUT.IT
- RETURN
- #### FORAGING SUBS
- DUMP_CHECK:
- delay 0.0001
- if !def(Dump.Time) then put #var Dump.Time $gametime
- put #var Dump.Last {#evalmath ($gametime - $Dump.Time)}
- if ($Dump.Last < 600) then return
- gosub DUMP_JUNK
- put #var Dump.Time $gametime
- put #save var
- return
- DUMP_JUNK:
- delay 0.0001
- var LOCATION DUMP_JUNK_1
- DUMP_JUNK_1:
- matchre WAIT ^\.\.\.wait|^Sorry\,
- matchre STUNNED ^You are still stunned
- matchre WEBBED ^You can't do that while entangled in a web
- matchre IMMOBILE ^You don't seem to be able to move to do that
- matchre RETURN ^\[You have marked this room to be cleaned by the janitor\. It should arrive shortly\.\]
- matchre RETURN ^The janitor was recently summoned to this room\.\s+Please wait \d+ seconds\.
- matchre RETURN ^You should just kick yourself in the shin\. There is no junk here\.
- send dump junk
- matchwait
- CLEAN_ROOM:
- delay 0.0001
- var dumpster NULL
- if matchre("$roomobjs", "origami|an Imperial dira|glass reservoir|steel striker|black cube|tiny chitinous leg|coiled spring|brown clay|bloated animal bladder|sharp blade|tiny hammer|sealed vial|stoppered vial|iron disc|metal spring|tiny metal lever|broken needle|short needle|short curved blade|silver studs|thin metal circle|steel pin|broken rune|runestone|bronze seal|glass sphere|tiny bronze face|cracked black crystal|capillary tube|some junk") then gosub DUMP_CHECK
- if matchre("$roomobjs", "a bucket of viscous gloop|a waste bucket") then var dumpster bucket
- if matchre("$roomobjs", "a disposal bin|a waste bin|firewood bin") then var dumpster bin
- if matchre("$roomname", "Garden Rooftop\, Medical Pavilion") then var dumpster gutter
- if matchre("$roomobjs", "a large stone turtle") then var dumpster turtle
- if matchre("$roomobjs", "trash receptacle") then var dumpster receptacle
- if matchre("$roomobjs", "a waste basket") then var dumpster basket
- if matchre("$roomobjs", "a tree hollow") then var dumpster hollow
- if matchre("$roomobjs", "a bottomless pit") then var dumpster pit
- if matchre("$roomobjs", "a driftwood log") then var dumpster log
- if matchre("$roomobjs", "an oak crate") then var dumpster crate
- if matchre("$roomobjs", "ivory urn") then var dumpster urn
- pause 0.1
- if ("%dumpster" = "NULL") then return
- CLEAN_ROOM_2:
- delay 0.0001
- var object NULL
- if matchre("$roomobjs", "a rock") then var object rock
- if matchre("$roomobjs", "razorsharp claw") then var object claw
- if matchre("$roomobjs", "a vine") then var object vine
- if matchre("$roomobjs", "some grass") then var object grass
- if !matchre("%object", "NULL") then
- {
- gosub GET %object
- gosub PUT_IT my %object in %dumpster
- goto CLEAN_ROOM_2
- }
- gosub KICKEM
- else return
- COLLECT:
- delay 0.0001
- var collect $0
- var LOCATION COLLECT_1
- if matchre("$roomobjs", "origami|an Imperial dira|glass reservoir|steel striker|black cube|tiny chitinous leg|coiled spring|brown clay|bloated animal bladder|sharp blade|tiny hammer|sealed vial|stoppered vial|iron disc|metal spring|tiny metal lever|broken needle|short needle|short curved blade|silver studs|thin metal circle|steel pin|broken rune|runestone|bronze seal|glass sphere|tiny bronze face|cracked black crystal|capillary tube|some junk") then gosub DUMP_CHECK
- COLLECT_1:
- matchre WAIT ^\.\.\.wait|^Sorry\,
- matchre STUNNED ^You are still stunned
- matchre WEBBED ^You can't do that while entangled in a web
- matchre IMMOBILE ^You don't seem to be able to move to do that
- matchre RETURN ^You cannot collect anything while in combat\!
- matchre RETURN ^You manage to collect a pile of .*\.
- matchre RETURN ^The room is too cluttered to find anything here\!
- matchre RETURN ^You survey the area and realize that any collecting efforts would be futile\.
- matchre WAIT ^Roundtime\:?|^\[Roundtime\:?|^\(Roundtime\:?
- send collect %collect
- matchwait
- KICKEM:
- delay 0.0001
- if matchre("$roomobjs" , "a pile of \S+") then gosub KICKIT
- pause 0.001
- if matchre("$roomobjs" , "a pile of \S+") then gosub KICKIT
- pause 0.001
- if matchre("$roomobjs" , "a pile of \S+") then gosub KICKIT
- return
- KICKIT:
- delay 0.0001
- var LOCATION KICKIT_1
- KICKIT_1:
- matchre WAIT ^\.\.\.wait|^Sorry\,
- matchre STUNNED ^You are still stunned
- matchre WEBBED ^You can't do that while entangled in a web
- matchre IMMOBILE ^You don't seem to be able to move to do that
- matchre RETURN ^I could not find what you were referring to\.
- matchre RETURN ^You take a step back and run up to the pile of .*\.
- send kick pile
- matchwait
- #### SPELL CASTING
- PREPARE:
- delay 0.0001
- var prepare $0
- var LOCATION PREPARE.1
- PREPARE.1:
- matchre WAIT ^\.\.\.wait|^Sorry\,
- matchre STUNNED ^You are still stunned
- matchre WEBBED ^You can't do that while entangled in a web
- matchre IMMOBILE ^You don't seem to be able to move to do that
- matchre SPELL.CAST.RETURN ^You are already preparing the .* spell\!
- matchre SPELL.CAST.RETURN ^You begin chanting .* to invoke the .* spell\.
- matchre SPELL.CAST.RETURN ^You mutter .* to yourself while preparing the .* spell\.
- matchre SPELL.CAST_RETURN ^With .* movements you prepare your body for the .* spell\.
- matchre SPELL.CAST.RETURN ^You raise your .* skyward\, chanting the .* of the .* spell\.
- matchre SPELL.CAST.RETURN ^You trace .* sigil in the air\, shaping the pattern of the .* spell\.
- matchre SPELL.CAST.RETURN ^You rock back and forth\, humming tunelessly as you invoke the .* spell\.
- matchre SPELL.CAST.RETURN ^The wailing of lost souls accompanies your preparations of the .* spell\.
- matchre SPELL.CAST.RETURN ^Your eyes darken to black as a starless night as you prepare the .* spell\.
- matchre SPELL.CAST.RETURN ^You close your eyes and breathe deeply, gathering energy for the .* spell\.
- matchre SPELL.CAST.RETURN ^Your eyes darken to black as a starless night as you prepare the .* spell\.
- matchre SPELL.CAST.RETURN ^The wailing of lost souls accompanies your preparations of the .* spell\.
- matchre SPELL.CAST.RETURN ^A soft breeze surrounds your body as you confidently prepare the .* spell\.
- matchre SPELL.CAST.RETURN ^Tiny tendrils of lightning jolt between your hands as you prepare the .* spell\.
- matchre SPELL.CAST.RETURN ^Heatless orange flames blaze between your fingertips as you prepare the .* spell\.
- matchre SPELL.CAST.RETURN ^Entering a trance-like state\, your hands begin to tremble as you prepare the .* spell\.
- matchre SPELL.CAST.RETURN ^You adeptly sing the incantations for the .* spell\, setting the words to a favorite tune\.
- matchre SPELL.CAST.RETURN ^You bring your hand slowly to your forehead as you begin chanting the words of the .* spell\.
- matchre SPELL.CAST.RETURN ^Icy blue frost crackles up your arms with the ferocity of a blizzard as you begin to prepare the .* spell\!
- matchre SPELL.CAST.RETURN ^You have to strain to harness the energy for this spell, and you aren't sure you can get enough to cast it\.
- matchre SPELL.CAST.RETURN ^You giggle to yourself as you move through the syncopated gestures that accompany the preparations of the .* spell\.
- matchre SPELL.CAST.RETURN ^Darkly gleaming motes of sanguine light swirl briefly about your fingertips as you gesture while uttering the .* spell\.
- matchre SPELL.CAST.RETURN ^As you begin to solemnly intone the .* spell a blue glow swirls about forming a nimbus that surrounds your entire being\.
- matchre SPELL.CAST.RETURN ^Your skin briefly withers and tightens\, becoming gaunt as the energies of the .* spell begin to build up through your body\.
- matchre SPELL.CAST.RETURN ^You trace an intricate rune in the air with your finger\, illusory lines lingering several seconds as you prepare the .* spell\.
- matchre SPELL.CAST.RETURN ^You begin reciting a solemn incantation\, causing familiar patterns of geometric shapes to circle your hand as the .* spell forms\.
- matchre SPELL.CAST.RETURN ^You take up a handful of dirt in your palm to prepare the .* spell\. As you whisper arcane words\, you gently blow the dust away and watch as it becomes swirling motes of glittering light that veil your hands in a pale aura\.
- matchre SPELL.CAST.RETURN ^You recall the exact details of the .* symbiosis\, preparing to integrate it with the next spell you cast\.
- matchre SPELL.CAST.RETURN ^But you've already prepared the .* symbiosis\!
- matchre SPELL.CAST.DONE ^What do you want to prepare\?
- matchre SPELL.CAST.DONE ^That is not a spell you can cast\.
- matchre SPELL.CAST.DONE ^You wouldn't have the first clue how to do that\.
- matchre SPELL.CAST.DONE ^You stop\, convinced that there's no way to control that much mana\.
- matchre SPELL.CAST.FAIL ^You have to strain to harness the energy for this spell, and you aren't sure you can get enough to cast it\.
- matchre SPELL.CAST.FAIL ^You feel intense strain as you try to manipulate the mana streams to form this pattern\, and you are not certain that you will have enough mental stamina to complete it\.
- send prepare %prepare
- matchwait 15
- put #echo >$Log Crimson $datetime *** MISSING MATCH IN PREPARE! (utility.inc) ***
- put #echo >$Log Crimson $datetime Prepare = %prepare
- put #log $datetime MISSING MATCH IN PREPARE! (utility.inc)
- goto SPELL.CAST.RETURN
- SPELL.WAIT:
- delay 0.0001
- if ("$preparedspell" = "None") then return
- matchre SPELL.CAST ^You feel fully prepared to cast your spell\.
- matchre SPELL.CAST.FAIL ^Your concentration slips for a moment\, and your spell is lost\.
- matchwait
- SPELL.CAST:
- delay 0.0001
- var LOCATION SPELL.CAST.1
- if ((!("$roomplayers" = "")) && (matchre("$preparedspell", "(Rite of Contrition|Eyes of the Blind)")) then gosub MOVE.RANDOM
- SPELL.CAST.1:
- matchre WAIT ^\.\.\.wait|^Sorry\,
- matchre STUNNED ^You are still stunned
- matchre WEBBED ^You can't do that while entangled in a web
- matchre IMMOBILE ^You don't seem to be able to move to do that
- matchre SPELL.CAST.DONE ^Roundtime\:?|^\[Roundtime\:?|^\(Roundtime\:?
- matchre SPELL.CAST.DONE ^You wave your hand\.
- matchre SPELL.CAST.DONE ^You gesture\.
- matchre SPELL.CAST.DONE ^Your heart skips a beat
- matchre SPELL.CAST.DONE ^Focus the power of justice on whom\?
- matchre SPELL.CAST.DONE ^A brilliant silver glow surrounds .* for a few moments\, then fades\, leaving it somehow changed\.
- matchre SPELL.CAST.FAIL ^You don't have a spell prepared\!
- matchre SPELL.CAST.FAIL ^Your concentration slips for a moment\, and your spell is lost\.
- put -cast;-2 gesture
- matchwait
- SPELL.WAIT.TARGET:
- delay 0.0001
- if ("$preparedspell" = "None") then return
- matchre RETURN ^You feel fully prepared to cast your spell\.
- matchre RETURN ^Your concentration slips for a moment\, and your spell is lost\.
- matchre RETURN ^Your target pattern dissipates because the creature is dead\, but the main spell remains intact
- matchwait
- SPELL.CAST.TARGET:
- delay 0.0001
- if ("$preparedspell" = "None") then return
- var target $0
- var LOCATION SPELL.CAST.TARGET.1
- SPELL.CAST.TARGET.1:
- matchre WAIT ^\.\.\.wait|^Sorry\,
- matchre STUNNED ^You are still stunned
- matchre WEBBED ^You can't do that while entangled in a web
- matchre IMMOBILE ^You don't seem to be able to move to do that
- matchre SPELL.CAST.DONE ^Roundtime\:?|^\[Roundtime\:?|^\(Roundtime\:?
- matchre SPELL.CAST.DONE ^You gesture\.
- matchre SPELL.CAST.DONE ^Your heart skips
- matchre SPELL.CAST.DONE ^Focus the power of justice on whom\?
- matchre SPELL.CAST.DONE ^A brilliant silver glow surrounds .* for a few moments\, then fades\, leaving it somehow changed\.
- matchre SPELL.CAST.FAIL ^You don't have a spell prepared\!
- matchre SPELL.CAST.FAIL ^Your concentration slips for a moment\, and your spell is lost\.
- put -cast %target;-2 gesture
- matchwait
- SPELL.CAST.DONE:
- delay 0.0001
- put #queue clear
- return
- SPELL.CAST.FAIL:
- delay 0.0001
- gosub RELEASE
- SPELL.CAST.RETURN:
- delay 0.0001
- return
- RELEASE.MANA:
- delay 0.0001
- if ("$preparedspell" != "None") then gosub RELEASE spell
- gosub RELEASE mana
- put #echo Crimson *****************************************************
- put #echo Crimson ***** ATTUNEMENT IS LOW. WAITING TO REGAIN IT. *****
- put #echo Crimson *****************************************************
- if ($mana < 80) then waiteval ($mana > 79)
- CHECK.MANA:
- delay 0.0001
- if ($mana < 25) then goto RELEASE.MANA
- return
- RELEASE:
- delay 0.0001
- var release $0
- var LOCATION RELEASE.1
- RELEASE.1:
- matchre WAIT ^\.\.\.wait|^Sorry\,
- matchre STUNNED ^You are still stunned
- matchre WEBBED ^You can't do that while entangled in a web
- matchre IMMOBILE ^You don't seem to be able to move to do that
- matchre RETURN ^\s*Encumbrance\s*\:
- put -release %release;-encumbrance
- matchwait
- HARNESS:
- delay 0.0001
- var harness $0
- var LOCATION HARNESS.1
- HARNESS.1:
- matchre WAIT ^\.\.\.wait|^Sorry\,
- matchre STUNNED ^You are still stunned
- matchre WEBBED ^You can't do that while entangled in a web
- matchre IMMOBILE ^You don't seem to be able to move to do that
- matchre RELEASE ^You strain\, but cannot harness that much power\.
- matchre RETURN ^You tap into the mana from .* of the surrounding streams and
- send harness %harness
- matchwait
- #### HEALTH CHECKING
- HEALTH.CHECK:
- if ("%HEALTH_CHECK" = "ON") then RETURN
- delay 0.0001
- put #tvar needHealing 0
- delay 0.5
- matchre HEALTH.GOOD ^You have no significant injuries\.
- matchre HEALTH.BAD ^hand
- matchre HEALTH.BAD ^\s*Encumbrance\s+\:
- put -health;-2 encumbrance
- matchwait 15
- goto HEALTH.CHECK
- HEALTH.BAD:
- delay 0.0001
- put #tvar needHealing 1
- delay 0.5
- goto TOO.HURT
- HEALTH.GOOD:
- delay 0.0001
- put #queue clear
- put #tvar needHealing 0
- delay 0.5
- RETURN
- #### CATCH AND RETRY SUBS
- WAIT:
- delay 0.0001
- pause 0.1
- if (!$standing) then gosub STAND
- goto %LOCATION
- WEBBED:
- delay 0.0001
- if ($webbed) then waiteval (!$webbed)
- if (!$standing) then gosub STAND
- goto %LOCATION
- IMMOBILE:
- delay 0.0001
- if contains("$prompt" , "I") then pause 20
- if (!$standing) then gosub STAND
- goto %LOCATION
- STUNNED:
- delay 0.0001
- if ($stunned) then waiteval (!$stunned)
- if (!$standing) then gosub STAND
- goto %LOCATION
- #### RETURNS
- RETURN_CLEAR:
- RETURN.CLEAR:
- delay 0.0001
- put #queue clear
- pause 0.0001
- return
- RETURN:
- delay 0.0001
- return
- ##############################################################################################
- # UBER PROFIT TRACKING / BANK EXCHANGE V.9000 W/ CROSS SCRIPT INJECTION #
- ##############################################################################################
- BANK:
- send wealth
- waitforre ^Wealth|^I could|^\.\.\.wait|^Sorry\,
- pause 0.001
- action (balancecheck) var Plat $1 when ^.*\s(\d+)\splatinum\,?
- action (balancecheck) var Gold $1 when ^.*\s(\d+)\sgold\,?
- action (balancecheck) var Silver $1 when ^.*\s(\d+)\ssilver\,?
- action (balancecheck) var Bronze $1 when ^.*\s(\d+)\sbronze\,?
- action (balancecheck) var Copper $1 when ^.*\s(\d+)\scopper
- action (balancecheck) off
- action (profitparse) var Plat $1 when ^PROFITPARSE\s(\d+)\d\d\d\d\sPROFITPARSE
- action (profitparse) var Gold $1 when ^PROFITPARSE\s\d+(\d)\d\d\d\sPROFITPARSE
- action (profitparse) var Gold $1 when ^PROFITPARSE\s(\d)\d\d\d\sPROFITPARSE
- action (profitparse) var Silver $1 when ^PROFITPARSE\s\d+\d(\d)\d\d\sPROFITPARSE
- action (profitparse) var Silver $1 when ^PROFITPARSE\s\d(\d)\d\d\sPROFITPARSE
- action (profitparse) var Silver $1 when ^PROFITPARSE\s(\d)\d\d\sPROFITPARSE
- action (profitparse) var Bronze $1 when ^PROFITPARSE\s\d+\d\d(\d)\d\sPROFITPARSE
- action (profitparse) var Bronze $1 when ^PROFITPARSE\s\d\d(\d)\d\sPROFITPARSE
- action (profitparse) var Bronze $1 when ^PROFITPARSE\s\d(\d)\d\sPROFITPARSE
- action (profitparse) var Bronze $1 when ^PROFITPARSE\s(\d)\d\sPROFITPARSE
- action (profitparse) var Copper $1 when ^PROFITPARSE\s\d+\d\d\d(\d)\sPROFITPARSE
- action (profitparse) var Copper $1 when ^PROFITPARSE\s\d\d\d(\d)\sPROFITPARSE
- action (profitparse) var Copper $1 when ^PROFITPARSE\s\d\d(\d)\sPROFITPARSE
- action (profitparse) var Copper $1 when ^PROFITPARSE\s\d(\d)\sPROFITPARSE
- action (profitparse) var Copper $1 when ^PROFITPARSE\s(\d)\sPROFITPARSE
- action (profitparse) off
- var preDeposit 0
- var postDeposit 0
- var profit 0
- gosub BANK.COIN.CLEAR
- action (balancecheck) on
- pause 0.01
- if ($invisible = 1) then gosub stopinvis
- put -check balance;-1 encumbrance
- waitforre ^\s*Encumbrance\s*\:
- pause 0.01
- action (balancecheck) off
- gosub BANK.COIN.MATH
- gosub BANK.PREDEP.MATH
- pause 0.01
- if ($invisible = 1) then gosub stopinvis
- put -deposit all;-1 encumbrance
- waitforre ^\s*Encumbrance\s*\:
- pause 0.01
- gosub BANK.COIN.CLEAR
- action (balancecheck) on
- pause 0.01
- if ($invisible = 1) then gosub stopinvis
- put -check balance;-1 encumbrance
- waitforre ^\s*Encumbrance\s*\:
- pause 0.01
- action (balancecheck) off
- gosub BANK.COIN.MATH
- gosub BANK.POSTDEP.MATH
- evalmath profit (%postDeposit - %preDeposit)
- math Profit add %profit
- math TotalProfit add %Profit
- pause 0.01
- gosub BANK.COIN.CLEAR
- action (profitparse) on
- put #parse PROFITPARSE %Profit PROFITPARSE
- action (profitparse) off
- if (%Banked > 0) then
- {
- put #tvar Plat 0
- put #tvar Gold 0
- put #tvar Silver 0
- put #tvar Bronze 0
- put #tvar Copper 0
- }
- math Banked add 1
- SAVE.PROFIT:
- ## Combines profit from multiple bank runs to show total profit at end
- ## Saves your profit from all bank deposits in temp global variables so you can add total profit to your main script profit tracking
- put #tvar Plat %Plat
- put #tvar Gold %Gold
- put #tvar Silver %Silver
- put #tvar Bronze %Bronze
- put #tvar Copper %Copper
- pause 0.1
- put #statusbar 1 Stealing Profit: %Plat Plat, %Gold Gold, %Silver Silver, %Bronze Bronze and %Copper Copper
- put #parse MONEY DONE
- RETURN
- #############################################
- # BANK GOSUBS
- #############################################
- COMBINE.BANK:
- math Plats add $Plat
- math Golds add $Gold
- math Silvers add $Silver
- math Bronzes add $Bronze
- math Coppers add $Copper
- RETURN
- BANK.COIN.CLEAR:
- var Copper 0
- var Bronze 0
- var Silver 0
- var Gold 0
- var Plat 0
- RETURN
- BANK.COIN.MATH:
- math Bronze multiply 10
- math Silver multiply 100
- math Gold multiply 1000
- math Plat multiply 10000
- RETURN
- BANK.PREDEP.MATH:
- math preDeposit add %Copper
- math preDeposit add %Bronze
- math preDeposit add %Silver
- math preDeposit add %Gold
- math preDeposit add %Plat
- RETURN
- BANK.POSTDEP.MATH:
- math postDeposit add %Copper
- math postDeposit add %Bronze
- math postDeposit add %Silver
- math postDeposit add %Gold
- math postDeposit add %Plat
- RETURN
- #############################################
- ## EXCHANGE
- #############################################
- LIRUMS:
- var Target.Currency LIRUMS
- gosub EXCHANGE KRONARS
- gosub EXCHANGE DOKORAS
- goto EXCHANGE.FINISH
- KRONARS:
- var Target.Currency KRONARS
- gosub EXCHANGE LIRUMS
- gosub EXCHANGE DOKORAS
- goto EXCHANGE.FINISH
- DOKORAS:
- var Target.Currency DOKORAS
- gosub EXCHANGE KRONARS
- gosub EXCHANGE LIRUMS
- goto EXCHANGE.FINISH
- EXCHANGE:
- var Coin $0
- EXCHANGE.CONTINUE:
- if ($invisible = 1) then gosub stopinvis
- pause 0.1
- matchre EXCHANGE.CONTINUE ^\.\.\.wait\s+\d+\s+sec(?:onds?|s)?\.?|^Sorry\,
- matchre RETURN ^You hand your money to the money-changer\.\s*After collecting a.* fee, .* hands you .*\.
- matchre RETURN ^The money-changer says crossly, \"A transaction that small isn't worth my time\.\s*The minimum is one bronze or ten coppers\.\"
- matchre RETURN ^You count out all of your .* and drop them in the proper jar\.\s*After figuring a .* fee in the ledger beside the jar\, you reach into the one filled with .* and withdraw .*\.
- matchre RETURN ^One of the guards mutters\, \"None of that\, $charactername\.\s*You'd be lucky to get anything at all with an exchange that small\.\"
- matchre RETURN ^But you don't have any .*\.
- matchre FINISH ^There is no money-changer here\.
- put EXCHANGE ALL %Coin FOR %Target.Currency
- matchwait
- EXCHANGE.FINISH:
- put #parse EXCHANGE DONE!
- RETURN
- ############################################################################################
- #### JAIL HANDLING
- #### DEBT PAYING ROUTINE
- #### ROBUST AS A MOTHERFUCKER
- ############################################################################################
- JAIL.CHECK:
- action instant goto PLEAD when ^The eyes of the court are upon you|PLEAD INNOCENT or PLEAD GUILTY|Your silence shall be taken|How do you plead\?|Shouldn't you be worrying about something else
- put #parse TAKING CARE OF BUSINESS
- pause 0.1
- #put #script pause %ScriptName
- if ($zoneid = 1) then goto CROSSING.JAIL
- if ($zoneid = 30) then goto HAVEN.JAIL
- if ($zoneid = 42) then goto THEREN.JAIL
- if ($zoneid = 61) then goto LETH.JAIL
- if ($zoneid = 116) then goto HIB.JAIL
- if ($zoneid = 67) then goto SHARD.JAIL
- if ($zoneid = 99) then goto AESRY.JAIL
- if ($zoneid = 90) then goto RATHA.JAIL
- pause 0.5
- goto JAILED
- AESRY.JAIL:
- var CURRENT_CITY AESRY
- ECHO Aesry JAIL
- put #parse AESRY JAIL
- goto JAILED
- RATHA.JAIL:
- var CURRENT_CITY RATHA
- ECHO Ratha JAIL
- put #parse RATHA JAIL
- goto JAILED
- THEREN.JAIL:
- var CURRENT_CITY THEREN
- ECHO Theren JAIL
- put #parse THEREN JAIL
- goto JAILED
- HAVEN.JAIL:
- var CURRENT_CITY RIVERHAVEN
- ECHO RIVERHAVEN JAIL
- put #parse RIVERHAVEN JAIL
- goto JAILED
- LETH.JAIL:
- var CURRENT_CITY LETH
- ECHO LETH JAIL
- put #parse LETH JAIL
- goto JAILED
- CROSSING.JAIL:
- var CURRENT_CITY CROSSING
- ECHO CROSSING JAIL
- put #parse CROSS JAIL
- goto JAILED
- HIB.JAIL:
- var CURRENT_CITY HIB
- ECHO HIB JAIL
- put #parse HIB JAIL
- goto JAILED
- SHARD.JAIL:
- var CURRENT_CITY SHARD
- ECHO SHARD JAIL
- put #parse SHARD JAIL
- goto JAILED
- JAILED:
- math Jailed add 1
- ECHO *** YOU'VE BEEN JAILED IN %CURRENT_CITY! ***
- put #echo >log Red **** ARRESTED IN %CURRENT_CITY ****
- if ($zoneid = 67) && ($roomid = 528) then goto GET.SACK
- if ($zoneid = 1) && ($roomid = 409) then goto GET.SACK
- if ($zoneid = 30) && ($roomid = 270) then goto GET.SACK
- if ($zoneid = 42) && ($roomid = 125) then goto GET.SACK
- if ($zoneid = 61) && ($roomid = 172) then goto GET.SACK
- if ($zoneid = 116) && ($roomid = 202) then goto GET.SACK
- pause 0.1
- ECHO *** WAITING FOR SENTENCE! ***
- JAIL.FORAGE:
- if (!$standing) then gosub STAND
- if !matchre("$zoneid" , "67") then goto PLEAD.WAIT
- gosub KICKEM
- gosub collect dust bunny
- pause 0.5
- goto JAIL.FORAGE
- PLEAD.WAIT:
- waitforre ^The eyes of the court are upon you|PLEAD INNOCENT or PLEAD GUILTY|Your silence shall be taken|How do you plead\?|Shouldn't you be worrying about something else
- PLEAD:
- action remove ^The eyes of the court are upon you|PLEAD INNOCENT or PLEAD GUILTY|Your silence shall be taken|How do you plead\?|Shouldn't you be worrying about something else
- pause 0.1
- pause 0.1
- pause 0.1
- send plead %PLEAD
- pause
- if ($zoneid = 1) && ($roomid = 23) then goto STOCKS
- GET.SACK:
- pause 0.1
- pause 0.1
- matchre GET.SACK ^\.\.\.wait|^Sorry\,
- matchre DEBT ^You glance down at your empty hands
- matchre PLEAD ^You don't seem to be able to move
- match SACK small sack
- send glance
- matchwait
- DEBT:
- gosub STAND
- ECHO
- ECHO **** Getting some coin to pay fine ****
- ECHO
- if ($zoneid = 42) then goto THEREN.JAIL.GET.FINE
- gosub clear
- if ("$guild" = "Necromancer") then gosub NECRO.PREP
- if ($zoneid = 90) then
- {
- var GUARD 1guard
- if ($roomid = 349) then var GUARD 1guard
- if ($roomid = 581) then var GUARD 3guard
- }
- pause 0.1
- TO.TELLER:
- var plat 20
- if ($zoneid = 116) then
- {
- gosub automove 1teller
- goto FINECHECK.FORFEDHDAR
- }
- if ($zoneid = 90) then
- {
- gosub AUTOMOVE 1teller
- goto FINECHECK.QI
- }
- gosub AUTOMOVE teller
- if ($zoneid = 99) then goto FINECHECK.QI
- if ($zoneid = 61) then goto FINECHECK.ZOLUREN
- if ($zoneid = 1) then goto FINECHECK.ZOLUREN
- if ($zoneid = 30) then goto FINECHECK.THERENGIA
- if ($zoneid = 34a) then goto FINECHECK.THERENGIA
- if ($zoneid = 42) then goto FINECHECK.THERENGIA
- if ($zoneid = 67) then goto FINECHECK.ILITHI
- pause
- ECHO
- ECHO *** CRITICAL ERROR!
- ECHO *** UKNOWN JAIL LOCATION!!
- ECHO
- put #echo >Log Red *** CRITICAL ERROR!!!!
- put #echo >Log Red *** UNKOWN JAIL LOCATION: Zone- $zoneid Room- $roomid
- put #echo >Log Red *** PAY YOUR FINE MANUALLY!
- pause 0.1
- exit
- FINECHECK.QI:
- matchre SET.FINE Qi\.\s*\((\d+) copper Lirums\)
- match NO.FINE Wealth:
- send wealth
- matchwait
- FINECHECK.THERENGIA:
- matchre SET.FINE Therengia\.\s*\((\d+) copper Lirums\)
- match NO.FINE Wealth:
- send wealth
- matchwait
- FINECHECK.ZOLUREN:
- matchre SET.FINE Zoluren\.\s*\((\d+) copper Kronars\)
- match NO.FINE Wealth:
- send wealth
- matchwait
- FINECHECK.ILITHI:
- matchre SET.FINE Ilithi\.\s*\((\d+) copper Dokoras\)
- match NO.FINE Wealth:
- send wealth
- matchwait
- FINECHECK.FORFEDHDAR:
- matchre SET.FINE Forfedhdar\.\s*\((\d+) copper Dokoras\)
- match NO.FINE Wealth:
- send wealth
- matchwait
- SET.FINE:
- pause 0.1
- var fine $1
- if (%fine > 250000) then goto BIGGER.FINE
- if (%fine > 100000) then goto BIG.FINE
- goto WITHDRAW
- WITHDRAW:
- if ($invisible = 1) then gosub stopinvis
- pause 0.2
- pause 0.1
- matchre WITHDRAW ^\.\.\.wait|^Sorry\,
- matchre TO.TELLER ^You must be at a bank teller's window
- matchre PAY.DEBT ^The clerk counts out
- matchre NO.FUNDS we are not lending money|You don't have that much
- send withdraw %fine copper
- matchwait 15
- goto NO.FUNDS
- BIG.FINE:
- if ($invisible = 1) then gosub stopinvis
- pause 0.2
- pause 0.1
- matchre BIG.FINE ^\.\.\.wait|^Sorry\,
- matchre TO.TELLER ^You must be at a bank teller's window
- matchre PAY.DEBT ^The clerk counts out
- matchre NO.FUNDS we are not lending money|You don't have that much
- send withdraw %plat plat
- matchwait 15
- goto NO.FUNDS
- BIGGER.FINE:
- if (%fine >= 2000000) then var plat 300
- if (%fine >= 1500000) then var plat 200
- if (%fine >= 1200000) then var plat 150
- if (%fine >= 900000) then var plat 120
- if (%fine >= 500000) then var plat 90
- if (%fine >= 450000) then var plat 50
- if (%fine >= 400000) then var plat 45
- if (%fine >= 350000) then var plat 40
- if (%fine >= 250000) then var plat 35
- if (%fine >= 200000) then var plat 25
- goto BIG.FINE
- NO.FINE:
- ECHO
- ECHO *** You have no fine
- ECHO
- goto RETURN.TO.JAIL
- PAY.DEBT:
- ECHO
- ECHO **** Paying off your debt! ***
- ECHO
- pause
- pause 0.5
- # Walking to pay off the debt
- gosub AUTOMOVE debt
- if ($invisible = 1) then gosub stopinvis
- send pay %fine
- pause
- if ($zoneid = 116) then
- {
- gosub automove 1teller
- goto DONE.DEBT
- }
- if ($zoneid = 90) then
- {
- gosub AUTOMOVE 1teller
- goto DONE.DEBT
- }
- gosub AUTOMOVE teller
- DONE.DEBT:
- pause 0.1
- if ($invisible = 1) then gosub stopinvis
- send dep all
- pause 0.1
- RETURN.TO.JAIL:
- ECHO
- ECHO **** Heading back to jail now ****
- ECHO
- pause 0.5
- if ($zoneid = 42) then goto THEREN.KEEP.JAIL
- if ($zoneid = 90) then goto RATHA.JAIL.RETURN
- if ($zoneid = 67) then goto SHARD.JAIL.RETURN
- if ($zoneid = 116) then goto HIB.JAIL.RETURN
- # Walking to the Guard House
- gosub AUTOMOVE Guard
- goto CLAN
- RATHA.JAIL.RETURN:
- gosub AUTOMOVE 1GUARD
- goto CLAN
- HIB.JAIL.RETURN:
- gosub AUTOMOVE 200
- goto CLAN
- SHARD.JAIL.RETURN:
- gosub AUTOMOVE sentin
- CLAN:
- CLAN.ITEM.PAUSE:
- var removed no
- pause
- matchre CLAN.ITEM ^You aren't wearing anything
- matchre REMOVE.ITEM (\S+)(\.)
- put inv
- matchwait 5
- put #echo >Log Red *** Missing Match Label in CLAN.ITEM.PAUSE
- put #log $datetime MISSING MATCH IN CLAN.ITEM.PAUSE ***
- REMOVE.ITEM:
- var wornItem $0
- var removed yes
- gosub PUT remove my %wornItem
- pause 0.5
- pause 0.5
- CLAN.ITEM:
- if ("%ClanItem" = "NO") then goto THE.SACK
- if ("$gamename" = "DRF") then send remove %CLAN.ITEM.NAME
- THE.SACK:
- if ($invisible = 1) then gosub stopinvis
- pause 0.5
- matchre THE.SACK ^\.\.\.wait|^Sorry\,|^What were you|^I could not|^Please rephrase
- matchre SACK.PRE ^You reach for your sack and retrieve the equipment
- matchre CLAN.ITEM.PAUSE ^You'll need to not be wearing anything
- matchre DEBT paid off your debt to society
- matchre SACK.PRE ^Realizing you're wearing too much
- send get $charactername sack
- matchwait 9
- goto GET.SACK
- STOCKS:
- ECHO
- ECHO *** You got the stocks! Wait it out!
- ECHO *** Will attempt to plead for release
- ECHO
- pause
- send plead release
- waitforre ^You accept a sack and retrieve the equipment
- pause 0.5
- pause 0.5
- pause 0.2
- if (!$standing) then gosub STAND
- SACK.PRE:
- if ("%ClanItem" = "YES") then gosub put wear %CLAN_ITEM_NAME
- if ("%ClanItem" = "YES") then gosub put rub %CLAN_ITEM_NAME
- pause 0.2
- pause 0.1
- gosub PUT open my %SAFE_CONTAINER
- gosub PUT open my %BACKUP_CONTAINER
- pause 0.2
- pause 0.1
- if ("%removed" = "yes") then
- {
- send wear my %wornItem
- pause 0.5
- pause 0.1
- if matchre("$righthandnoun|$lefthandnoun", "ring") then gosub PUT wear my ring
- if matchre("$righthandnoun|$lefthandnoun", "key") then gosub PUT wear my key
- if matchre("$righthandnoun|$lefthandnoun", "toad") then gosub PUT wear my toad
- if matchre("$righthandnoun|$lefthandnoun", "rat") then gosub PUT wear my rat
- if matchre("$righthandnoun|$lefthandnoun", "obsidian") then gosub PUT wear my obsidian
- pause 0.1
- if matchre("$righthandnoun|$lefthandnoun", "ring") then gosub PUT wear my second ring
- if matchre("$righthandnoun|$lefthandnoun", "rat") then gosub PUT wear my second rat
- if matchre("$righthandnoun|$lefthandnoun", "ring") then gosub PUT wear my third ring
- pause 0.1
- if matchre("$righthandnoun|$lefthandnoun", "ring") then gosub PUT STOW my ring in my %SAFE_CONTAINER
- if matchre("$righthandnoun|$lefthandnoun", "rat") then gosub PUT STOW my rat in my %SAFE_CONTAINER
- if matchre("$righthandnoun|$lefthandnoun", "ring") then gosub PUT STOW my second ring in my %SAFE_CONTAINER
- pause 0.1
- if matchre("$righthandnoun|$lefthandnoun", "ring") then gosub PUT STOW my third ring in my %SAFE_CONTAINER
- if matchre("$righthandnoun|$lefthandnoun", "ring") then gosub PUT STOW my fourth ring in my %SAFE_CONTAINER
- pause 0.1
- }
- pause 0.1
- pause 0.1
- if ("$righthand" != "Empty") then
- {
- if ("$righthandnoun" != "sack") then gosub PUT stow right in my %SAFE_CONTAINER
- }
- if ("$lefthand" != "Empty") then
- {
- if ("$lefthandnoun" != "sack") then gosub PUT stow left in my %SAFE_CONTAINER
- }
- pause 0.1
- pause 0.1
- if ("$righthand" != "Empty") || ("$lefthand" != "Empty") then
- {
- if ("$righthandnoun" != "sack") then gosub PUT stow right in my %BACKUP_CONTAINER
- if ("$lefthandnoun" != "sack") then gosub PUT stow left in my %BACKUP_CONTAINER
- pause 0.2
- }
- SACK:
- pause 0.1
- pause 0.2
- gosub PUT open my small sack
- gosub JAIL.EMPTY sack
- pause 0.5
- pause 0.5
- matchre RAT \brat\b
- matchre STOW.IT backpack|duffel bag|haversack|knapsack
- matchre STOW.IT mining (\S+)(\.)
- matchre ODD.ITEM khuj|quarterstaff|quarter staff|halberd|toad|key
- matchre GET.SACK.ITEM (\S+)(\.)
- matchre NO.MORE.ITEMS ^There is nothing in there|^I could not find|^What were you
- match SACK That is closed.
- send look in my small sack
- matchwait 15
- put #echo >Log Red *** Missing match label in - SACK:
- put #log $datetime MISSING MATCH IN SACK: ***
- gosub stowing
- goto NO.MORE.ITEMS
- RAT:
- pause 0.1
- gosub PUT get rat from my small sack
- pause 0.5
- send wear rat
- send stow rat
- pause
- goto SACK
- STOW.IT:
- var item $0
- send get %item from my small sack
- pause 0.5
- pause 0.2
- send put my %item in my %SAFE_CONTAINER
- pause 0.5
- pause 0.1
- send put my %item in my %PAWN_CONTAINER
- goto SACK
- ODD.ITEM:
- var item $0
- gosub GET %item from my small sack
- pause 0.5
- pause 0.2
- send wear my %item
- pause 0.5
- pause 0.2
- send put my %item in my %SAFE_CONTAINER
- pause 0.5
- goto SACK
- GET.SACK.ITEM:
- pause 0.5
- if $1 = there then goto NO.MORE.ITEMS
- send get $1 from my small sack
- pause 0.5
- pause 0.1
- pause 0.1
- pause 0.1
- if contains("%IMPORTANT_ITEMS", "$1") then send put my $1 in my %SAFE_CONTAINER
- if contains("%ring", "$1") then send put my $1 in my %SAFE_CONTAINER
- if contains("%STEAL.LIST", "$1") then send put my $1 in my %PAWN_CONTAINER
- pause 0.1
- pause 0.1
- if (("$1" = "backpack") || ("$1" = "cauldron")) then
- {
- pause 0.5
- goto SACK
- }
- if ("$1" = ("obsidian") || ("$1" = "toad") || ("$1" = "rat") then
- {
- send wear my $1
- pause 0.2
- send stow my $1
- wait
- pause 0.2
- }
- else
- {
- send put my $1 in my %SAFE_CONTAINER
- send wear my $1
- wait
- pause 0.1
- }
- pause 0.5
- goto SACK
- NO.MORE.ITEMS:
- pause 0.001
- pause 0.001
- pause 0.001
- send drop my small sack
- pause 0.1
- pause 0.1
- if ("$righthand" != "Empty") then gosub put stow right in my %SAFE_CONTAINER
- if ("$lefthand" != "Empty") then gosub put stow left in my %SAFE_CONTAINER
- pause 0.2
- if ("$righthand" != "Empty") then gosub put stow right in my %BACKUP_CONTAINER
- if ("$lefthand" != "Empty") then gosub put stow left in my %BACKUP_CONTAINER
- pause 0.5
- gosub PUT close my %SAFE_CONTAINER
- gosub PUT close my %BACKUP_CONTAINER
- pause 0.2
- pause 0.5
- ECHO
- ECHO **** DONE WITH JAIL / SACK SEQUENCE ****
- ECHO
- pause
- if (!$standing) then gosub STAND
- if contains("$lefthand" "$righthand" , "%LARGE.ITEMS") then gosub EMPTY.HANDS
- CHECKLOC:
- if ($zoneid = 67) then goto SHARD.JAIL.DONE
- if ($zoneid = 116) then goto HIB.JAIL.DONE
- if ($zoneid = 61) then goto LETH.JAIL.DONE
- if ($zoneid = 1) then goto CROSS.JAIL.DONE
- if ($zoneid = 30) then goto HAVEN.JAIL.DONE
- if ($zoneid = 42) then goto THEREN.JAIL.LEAVE
- if ($zoneid = 90) then goto RATHA.JAIL.DONE
- if ($zoneid = 99) then goto AESRY.JAIL.DONE
- RATHA.JAIL.DONE:
- gosub AUTOMOVE 51
- put #script resume %ScriptName
- put #parse TAKING CARE OF BUSINESS
- pause 0.5
- goto END
- AESRY.JAIL.DONE:
- gosub AUTOMOVE 76
- put #script resume %ScriptName
- put #parse TAKING CARE OF BUSINESS
- pause 0.5
- goto END
- CROSS.JAIL.DONE:
- gosub AUTOMOVE 42
- if ("%ARTHE" = "ON") then gosub AUTOMOVE NTR
- put #script resume %ScriptName
- put #parse TAKING CARE OF BUSINESS
- pause 0.5
- goto END
- LETH.JAIL.DONE:
- gosub AUTOMOVE portal
- put #script resume %ScriptName
- pause 0.5
- put #parse TAKING CARE OF BUSINESS
- pause 0.5
- goto END
- HAVEN.JAIL.DONE:
- gosub AUTOMOVE town
- put #script resume %ScriptName
- put #parse TAKING CARE OF BUSINESS
- pause 0.5
- goto END
- SHARD.JAIL.DONE:
- gosub AUTOMOVE 57
- put #script resume %ScriptName
- put #parse TAKING CARE OF BUSINESS
- pause 0.5
- goto END
- HIB.JAIL.DONE:
- gosub AUTOMOVE 75
- put #script resume %ScriptName
- put #parse TAKING CARE OF BUSINESS
- pause 0.5
- goto END
- THEREN.JAIL.LEAVE:
- save THEREN.JAIL.END
- goto THEREN.KEEP.ESCAPE
- THEREN.JAIL.GET.FINE:
- save TO.TELLER
- goto THEREN.KEEP.ESCAPE
- THEREN.KEEP.ESCAPE:
- gosub AUTOMOVE 69
- send jump moat
- pause 12
- THEREN.STUNNED.WAIT:
- pause 10
- if $stunned = 1 then goto THEREN.STUNNED.WAIT
- pause 0.5
- gosub STAND
- pause 0.5
- goto THEREN.MOAT.LEAVE
- THEREN.MOAT.LEAVE:
- var location THEREN.MOAT.LEAVE
- gosub MOVE s
- pause 2
- goto %s
- THEREN.KEEP.JAIL:
- var location THEREN.KEEP.JAIL
- pause 0.2
- if ("$guild" = "Necromancer") then gosub NECRO.PREP
- if ("$guild" = "Thief") then gosub KHRI.START silence
- if ("$guild" = "Moon") then gosub MOONIE.PREP
- pause 0.1
- pause 0.2
- gosub AUTOMOVE 102
- gosub AUTOMOVE moat
- gosub AUTOMOVE 116
- gosub AUTOMOVE 162
- gosub AUTOMOVE dungeon
- gosub STAND
- goto CLAN.ITEM
- THEREN.JAIL.END:
- THEREN.JAIL.DONE:
- gosub AUTOMOVE 1
- pause 2
- END:
- put #script resume %ScriptName
- put #script abort jail
- put #echo >Log SkyBlue *** RECOVERED FROM JAIL VIA ~STEALING~ SCRIPT
- put #echo >Log SkyBlue *** CONTINUING STEALING RUN AT NEXT SHOP..
- put #parse FREE FROM JAIL
- ECHO *** FREE FROM JAIL!
- ECHO *** CONTINUING STEALING RUN
- pause 0.5
- pause
- goto %LAST
- ### END JAIL SECTION
- ###########################################################################################
- ###########################################################################################
- ### DISCONNECT
- DISCONNECTED:
- put #parse STEAL SCRIPT DISCONNECT
- pause 0.2
- put #script pause %ScriptName
- ECHO *** YOU HAVE BEEN DISCONNECTED! Attempting to reconnect in 10 seconds.. ***
- put #echo >Log Red *** Disconnected... Attempting to reconnect ***
- put #script abort all except %ScriptName
- pause 10
- CONNECT:
- GOSUB clear
- pause
- math LOGOUT add 1
- action goto CONNECTED when You look around, taking a moment to get your bearings|Welcome to DragonRealms
- pause
- goto CONNECTING
- RECONNECT:
- put #echo >Log Red *** FAILED TO CONNECT!
- pause 15
- CONNECTING:
- send #connect
- pause 30
- if $connected = 0 then goto reconnect
- goto CONNECTING
- CONNECTED:
- pause .001
- put #script resume %ScriptName
- ECHO *** You have been Reconnected ***
- put #echo >Log Lime *** Reconnected via Stealing Script!
- put #echo >Log Lime *** Resuming script from checkpoint..
- action remove You look around, taking a moment to get your bearings|Welcome to DragonRealms
- put #parse RECONNECTED NOW
- pause 0.5
- pause 0.5
- goto %LAST
- #########################################################################################
- ##########################################################################################
- ###########################################################################################
- ############### PROGRESSIVE ITEM VARIABLE SECTION
- ###########################################################################################
- ##########################################################################################
- #########################################################################################
- NOPE:
- put #echo >Log Yellow *** Already at lowest level - skipping shop ***
- var stolen 7
- ECHO
- ECHO *** ALREADY AT THE LOWEST LEVEL ***
- ECHO *** SKIPPING SHOP ***
- ECHO
- CLASS0:
- ## THEREN
- var skillrange 0-20
- var T.Tarsha <nothing>
- var T.Rose <nothing>
- var T.Music <nothing>
- var T.Music.Num
- var T.Hats <nothing>
- var T.Arm <nothing>
- var T.Gift <nothing>
- var T.Sweet <nothing>
- var T.Cupcake <nothing>
- var T.Gen charcoal
- var T.Krrish <nothing>
- var T.Lense <nothing>
- var T.Cleric <nothing>
- var T.Men <nothing>
- var T.Women <nothing>
- var T.Cloth <nothing>
- var T.Armory <nothing>
- var T.Forge <nothing>
- ## HAVEN
- var skillrange 0-20
- var RH.Herb water
- var RH.Iron <nothing>
- var RH.Naph <nothing>
- var RH.Naph.Loc on cart
- var RH.Flow black orchid
- var RH.Seli <nothing>
- var RH.Arms <nothing>
- var RH.Gen purse
- var RH.Cloth <nothing>
- var RH.Artif <nothing>
- var RH.Joy chocolate
- var RH.Smoke <nothing>
- var RH.Weap <nothing>
- var RH.Bard <nothing>
- var RH.Bard2 <nothing>
- var RH.Cleric <nothing>
- var RH.Cleric2 <nothing>
- var RH.Lock <nothing>
- var RH.Tog <nothing>
- var RH.Tog2 <nothing>
- var RH.Mirg <nothing>
- ## ARTHE DALE
- var skillrange 0-20
- var AD.Feta biscuit
- var AD.FETA.Loc
- var AD.Thread <nothing>
- var AD.Fash <nothing>
- var AD.Odds <nothing>
- var AD.Bard <nothing>
- var AD.Map <nothing>
- var AD.Arm <nothing>
- var AD.Smoke <nothing>
- var AD.Tart.E <nothing>
- var AD.Tart.C <nothing>
- var AD.Tart.M <nothing>
- var AD.Tart.L <nothing>
- var AD.Tart.F <nothing>
- var KA.Grek <nothing>
- ## CROSSINGS
- var skillrange 0-20
- var C.Alch water
- var C.Alch.Loc in vat
- var C.Artif <nothing>
- var C.Bath <nothing>
- var C.Bath.Num
- var C.Bath.Loc
- var C.Card <nothing>
- var C.Gen charcoal
- var C.Weap <nothing>
- var C.Arm <nothing>
- var C.Music pick
- var C.Music2 <nothing>
- var C.Lock <nothing>
- var C.Empath <nothing>
- var C.Empath.Alt <nothing>
- var C.Empath2 <nothing>
- var C.Empath3 <nothing>
- var C.Empath3.Loc
- var C.Empath3.Alt <nothing>
- var C.Cler <nothing>
- var C.Haber <nothing>
- var C.Script <nothing>
- var C.Tann <nothing>
- var C.Tann.Loc
- var C.Jewel <nothing>
- var C.Stitch <nothing>
- var C.Cobb <nothing>
- var C.Herb <nothing>
- var C.Flow <nothing>
- ## LETH
- var skillrange 0-20
- var L.Skin <nothing>
- var L.Bow <nothing>
- var L.Orig <nothing>
- var L.Orig.Num
- var L.Weap <nothing>
- var L.Wick <nothing>
- var L.Bard <nothing>
- var L.Bard2 <nothing>
- var L.Cloth <nothing>
- var L.Wood <nothing>
- var L.Gen <nothing>
- var L.Gen.Alt <nothing>
- var L.Perf <nothing>
- ## SHARD
- var skillrange 0-20
- var S.Gen charcoal
- var S.Weap <nothing>
- var S.Cleric <nothing>
- var S.Stitch <nothing>
- var S.Alch water
- var S.Herb <nothing>
- var S.Artif <nothing>
- var S.Music <nothing>
- var S.Armor <nothing>
- var S.Reed <nothing>
- var S.Reed.Num
- var S.Bow <nothing>
- var S.Lock <nothing>
- var S.Coin <nothing>
- var S.Coin.Loc
- var S.Frill <nothing>
- var S.Herald <nothing>
- var S.Herald.Loc on rack
- var S.Gift <nothing>
- var S.Gift.Num
- var S.Gift.Loc
- var S.Toy <nothing>
- var S.Toy.Loc
- var S.Memory <nothing>
- var S.Memory.Num first
- var S.Token <nothing>
- var S.Museum <nothing>
- var S.Barber <nothing>
- var S.Tanner <nothing>
- var S.Tanner.Loc on counter
- var S.Surv <nothing>
- var S.Surv.Loc
- var S.Surv.Alt <nothing>
- var S.Surv.Alt.Loc
- var S.Surv2 <nothing>
- var S.Surv2.Num
- var S.Surv2.Loc
- var S.Surv2.Alt <nothing>
- var S.Spire <nothing>
- # HORSE CLAN
- var HC.Jahtinit <nothing>
- var HC.Falconer <nothing>
- var HC.Yasnah <nothing>
- var HC.Bowyer <nothing>
- var HC.Bowyer2 <nothing>
- var HC.Equine <nothing>
- var HC.Felterie <nothing>
- var HC.Felterie2 <nothing>
- # HIB AND RAVEN'S POINT
- var skillrange 0-20
- var SC.Weap <nothing>
- var H.Shield <nothing>
- var H.Shield.Loc on rack
- var H.Jewel <nothing>
- var H.Tog <nothing>
- var H.Tog.Num
- var H.Herb <nothing>
- var H.Sund <nothing>
- var H.Lamp charcoal
- var H.Music <nothing>
- var H.Alch <nothing>
- var H.Forge <nothing>
- var H.Forge.Loc on tab
- var RP.Gen flights
- var RP.Tobac <nothing>
- # RATHA
- var skillrange 0-20
- var R.Bait worms
- var R.Gen rope
- var R.Herb water
- var R.Forge <nothing>
- var R.Tailor <nothing>
- var R.Leather <nothing>
- var R.Hair <nothing>
- var R.Music <nothing>
- var R.Magic <nothing>
- var R.Origami <nothing>
- var R.Origami.Loc
- var R.Jewelry <nothing>
- var R.Cleric <nothing>
- var R.Cleric2 <nothing>
- var R.Ring <nothing>
- # AESRY SURLAENIS'A
- var skillrange 0-20
- var A.Herb water
- var A.Tanner <nothing>
- var A.Clothing <nothing>
- var A.Script <nothing>
- var A.Cleric <nothing>
- var A.Origami <nothing>
- var A.Jewelry <nothing>
- var A.Magic <nothing>
- var A.Slings <nothing>
- var A.Puzzle <nothing>
- var A.Footwear <nothing>
- var A.Shields <nothing>
- var A.Shields.Loc on table
- var A.Weapon <nothing>
- var A.Armor <nothing>
- var A.Gen charcoal
- var A.Flower <nothing>
- var A.Music pick
- pause 0.1
- gosub ITEM.COUNT0
- RETURN
- ###########################
- # SKILLS 20-39
- ###########################
- CLASS1:
- ## THEREN
- var skillrange 20-39
- var T.Tarsha canons
- var T.Rose <nothing>
- var T.Music <nothing>
- var T.Music.Num
- var T.Hats <nothing>
- var T.Arm <nothing>
- var T.Gift <nothing>
- var T.Sweet cake
- var T.Cupcake cupcake
- var T.Gen charcoal
- var T.Krrish <nothing>
- var T.Lense <nothing>
- var T.Cleric block
- var T.Men <nothing>
- var T.Women <nothing>
- var T.Cloth <nothing>
- var T.Armory <nothing>
- var T.Forge copper slug
- ## HAVEN
- var skillrange 20-39
- var RH.Herb water
- var RH.Iron <nothing>
- var RH.Naph <nothing>
- var RH.Naph.Loc on cart
- var RH.Flow black orchid
- var RH.Seli <nothing>
- var RH.Arms <nothing>
- var RH.Gen purse
- var RH.Cloth <nothing>
- var RH.Artif <nothing>
- var RH.Joy chocolate
- var RH.Smoke <nothing>
- var RH.Weap <nothing>
- var RH.Bard pick
- var RH.Bard2 <nothing>
- var RH.Cleric grey-brown feather
- var RH.Cleric2 <nothing>
- var RH.Lock ordinary lockpick
- var RH.Tog <nothing>
- var RH.Tog2 <nothing>
- var RH.Mirg <nothing>
- ## ARTHE DALE
- var skillrange 20-39
- var AD.Feta biscuit
- var AD.FETA.Loc
- var AD.Thread <nothing>
- var AD.Fash <nothing>
- var AD.Odds <nothing>
- var AD.Bard <nothing>
- var AD.Map <nothing>
- var AD.Arm <nothing>
- var AD.Smoke <nothing>
- var AD.Tart.E <nothing>
- var AD.Tart.C <nothing>
- var AD.Tart.M <nothing>
- var AD.Tart.L <nothing>
- var AD.Tart.F <nothing>
- var KA.Grek cheese
- ## CROSSINGS
- var skillrange 20-39
- var C.Alch water
- var C.Alch.Loc in vat
- var C.Artif <nothing>
- var C.Bath reed
- var C.Bath.Num
- var C.Bath.Loc
- var C.Card <nothing>
- var C.Gen envelope
- var C.Weap rocks
- var C.Arm rugged gloves
- var C.Music pick
- var C.Music2 <nothing>
- var C.Lock <nothing>
- var C.Empath <nothing>
- var C.Empath.Alt <nothing>
- var C.Empath2 <nothing>
- var C.Empath3 <nothing>
- var C.Empath3.Loc
- var C.Empath3.Alt <nothing>
- var C.Cler grey-brown feather
- var C.Haber hood
- var C.Script <nothing>
- var C.Tann <nothing>
- var C.Tann.Loc
- var C.Jewel <nothing>
- var C.Stitch <nothing>
- var C.Cobb <nothing>
- var C.Herb <nothing>
- var C.Flow rose
- ## LETH
- var skillrange 20-39
- var L.Skin <nothing>
- var L.Bow flights
- var L.Orig <nothing>
- var L.Orig.Num
- var L.Weap <nothing>
- var L.Wick <nothing>
- var L.Bard <nothing>
- var L.Bard2 <nothing>
- var L.Cloth <nothing>
- var L.Wood <nothing>
- var L.Gen <nothing>
- var L.Gen.Alt <nothing>
- var L.Perf <nothing>
- ## SHARD
- var skillrange 20-39
- var S.Gen charcoal
- var S.Weap <nothing>
- var S.Cleric chamomile
- var S.Stitch gloves
- var S.Alch water
- var S.Herb <nothing>
- var S.Artif <nothing>
- var S.Music pick
- var S.Armor leather gloves
- var S.Reed <nothing>
- var S.Reed.Num
- var S.Bow flights
- var S.Lock <nothing>
- var S.Coin <nothing>
- var S.Coin.Loc
- var S.Frill <nothing>
- var S.Herald <nothing>
- var S.Herald.Loc on rack
- var S.Gift <nothing>
- var S.Gift.Num
- var S.Gift.Loc
- var S.Toy <nothing>
- var S.Toy.Loc
- var S.Memory <nothing>
- var S.Memory.Num first
- var S.Token <nothing>
- var S.Museum <nothing>
- var S.Barber oil
- var S.Tanner <nothing>
- var S.Tanner.Loc on counter
- var S.Surv <nothing>
- var S.Surv.Loc
- var S.Surv.Alt <nothing>
- var S.Surv.Alt.Loc
- var S.Surv2 chicken flights
- var S.Surv2.Num
- var S.Surv2.Loc
- var S.Surv2.Alt falcon flights
- var S.Spire <nothing>
- # HORSE CLAN
- var HC.Jahtinit <nothing>
- var HC.Falconer <nothing>
- var HC.Yasnah <nothing>
- var HC.Bowyer <nothing>
- var HC.Bowyer2 <nothing>
- var HC.Equine <nothing>
- var HC.Felterie <nothing>
- var HC.Felterie2 <nothing>
- # HIB AND RAVEN'S POINT
- var skillrange 20-39
- var SC.Weap <nothing>
- var H.Shield <nothing>
- var H.Shield.Loc on rack
- var H.Jewel <nothing>
- var H.Tog <nothing>
- var H.Tog.Num
- var H.Herb <nothing>
- var H.Sund incense
- var H.Sund.Loc on shel
- var H.Lamp charcoal
- var H.Music <nothing>
- var H.Alch <nothing>
- var H.Forge zinc bar
- var H.Forge.Loc on tab
- var RP.Gen flights
- var RP.Gen.Loc in chest
- var RP.Tobac <nothing>
- # RATHA
- var skillrange 20-39
- var R.Bait worms
- var R.Gen rope
- var R.Herb water
- var R.Forge <nothing>
- var R.Tailor stockings
- var R.Leather <nothing>
- var R.Hair unguent
- var R.Music <nothing>
- var R.Magic <nothing>
- var R.Origami <nothing>
- var R.Origami.Loc
- var R.Jewelry <nothing>
- var R.Cleric chamomile
- var R.Cleric2 <nothing>
- var R.Ring <nothing>
- # AESRY SURLAENIS'A
- var skillrange 20-39
- var A.Herb water
- var A.Tanner <nothing>
- var A.Clothing <nothing>
- var A.Script <nothing>
- var A.Cleric pao
- var A.Origami <nothing>
- var A.Jewelry <nothing>
- var A.Magic <nothing>
- var A.Slings flights
- var A.Puzzle <nothing>
- var A.Footwear <nothing>
- var A.Shields <nothing>
- var A.Shields.Loc on table
- var A.Weapon <nothing>
- var A.Armor <nothing>
- var A.Gen charcoal
- var A.Flower <nothing>
- var A.Music pick
- pause 0.1
- gosub ITEM.COUNT0
- RETURN
- ##################################
- # SKILLS 40-59
- ##################################
- CLASS2:
- ## THEREN
- var skillrange 40-59
- var T.Tarsha canons
- var T.Rose socks
- var T.Music cloth
- var T.Music.Num
- var T.Hats nightcap
- var T.Arm <nothing>
- var T.Gift <nothing>
- var T.Sweet cake
- var T.Cupcake cupcake
- var T.Gen charcoal
- var T.Krrish <nothing>
- var T.Lense <nothing>
- var T.Cleric incense
- var T.Men <nothing>
- var T.Women <nothing>
- var T.Cloth <nothing>
- var T.Armory <nothing>
- var T.Forge copper slug
- ## HAVEN
- var skillrange 40-59
- var RH.Herb mixing stick
- var RH.Iron <nothing>
- var RH.Naph <nothing>
- var RH.Naph.Loc on cart
- var RH.Flow black orchid
- var RH.Seli <nothing>
- var RH.Arms dart
- var RH.Gen flint
- var RH.Cloth cap
- var RH.Artif <nothing>
- var RH.Joy water
- var RH.Smoke pouch
- var RH.Weap <nothing>
- var RH.Bard pick
- var RH.Bard2 <nothing>
- var RH.Cleric grey-brown feather
- var RH.Cleric2 <nothing>
- var RH.Lock ordinary lockpick
- var RH.Tog <nothing>
- var RH.Tog2 <nothing>
- var RH.Mirg <nothing>
- # ARTHE DALE
- var skillrange 40-59
- var AD.Feta milk
- var AD.FETA.Loc on counter
- var AD.Thread <nothing>
- var AD.Fash <nothing>
- var AD.Odds <nothing>
- var AD.Bard <nothing>
- var AD.Map <nothing>
- var AD.Arm <nothing>
- var AD.Smoke <nothing>
- var AD.Tart.E <nothing>
- var AD.Tart.C <nothing>
- var AD.Tart.M <nothing>
- var AD.Tart.L <nothing>
- var AD.Tart.F <nothing>
- var KA.Grek socks
- # CROSSINGS
- var skillrange 40-59
- var C.Alch alcohol
- var C.Alch.Loc in vat
- var C.Artif <nothing>
- var C.Artif.Loc in bucket
- var C.Bath <nothing>
- var C.Bath.Num
- var C.Bath.Loc
- var C.Card <nothing>
- var C.Gen envelope
- var C.Weap rocks
- var C.Arm rugged gloves
- var C.Music pick
- var C.Music2 <nothing>
- var C.Lock <nothing>
- var C.Empath <nothing>
- var C.Empath.Alt <nothing>
- var C.Empath2 <nothing>
- var C.Empath3 <nothing>
- var C.Empath3.Loc on hook
- var C.Empath3.Alt
- var C.Cler grey-brown feather
- var C.Haber hood
- var C.Script <nothing>
- var C.Tann <nothing>
- var C.Tann.Loc
- var C.Jewel <nothing>
- var C.Stitch hair bow
- var C.Cobb <nothing>
- var C.Herb <nothing>
- var C.Flow rose
- # LETH DERIEL
- var skillrange 40-59
- var L.Skin <nothing>
- var L.Bow arrowhead
- var L.Orig <nothing>
- var L.Orig.Num
- var L.Weap <nothing>
- var L.Wick <nothing>
- var L.Bard <nothing>
- var L.Bard2 cloth
- var L.Cloth <nothing>
- var L.Wood <nothing>
- var L.Gen <nothing>
- var L.Gen.Alt <nothing>
- var L.Perf <nothing>
- # SHARD
- var skillrange 40-59
- var S.Gen hairbrush
- var S.Weap <nothing>
- var S.Cleric sirese flower
- var S.Stitch gloves
- var S.Alch mixing stick
- var S.Herb <nothing>
- var S.Artif <nothing>
- var S.Music rag
- var S.Armor leather gloves
- var S.Reed <nothing>
- var S.Reed.Num
- var S.Bow glue
- var S.Lock iron keyblank
- var S.Coin <nothing>
- var S.Coin.Loc
- var S.Frill gloves
- var S.Herald <nothing>
- var S.Herald.Loc on rack
- var S.Gift <nothing>
- var S.Gift.Num
- var S.Gift.Loc
- var S.Toy whistle
- var S.Toy.Loc
- var S.Memory <nothing>
- var S.Memory.Num first
- var S.Token <nothing>
- var S.Museum <nothing>
- var S.Barber oil
- var S.Tanner <nothing>
- var S.Tanner.Loc on counter
- var S.Surv oil
- var S.Surv.Loc on stand
- var S.Surv.Alt <nothing>
- var S.Surv.Alt.Loc on stand
- var S.Surv2 glue
- var S.Surv2.Num
- var S.Surv2.Loc
- var S.Surv2.Alt hawk flights
- var S.Spire <nothing>
- # HORSE CLAN
- var HC.Jahtinit <nothing>
- var HC.Falconer <nothing>
- var HC.Yasnah <nothing>
- var HC.Bowyer <nothing>
- var HC.Bowyer2 <nothing>
- var HC.Equine <nothing>
- var HC.Felterie <nothing>
- var HC.Felterie2 <nothing>
- # HIB AND RAVEN'S POINT
- var skillrange 40-59
- var SC.Weap <nothing>
- var H.Shield <nothing>
- var H.Shield.Loc on rack
- var H.Jewel <nothing>
- var H.Tog toothpicks
- var H.Tog.Num
- var H.Herb <nothing>
- var H.Sund incense
- var H.Sund.Loc on shel
- var H.Lamp torch
- var H.Music cloth
- var H.Alch mixing stick
- var H.Forge copper slug
- var H.Forge.Loc on tab
- var RP.Gen flights
- var RP.Gen.Loc in chest
- var RP.Tobac pine pipe
- # RATHA
- var skillrange 40-59
- var R.Bait cheese
- var R.Gen biscuit
- var R.Herb alcohol
- var R.Forge <nothing>
- var R.Tailor stockings
- var R.Leather <nothing>
- var R.Hair unguent
- var R.Music rag
- var R.Magic <nothing>
- var R.Origami <nothing>
- var R.Origami.Loc
- var R.Jewelry <nothing>
- var R.Cleric plume feather
- var R.Cleric2 <nothing>
- var R.Ring <nothing>
- # AESRY SURLAENIS'A
- var skillrange 40-59
- var A.Herb stick
- var A.Tanner thread
- var A.Clothing <nothing>
- var A.Script <nothing>
- var A.Cleric sage
- var A.Origami paper
- var A.Jewelry <nothing>
- var A.Magic <nothing>
- var A.Slings fishtail arrowhead
- var A.Puzzle beanbags
- var A.Footwear socks
- var A.Shields <nothing>
- var A.Shields.Loc on table
- var A.Weapon <nothing>
- var A.Armor <nothing>
- var A.Gen flint
- var A.Flower <nothing>
- var A.Music pick
- pause 0.1
- gosub ITEM.COUNT0
- RETURN
- ##################################
- # SKILLS 60-79
- ##################################
- CLASS3:
- ## THEREN
- var skillrange 60-79
- var T.Tarsha canons
- var T.Rose socks
- var T.Music cloth
- var T.Music.Num
- var T.Hats nightcap
- var T.Arm <nothing>
- var T.Gift <nothing>
- var T.Sweet cake
- var T.Cupcake cupcake
- var T.Gen carving knife
- var T.Krrish <nothing>
- var T.Lense <nothing>
- var T.Cleric incense
- var T.Men <nothing>
- var T.Women <nothing>
- var T.Cloth <nothing>
- var T.Armory <nothing>
- var T.Forge copper slug
- ## HAVEN
- var skillrange 60-79
- var RH.Herb mixing stick
- var RH.Iron <nothing>
- var RH.Naph <nothing>
- var RH.Naph.Loc on cart
- var RH.Flow black orchid
- var RH.Seli claw gloves
- var RH.Arms dart
- var RH.Gen small box
- var RH.Cloth sash
- var RH.Artif <nothing>7
- var RH.Joy cologne
- var RH.Smoke pouch
- var RH.Weap club
- var RH.Bard pick
- var RH.Bard2 hairpin
- var RH.Cleric incense
- var RH.Cleric2 <nothing>
- var RH.Lock ordinary lockpick
- var RH.Tog <nothing>
- var RH.Tog2 <nothing>
- var RH.Mirg <nothing>
- # ARTHE DALE
- var skillrange 60-79
- var AD.Feta yogurt
- var AD.FETA.Loc
- var AD.Thread <nothing>
- var AD.Fash <nothing>
- var AD.Odds <nothing>
- var AD.Bard rag
- var AD.Map <nothing>
- var AD.Arm hood
- var AD.Smoke sungrown cigar
- var AD.Tart.E <nothing>
- var AD.Tart.C <nothing>
- var AD.Tart.M tart
- var AD.Tart.L <nothing>
- var AD.Tart.F tart
- var KA.Grek boots
- # CROSSINGS
- var skillrange 60-79
- var C.Alch alcohol
- var C.Alch.Loc in vat
- var C.Artif flake
- var C.Artif.Loc in bucket
- var C.Bath reed
- var C.Bath.Num
- var C.Bath.Loc
- var C.Card <nothing>
- var C.Gen herb bag
- var C.Weap rocks
- var C.Arm rugged gloves
- var C.Music pick
- var C.Music2 drum stick
- var C.Lock stout lockpick
- var C.Empath <nothing>
- var C.Empath.Alt <nothing>
- var C.Empath2 <nothing>
- var C.Empath3 <nothing>
- var C.Empath3.Loc on hook
- var C.Empath3.Alt <nothing>
- var C.Cler chamomile
- var C.Haber hood
- var C.Script <nothing>
- var C.Tann <nothing>
- var C.Tann.Loc
- var C.Jewel hairpin
- var C.Stitch hair bow
- var C.Cobb anklets
- var C.Herb <nothing>
- var C.Flow <nothing>
- # LETH DERIEL
- var skillrange 60-79
- var L.Skin <nothing>
- var L.Bow arrowhead
- var L.Orig white paper
- var L.Orig.Num
- var L.Weap <nothing>
- var L.Wick <nothing>
- var L.Bard recorder
- var L.Bard2 cloth
- var L.Cloth <nothing>
- var L.Wood <nothing>
- var L.Gen <nothing>
- var L.Gen.Alt <nothing>
- var L.Perf <nothing>
- # SHARD
- var skillrange 60-79
- var S.Gen unguent
- var S.Weap <nothing>
- var S.Cleric incense
- var S.Stitch hood
- var S.Alch pestle
- var S.Herb <nothing>
- var S.Artif <nothing>
- var S.Music cloth
- var S.Armor collar
- var S.Reed <nothing>
- var S.Reed.Num
- var S.Bow shears
- var S.Lock iron keyblank
- var S.Coin <nothing>
- var S.Coin.Loc
- var S.Frill straw hat
- var S.Herald <nothing>
- var S.Herald.Loc on rack
- var S.Gift <nothing>
- var S.Gift.Num
- var S.Gift.Loc
- var S.Toy whistle
- var S.Toy.Loc
- var S.Memory <nothing>
- var S.Memory.Num first
- var S.Token <nothing>
- var S.Museum <nothing>
- var S.Barber oil
- var S.Tanner thread
- var S.Tanner.Loc on counter
- var S.Surv wood pestle
- var S.Surv.Loc on cabinet
- var S.Surv.Alt stone pestle
- var S.Surv.Alt.Loc on cabinet
- var S.Surv2 falcon flights
- var S.Surv2.Num
- var S.Surv2.Alt wood shaper
- var S.Surv2.Loc
- var S.Spire <nothing>
- # HORSE CLAN
- var skillrange 60-79
- var HC.Jahtinit physalis
- var HC.Falconer hair wrap
- var HC.Falconer.Num
- var HC.Yasnah ring
- var HC.Bowyer pouch
- var HC.Bowyer.Num second
- var HC.Bowyer2 bow
- var HC.Bowyer2.Loc on stand
- var HC.Equine saddle
- var HC.Equine.Loc on rack
- var HC.Felterie amulet
- var HC.Felterie2 <nothing>
- # HIB AND RAVEN'S POINT
- var skillrange 60-79
- var SC.Weap <nothing>
- var H.Shield <nothing>
- var H.Shield.Loc on rack
- var H.Jewel <nothing>
- var H.Tog white soap
- var H.Tog.Num
- var H.Herb <nothing>
- var H.Sund bone comb
- var H.Sund.Loc on shel
- var H.Lamp lamp oil
- var H.Music cloth
- var H.Alch stone pestle
- var H.Forge copper slug
- var H.Forge.Loc on tab
- var RP.Gen flights
- var RP.Gen.Loc in chest
- var RP.Tobac pipe
- # RATHA
- var skillrange 60-79
- var R.Bait pole
- var R.Gen lobscouse stew
- var R.Herb pestle
- var R.Forge <nothing>
- var R.Tailor stockings
- var R.Leather <nothing>
- var R.Hair hairbrush
- var R.Music pick
- var R.Magic <nothing>
- var R.Origami <nothing>
- var R.Origami.Loc
- var R.Jewelry chain
- var R.Cleric wine
- var R.Cleric2 <nothing>
- var R.Ring <nothing>
- # AESRY SURLAENIS'A
- var skillrange 60-99
- var A.Herb pestle
- var A.Tanner thread
- var A.Clothing britches
- var A.Script <nothing>
- var A.Cleric incense
- var A.Origami <nothing>
- var A.Jewelry bracelet
- var A.Magic <nothing>
- var A.Slings shaper
- var A.Puzzle beanbags
- var A.Footwear socks
- var A.Shields <nothing>
- var A.Shields.Loc on table
- var A.Weapon <nothing>
- var A.Armor <nothing>
- var A.Gen trowel
- var A.Flower wristlet
- var A.Music bow
- pause 0.1
- gosub ITEM.COUNT1
- RETURN
- ##################################
- # SKILLS 80-99
- ##################################
- CLASS4:
- var skillrange 80-99
- ## THEREN
- var T.Tarsha canons
- var T.Rose socks
- var T.Music cloth
- var T.Music.Num
- var T.Hats nightcap
- var T.Arm <nothing>
- var T.Gift <nothing>
- var T.Sweet cake
- var T.Cupcake cupcake
- var T.Gen carving knife
- var T.Krrish <nothing>
- var T.Lense <nothing>
- var T.Cleric incense
- var T.Men <nothing>
- var T.Women <nothing>
- var T.Cloth <nothing>
- var T.Armory <nothing>
- var T.Forge copper slug
- ## HAVEN
- # skillrange 80-99
- var RH.Herb oil
- var RH.Iron <nothing>
- var RH.Naph <nothing>
- var RH.Naph.Loc on cart
- var RH.Flow black orchid
- var RH.Seli claw gloves
- var RH.Arms bolts
- var RH.Gen bark
- var RH.Cloth sash
- var RH.Artif <nothing>
- var RH.Joy cologne
- var RH.Smoke sungrown cigar
- var RH.Weap club
- var RH.Bard pick
- var RH.Bard2 hairpin
- var RH.Cleric candle
- var RH.Cleric2 <nothing>
- var RH.Lock stout lockpick
- var RH.Tog <nothing>
- var RH.Tog2 <nothing>
- var RH.Mirg <nothing>
- # ARTHE DALE
- # skillrange 80-99
- var AD.Feta yogurt
- var AD.FETA.Loc
- var AD.Thread pouch
- var AD.Fash <nothing>
- var AD.Odds <nothing>
- var AD.Bard rag
- var AD.Map <nothing>
- var AD.Arm hood
- var AD.Smoke sungrown cigar
- var AD.Tart.E <nothing>
- var AD.Tart.C <nothing>
- var AD.Tart.M tart
- var AD.Tart.L <nothing>
- var AD.Tart.F <nothing>
- var KA.Grek boots
- # CROSSINGS
- # skillrange 80-99
- var C.Alch goggles
- var C.Alch.Loc on rack
- var C.Artif flake
- var C.Artif.Loc in bucket
- var C.Bath reed
- var C.Bath.Num
- var C.Bath.Loc
- var C.Card <nothing>
- var C.Gen flint
- var C.Weap rocks
- var C.Arm rugged aventail
- var C.Music rag
- var C.Music2 drum stick
- var C.Lock stout lockpick
- var C.Empath <nothing>
- var C.Empath.Alt <nothing>
- var C.Empath2 <nothing>
- var C.Empath3 <nothing>
- var C.Empath3.Loc on hook
- var C.Empath3.Alt <nothing>
- var C.Cler incense
- var C.Haber skullcap
- var C.Script <nothing>
- var C.Tann <nothing>
- var C.Tann.Loc
- var C.Jewel anklet
- var C.Stitch hair bow
- var C.Cobb sandals
- var C.Herb <nothing>
- var C.Flow <nothing>
- # LETH DERIEL
- # skillrange 80-99
- var L.Skin <nothing>
- var L.Bow arrowhead
- var L.Orig white paper
- var L.Orig.Num
- var L.Weap <nothing>
- var L.Wick <nothing>
- var L.Bard recorder
- var L.Bard2 cloth
- var L.Cloth <nothing>
- var L.Wood <nothing>
- var L.Gen <nothing>
- var L.Gen.Alt <nothing>
- var L.Perf <nothing>
- # SHARD
- # skillrange 80-99
- var S.Gen unguent
- var S.Weap <nothing>
- var S.Cleric incense
- var S.Stitch hood
- var S.Alch pestle
- var S.Herb <nothing>
- var S.Artif <nothing>
- var S.Music cloth
- var S.Armor collar
- var S.Reed <nothing>
- var S.Reed.Num
- var S.Bow shears
- var S.Lock iron keyblank
- var S.Coin <nothing>
- var S.Coin.Loc
- var S.Frill straw hat
- var S.Herald <nothing>
- var S.Herald.Loc on rack
- var S.Gift <nothing>
- var S.Gift.Num
- var S.Gift.Loc
- var S.Toy whistle
- var S.Toy.Loc
- var S.Memory <nothing>
- var S.Memory.Num first
- var S.Token <nothing>
- var S.Museum <nothing>
- var S.Barber oil
- var S.Tanner thread
- var S.Tanner.Loc on counter
- var S.Surv wood pestle
- var S.Surv.Loc on cabinet
- var S.Surv.Alt stone pestle
- var S.Surv.Alt.Loc on cabinet
- var S.Surv2 falcon flights
- var S.Surv2.Num
- var S.Surv2.Alt wood shaper
- var S.Surv2.Loc
- var S.Spire <nothing>
- # HORSE CLAN
- var skillrange 60-79
- var HC.Jahtinit physalis
- var HC.Falconer hair wrap
- var HC.Falconer.Num
- var HC.Yasnah ring
- var HC.Bowyer pouch
- var HC.Bowyer.Num second
- var HC.Bowyer2 bow
- var HC.Bowyer2.Loc on stand
- var HC.Equine saddle
- var HC.Equine.Loc on rack
- var HC.Felterie amulet
- var HC.Felterie2 <nothing>
- # HIB AND RAVEN'S POINT
- var skillrange 60-99
- var SC.Weap <nothing>
- var H.Shield <nothing>
- var H.Shield.Loc on rack
- var H.Jewel <nothing>
- var H.Tog white soap
- var H.Tog.Num
- var H.Herb <nothing>
- var H.Sund bone comb
- var H.Sund.Loc on shel
- var H.Lamp lamp oil
- var H.Music cloth
- var H.Alch stone pestle
- var H.Forge copper slug
- var H.Forge.Loc on tab
- var RP.Gen flights
- var RP.Gen.Loc in chest
- var RP.Tobac pipe
- # RATHA
- # skillrange 80-99
- var R.Bait pole
- var R.Gen lobscouse stew
- var R.Herb pestle
- var R.Forge <nothing>
- var R.Tailor badge
- var R.Leather <nothing>
- var R.Hair hairbrush
- var R.Music pick
- var R.Magic <nothing>
- var R.Origami <nothing>
- var R.Origami.Loc
- var R.Jewelry chain
- var R.Cleric wine
- var R.Cleric2 <nothing>
- var R.Ring <nothing>
- # AESRY SURLAENIS'A
- # skillrange 80-99
- var A.Herb pestle
- var A.Tanner thread
- var A.Clothing britches
- var A.Script <nothing>
- var A.Cleric incense
- var A.Origami <nothing>
- var A.Jewelry bracelet
- var A.Magic <nothing>
- var A.Slings shaper
- var A.Puzzle beanbags
- var A.Footwear socks
- var A.Shields <nothing>
- var A.Shields.Loc on table
- var A.Weapon <nothing>
- var A.Armor <nothing>
- var A.Gen trowel
- var A.Flower wristlet
- var A.Music bow
- pause 0.1
- gosub ITEM.COUNT1
- RETURN
- ##################################
- # SKILLS 100-149
- ##################################
- CLASS5:
- ## THEREN
- var skillrange 100-149
- var T.Tarsha gorget
- var T.Rose kilt
- var T.Music cloth
- var T.Music.Num
- var T.Hats nightcap
- var T.Arm <nothing>
- var T.Gift <nothing>
- var T.Sweet cake
- var T.Cupcake cupcake
- var T.Gen satchel
- var T.Krrish <nothing>
- var T.Lense <nothing>
- var T.Cleric mortar
- var T.Men <nothing>
- var T.Women <nothing>
- var T.Cloth <nothing>
- var T.Armory dagger
- var T.Forge copper slug
- ## HAVEN
- var skillrange 100-149
- var RH.Herb yelith root
- var RH.Iron bronze gauntlets
- var RH.Naph naphtha
- var RH.Naph.Loc on cart
- var RH.Flow <nothing>
- var RH.Seli studded helm
- var RH.Arms kris
- var RH.Gen knapsack
- var RH.Cloth robes
- var RH.Artif <nothing>
- var RH.Joy perfume
- var RH.Smoke apple pipe
- var RH.Weap club
- var RH.Bard tipper
- var RH.Bard2 beaded earrings
- var RH.Cleric pomander
- var RH.Cleric2 bottle
- var RH.Lock stout lockpick
- var RH.Tog <nothing>
- var RH.Tog2 <nothing>
- var RH.Mirg <nothing>
- # ARTHE DALE
- var skillrange 100-149
- var AD.Feta kirm cheese
- var AD.FETA.Loc
- var AD.Thread pouch
- var AD.Fash neckerchief
- var AD.Odds fan
- var AD.Bard rag
- var AD.Map <nothing>
- var AD.Arm bodkin
- var AD.Smoke telgi cigar
- var AD.Tart.E tart
- var AD.Tart.C tart
- var AD.Tart.M tart
- var AD.Tart.L tart
- var AD.Tart.F tart
- var KA.Grek boots
- # CROSSINGS
- var skillrange 100-149
- var C.Alch gloves
- var C.Alch.Loc on rack
- var C.Artif flake
- var C.Artif.Loc in bucket
- var C.Bath soap
- var C.Bath.Num
- var C.Bath.Loc in basin
- var C.Card <nothing>
- var C.Gen knapsack
- var C.Weap dagger
- var C.Arm rugged aventail
- var C.Music cloth
- var C.Music2 maple guiro
- var C.Lock slim lockpick
- var C.Empath <nothing>
- var C.Empath.Alt <nothing>
- var C.Empath2 scalpel
- var C.Empath3 button
- var C.Empath3.Loc on case
- var C.Empath3.Alt <nothing>
- var C.Cler wine
- var C.Haber tam
- var C.Script <nothing>
- var C.Tann scraper
- var C.Tann.Loc
- var C.Jewel pin
- var C.Stitch sash
- var C.Cobb sandals
- var C.Herb jadice flower
- var C.Flow <nothing>
- # LETH DERIEL
- var skillrange 100-149
- var L.Skin buckskin pelt
- var L.Bow bolts
- var L.Orig silver paper
- var L.Orig.Num
- var L.Weap <nothing>
- var L.Wick wicker quiver
- var L.Bard ocarina
- var L.Bard2 cloth
- var L.Cloth moufles
- var L.Wood <nothing>
- var L.Gen dice
- var L.Gen.Alt <nothing>
- var L.Perf <nothing>
- # SHARD
- var skillrange 100-149
- var S.Gen knapsack
- var S.Weap targe
- var S.Cleric candle
- var S.Stitch cloak
- var S.Alch large bowl
- var S.Herb riolur leaf
- var S.Artif <nothing>
- var S.Music tipper
- var S.Armor reinforced greaves
- var S.Reed <nothing>
- var S.Reed.Num
- var S.Bow arrows
- var S.Lock bronze lockpick
- var S.Coin <nothing>
- var S.Coin.Loc
- var S.Frill willow fan
- var S.Herald <nothing>
- var S.Herald.Loc on rack
- var S.Gift doll
- var S.Gift.Num
- var S.Gift.Loc on shelf
- var S.Toy whistle
- var S.Toy.Loc
- var S.Memory <nothing>
- var S.Memory.Num first
- var S.Token <nothing>
- var S.Museum <nothing>
- var S.Barber mold
- var S.Tanner hide scraper
- var S.Tanner.Loc on counter
- var S.Surv wood pestle
- var S.Surv.Loc on cabinet
- var S.Surv.Alt stone pestle
- var S.Surv.Alt.Loc on cabinet
- var S.Surv2 wood shaper
- var S.Surv2.Num
- var S.Surv2.Alt steel shaper
- var S.Surv2.Loc
- var S.Spire <nothing>
- # HORSE CLAN
- var skillrange 100-149
- var HC.Jahtinit physalis
- var HC.Falconer hair wrap
- var HC.Falconer.Num
- var HC.Yasnah ring
- var HC.Bowyer pouch
- var HC.Bowyer.Num sixth
- var HC.Bowyer2 bow
- var HC.Bowyer2.Loc on stand
- var HC.Equine saddle
- var HC.Equine.Loc on rack
- var HC.Felterie amulet
- var HC.Felterie2 <nothing>
- # HIB AND RAVEN'S POINT
- var skillrange 100-149
- var SC.Weap <nothing>
- var H.Shield <nothing>
- var H.Shield.Loc on rack
- var H.Jewel <nothing>
- var H.Tog white soap
- var H.Tog.Num
- var H.Herb <nothing>
- var H.Sund bone comb
- var H.Sund.Loc on shel
- var H.Lamp lamp oil
- var H.Music cloth
- var H.Alch stone pestle
- var H.Forge copper slug
- var H.Forge.Loc on tab
- var RP.Gen flights
- var RP.Gen.Loc in chest
- var RP.Tobac pipe
- # RATHA
- var skillrange 100-149
- var R.Bait pole
- var R.Gen polish
- var R.Herb large jar
- var R.Forge dagger
- var R.Tailor shirt
- var R.Leather <nothing>
- var R.Hair clippers
- var R.Music tambourine
- var R.Magic talisman
- var R.Origami white paper
- var R.Origami.Loc on shelf
- var R.Jewelry bangle
- var R.Cleric candle
- var R.Cleric2 <nothing>
- var R.Ring <nothing>
- # AESRY SURLAENIS'A
- var skillrange 100-149
- var A.Herb pestle
- var A.Tanner shears
- var A.Clothing britches
- var A.Script trimmed scroll
- var A.Cleric candle
- var A.Origami <nothing>
- var A.Jewelry bracelet
- var A.Magic <nothing>
- var A.Slings canvas sling
- var A.Puzzle basic puzzle
- var A.Footwear pouch
- var A.Shields <nothing>
- var A.Shields.Loc on table
- var A.Weapon <nothing>
- var A.Armor <nothing>
- var A.Gen tinderbox
- var A.Flower wristlet
- var A.Music cloth
- gosub ITEM.COUNT1
- RETURN
- ##################################
- # SKILLS 150-199
- ##################################
- CLASS6:
- ## THEREN
- var skillrange 150-199
- var T.Tarsha canons
- var T.Rose shirt
- var T.Music four strings
- var T.Music.Num
- var T.Hats sailor hat
- var T.Arm <nothing>
- var T.Gift blue shirt
- var T.Sweet cake
- var T.Cupcake cupcake
- var T.Gen carving knife
- var T.Krrish <nothing>
- var T.Lense <nothing>
- var T.Cleric pestle
- var T.Men trousers
- var T.Women <nothing>
- var T.Cloth suspenders
- var T.Armory dagger
- var T.Forge copper slug
- ## HAVEN
- var skillrange 150-199
- var RH.Herb riolur leaf
- var RH.Iron bronze gauntlets
- var RH.Naph naphtha
- var RH.Naph.Loc on cart
- var RH.Flow <nothing>
- var RH.Seli studded helm
- var RH.Arms rapier
- var RH.Gen razor
- var RH.Cloth jerkin
- var RH.Artif simple talisman
- var RH.Joy troll
- var RH.Smoke lanival pipe
- var RH.Weap <nothing>
- var RH.Bard tipper
- var RH.Bard2 earrings
- var RH.Cleric pomander
- var RH.Cleric2 bottle
- var RH.Lock slim lockpick
- var RH.Tog beaded slippers
- var RH.Tog2 <nothing>
- var RH.Mirg <nothing>
- # ARTHE DALE
- var skillrange 150-199
- var AD.Feta butter cheese
- var AD.FETA.Loc
- var AD.Thread bobbin
- var AD.Fash shawl
- var AD.Odds fan
- var AD.Bard four strings
- var AD.Map <nothing>
- var AD.Arm sword
- var AD.Smoke cigarillo
- var AD.Tart.E tart
- var AD.Tart.C tart
- var AD.Tart.M tart
- var AD.Tart.L tart
- var AD.Tart.F tart
- var KA.Grek skinning knife
- # CROSSINGS
- var skillrange 150-199
- var C.Alch gloves
- var C.Alch.Loc on rack
- var C.Artif scrap
- var C.Artif.Loc in bucket
- var C.Bath towel
- var C.Bath.Num
- var C.Bath.Loc on stand
- var C.Card <nothing>
- var C.Gen canvas sack
- var C.Weap dagger
- var C.Arm scale aventail
- var C.Music ocarina
- var C.Music2 ebony guiro
- var C.Lock lockpick ring
- var C.Empath <nothing>
- var C.Empath.Alt <nothing>
- var C.Empath2 garland
- var C.Empath3 button
- var C.Empath3.Loc on case
- var C.Empath3.Alt <nothing>
- var C.Cler silver vial
- var C.Haber jerkin
- var C.Script <nothing>
- var C.Tann scraper
- var C.Tann.Loc
- var C.Jewel band
- var C.Stitch vest
- var C.Cobb snowshoes
- var C.Herb junliar stem
- var C.Flow <nothing>
- # LETH DERIEL
- var skillrange 150-199
- var L.Skin deer skin
- var L.Bow long arrows
- var L.Orig case
- var L.Orig.Num fourth
- var L.Weap <nothing>
- var L.Weap.Loc in catalog
- var L.Wick wicker quiver
- var L.Bard flute
- var L.Bard2 four strings
- var L.Cloth tunic
- var L.Wood log
- var L.Gen dice
- var L.Gen.Alt <nothing>
- var L.Perf <nothing>
- # SHARD
- var skillrange 150-199
- var S.Gen clippers
- var S.Weap targe
- var S.Cleric armband
- var S.Stitch blouse
- var S.Alch tukai stones
- var S.Herb riolur leaf
- var S.Artif <nothing>
- var S.Music bow
- var S.Armor mail gauntlets
- var S.Reed <nothing>
- var S.Reed.Num
- var S.Bow crossbow bolts
- var S.Lock bronze keyblank
- var S.Coin coin case
- var S.Coin.Loc
- var S.Frill lace fan
- var S.Herald <nothing>
- var S.Herald.Loc on rack
- var S.Gift boggle doll
- var S.Gift.Num
- var S.Gift.Loc in black basket
- var S.Toy whistle
- var S.Toy.Loc
- var S.Memory <nothing>
- var S.Memory.Num first
- var S.Token <nothing>
- var S.Museum <nothing>
- var S.Barber tincture jar
- var S.Tanner scraper
- var S.Tanner.Loc on counter
- var S.Surv stone pestle
- var S.Surv.Loc on cabinet
- var S.Surv.Alt wood pestle
- var S.Surv.Alt.Loc on cabinet
- var S.Surv2 steel shaper
- var S.Surv2.Num
- var S.Surv2.Alt pine box
- var S.Surv2.Loc
- var S.Spire <nothing>
- # HORSE CLAN
- var skillrange 150-199
- var HC.Jahtinit physalis
- var HC.Falconer hair wrap
- var HC.Falconer.Num
- var HC.Yasnah ring
- var HC.Bowyer pouch
- var HC.Bowyer.Num sixth
- var HC.Bowyer2 bow
- var HC.Bowyer2.Loc on stand
- var HC.Equine saddle
- var HC.Equine.Loc on rack
- var HC.Felterie amulet
- var HC.Felterie2 <nothing>
- # HIB AND RAVEN'S POINT
- var skillrange 150-199
- var SC.Weap <nothing>
- var H.Shield <nothing>
- var H.Shield.Loc on rack
- var H.Jewel <nothing>
- var H.Tog white soap
- var H.Tog.Num
- var H.Herb <nothing>
- var H.Sund bone comb
- var H.Sund.Loc on shel
- var H.Lamp <nothing>
- var H.Music cloth
- var H.Alch stone pestle
- var H.Forge shaft
- var H.Forge.Loc on rack
- var RP.Gen pestle
- var RP.Gen.Loc on table
- var RP.Tobac pipe
- # RATHA
- var skillrange 150-199
- var R.Bait pole
- var R.Gen bodkin arrows
- var R.Herb large jar
- var R.Forge dagger
- var R.Tailor shirt
- var R.Leather <nothing>
- var R.Hair clippers
- var R.Music flute
- var R.Magic <nothing>
- var R.Origami white paper
- var R.Origami.Loc on shelf
- var R.Jewelry clasp
- var R.Cleric vial
- var R.Cleric2 <nothing>
- var R.Ring <nothing>
- # AESRY SURLAENIS'A
- var skillrange 150-199
- var A.Herb cebi root
- var A.Tanner bodkin
- var A.Clothing tunic
- var A.Script trimmed scroll
- var A.Cleric wine
- var A.Origami plain paper
- var A.Jewelry bracelet
- var A.Magic <nothing>
- var A.Slings rocks
- var A.Puzzle intermediate puzzle
- var A.Footwear woolen tights
- var A.Shields <nothing>
- var A.Shields.Loc on table
- var A.Weapon telek
- var A.Armor <nothing>
- var A.Gen razor
- var A.Flower necklace
- var A.Music bow
- gosub ITEM.COUNT1
- RETURN
- ##################################
- # SKILLS 200-249
- ##################################
- CLASS7:
- ## THEREN
- var skillrange 200-249
- var T.Tarsha greques
- var T.Rose shirt
- var T.Music four strings
- var T.Music.Num
- var T.Hats sailor hat
- var T.Arm <nothing>
- var T.Gift blue shirt
- var T.Sweet cake
- var T.Cupcake cupcake
- var T.Gen reed torch
- var T.Krrish <nothing>
- var T.Lense <nothing>
- var T.Cleric mortar
- var T.Men trousers
- var T.Women <nothing>
- var T.Cloth suspenders
- var T.Armory dagger
- var T.Forge copper slug
- ## HAVEN
- var skillrange 200-249
- var RH.Herb muljin sap
- var RH.Iron bronze gauntlets
- var RH.Naph naphtha
- var RH.Naph.Loc on cart
- var RH.Flow velvet rose
- var RH.Seli aventail
- var RH.Arms sword
- var RH.Gen shears
- var RH.Cloth doublet
- var RH.Artif simple talisman
- var RH.Joy bunny
- var RH.Smoke baron tobacco
- var RH.Weap mace
- var RH.Bard lyre
- var RH.Bard2 wristlet
- var RH.Cleric chalice
- var RH.Cleric2 black bottle
- var RH.Lock slim lockpick
- var RH.Tog beaded slippers
- var RH.Tog2 <nothing>
- var RH.Mirg anklet
- # ARTHE DALE
- var skillrange 200-249
- var AD.Feta butter cheese
- var AD.FETA.Loc
- var AD.Thread bobbin
- var AD.Fash trousers
- var AD.Odds earrings
- var AD.Bard six strings
- var AD.Map pipe
- var AD.Arm sword
- var AD.Smoke cigarillo
- var AD.Tart.E tart
- var AD.Tart.C tart
- var AD.Tart.M tart
- var AD.Tart.L tart
- var AD.Tart.F tart
- var KA.Grek shirt
- # CROSSINGS
- var skillrange 200-249
- var C.Alch small jar
- var C.Alch.Loc on counter
- var C.Artif shard
- var C.Artif.Loc in bucket
- var C.Bath bathrobe
- var C.Bath.Num
- var C.Bath.Loc
- var C.Card case
- var C.Gen leather sheath
- var C.Weap sling
- var C.Arm chain gloves
- var C.Music bodhran skin
- var C.Music2 flute
- var C.Lock slim lockpick
- var C.Empath scalpel
- var C.Empath.Alt <nothing>
- var C.Empath2 garland
- var C.Empath3 oak stylus
- var C.Empath3.Loc on box
- var C.Empath3.Alt <nothing>
- var C.Cler basin
- var C.Haber trousers
- var C.Script satchel
- var C.Script.Num second
- var C.Tann scraper
- var C.Tann.Loc
- var C.Jewel wedding ring
- var C.Stitch shawl
- var C.Cobb thigh boots
- var C.Herb riolur leaf
- var C.Flow corsage
- # LETH DERIEL
- var skillrange 200-249
- var L.Skin sluagh hide
- var L.Bow long arrows
- var L.Orig case
- var L.Orig.Num fourth
- var L.Weap <nothing>
- var L.Weap.Loc in catalog
- var L.Wick mesh sack
- var L.Bard woodwind case
- var L.Bard2 four strings
- var L.Cloth doublet
- var L.Wood applewood log
- var L.Gen dice
- var L.Gen.Alt <nothing>
- var L.Perf panther perfume
- # SHARD
- var skillrange 200-249
- var S.Gen scabbard
- var S.Weap targe
- var S.Cleric armband
- var S.Stitch cloak
- var S.Alch seol weed
- var S.Herb genich stem
- var S.Artif <nothing>
- var S.Music four strings
- var S.Armor choker
- var S.Reed <nothing>
- var S.Reed.Num
- var S.Bow crossbow bolts
- var S.Lock wrist sheath
- var S.Coin coin case
- var S.Coin.Loc
- var S.Frill sandals
- var S.Herald target shield
- var S.Herald.Loc on rack
- var S.Gift boggle doll
- var S.Gift.Num
- var S.Gift.Loc in black basket
- var S.Toy beard
- var S.Toy.Loc
- var S.Memory <nothing>
- var S.Memory.Num
- var S.Token <nothing>
- var S.Museum doll
- var S.Barber tincture jar
- var S.Tanner shears
- var S.Tanner.Loc on counter
- var S.Surv stone pestle
- var S.Surv.Loc on cabinet
- var S.Surv.Alt wood pestle
- var S.Surv.Alt.Loc on cabinet
- var S.Surv2 steel shaper
- var S.Surv2.Num
- var S.Surv2.Alt stone-tipped arrows
- var S.Surv2.Loc
- var S.Spire <nothing>
- # HORSE CLAN
- var skillrange 200-249
- var HC.Jahtinit physalis
- var HC.Falconer pouch
- var HC.Falconer.Num second
- var HC.Yasnah torque
- var HC.Bowyer pouch
- var HC.Bowyer.Num sixth
- var HC.Bowyer2 bow
- var HC.Bowyer2.Loc on stand
- var HC.Equine saddle
- var HC.Equine.Loc on rack
- var HC.Felterie amulet
- var HC.Felterie2 <nothing>
- # HIB AND RAVEN'S POINT
- var skillrange 200-249
- var SC.Weap <nothing>
- var H.Shield ordinary shield
- var H.Shield.Loc on rack
- var H.Jewel <nothing>
- var H.Tog towel
- var H.Tog.Num
- var H.Herb yelith root
- var H.Sund bone comb
- var H.Sund.Loc on shel
- var H.Lamp serpent lamp
- var H.Music scroll
- var H.Alch stone pestle
- var H.Forge shaft
- var H.Forge.Loc on rack
- var RP.Gen knife
- var RP.Gen.Loc on rack
- var RP.Tobac pipe
- # RATHA
- var skillrange 200-249
- var R.Bait pole
- var R.Gen breaker
- var R.Herb large jar
- var R.Forge dagger
- var R.Tailor tunic
- var R.Leather <nothing>
- var R.Hair <nothing>
- var R.Music six strings
- var R.Magic talisman
- var R.Origami white paper
- var R.Origami.Loc on shelf
- var R.Jewelry silver chain
- var R.Cleric censer
- var R.Cleric2 <nothing>
- var R.Ring <nothing>
- # AESRY SURLAENIS'A
- var skillrange 200-249
- var A.Herb nemoih root
- var A.Tanner scraper
- var A.Clothing shirt
- var A.Script painted scroll
- var A.Cleric sandals
- var A.Origami plain paper
- var A.Jewelry bracelet
- var A.Magic <nothing>
- var A.Slings rocks
- var A.Puzzle bunny
- var A.Footwear lace stockings
- var A.Shields <nothing>
- var A.Shields.Loc on table
- var A.Weapon telek
- var A.Armor <nothing>
- var A.Gen razor
- var A.Flower circlet
- var A.Music four strings
- gosub ITEM.COUNT2
- RETURN
- ##################################
- # SKILLS 250-299
- ##################################
- CLASS8:
- ## THEREN
- var skillrange 250-299
- var T.Tarsha greques
- var T.Rose shirt
- var T.Music four strings
- var T.Music.Num
- var T.Hats sailor hat
- var T.Arm <nothing>
- var T.Gift blue shirt
- var T.Sweet cake
- var T.Cupcake cupcake
- var T.Gen reed torch
- var T.Krrish <nothing>
- var T.Lense <nothing>
- var T.Cleric oil
- var T.Men trousers
- var T.Women <nothing>
- var T.Cloth suspenders
- var T.Armory dagger
- var T.Forge copper slug
- ## HAVEN
- var skillrange 250-299
- var RH.Herb riolur leaf
- var RH.Iron bronze gauntlets
- var RH.Naph naphtha
- var RH.Naph.Loc on cart
- var RH.Flow wreath
- var RH.Seli bronze gauntlets
- var RH.Arms composite bow
- var RH.Gen shears
- var RH.Cloth houpelande
- var RH.Artif cambrinth ring
- var RH.Joy bunny
- var RH.Smoke riverhaven tobacco
- var RH.Weap thorny mace
- var RH.Bard refill
- var RH.Bard2 necklace
- var RH.Cleric chalice
- var RH.Cleric2 black bottle
- var RH.Lock slim lockpick
- var RH.Tog ivory shirt
- var RH.Tog2 <nothing>
- var RH.Mirg anklet
- # ARTHE DALE
- var skillrange 250-299
- var AD.Feta kirm cheese
- var AD.FETA.Loc
- var AD.Thread pattern
- var AD.Fash trousers
- var AD.Odds earrings
- var AD.Bard refill
- var AD.Map pipe
- var AD.Arm sword
- var AD.Smoke baron tobacco
- var AD.Tart.E tart
- var AD.Tart.C tart
- var AD.Tart.M tart
- var AD.Tart.L tart
- var AD.Tart.F tart
- var KA.Grek shirt
- # CROSSINGS
- var skillrange 250-299
- var C.Alch large jar
- var C.Alch.Loc on count
- var C.Artif sliver
- var C.Artif.Loc in bucket
- var C.Bath bathrobe
- var C.Bath.Num
- var C.Bath.Loc
- var C.Card case
- var C.Gen rugged backpack
- var C.Weap kris
- var C.Arm chain helm
- var C.Music refill
- var C.Music2 violin bow
- var C.Lock lockpick ring
- var C.Empath slippers
- var C.Empath.Alt <nothing>
- var C.Empath2 mortar
- var C.Empath3 oak stylus
- var C.Empath3.Loc from box
- var C.Empath3.Alt <nothing>
- var C.Cler coffer
- var C.Haber doublet
- var C.Script satchel
- var C.Script.Num second
- var C.Tann scraper
- var C.Tann.Loc
- var C.Jewel bloodstone hairpin
- var C.Stitch leggings
- var C.Cobb hip boots
- var C.Herb ithor potion
- var C.Flow corsage
- # LETH DERIEL
- var skillrange 250-299
- var L.Skin cougar pelt
- var L.Bow leather quiver
- var L.Orig case
- var L.Orig.Num seventh
- var L.Weap <nothing>
- var L.Weap.Loc in catalog
- var L.Wick mesh sack
- var L.Bard mirliton
- var L.Bard2 refill
- var L.Cloth jerkin
- var L.Wood hazelwood log
- var L.Gen dice
- var L.Gen.Alt <nothing>
- var L.Perf panther perfume
- # SHARD
- var skillrange 250-299
- var S.Gen quiver
- var S.Weap stiletto
- var S.Cleric bell
- var S.Stitch dress
- var S.Alch seolarn weed
- var S.Herb hisan salve
- var S.Artif calavarite runestone
- var S.Music refill
- var S.Lock wrist sheath
- var S.Armor mask
- var S.Coin coin case
- var S.Coin.Loc
- var S.Frill silk fan
- var S.Herald ordinary shield
- var S.Herald.Loc on rack
- var S.Gift badge
- var S.Gift.Num
- var S.Gift.Loc on stand
- var S.Toy beard
- var S.Toy.Loc
- var S.Reed wooden ring
- var S.Reed.Num second
- var S.Memory <nothing>
- var S.Memory.Num
- var S.Token <nothing>
- var S.Museum doll
- var S.Barber clippers
- var S.Bow barbed arrows
- var S.Tanner shears
- var S.Tanner.Loc on counter
- var S.Surv marble pestle
- var S.Surv.Loc on cabinet
- var S.Surv.Alt stone pestle
- var S.Surv.Alt.Loc on cabinet
- var S.Surv2 belt knife
- var S.Surv2.Num
- var S.Surv2.Alt steel shaper
- var S.Surv2.Loc
- var S.Spire <nothing>
- # HORSE CLAN
- var skillrange 250-299
- var HC.Jahtinit physalis
- var HC.Falconer pouch
- var HC.Falconer.Num second
- var HC.Yasnah torque
- var HC.Bowyer pouch
- var HC.Bowyer.Num sixth
- var HC.Bowyer2 bow
- var HC.Bowyer2.Loc on stand
- var HC.Equine saddle
- var HC.Equine.Loc on rack
- var HC.Felterie amulet
- var HC.Felterie2 <nothing>
- # HIB AND RAVEN'S POINT
- var skillrange 250-299
- var SC.Weap dirk
- var H.Shield ordinary shield
- var H.Shield.Loc on rack
- var H.Jewel <nothing>
- var H.Tog shirt
- var H.Tog.Num
- var H.Herb hisan salve
- var H.Sund lamp
- var H.Sund.Loc on rack
- var H.Lamp serpent lamp
- var H.Music repair kit
- var H.Alch granite mortar
- var H.Forge shaft
- var H.Forge.Loc on rack
- var RP.Gen knife
- var RP.Gen.Loc on rack
- var RP.Tobac tobacco pouch
- # RATHA
- var skillrange 250-299
- var R.Bait pole
- var R.Gen strap
- var R.Herb cebi root
- var R.Forge sap
- var R.Tailor trousers
- var R.Leather gauntlets
- var R.Hair razor
- var R.Music refill
- var R.Magic talisman
- var R.Origami blue paper
- var R.Origami.Loc on shelf
- var R.Jewelry collar
- var R.Cleric censer
- var R.Cleric2 <nothing>
- var R.Ring <nothing>
- # AESRY SURLAENIS'A
- var skillrange 250-299
- var A.Herb ithor potion
- var A.Tanner shears
- var A.Clothing trousers
- var A.Script canvas scroll
- var A.Cleric armband
- var A.Origami white paper
- var A.Jewelry earcuff
- var A.Magic marble
- var A.Slings canvas sling
- var A.Puzzle wand
- var A.Footwear lace stockings
- var A.Shields <nothing>
- var A.Shields.Loc on table
- var A.Weapon telek
- var A.Armor chausses
- var A.Gen mirror
- var A.Flower wreath
- var A.Music seven strings
- gosub ITEM.COUNT2
- RETURN
- ##################################
- # SKILLS 300-399
- ##################################
- CLASS9:
- ## THEREN
- var skillrange 300-399
- var T.Tarsha houppelande
- var T.Rose shirt
- var T.Music repair kit
- var T.Music.Num
- var T.Hats ermine hat
- var T.Arm <nothing>
- var T.Gift throwing dagger
- var T.Sweet cake
- var T.Cupcake cupcake
- var T.Gen backsheath
- var T.Krrish bone
- var T.Lense <nothing>
- var T.Cleric oil
- var T.Men trousers
- var T.Women <nothing>
- var T.Cloth suspenders
- var T.Armory dagger
- var T.Forge copper slug
- ## HAVEN
- var skillrange 300-399
- var RH.Herb ithor potion
- var RH.Iron steel greaves
- var RH.Naph naphtha
- var RH.Naph.Loc on cart
- var RH.Flow silk orchid
- var RH.Seli aventail
- var RH.Arms sword
- var RH.Gen backpack
- var RH.Cloth gown
- var RH.Artif cambrinth ring
- var RH.Joy troll
- var RH.Smoke baron tobacco
- var RH.Weap thorny mace
- var RH.Bard boots
- var RH.Bard2 amulet
- var RH.Cleric pomander
- var RH.Cleric2 wood shaper
- var RH.Lock lockpick ring
- var RH.Tog linen shirt
- var RH.Tog2 <nothing>
- var RH.Mirg toe-bells
- # ARTHE DALE
- var skillrange 300-399
- var AD.Feta anlibues cheese
- var AD.FETA.Loc
- var AD.Thread pattern
- var AD.Fash frock
- var AD.Odds doll
- var AD.Bard silverlock
- var AD.Map pipe
- var AD.Arm cuirass
- var AD.Smoke whiskey cigar
- var AD.Tart.E tart
- var AD.Tart.C tart
- var AD.Tart.M tart
- var AD.Tart.L tart
- var AD.Tart.F tart
- var KA.Grek barrel
- # CROSSINGS
- var skillrange 300-399
- var C.Alch large jar
- var C.Alch.Loc on count
- var C.Artif cambrinth ring
- var C.Artif.Loc in bucket
- var C.Bath bath towel
- var C.Bath.Num
- var C.Bath.Loc on rack
- var C.Card case
- var C.Gen rugged backpack
- var C.Weap sabre
- var C.Arm bascinet
- var C.Music repair kit
- var C.Music2 violin bow
- var C.Lock lockpick ring
- var C.Empath scalpel
- var C.Empath.Alt slippers
- var C.Empath2 mortar
- var C.Empath3 journal
- var C.Empath3.Loc on shelf
- var C.Empath3.Alt button
- var C.Cler habit
- var C.Haber tabard
- var C.Script satchel
- var C.Script.Num second
- var C.Tann scraper
- var C.Tann.Loc
- var C.Jewel bloodstone hairpin
- var C.Stitch shirt
- var C.Cobb hip boots
- var C.Herb ithor potion
- var C.Flow boutonniere
- # LETH DERIEL
- var skillrange 300-399
- var L.Skin reaver pelt
- var L.Bow composite bow
- var L.Orig origami case
- var L.Orig.Num seventh
- var L.Weap wolf-tail shield
- var L.Wick pannier
- var L.Bard keyed flute
- var L.Bard2 twelve strings
- var L.Cloth mantle
- var L.Wood ironwood log
- var L.Gen mesh backpack
- var L.Gen.Alt <nothing>
- var L.Perf spice perfume
- # SHARD
- var skillrange 300-399
- var S.Gen broadsword
- var S.Weap stiletto
- var S.Cleric silver bell
- var S.Stitch dress
- var S.Alch seolarn weed
- var S.Herb ithor potion
- var S.Artif calavarite runestone
- var S.Music refill
- var S.Lock wrist sheath
- var S.Armor mesh handguards
- var S.Coin coin case
- var S.Coin.Loc on table
- var S.Frill tunic
- var S.Herald ordinary shield
- var S.Herald.Loc on rack
- var S.Gift badge
- var S.Gift.Num
- var S.Gift.Loc on stand
- var S.Toy beard
- var S.Toy.Loc on lion
- var S.Reed wooden ring
- var S.Reed.Num second
- var S.Memory pin
- var S.Memory.Num first
- var S.Token <nothing>
- var S.Token.Loc
- var S.Museum tunic
- var S.Barber clippers
- var S.Bow barbed arrows
- var S.Tanner shears
- var S.Tanner.Loc on counter
- var S.Surv armband
- var S.Surv.Loc on table
- var S.Surv.Alt neckband
- var S.Surv.Alt.Loc on table
- var S.Surv2 belt knife
- var S.Surv2.Num sixth
- var S.Surv2.Loc
- var S.Surv2.Alt broad-barbed arrows
- var S.Spire <nothing>
- # HORSE CLAN
- var skillrange 300-399
- var HC.Jahtinit physalis
- var HC.Falconer pouch
- var HC.Falconer.Num second
- var HC.Yasnah torque
- var HC.Bowyer pouch
- var HC.Bowyer.Num third
- var HC.Bowyer2 bow
- var HC.Bowyer2.Loc on stand
- var HC.Equine saddle
- var HC.Equine.Loc on rack
- var HC.Felterie amulet
- var HC.Felterie2 <nothing>
- # HIB AND RAVEN'S POINT
- var skillrange 300-399
- var SC.Weap dirk
- var H.Shield ordinary shield
- var H.Shield.Loc on rack
- var H.Jewel <nothing>
- var H.Tog soap
- var H.Tog.Num
- var H.Herb lujeakave elixir
- var H.Sund lamp
- var H.Sund.Loc on rack
- var H.Lamp peccary lamp
- var H.Music wine scroll
- var H.Alch granite mortar
- var H.Forge shaft
- var H.Forge.Loc on rack
- var RP.Gen mortar
- var RP.Gen.Loc on table
- var RP.Tobac tobacco pouch
- # RATHA
- var skillrange 300-399
- var R.Bait pole
- var R.Gen quiver
- var R.Herb tincture jar
- var R.Forge sap
- var R.Tailor vest
- var R.Leather gauntlets
- var R.Hair razor
- var R.Music lyre
- var R.Magic naphtha
- var R.Origami bird instructions
- var R.Origami.Loc on case
- var R.Jewelry collar
- var R.Cleric oil
- var R.Cleric2 <nothing>
- var R.Ring <nothing>
- # AESRY SURLAENIS'A
- var skillrange 300-399
- var A.Herb seolarn weed
- var A.Tanner potion
- var A.Clothing doublet
- var A.Script canvas scroll
- var A.Cleric armband
- var A.Origami blue paper
- var A.Jewelry torque
- var A.Magic cube
- var A.Slings canvas sling
- var A.Puzzle rings
- var A.Footwear spidersilk stockings
- var A.Shields <nothing>
- var A.Shields.Loc on table
- var A.Weapon garz
- var A.Armor chausses
- var A.Gen lantern
- var A.Flower pillow
- var A.Music drum pouch
- gosub ITEM.COUNT2
- RETURN
- ##################################
- # SKILLS 400-499
- ##################################
- CLASS10:
- ## THEREN
- var skillrange 400-499
- var T.Tarsha houppelande
- var T.Rose cloak
- var T.Music harp case
- var T.Music.Num
- var T.Hats head-dress
- var T.Arm chain handguards
- var T.Gift throwing dagger
- var T.Sweet cake
- var T.Cupcake cupcake
- var T.Gen backsheath
- var T.Krrish bone
- var T.Lense bone ring
- var T.Cleric mobar blood
- var T.Men trousers
- var T.Women <nothing>
- var T.Cloth suspenders
- var T.Armory quiver
- var T.Forge hilt
- ## HAVEN
- var skillrange 400-499
- var RH.Herb ithor potion
- var RH.Iron steel greaves
- var RH.Naph naphtha
- var RH.Naph.Loc on cart
- var RH.Flow velvet rose
- var RH.Seli aventail
- var RH.Arms sword
- var RH.Gen stove
- var RH.Cloth gown
- var RH.Artif cambrinth ring
- var RH.Joy troll
- var RH.Smoke baron tobacco
- var RH.Weap goat-head mace
- var RH.Bard boots
- var RH.Bard2 amulet
- var RH.Cleric pomander
- var RH.Cleric2 wood shaper
- var RH.Lock slim lockpick
- var RH.Tog linen shirt
- var RH.Tog2 <nothing>
- var RH.Mirg toe-bells
- # ARTHE DALE
- var skillrange 400-499
- var AD.Smoke whiskey cigar
- var AD.Thread pattern
- var AD.Fash overall
- var AD.Odds monocle
- var AD.Bard silverlock
- var AD.Map map
- var AD.Arm breastplate
- var AD.Feta biscuit
- var AD.FETA.Loc
- var AD.Tart.E tart
- var AD.Tart.C tart
- var AD.Tart.M tart
- var AD.Tart.L tart
- var AD.Tart.F tart
- var KA.Grek barrel
- # CROSSINGS
- var skillrange 400-499
- var C.Alch stove
- var C.Alch.Loc on counter
- var C.Arm bascinet
- var C.Artif inkwell
- var C.Artif.Loc on trunk
- var C.Bath towel
- var C.Bath.Num second
- var C.Bath.Loc on rack
- var C.Card case
- var C.Gen portable stove
- var C.Weap cane
- var C.Music case of silver
- var C.Music2 bohdran
- var C.Lock lockpick ring
- var C.Empath silk shirt
- var C.Empath.Alt broadsword
- var C.Empath2 silver chart
- var C.Empath3 petal
- var C.Empath3.Loc on case
- var C.Empath3.Alt bandage
- var C.Cler silver bell
- var C.Cler2 burlap sack
- var C.Haber tail coat
- var C.Script satchel
- var C.Script.Num second
- var C.Tann scraper
- var C.Tann.Loc
- var C.Jewel diamond engagement ring
- var C.Stitch long coat
- var C.Cobb hip boots
- var C.Herb ithor potion
- var C.Flow boutonniere
- # LETH DERIEL
- var skillrange 400-499
- var L.Skin blood wolf pelt
- var L.Bow composite bow
- var L.Orig origami case
- var L.Orig.Num sixth
- var L.Weap hide shield
- var L.Wick willow backpack
- var L.Bard silverwood mirliton
- var L.Bard2 hat
- var L.Cloth silk jaque
- var L.Wood apple
- var L.Gen mesh backpack
- var L.Gen.Alt ankle sheath
- var L.Perf venom oil
- # SHARD
- var skillrange 400-499
- var S.Gen chain helm
- var S.Weap stiletto
- var S.Cleric mobar blood
- var S.Stitch gown
- var S.Alch seolarn weed
- var S.Herb ithor potion
- var S.Artif rhodonite runestone
- var S.Music repair kit
- var S.Armor balaclava
- var S.Reed skirt
- var S.Reed.Num seventh
- var S.Museum doll
- var S.Bow barbed arrows
- var S.Lock copper lockpick
- var S.Coin coin case
- var S.Coin.Loc on table
- var S.Frill tunic
- var S.Herald medium shield
- var S.Herald.Loc on rack
- var S.Gift doll
- var S.Gift.Num
- var S.Gift.Loc in basket
- var S.Toy marionette
- var S.Toy.Loc on lion
- var S.Memory flute
- var S.Memory.Num third
- var S.Token <nothing>
- var S.Token.Loc
- var S.Barber brass razor
- var S.Tanner potion
- var S.Tanner.Loc on counter
- var S.Surv poncho
- var S.Surv.Loc on table
- var S.Surv.Alt throwing blades
- var S.Surv.Alt.Loc on table
- var S.Surv2 belt knife
- var S.Surv2.Num fifth
- var S.Surv2.Loc
- var S.Surv2.Alt broad-barbed arrows
- var S.Spire pouch
- # HORSE CLAN
- var skillrange 400-499
- var HC.Jahtinit physalis
- var HC.Falconer pouch
- var HC.Falconer.Num fourth
- var HC.Yasnah torque
- var HC.Bowyer pouch
- var HC.Bowyer.Num third
- var HC.Bowyer2 bow
- var HC.Bowyer2.Loc on stand
- var HC.Equine saddle
- var HC.Equine.Loc on rack
- var HC.Felterie amulet
- var HC.Felterie2 <nothing>
- # HIB AND RAVEN'S POINT
- var skillrange 400-499
- var SC.Weap adze
- var H.Shield target shield
- var H.Shield.Loc on rack
- var H.Jewel <nothing>
- var H.Tog wax
- var H.Tog.Num second
- var H.Herb lujeakave elixir
- var H.Sund hatchet
- var H.Sund.Loc on shel
- var H.Lamp peccary lamp
- var H.Music horn
- var H.Alch granite mortar
- var H.Forge shaft
- var H.Forge.Loc on rack
- var RP.Gen quiver
- var RP.Gen.Loc on table
- var RP.Tobac tobacco pouch
- # RATHA
- var skillrange 400-499
- var R.Bait <nothing>
- var R.Gen barbed arrows
- var R.Herb portable stove
- var R.Forge poignard
- var R.Tailor kilt
- var R.Leather gloves
- var R.Hair razor
- var R.Music repair kit
- var R.Magic naphtha
- var R.Origami primer
- var R.Origami.Loc
- var R.Jewelry wedding band
- var R.Cleric mobar blood
- var R.Cleric2 <nothing>
- var R.Ring <nothing>
- # AESRY SURLAENIS'A
- var skillrange 400-499
- var A.Herb ithor potion
- var A.Tanner pattern
- var A.Clothing trousers
- var A.Script parchment
- var A.Cleric mobar blood
- var A.Origami yak instructions
- var A.Jewelry chain
- var A.Magic marble
- var A.Slings wool sling
- var A.Puzzle bunny
- var A.Footwear clogs
- var A.Shields kite shield
- var A.Shields.Loc on table
- var A.Weapon telek
- var A.Armor chausses
- var A.Gen lantern
- var A.Flower pillow
- var A.Music syrinx
- gosub ITEM.COUNT2
- RETURN
- ##################################
- # SKILLS 500-599
- ##################################
- CLASS11:
- ## THEREN
- var skillrange 500-599
- var T.Tarsha houppelande
- var T.Rose cloak
- var T.Music harp case
- var T.Music.Num
- var T.Hats head-dress
- var T.Arm leather sheath
- var T.Gift throwing dagger
- var T.Sweet cake
- var T.Cupcake cupcake
- var T.Gen backsheath
- var T.Krrish bone
- var T.Lense bone ring
- var T.Cleric mobar blood
- var T.Men trousers
- var T.Women dark veil
- var T.Cloth suspenders
- var T.Armory quiver
- var T.Forge hilt
- ## HAVEN
- var skillrange 500-599
- var RH.Herb ithor potion
- var RH.Iron chain helm
- var RH.Naph naphtha
- var RH.Naph.Loc on cart
- var RH.Flow velvet rose
- var RH.Seli skull helm
- var RH.Arms sword
- var RH.Gen stove
- var RH.Cloth gown
- var RH.Artif potion
- var RH.Joy troll
- var RH.Smoke baron tobacco
- var RH.Weap goat-head mace
- var RH.Bard silk trews
- var RH.Bard2 amulet
- var RH.Cleric pomander
- var RH.Cleric2 pendant
- var RH.Lock slim lockpick
- var RH.Tog slippers
- var H.Tog.Num
- var RH.Tog2 leggings
- var RH.Mirg silk fan
- # ARTHE DALE
- var skillrange 500-599
- var AD.Smoke whiskey cigar
- var AD.Thread pattern
- var AD.Fash overall
- var AD.Odds monocle
- var AD.Bard peri'el's song
- var AD.Map map
- var AD.Arm leather coat
- var AD.Feta biscuit
- var AD.FETA.Loc
- var AD.Tart.E tart
- var AD.Tart.C tart
- var AD.Tart.M tart
- var AD.Tart.L tart
- var AD.Tart.F tart
- var KA.Grek barrel
- # CROSSINGS
- var skillrange 500-599
- var C.Alch stove
- var C.Alch.Loc on counter
- var C.Arm chain tasset
- var C.Artif plain scroll
- var C.Artif.Loc on stand
- var C.Bath towel
- var C.Bath.Num fourth
- var C.Bath.Loc on rack
- var C.Card case
- var C.Gen portable stove
- var C.Weap scimitar
- var C.Music case of silver
- var C.Music2 tapani
- var C.Lock lockpick ring
- var C.Empath silk shirt
- var C.Empath.Alt targe
- var C.Empath2 silver chart
- var C.Empath3 journal
- var C.Empath3.Loc on shelf
- var C.Empath3.Alt medallion
- var C.Cler silver bell
- var C.Cler2 armband
- var C.Haber tail coat
- var C.Script satchel
- var C.Script.Num first
- var C.Tann scraper
- var C.Tann.Loc
- var C.Jewel diamond engagement ring
- var C.Stitch long coat
- var C.Cobb hip boots
- var C.Herb ithor potion
- var C.Flow boutonniere
- # LETH DERIEL
- var skillrange 500-599
- var L.Skin blood wolf pelt
- var L.Bow heavy crossbow
- var L.Orig origami case
- var L.Orig.Num sixth
- var L.Weap hide shield
- var L.Wick willow backpack
- var L.Bard silverwood mirliton
- var L.Bard2 hat
- var L.Cloth silk jaque
- var L.Wood caravan
- var L.Gen mesh backpack
- var L.Gen.Alt ankle sheath
- var L.Perf venom oil
- # SHARD
- var skillrange 500-599
- var S.Gen light crossbow
- var S.Weap hatchet
- var S.Cleric mobar blood
- var S.Stitch gown
- var S.Alch stove
- var S.Herb ithor potion
- var S.Artif asketine runestone
- var S.Music gittern
- var S.Armor helmet
- var S.Reed skirt
- var S.Reed.Num sixth
- var S.Museum slippers
- var S.Bow short bow
- var S.Lock copper lockpick
- var S.Coin coin case
- var S.Coin.Loc on table
- var S.Frill doll
- var S.Herald ordinary shield
- var S.Herald.Loc on rack
- var S.Gift dagger
- var S.Gift.Num
- var S.Gift.Loc on table
- var S.Toy marionette
- var S.Toy.Loc on lion
- var S.Memory flute
- var S.Memory.Num third
- var S.Token <nothing>
- var S.Token.Loc
- var S.Barber brass razor
- var S.Tanner potion
- var S.Tanner.Loc on counter
- var S.Surv thigh quiver
- var S.Surv.Loc on table
- var S.Surv.Alt pack
- var S.Surv.Alt.Loc on chest
- var S.Surv2 belt knife
- var S.Surv2.Num fifth
- var S.Surv2.Loc
- var S.Surv2.Alt short bow
- var S.Spire tabard
- # HORSE CLAN
- var skillrange 500-599
- var HC.Jahtinit flute
- var HC.Falconer pouch
- var HC.Falconer.Num third
- var HC.Yasnah shawl
- var HC.Bowyer pouch
- var HC.Bowyer.Num fifth
- var HC.Bowyer2 bow
- var HC.Bowyer2.Loc on stand
- var HC.Equine saddle
- var HC.Equine.Loc on rack
- var HC.Felterie amulet
- var HC.Felterie2 blanket
- # HIB AND RAVEN'S POINT
- var skillrange 500-599
- var SC.Weap adze
- var H.Shield target shield
- var H.Shield.Loc on rack
- var H.Jewel gold chain
- var H.Tog wax
- var H.Tog.Num second
- var H.Herb lujeakave elixir
- var H.Sund haversack
- var H.Sund.Loc on rack
- var H.Lamp dragon lamp
- var H.Music horn
- var H.Alch bucket
- var H.Forge zinc bar
- var H.Forge.Loc on tab
- var RP.Gen scimitar
- var RP.Gen.Loc on rack
- var RP.Tobac tobacco pouch
- # RATHA
- var skillrange 500-599
- var R.Bait <nothing>
- var R.Gen flint-tipped bolts
- var R.Herb bucket
- var R.Forge handaxe
- var R.Tailor jacket
- var R.Leather boots
- var R.Hair razor
- var R.Music repair kit
- var R.Magic potion
- var R.Origami case
- var R.Origami.Loc on shelf
- var R.Jewelry pectoral
- var R.Cleric mobar blood
- var R.Cleric2 crystal vial
- var R.Ring <nothing>
- # AESRY SURLAENIS'A
- var skillrange 500-599
- var A.Herb bucket
- var A.Tanner potion
- var A.Clothing robe
- var A.Script parchment
- var A.Cleric thumb ring
- var A.Origami case
- var A.Jewelry haedor
- var A.Magic marble
- var A.Slings crossbow
- var A.Puzzle box
- var A.Footwear harness
- var A.Shields oval shield
- var A.Shields.Loc on table
- var A.Weapon kasai
- var A.Armor coif
- var A.Gen lantern
- var A.Flower pillow
- var A.Music drum
- gosub ITEM.COUNT2
- RETURN
- ##################################
- # SKILLS 600-699
- ##################################
- CLASS12:
- ## THEREN
- var skillrange 600-699
- var T.Tarsha brocade bilaud
- var T.Rose woolen cloak
- var T.Music ebony harp
- var T.Music.Num
- var T.Hats head-dress
- var T.Arm leather sheath
- var T.Gift pyramid
- var T.Sweet cake
- var T.Cupcake cupcake
- var T.Gen towel
- var T.Krrish bones
- var T.Lense telescope
- var T.Cleric mobar blood
- var T.Men vest
- var T.Women dark veil
- var T.Cloth cane
- var T.Armory longsword
- var T.Forge hilt
- ## HAVEN
- var skillrange 600-699
- var RH.Herb ithor potion
- var RH.Iron ring mail
- var RH.Naph naphtha
- var RH.Naph.Loc on cart
- var RH.Flow velvet rose
- var RH.Seli skull helm
- var RH.Arms longsword
- var RH.Gen stove
- var RH.Cloth gown
- var RH.Artif potion
- var RH.Joy troll
- var RH.Smoke baron tobacco
- var RH.Weap goat-head mace
- var RH.Bard silk trews
- var RH.Bard2 spirit earrings
- var RH.Cleric pomander
- var RH.Cleric2 wood shaper
- var RH.Lock slim lockpick
- var RH.Tog gown
- var RH.Tog2 leggings
- var RH.Mirg belt
- # ARTHE DALE
- var skillrange 600-699
- var AD.Smoke whiskey cigar
- var AD.Thread thief pattern
- var AD.Fash overall
- var AD.Odds monocle
- var AD.Bard peri'el's song
- var AD.Map map
- var AD.Arm leather coat
- var AD.Feta biscuit
- var AD.FETA.Loc
- var AD.Tart.E tart
- var AD.Tart.C tart
- var AD.Tart.M tart
- var AD.Tart.L tart
- var AD.Tart.F tart
- var KA.Grek barrel
- # CROSSINGS
- var skillrange 600-699
- var C.Alch apron
- var C.Alch.Loc on rack
- var C.Arm chain shirt
- var C.Artif orb
- var C.Artif.Loc in bucket
- var C.Bath towel
- var C.Bath.Num fourth
- var C.Bath.Loc on rack
- var C.Card case
- var C.Gen portable stove
- var C.Weap light crossbow
- var C.Music case of silver
- var C.Music2 tapani
- var C.Lock lockpick ring
- var C.Empath leather boots
- var C.Empath.Alt targe
- var C.Empath2 silver chart
- var C.Empath3 band
- var C.Empath3.Loc
- var C.Empath3.Alt medallion
- var C.Cler silver bell
- var C.Cler2 armband
- var C.Haber tail coat
- var C.Script satchel
- var C.Script.Num first
- var C.Tann kit
- var C.Tann.Loc
- var C.Jewel diamond wedding ring
- var C.Stitch long coat
- var C.Cobb hip boots
- var C.Herb ithor potion
- var C.Flow velvet rose
- # LETH DERIEL
- var skillrange 600-699
- var L.Skin blood wolf pelt
- var L.Bow heavy crossbow
- var L.Orig origami case
- var L.Orig.Num fifth
- var L.Weap hide shield
- var L.Wick willow backpack
- var L.Bard silverwood mirliton
- var L.Bard2 hat
- var L.Cloth silk jaque
- var L.Wood caravan
- var L.Gen mesh backpack
- var L.Gen.Alt ankle sheath
- var L.Perf venom oil
- # SHARD
- var skillrange 600-699
- var S.Gen great helm
- var S.Weap hatchet
- var S.Cleric mobar blood
- var S.Stitch gown
- var S.Alch stove
- var S.Herb ithor potion
- var S.Artif rattle
- var S.Music gittern
- var S.Armor helmet
- var S.Reed thigh bag
- var S.Reed.Num second
- var S.Museum slippers
- var S.Bow short bow
- var S.Lock quality copper lockpick
- var S.Coin coin case
- var S.Coin.Loc on table
- var S.Frill doll
- var S.Herald medium shield
- var S.Herald.Loc on rack
- var S.Gift dagger
- var S.Gift.Num
- var S.Gift.Loc on table
- var S.Toy marionette
- var S.Toy.Loc on lion
- var S.Memory flute
- var S.Memory.Num third
- var S.Token token
- var S.Token.Loc on quint
- var S.Barber silver razor
- var S.Tanner potion
- var S.Tanner.Loc on counter
- var S.Surv thigh quiver
- var S.Surv.Loc on table
- var S.Surv.Alt pack
- var S.Surv.Alt.Loc on chest
- var S.Surv2 chunenguti
- var S.Surv2.Num
- var S.Surv2.Loc on stand
- var S.Surv2.Alt short bow
- var S.Spire tabard
- # HORSE CLAN
- var skillrange 600-699
- var HC.Jahtinit flute
- var HC.Falconer pouch
- var HC.Falconer.Num third
- var HC.Yasnah shawl
- var HC.Bowyer pouch
- var HC.Bowyer.Num third
- var HC.Bowyer2 bow
- var HC.Bowyer2.Loc on stand
- var HC.Equine saddle
- var HC.Equine.Loc on rack
- var HC.Felterie amulet
- var HC.Felterie2 blanket
- # HIB AND RAVEN'S POINT
- var skillrange 600-699
- var SC.Weap adze
- var H.Shield medium shield
- var H.Shield.Loc on rack
- var H.Jewel gold chain
- var H.Tog wax
- var H.Tog.Num second
- var H.Herb lujeakave elixir
- var H.Sund haversack
- var H.Sund.Loc on rack
- var H.Lamp dragon lamp
- var H.Music horn
- var H.Alch bucket
- var H.Forge zinc bar
- var H.Forge.Loc on tab
- var RP.Gen scimitar
- var RP.Gen.Loc on rack
- var RP.Tobac tobacco pouch
- # RATHA
- var skillrange 600-699
- var R.Bait <nothing>
- var R.Gen pin
- var R.Herb bucket
- var R.Forge handaxe
- var R.Tailor jacket
- var R.Leather boots
- var R.Hair razor
- var R.Music repair kit
- var R.Magic potion
- var R.Origami case
- var R.Origami.Loc on shelf
- var R.Jewelry pectoral
- var R.Cleric mobar blood
- var R.Cleric2 crystal vial
- var R.Ring <nothing>
- # AESRY SURLAENIS'A
- var skillrange 600-699
- var A.Herb bucket
- var A.Tanner potion
- var A.Clothing robe
- var A.Script parchment
- var A.Cleric thumb ring
- var A.Origami case
- var A.Jewelry ring
- var A.Magic marble
- var A.Slings crossbow
- var A.Puzzle box
- var A.Footwear harness
- var A.Shields oval shield
- var A.Shields.Loc on table
- var A.Weapon kasai
- var A.Armor coif
- var A.Gen lantern
- var A.Flower flask
- var A.Music drum
- gosub ITEM.COUNT3
- RETURN
- ##################################
- # SKILLS 700-799
- ##################################
- CLASS13:
- # THEREN
- var skillrange 700-799
- var T.Tarsha brocade bilaud
- var T.Rose woolen cloak
- var T.Music ebony harp
- var T.Music.Num
- var T.Hats head-dress
- var T.Arm leather sheath
- var T.Gift pyramid
- var T.Sweet cake
- var T.Cupcake cupcake
- var T.Gen towel
- var T.Krrish bones
- var T.Lense telescope
- var T.Cleric mobar blood
- var T.Men vest
- var T.Women dark veil
- var T.Cloth cane
- var T.Armory longsword
- var T.Forge hilt
- # HAVEN
- var skillrange 700-799
- var RH.Herb ithor potion
- var RH.Iron chain shirt
- var RH.Naph naphtha
- var RH.Naph.Loc on cart
- var RH.Flow velvet rose
- var RH.Seli skull helm
- var RH.Arms spear
- var RH.Gen stove
- var RH.Cloth gown
- var RH.Artif cambrinth orb
- var RH.Joy troll
- var RH.Smoke barons choice
- var RH.Weap mattock
- var RH.Bard mantle
- var RH.Bard2 spirit earrings
- var RH.Cleric pomander
- var RH.Cleric2 cambrinth ring
- var RH.Lock slim lockpick
- var RH.Tog gown
- var RH.Tog2 thumb ring
- var RH.Mirg chain anklet
- var RH.Lock slim lockpick
- # ARTHE DALE
- var skillrange 700-799
- var AD.Smoke whiskey cigar
- var AD.Thread thief pattern
- var AD.Fash overall
- var AD.Odds ribbon
- var AD.Bard peri'el's song
- var AD.Map map
- var AD.Arm ring mail
- var AD.Feta biscuit
- var AD.FETA.Loc
- var AD.Tart.E tart
- var AD.Tart.C tart
- var AD.Tart.M tart
- var AD.Tart.L tart
- var AD.Tart.F tart
- var KA.Grek barrel
- # CROSSINGS
- var skillrange 700-799
- var C.Alch coat
- var C.Alch.Loc on rack
- var C.Arm scale shirt
- var C.Artif orb
- var C.Artif.Loc in bucket
- var C.Bath towel
- var C.Bath.Num second
- var C.Bath.Loc on rack
- var C.Card case
- var C.Gen portable stove
- var C.Weap greataxe
- var C.Music case of silver
- var C.Music2 tapani
- var C.Lock lockpick ring
- var C.Empath silk shirt
- var C.Empath.Alt broadsword
- var C.Empath2 silver chart
- var C.Empath3 band
- var C.Empath3.Loc
- var C.Empath3.Alt medallion
- var C.Cler silver bell
- var C.Cler2 armband
- var C.Haber tail coat
- var C.Script satchel
- var C.Script.Num first
- var C.Tann kit
- var C.Tann.Loc
- var C.Jewel diamond wedding ring
- var C.Stitch long coat
- var C.Cobb hip boots
- var C.Herb ithor potion
- var C.Flow velvet rose
- # LETH DERIEL
- var skillrange 700-799
- var L.Skin blood wolf pelt
- var L.Bow heavy crossbow
- var L.Orig.Num fifth
- var L.Orig case
- var L.Weap hide shield
- var L.Wick willow backpack
- var L.Bard silverwood mirliton
- var L.Bard2 hat
- var L.Cloth silk jaque
- var L.Wood caravan
- var L.Gen mesh backpack
- var L.Gen.Alt ankle sheath
- var L.Perf venom oil
- # SHARD
- var skillrange 700-799
- var S.Gen heavy crossbow
- var S.Weap cutlass
- var S.Cleric mobar blood
- var S.Stitch gown
- var S.Alch bucket
- var S.Herb ithor potion
- var S.Artif cambrinth ring
- var S.Music case of gold
- var S.Armor great helm
- var S.Reed anklet
- var S.Reed.Num
- var S.Museum slippers
- var S.Bow light crossbow
- var S.Lock quality copper lockpick
- var S.Coin coin case
- var S.Coin.Loc on table
- var S.Frill doll
- var S.Herald oval shield
- var S.Herald.Loc on rack
- var S.Gift glass
- var S.Gift.Num
- var S.Gift.Loc in case
- var S.Toy marionette
- var S.Toy.Loc on lion
- var S.Memory flute
- var S.Memory.Num third
- var S.Token token
- var S.Token.Loc on quint
- var S.Barber silver razor
- var S.Tanner potion
- var S.Tanner.Loc on counter
- var S.Surv helm
- var S.Surv.Loc on hook
- var S.Surv.Alt cowl
- var S.Surv.Alt.Loc on hook
- var S.Surv2 chunenguti
- var S.Surv2.Num
- var S.Surv2.Loc on stand
- var S.Surv2.Alt longbow
- var S.Spire armband
- # HORSE CLAN
- var skillrange 700-799
- var HC.Jahtinit flute
- var HC.Falconer pouch
- var HC.Falconer.Num third
- var HC.Yasnah shawl
- var HC.Bowyer pouch
- var HC.Bowyer.Num third
- var HC.Bowyer2 bow
- var HC.Bowyer2.Loc on stand
- var HC.Equine saddle
- var HC.Equine.Loc on rack
- var HC.Felterie amulet
- var HC.Felterie2 blanket
- # HIB AND RAVEN'S POINT
- var skillrange 700-799
- var SC.Weap adze
- var H.Shield medium shield
- var H.Shield.Loc on rack
- var H.Jewel necklace
- var H.Tog robe
- var H.Tog.Num
- var H.Herb lujeakave elixir
- var H.Sund broadsword
- var H.Sund.Loc on shel
- var H.Lamp dragon lamp
- var H.Music gemshorn
- var H.Alch bucket
- var H.Forge zinc bar
- var H.Forge.Loc on tab
- var RP.Gen scimitar
- var RP.Gen.Loc on rack
- var RP.Tobac tobacco pouch
- # RATHA
- var skillrange 700-799
- var R.Bait <nothing>
- var R.Gen broadsword
- var R.Herb bucket
- var R.Forge jambaya
- var R.Tailor cloak
- var R.Leather zombie mask
- var R.Hair razor
- var R.Music cittern
- var R.Magic charm
- var R.Origami case
- var R.Origami.Loc on shelf
- var R.Jewelry pectoral
- var R.Cleric mobar blood
- var R.Cleric2 crystal vial
- var R.Ring ironwood ring
- # AESRY SURLAENIS'A
- var skillrange 700-799
- var A.Herb bucket
- var A.Tanner potion
- var A.Clothing robe
- var A.Script parchment
- var A.Cleric chalice
- var A.Origami case
- var A.Jewelry pilonu
- var A.Magic marble
- var A.Slings crossbow
- var A.Puzzle box
- var A.Footwear thigh-boots
- var A.Shields oval shield
- var A.Shields.Loc on table
- var A.Weapon kasai
- var A.Armor coif
- var A.Gen lantern
- var A.Flower vial
- var A.Music drum
- gosub ITEM.COUNT3
- RETURN
- ##################################
- # SKILLS 800-899
- ##################################
- CLASS14:
- # THEREN
- var skillrange 800-899
- var T.Tarsha brocade bilaud
- var T.Rose woolen cloak
- var T.Music ebony harp
- var T.Music.Num
- var T.Hats head-dress
- var T.Arm chain handguards
- var T.Gift pyramid
- var T.Gen towel
- var T.Sweet cake
- var T.Cupcake cupcake
- var T.Krrish bowl
- var T.Lense telescope
- var T.Cleric mobar blood
- var T.Men vest
- var T.Women dark veil
- var T.Cloth cane
- var T.Armory longsword
- var T.Forge hilt
- # HAVEN
- var skillrange 800-899
- var RH.Herb ithor potion
- var RH.Iron chain shirt
- var RH.Naph naphtha
- var RH.Naph.Loc on cart
- var RH.Flow velvet rose
- var RH.Seli sheepskin robe
- var RH.Arms spear
- var RH.Gen portable stove
- var RH.Cloth gown
- var RH.Artif cambrinth orb
- var RH.Joy troll
- var RH.Smoke barons choice
- var RH.Weap mattock
- var RH.Bard mantle
- var RH.Bard2 spirit tailband
- var RH.Cleric pomander
- var RH.Cleric2 cambrinth ring
- var RH.Tog gown
- var RH.Tog2 thumb ring
- var RH.Mirg chain anklet
- var RH.Lock slim lockpick
- # ARTHE DALE
- var skillrange 800-899
- var AD.Smoke whiskey cigar
- var AD.Thread thief pattern
- var AD.Fash overall
- var AD.Odds ribbon
- var AD.Bard peri'el's song
- var AD.Map map
- var AD.Arm ring mail
- var AD.Feta biscuit
- var AD.FETA.Loc
- var AD.Tart.E tart
- var AD.Tart.C tart
- var AD.Tart.M tart
- var AD.Tart.L tart
- var AD.Tart.F tart
- var KA.Grek barrel
- # CROSSINGS
- var skillrange 800-899
- var C.Alch coat
- var C.Alch.Loc on rack
- var C.Arm scale shirt
- var C.Artif statuette
- var C.Artif.Loc on trunk
- var C.Bath towel
- var C.Bath.Num second
- var C.Bath.Loc on rack
- var C.Card case
- var C.Gen portable stove
- var C.Weap parry stick
- var C.Music case of silver
- var C.Music2 tapani
- var C.Lock lockpick ring
- var C.Empath silk shirt
- var C.Empath.Alt broadsword
- var C.Empath2 silver chart
- var C.Empath3 cebi root
- var C.Empath3.Loc
- var C.Empath3.Alt medallion
- var C.Cler silver bell
- var C.Cler2 armband
- var C.Haber tail coat
- var C.Script satchel
- var C.Script.Num fourth
- var C.Tann kit
- var C.Tann.Loc
- var C.Jewel diamond wedding ring
- var C.Stitch long coat
- var C.Cobb hip boots
- var C.Herb ithor potion
- var C.Flow velvet rose
- # LETH DERIEL
- var skillrange 800-899
- var L.Skin blood wolf pelt
- var L.Bow heavy crossbow
- var L.Orig.Num fifth
- var L.Orig case
- var L.Weap takouba
- var L.Wick willow backpack
- var L.Bard silverwood mirliton
- var L.Bard2 hat
- var L.Cloth silk jaque
- var L.Wood caravan
- var L.Gen mesh backpack
- var L.Gen.Alt ankle sheath
- var L.Perf venom oil
- # SHARD
- var skillrange 800-899
- var S.Gen leather armor
- var S.Weap axe
- var S.Cleric mobar blood
- var S.Stitch gown
- var S.Alch bucket
- var S.Herb ithor potion
- var S.Artif celestite runestone
- var S.Music case of gold
- var S.Armor great helm
- var S.Reed anklet
- var S.Reed.Num
- var S.Museum blouse
- var S.Bow silverwillow crossbow
- var S.Lock diamondique lockpick
- var S.Coin coin case
- var S.Coin.Loc on table
- var S.Frill doll
- var S.Herald oval shield
- var S.Herald.Loc on rack
- var S.Gift bracelet
- var S.Gift.Num
- var S.Gift.Loc on table
- var S.Toy doll
- var S.Toy.Loc
- var S.Memory flute
- var S.Memory.Num fourth
- var S.Token token
- var S.Token.Loc on quint
- var S.Barber silver razor
- var S.Tanner potion
- var S.Tanner.Loc on counter
- var S.Surv cap
- var S.Surv.Loc on hook
- var S.Surv.Alt cowl
- var S.Surv.Alt.Loc on hook
- var S.Surv2 chunenguti
- var S.Surv2.Num
- var S.Surv2.Loc on stand
- var S.Surv2.Alt longbow
- var S.Spire armband
- # HORSE CLAN
- var skillrange 800-899
- var HC.Jahtinit didjeridu
- var HC.Falconer pouch
- var HC.Falconer.Num third
- var HC.Yasnah shawl
- var HC.Bowyer pouch
- var HC.Bowyer.Num third
- var HC.Bowyer2 bow
- var HC.Bowyer2.Loc on stand
- var HC.Equine saddle
- var HC.Equine.Loc on rack
- var HC.Felterie robe
- var HC.Felterie2 blanket
- # HIB AND RAVEN'S POINT
- var skillrange 800-899
- var SC.Weap adze
- var H.Shield medium shield
- var H.Shield.Loc on rack
- var H.Jewel necklace
- var H.Tog robe
- var H.Tog.Num
- var H.Herb lujeakave elixir
- var H.Sund broadsword
- var H.Sund.Loc on shel
- var H.Lamp dragon lamp
- var H.Music bagpipe
- var H.Alch bucket
- var H.Forge zinc bar
- var H.Forge.Loc on tab
- var RP.Gen backpack
- var RP.Gen.Loc on table
- var RP.Tobac tobacco pouch
- # RATHA
- var skillrange 800-899
- var R.Bait <nothing>
- var R.Gen pike
- var R.Herb bucket
- var R.Forge jambaya
- var R.Tailor cloak
- var R.Leather zombie mask
- var R.Hair razor
- var R.Music cittern
- var R.Magic charm
- var R.Origami case
- var R.Origami.Loc on shelf
- var R.Jewelry pectoral
- var R.Cleric mobar blood
- var R.Cleric2 prayer beads
- var R.Ring ironwood ring
- # AESRY SURLAENIS'A
- var skillrange 800-899
- var A.Herb bucket
- var A.Tanner potion
- var A.Clothing robe
- var A.Script parchment
- var A.Cleric chalice
- var A.Origami case
- var A.Jewelry pilonu
- var A.Magic marble
- var A.Slings crossbow
- var A.Puzzle box
- var A.Footwear thigh-boots
- var A.Shields oval shield
- var A.Shields.Loc on table
- var A.Weapon kasai
- var A.Armor coif
- var A.Gen lantern
- var A.Flower vial
- var A.Music drum
- gosub ITEM.COUNT3
- RETURN
- ##################################
- # SKILLS 900-999
- ##################################
- CLASS15:
- # THEREN
- var skillrange 900-999
- var T.Tarsha brocade bilaud
- var T.Rose woolen cloak
- var T.Music ebony harp
- var T.Music.Num
- var T.Hats head-dress
- var T.Arm chain handguards
- var T.Gift pyramid
- var T.Gen towel
- var T.Sweet cake
- var T.Cupcake cupcake
- var T.Krrish bowl
- var T.Lense telescope
- var T.Cleric mobar blood
- var T.Men tunic
- var T.Women dark veil
- var T.Cloth gold cufflinks
- var T.Armory pick
- var T.Forge hilt
- # HAVEN
- var skillrange 900-999
- var RH.Herb ithor potion
- var RH.Iron chain shirt
- var RH.Naph naphtha
- var RH.Naph.Loc on cart
- var RH.Flow velvet rose
- var RH.Seli sheepskin robe
- var RH.Arms flamberge
- var RH.Gen portable stove
- var RH.Cloth gown
- var RH.Artif cambrinth orb
- var RH.Joy troll
- var RH.Smoke barons choice
- var RH.Weap lucerne hammer
- var RH.Bard mantle
- var RH.Bard2 spirit tailband
- var RH.Cleric pomander
- var RH.Cleric2 cambrinth ring
- var RH.Tog gown
- var RH.Tog2 thumb ring
- var RH.Mirg chainmail belt
- var RH.Lock slim lockpick
- # ARTHE DALE
- var skillrange 900-999
- var AD.Smoke whiskey cigar
- var AD.Thread thief pattern
- var AD.Fash overall
- var AD.Odds ribbon
- var AD.Bard peri'el's song
- var AD.Map map
- var AD.Arm ring mail
- var AD.Feta biscuit
- var AD.FETA.Loc
- var AD.Tart.E tart
- var AD.Tart.C tart
- var AD.Tart.M tart
- var AD.Tart.L tart
- var AD.Tart.F tart
- var KA.Grek barrel
- # CROSSINGS
- var skillrange 900-999
- var C.Alch toolbox
- var C.Alch.Loc on counter
- var C.Arm plate fauld
- var C.Artif statuette
- var C.Artif.Loc on trunk
- var C.Bath towel
- var C.Bath.Num second
- var C.Bath.Loc on rack
- var C.Card case
- var C.Gen portable stove
- var C.Weap parry stick
- var C.Music case of silver
- var C.Music2 tapani
- var C.Lock lockpick ring
- var C.Empath silk shirt
- var C.Empath.Alt broadsword
- var C.Empath2 rock chart
- var C.Empath3 cebi root
- var C.Empath3.Loc
- var C.Empath3.Alt medallion
- var C.Cler silver bell
- var C.Cler2 armband
- var C.Haber tail coat
- var C.Script satchel
- var C.Script.Num third
- var C.Tann kit
- var C.Tann.Loc
- var C.Jewel diamond wedding ring
- var C.Stitch long coat
- var C.Cobb hip boots
- var C.Herb ithor potion
- var C.Flow velvet rose
- # LETH DERIEL
- var skillrange 900-999
- var L.Skin blood wolf pelt
- var L.Bow heavy crossbow
- var L.Orig origami case
- var L.Orig.Num fifth
- var L.Weap takouba
- var L.Wick willow backpack
- var L.Bard silverwood mirliton
- var L.Bard2 hat
- var L.Cloth silk jaque
- var L.Wood caravan
- var L.Gen mesh backpack
- var L.Gen.Alt ankle sheath
- var L.Perf venom oil
- # SHARD
- var skillrange 900-999
- var S.Gen chain armor
- var S.Weap axe
- var S.Cleric mobar blood
- var S.Stitch gown
- var S.Alch bucket
- var S.Herb ithor potion
- var S.Artif celestite runestone
- var S.Music case of gold
- var S.Armor great helm
- var S.Reed backpack
- var S.Reed.Num
- var S.Museum earring
- var S.Bow silverwillow crossbow
- var S.Lock diamondique lockpick
- var S.Coin coin case
- var S.Coin.Loc on table
- var S.Frill doll
- var S.Herald oval shield
- var S.Herald.Loc on rack
- var S.Gift globe
- var S.Gift.Num
- var S.Gift.Loc on counter
- var S.Toy museum globe
- var S.Toy.Loc on lion
- var S.Memory wrap
- var S.Memory.Num
- var S.Token token
- var S.Token.Loc on quint
- var S.Barber silver razor
- var S.Tanner potion
- var S.Tanner.Loc on counter
- var S.Surv mining cap
- var S.Surv.Loc on hook
- var S.Surv.Alt mining helm
- var S.Surv.Alt.Loc on hook
- var S.Surv2 chunenguti
- var S.Surv2.Num
- var S.Surv2.Loc on stand
- var S.Surv2.Alt longbow
- var S.Spire armband
- # HORSE CLAN
- var skillrange 900-999
- var HC.Jahtinit skull
- var HC.Falconer pouch
- var HC.Falconer.Num third
- var HC.Yasnah cloak
- var HC.Bowyer pouch
- var HC.Bowyer.Num third
- var HC.Bowyer2 bow
- var HC.Bowyer2.Loc on rack
- var HC.Equine bridle
- var HC.Equine.Loc on table
- var HC.Felterie slippers
- var HC.Felterie2 blanket
- # HIB AND RAVEN'S POINT
- var skillrange 900-999
- var SC.Weap adze
- var H.Shield kwarf
- var H.Shield.Loc on shelf
- var H.Jewel necklace
- var H.Tog robe
- var H.Tog.Num
- var H.Herb lujeakave elixir
- var H.Sund envelope
- var H.Sund.Loc on desk
- var H.Lamp dragon lamp
- var H.Music bagpipe
- var H.Alch bucket
- var H.Forge zinc bar
- var H.Forge.Loc on tab
- var RP.Gen hammer
- var RP.Gen.Loc on rack
- var RP.Tobac tobacco pouch
- # RATHA
- var skillrange 900-999
- var R.Bait <nothing>
- var R.Gen drop-trigger crossbow
- var R.Herb bucket
- var R.Forge jambaya
- var R.Tailor cloak
- var R.Leather zombie mask
- var R.Hair razor
- var R.Music cittern
- var R.Magic charm
- var R.Origami case
- var R.Origami.Loc on shelf
- var R.Jewelry pectoral
- var R.Cleric mobar blood
- var R.Cleric2 prayer beads
- var R.Ring garnet ring
- # AESRY SURLAENIS'A
- var skillrange 900-999
- var A.Herb bucket
- var A.Tanner potion
- var A.Clothing robe
- var A.Script parchment
- var A.Cleric chalice
- var A.Origami case
- var A.Jewelry pilonu
- var A.Magic marble
- var A.Slings crossbow
- var A.Puzzle box
- var A.Footwear thigh-boots
- var A.Shields oval shield
- var A.Shields.Loc on table
- var A.Weapon kasai
- var A.Armor coif
- var A.Gen lantern
- var A.Flower vial
- var A.Music drum
- gosub ITEM.COUNT3
- RETURN
- ##################################
- # SKILLS 1000-1200
- ##################################
- CLASS16:
- CLASS17:
- CLASS18:
- CLASS19:
- CLASS20:
- var skillrange 1000-1200+
- var T.Tarsha brocade bilaud
- var T.Rose woolen cloak
- var T.Music bagpipe
- var T.Music.Num third
- var T.Hats head-dress
- var T.Arm chain handguards
- var T.Gift pyramid
- var T.Gen towel
- var T.Sweet cake
- var T.Cupcake cupcake
- var T.Krrish bowl
- var T.Lense telescope
- var T.Cleric mobar blood
- var T.Men tunic
- var T.Women dark veil
- var T.Cloth cane
- var T.Armory longsword
- var T.Forge hilt
- var skillrange 1000-1200
- var RH.Herb ithor potion
- var RH.Iron chain shirt
- var RH.Naph naphtha
- var RH.Naph.Loc on cart
- var RH.Flow velvet rose
- var RH.Seli sheepskin robe
- var RH.Arms flamberge
- var RH.Gen portable stove
- var RH.Cloth gown
- var RH.Artif cambrinth orb
- var RH.Joy troll
- var RH.Smoke barons choice
- var RH.Weap lucerne hammer
- var RH.Bard silk mantle
- var RH.Bard2 knot tailband
- var RH.Cleric pomander
- var RH.Cleric2 cambrinth ring
- var RH.Tog diadem
- var RH.Tog2 slippers
- var RH.Mirg charm
- var RH.Lock slim lockpick
- # ARTHE DALE
- var skillrange 1000-1200+
- var AD.Smoke whiskey cigar
- var AD.Thread thief pattern
- var AD.Fash overall
- var AD.Odds scarf
- var AD.Bard peri'el's song
- var AD.Map map
- var AD.Arm ring mail
- var AD.Feta biscuit
- var AD.FETA.Loc
- var AD.Tart.E tart
- var AD.Tart.C tart
- var AD.Tart.M tart
- var AD.Tart.L tart
- var AD.Tart.F tart
- var KA.Grek barrel
- # CROSSINGS
- var skillrange 1000-1200+
- var C.Alch toolbox
- var C.Alch.Loc on counter
- var C.Arm plate fauld
- var C.Artif staff
- var C.Artif.Loc on trunk
- var C.Bath towel
- var C.Bath.Num second
- var C.Bath.Loc on rack
- var C.Card case
- var C.Gen portable stove
- var C.Weap parry stick
- var C.Music case of silver
- var C.Music2 tapani
- var C.Lock lockpick ring
- var C.Empath silk shirt
- var C.Empath.Alt broadsword
- var C.Empath2 rock chart
- var C.Empath3 cebi root
- var C.Empath3.Loc
- var C.Empath3.Alt medallion
- var C.Cler silver bell
- var C.Cler2 armband
- var C.Haber tail coat
- var C.Script satchel
- var C.Script.Num third
- var C.Tann kit
- var C.Tann.Loc
- var C.Jewel diamond wedding ring
- var C.Stitch long coat
- var C.Cobb hip boots
- var C.Herb ithor potion
- var C.Flow velvet rose
- # LETH DERIEL
- var skillrange 1000-1200+
- var L.Skin blood wolf pelt
- var L.Bow heavy crossbow
- var L.Orig.Num fifth
- var L.Orig case
- var L.Weap takouba
- var L.Wick willow backpack
- var L.Bard silverwood mirliton
- var L.Bard2 leather songbook
- var L.Cloth silk jaque
- var L.Wood caravan
- var L.Gen mesh tunic
- var L.Gen.Alt mesh backpack
- var L.Perf venom oil
- # SHARD
- var skillrange 1000-1200
- var S.Gen chain armor
- var S.Weap blade
- var S.Cleric mobar blood
- var S.Stitch gown
- var S.Alch bucket
- var S.Herb ithor potion
- var S.Artif celestite runestone
- var S.Music case of gold
- var S.Armor great helm
- var S.Reed duffel bag
- var S.Reed.Num
- var S.Museum globe
- var S.Bow ironwood crossbow
- var S.Lock diamondique lockpick
- var S.Coin coin case
- var S.Coin.Loc on table
- var S.Frill doll
- var S.Herald oval shield
- var S.Herald.Loc on rack
- var S.Gift globe
- var S.Gift.Num
- var S.Gift.Loc on counter
- var S.Toy marionette
- var S.Toy.Loc on lion
- var S.Memory wrap
- var S.Memory.Num
- var S.Token token
- var S.Token.Loc on quint
- var S.Barber silver razor
- var S.Barber.Num
- var S.Tanner potion
- var S.Tanner.Loc on counter
- var S.Surv cap
- var S.Surv.Loc on hook
- var S.Surv.Alt cowl
- var S.Surv.Alt.Loc on hook
- var S.Surv2 chunenguti
- var S.Surv2.Num
- var S.Surv2.Loc on stand
- var S.Surv2.Alt longbow
- var S.Spire armband
- # HORSE CLAN
- var skillrange 1000-1200+
- var HC.Jahtinit skull
- var HC.Falconer pouch
- var HC.Falconer.Num third
- var HC.Yasnah cloak
- var HC.Bowyer pouch
- var HC.Bowyer.Num third
- var HC.Bowyer2 bow
- var HC.Bowyer2.Loc on rack
- var HC.Equine bridle
- var HC.Equine.Loc on table
- var HC.Felterie gutalles
- var HC.Felterie2 blanket
- # HIB AND RAVEN'S POINT
- var skillrange 1000-1200+
- var SC.Weap adze
- var H.Shield curved shield
- var H.Shield.Loc on shelf
- var H.Jewel necklace
- var H.Tog robe
- var H.Tog.Num
- var H.Herb lujeakave elixir
- var H.Sund envelope
- var H.Sund.Loc on desk
- var H.Lamp dragon lamp
- var H.Music bagpipe
- var H.Alch bucket
- var H.Forge zinc bar
- var H.Forge.Loc on tab
- var RP.Gen hammer
- var RP.Gen.Loc on rack
- var RP.Tobac tobacco pouch
- # RATHA
- var skillrange 1000-1200+
- var R.Bait <nothing>
- var R.Gen windlass-drawn crossbow
- var R.Herb bucket
- var R.Forge jambaya
- var R.Tailor cloak
- var R.Leather zombie mask
- var R.Hair razor
- var R.Music cittern
- var R.Magic charm
- var R.Origami case
- var R.Origami.Loc on shelf
- var R.Jewelry pectoral
- var R.Cleric mobar blood
- var R.Cleric2 gold vial
- var R.Ring garnet ring
- # AESRY SURLAENIS'A
- var skillrange 1000-1200+
- var A.Herb bucket
- var A.Tanner potion
- var A.Clothing robe
- var A.Script parchment
- var A.Cleric chalice
- var A.Origami case
- var A.Jewelry pilonu
- var A.Magic marble
- var A.Slings crossbow
- var A.Puzzle box
- var A.Footwear thigh-boots
- var A.Shields oval shield
- var A.Shields.Loc on table
- var A.Weapon kasai
- var A.Armor coif
- var A.Gen lantern
- var A.Flower vial
- var A.Music drum
- gosub ITEM.COUNT3
- RETURN
- ##########################################################################################
- # END OF STEAL VARIABLES
- ##########################################################################################
- ###############################################
- # ITEM QUANTITY
- # DEFINES STEALCOUNT PER SHOP FOR NON-THIEVES
- ###############################################
- ########################
- # 0-49
- ########################
- ITEM.COUNT0:
- var T.TarshaQuant 1
- var T.RoseQuant 1
- var T.MusicQuant 1
- var T.HatsQuant 1
- var T.ArmQuant 1
- var T.GiftQuant 1
- var T.SweetQuant 1
- var T.CupcakeQuant 1
- var T.GenQuant 1
- var T.KrrishQuant 1
- var T.LenseQuant 1
- var T.ClericQuant 1
- var T.MenQuant 1
- var T.WomenQuant 1
- var T.ClothQuant 1
- var T.ArmoryQuant 1
- var T.ForgeQuant 1
- var RH.HerbQuant 3
- var RH.IronQuant 1
- var RH.NaphQuant 1
- var RH.FlowQuant 2
- var RH.SeliQuant 1
- var RH.ArmsQuant 1
- var RH.GenQuant 1
- var RH.ClothQuant 1
- var RH.ArtifQuant 1
- var RH.JoyQuant 1
- var RH.SmokeQuant 1
- var RH.WeapQuant 1
- var RH.BardQuant 1
- var RH.Bard2Quant 1
- var RH.ClericQuant 1
- var RH.Cleric2Quant 1
- var RH.LockQuant 1
- var RH.TogQuant 1
- var RH.Tog2Quant 1
- var RH.MirgQuant 1
- var AD.FetaQuant 1
- var AD.ThreadQuant 1
- var AD.FashQuant 1
- var AD.OddsQuant 1
- var AD.BardQuant 1
- var AD.MapQuant 1
- var AD.ArmQuant 1
- var AD.SmokeQuant 1
- var AD.Tart.EQuant 1
- var AD.Tart.CQuant 1
- var AD.Tart.MQuant 1
- var AD.Tart.LQuant 1
- var AD.Tart.FQuant 1
- var KA.GrekQuant 1
- var C.AlchQuant 6
- var C.ArtifQuant 1
- var C.BathQuant 1
- var C.CardQuant 1
- var C.GenQuant 4
- var C.WeapQuant 1
- var C.ArmQuant 1
- var C.MusicQuant 1
- var C.Music2Quant 1
- var C.LockQuant 1
- var C.EmpathQuant 1
- var C.Empath2Quant 1
- var C.Empath3Quant 1
- var C.ClerQuant 2
- var C.HaberQuant 2
- var C.ScriptQuant 1
- var C.TannQuant 1
- var C.JewelQuant 1
- var C.StitchQuant 2
- var C.CobbQuant 1
- var C.HerbQuant 2
- var C.FlowQuant 2
- var L.SkinQuant 1
- var L.BowQuant 1
- var L.OrigQuant 1
- var L.WeapQuant 1
- var L.WickQuant 1
- var L.BardQuant 1
- var L.Bard2Quant 1
- var L.ClothQuant 1
- var L.WoodQuant 1
- var L.GenQuant 1
- var L.PerfQuant 1
- var S.GenQuant 2
- var S.WeapQuant 1
- var S.ClericQuant 1
- var S.StitchQuant 1
- var S.AlchQuant 4
- var S.HerbQuant 1
- var S.ArtifQuant 1
- var S.MusicQuant 1
- var S.ArmorQuant 1
- var S.ReedQuant 1
- var S.MuseumQuant 1
- var S.BowQuant 1
- var S.SpireQuant 1
- var S.LockQuant 1
- var S.CoinQuant 1
- var S.FrillQuant 1
- var S.HeraldQuant 1
- var S.GiftQuant 1
- var S.ToyQuant 1
- var S.MemoryQuant 1
- var S.TokenQuant 1
- var S.BarberQuant 1
- var S.TannerQuant 1
- var S.SurvQuant 1
- var S.Surv2Quant 1
- var RP.GenQuant 1
- var RP.TobacQuant 1
- var HC.JahtinitQuant 1
- var HC.FalconerQuant 1
- var HC.YasnahQuant 1
- var HC.BowyerQuant 1
- var HC.Bowyer2Quant 1
- var HC.EquineQuant 1
- var HC.FelterieQuant 1
- var HC.Felterie2Quant 1
- var SC.WeapQuant 1
- var H.ShieldQuant 1
- var H.JewelQuant 1
- var H.TogQuant 1
- var H.HerbQuant 1
- var H.SundQuant 1
- var H.LampQuant 3
- var H.MusicQuant 1
- var H.AlchQuant 1
- var H.ForgeQuant 1
- var H.GenQuant 1
- var H.TobacQuant 1
- var R.BaitQuant 1
- var R.GenQuant 1
- var R.HerbQuant 3
- var R.ForgeQuant 1
- var R.TailorQuant 1
- var R.LeatherQuant 1
- var R.HairQuant 1
- var R.MusicQuant 1
- var R.MagicQuant 1
- var R.OrigamiQuant 1
- var R.JewelryQuant 1
- var R.ClericQuant 1
- var R.RingQuant 1
- var A.HerbQuant 3
- var A.TannerQuant 1
- var A.ClothingQuant 1
- var A.ScriptQuant 1
- var A.ClericQuant 1
- var A.OrigamiQuant 1
- var A.JewelryQuant 1
- var A.MagicQuant 1
- var A.SlingsQuant 1
- var A.PuzzleQuant 1
- var A.FootwearQuant 1
- var A.ShieldsQuant 1
- var A.WeaponQuant 1
- var A.ArmorQuant 1
- var A.GenQuant 1
- var A.FlowerQuant 1
- var A.MusicQuant 1
- RETURN
- ########################
- # 50-199
- ########################
- ITEM.COUNT1:
- var T.TarshaQuant 1
- var T.RoseQuant 1
- var T.MusicQuant 1
- var T.HatsQuant 1
- var T.ArmQuant 1
- var T.GiftQuant 1
- var T.SweetQuant 1
- var T.CupcakeQuant 1
- var T.GenQuant 1
- var T.KrrishQuant 1
- var T.LenseQuant 1
- var T.ClericQuant 1
- var T.MenQuant 1
- var T.WomenQuant 1
- var T.ClothQuant 1
- var T.ArmoryQuant 1
- var T.ForgeQuant 1
- var RH.HerbQuant 3
- var RH.IronQuant 1
- var RH.NaphQuant 1
- var RH.FlowQuant 2
- var RH.SeliQuant 1
- var RH.ArmsQuant 1
- var RH.GenQuant 1
- var RH.ClothQuant 1
- var RH.ArtifQuant 1
- var RH.JoyQuant 1
- var RH.SmokeQuant 1
- var RH.WeapQuant 1
- var RH.BardQuant 1
- var RH.Bard2Quant 1
- var RH.ClericQuant 1
- var RH.Cleric2Quant 1
- var RH.LockQuant 1
- var RH.TogQuant 1
- var RH.Tog2Quant 1
- var RH.MirgQuant 1
- var AD.FetaQuant 1
- var AD.ThreadQuant 1
- var AD.FashQuant 1
- var AD.OddsQuant 1
- var AD.BardQuant 1
- var AD.MapQuant 1
- var AD.ArmQuant 1
- var AD.SmokeQuant 1
- var AD.Tart.EQuant 1
- var AD.Tart.CQuant 1
- var AD.Tart.MQuant 1
- var AD.Tart.LQuant 1
- var AD.Tart.FQuant 1
- var KA.GrekQuant 1
- var C.AlchQuant 2
- var C.ArtifQuant 1
- var C.BathQuant 1
- var C.CardQuant 1
- var C.GenQuant 2
- var C.WeapQuant 1
- var C.ArmQuant 1
- var C.MusicQuant 1
- var C.Music2Quant 1
- var C.LockQuant 1
- var C.EmpathQuant 1
- var C.Empath2Quant 1
- var C.Empath3Quant 1
- var C.ClerQuant 1
- var C.HaberQuant 2
- var C.ScriptQuant 1
- var C.TannQuant 1
- var C.JewelQuant 1
- var C.StitchQuant 2
- var C.CobbQuant 2
- var C.HerbQuant 2
- var C.FlowQuant 2
- var L.SkinQuant 1
- var L.BowQuant 1
- var L.OrigQuant 1
- var L.WeapQuant 1
- var L.WickQuant 1
- var L.BardQuant 1
- var L.Bard2Quant 1
- var L.ClothQuant 1
- var L.WoodQuant 1
- var L.GenQuant 1
- var L.PerfQuant 1
- var S.GenQuant 2
- var S.WeapQuant 1
- var S.ClericQuant 1
- var S.StitchQuant 1
- var S.AlchQuant 1
- var S.HerbQuant 1
- var S.ArtifQuant 1
- var S.MusicQuant 1
- var S.ArmorQuant 1
- var S.ReedQuant 1
- var S.MuseumQuant 1
- var S.BowQuant 1
- var S.SpireQuant 1
- var S.LockQuant 1
- var S.CoinQuant 1
- var S.FrillQuant 1
- var S.HeraldQuant 1
- var S.GiftQuant 1
- var S.ToyQuant 1
- var S.MemoryQuant 1
- var S.TokenQuant 1
- var S.BarberQuant 1
- var S.TannerQuant 1
- var S.SurvQuant 1
- var S.Surv2Quant 1
- var RP.GenQuant 1
- var RP.TobacQuant 1
- var HC.JahtinitQuant 1
- var HC.FalconerQuant 1
- var HC.YasnahQuant 1
- var HC.BowyerQuant 1
- var HC.Bowyer2Quant 1
- var HC.EquineQuant 1
- var HC.FelterieQuant 1
- var HC.Felterie2Quant 1
- var SC.WeapQuant 1
- var H.ShieldQuant 1
- var H.JewelQuant 1
- var H.TogQuant 1
- var H.HerbQuant 1
- var H.SundQuant 1
- var H.LampQuant 1
- var H.MusicQuant 1
- var H.AlchQuant 1
- var H.ForgeQuant 1
- var H.GenQuant 1
- var H.TobacQuant 1
- var R.BaitQuant 1
- var R.GenQuant 1
- var R.HerbQuant 1
- var R.ForgeQuant 1
- var R.TailorQuant 1
- var R.LeatherQuant 1
- var R.HairQuant 1
- var R.MusicQuant 1
- var R.MagicQuant 1
- var R.OrigamiQuant 1
- var R.JewelryQuant 1
- var R.ClericQuant 1
- var R.RingQuant 1
- var A.HerbQuant 2
- var A.TannerQuant 1
- var A.ClothingQuant 1
- var A.ScriptQuant 1
- var A.ClericQuant 1
- var A.OrigamiQuant 1
- var A.JewelryQuant 1
- var A.MagicQuant 1
- var A.SlingsQuant 1
- var A.PuzzleQuant 1
- var A.FootwearQuant 1
- var A.ShieldsQuant 1
- var A.WeaponQuant 1
- var A.ArmorQuant 1
- var A.GenQuant 1
- var A.FlowerQuant 1
- var A.MusicQuant 1
- RETURN
- ########################
- # 200-599
- ########################
- ITEM.COUNT2:
- var T.TarshaQuant 1
- var T.RoseQuant 1
- var T.MusicQuant 1
- var T.HatsQuant 1
- var T.ArmQuant 1
- var T.GiftQuant 1
- var T.SweetQuant 2
- var T.CupcakeQuant 1
- var T.GenQuant 1
- var T.KrrishQuant 1
- var T.LenseQuant 1
- var T.ClericQuant 1
- var T.MenQuant 1
- var T.WomenQuant 1
- var T.ClothQuant 1
- var T.ArmoryQuant 1
- var T.ForgeQuant 1
- var RH.HerbQuant 2
- var RH.IronQuant 1
- var RH.NaphQuant 1
- var RH.FlowQuant 2
- var RH.SeliQuant 1
- var RH.ArmsQuant 1
- var RH.GenQuant 2
- var RH.ClothQuant 1
- var RH.ArtifQuant 1
- var RH.JoyQuant 1
- var RH.SmokeQuant 1
- var RH.WeapQuant 1
- var RH.BardQuant 1
- var RH.Bard2Quant 1
- var RH.ClericQuant 1
- var RH.Cleric2Quant 1
- var RH.LockQuant 1
- var RH.TogQuant 1
- var RH.Tog2Quant 1
- var RH.MirgQuant 1
- var AD.FetaQuant 1
- var AD.ThreadQuant 1
- var AD.FashQuant 1
- var AD.OddsQuant 1
- var AD.BardQuant 1
- var AD.MapQuant 1
- var AD.ArmQuant 1
- var AD.SmokeQuant 1
- var AD.Tart.EQuant 1
- var AD.Tart.CQuant 1
- var AD.Tart.MQuant 1
- var AD.Tart.LQuant 1
- var AD.Tart.FQuant 1
- var KA.GrekQuant 1
- var C.AlchQuant 2
- var C.ArtifQuant 1
- var C.BathQuant 1
- var C.CardQuant 1
- var C.GenQuant 2
- var C.WeapQuant 1
- var C.ArmQuant 1
- var C.MusicQuant 1
- var C.Music2Quant 1
- var C.LockQuant 1
- var C.EmpathQuant 1
- var C.Empath2Quant 1
- var C.Empath3Quant 1
- var C.ClerQuant 1
- var C.HaberQuant 1
- var C.ScriptQuant 1
- var C.TannQuant 1
- var C.JewelQuant 1
- var C.StitchQuant 1
- var C.CobbQuant 1
- var C.HerbQuant 1
- var C.FlowQuant 1
- var L.SkinQuant 3
- var L.BowQuant 1
- var L.OrigQuant 1
- var L.WeapQuant 1
- var L.WickQuant 1
- var L.BardQuant 1
- var L.Bard2Quant 1
- var L.ClothQuant 1
- var L.WoodQuant 1
- var L.GenQuant 1
- var L.PerfQuant 1
- var S.GenQuant 2
- var S.WeapQuant 1
- var S.ClericQuant 1
- var S.StitchQuant 1
- var S.AlchQuant 1
- var S.HerbQuant 1
- var S.ArtifQuant 1
- var S.MusicQuant 1
- var S.ArmorQuant 1
- var S.ReedQuant 1
- var S.MuseumQuant 1
- var S.BowQuant 1
- var S.SpireQuant 1
- var S.LockQuant 1
- var S.CoinQuant 1
- var S.FrillQuant 1
- var S.HeraldQuant 1
- var S.GiftQuant 1
- var S.ToyQuant 1
- var S.MemoryQuant 1
- var S.TokenQuant 1
- var S.BarberQuant 1
- var S.TannerQuant 1
- var S.SurvQuant 1
- var S.Surv2Quant 1
- var RP.GenQuant 1
- var RP.TobacQuant 1
- var HC.JahtinitQuant 2
- var HC.FalconerQuant 2
- var HC.YasnahQuant 2
- var HC.BowyerQuant 2
- var HC.Bowyer2Quant 2
- var HC.EquineQuant 2
- var HC.FelterieQuant 2
- var HC.Felterie2Quant 1
- var SC.WeapQuant 1
- var H.ShieldQuant 1
- var H.JewelQuant 1
- var H.TogQuant 1
- var H.HerbQuant 1
- var H.SundQuant 1
- var H.LampQuant 1
- var H.MusicQuant 1
- var H.AlchQuant 1
- var H.ForgeQuant 1
- var H.GenQuant 1
- var H.TobacQuant 1
- var R.BaitQuant 1
- var R.GenQuant 1
- var R.HerbQuant 1
- var R.ForgeQuant 1
- var R.TailorQuant 1
- var R.LeatherQuant 1
- var R.HairQuant 1
- var R.MusicQuant 1
- var R.MagicQuant 1
- var R.OrigamiQuant 1
- var R.JewelryQuant 1
- var R.ClericQuant 1
- var R.RingQuant 1
- var A.HerbQuant 1
- var A.TannerQuant 1
- var A.ClothingQuant 1
- var A.ScriptQuant 1
- var A.ClericQuant 1
- var A.OrigamiQuant 1
- var A.JewelryQuant 1
- var A.MagicQuant 1
- var A.SlingsQuant 1
- var A.PuzzleQuant 1
- var A.FootwearQuant 1
- var A.ShieldsQuant 1
- var A.WeaponQuant 1
- var A.ArmorQuant 1
- var A.GenQuant 1
- var A.FlowerQuant 1
- var A.MusicQuant 1
- RETURN
- ########################
- # 600-1500
- ########################
- ITEM.COUNT3:
- var T.TarshaQuant 1
- var T.RoseQuant 2
- var T.MusicQuant 2
- var T.HatsQuant 2
- var T.ArmQuant 2
- var T.GiftQuant 2
- var T.SweetQuant 2
- var T.CupcakeQuant 1
- var T.GenQuant 1
- var T.KrrishQuant 1
- var T.LenseQuant 1
- var T.ClericQuant 1
- var T.MenQuant 1
- var T.WomenQuant 1
- var T.ClothQuant 1
- var T.ArmoryQuant 1
- var T.ForgeQuant 1
- var RH.HerbQuant 2
- var RH.IronQuant 1
- var RH.NaphQuant 1
- var RH.FlowQuant 2
- var RH.SeliQuant 2
- var RH.ArmsQuant 1
- var RH.GenQuant 2
- var RH.ClothQuant 1
- var RH.ArtifQuant 1
- var RH.JoyQuant 1
- var RH.SmokeQuant 1
- var RH.WeapQuant 1
- var RH.BardQuant 1
- var RH.Bard2Quant 1
- var RH.ClericQuant 1
- var RH.Cleric2Quant 1
- var RH.LockQuant 2
- var RH.TogQuant 1
- var RH.Tog2Quant 1
- var RH.MirgQuant 1
- var AD.FetaQuant 1
- var AD.ThreadQuant 2
- var AD.FashQuant 1
- var AD.OddsQuant 1
- var AD.BardQuant 1
- var AD.MapQuant 1
- var AD.ArmQuant 1
- var AD.SmokeQuant 1
- var AD.Tart.EQuant 1
- var AD.Tart.CQuant 1
- var AD.Tart.MQuant 1
- var AD.Tart.LQuant 1
- var AD.Tart.FQuant 1
- var KA.GrekQuant 1
- var C.AlchQuant 2
- var C.ArtifQuant 1
- var C.BathQuant 2
- var C.CardQuant 1
- var C.GenQuant 2
- var C.WeapQuant 2
- var C.ArmQuant 1
- var C.MusicQuant 1
- var C.Music2Quant 1
- var C.LockQuant 1
- var C.EmpathQuant 1
- var C.Empath2Quant 1
- var C.Empath3Quant 1
- var C.ClerQuant 1
- var C.HaberQuant 2
- var C.ScriptQuant 1
- var C.TannQuant 1
- var C.JewelQuant 1
- var C.StitchQuant 1
- var C.CobbQuant 1
- var C.HerbQuant 1
- var C.FlowQuant 1
- var L.SkinQuant 2
- var L.BowQuant 1
- var L.OrigQuant 1
- var L.WeapQuant 1
- var L.WickQuant 1
- var L.BardQuant 2
- var L.Bard2Quant 1
- var L.ClothQuant 1
- var L.WoodQuant 1
- var L.GenQuant 1
- var L.PerfQuant 1
- var S.GenQuant 2
- var S.WeapQuant 1
- var S.ClericQuant 1
- var S.StitchQuant 1
- var S.AlchQuant 1
- var S.HerbQuant 1
- var S.ArtifQuant 1
- var S.MusicQuant 1
- var S.ArmorQuant 1
- var S.ReedQuant 1
- var S.MuseumQuant 1
- var S.BowQuant 1
- var S.SpireQuant 1
- var S.LockQuant 1
- var S.CoinQuant 1
- var S.FrillQuant 1
- var S.HeraldQuant 1
- var S.GiftQuant 1
- var S.ToyQuant 1
- var S.MemoryQuant 1
- var S.TokenQuant 1
- var S.BarberQuant 1
- var S.TannerQuant 1
- var S.SurvQuant 1
- var S.Surv2Quant 1
- var RP.GenQuant 1
- var RP.TobacQuant 1
- var HC.JahtinitQuant 2
- var HC.FalconerQuant 2
- var HC.YasnahQuant 2
- var HC.BowyerQuant 2
- var HC.Bowyer2Quant 2
- var HC.EquineQuant 2
- var HC.FelterieQuant 2
- var HC.Felterie2Quant 1
- var SC.WeapQuant 1
- var H.ShieldQuant 1
- var H.JewelQuant 1
- var H.TogQuant 1
- var H.HerbQuant 1
- var H.SundQuant 1
- var H.LampQuant 1
- var H.MusicQuant 1
- var H.AlchQuant 1
- var H.ForgeQuant 1
- var H.GenQuant 1
- var H.TobacQuant 1
- var R.BaitQuant 1
- var R.GenQuant 1
- var R.HerbQuant 1
- var R.ForgeQuant 1
- var R.TailorQuant 1
- var R.LeatherQuant 1
- var R.HairQuant 1
- var R.MusicQuant 1
- var R.MagicQuant 1
- var R.OrigamiQuant 1
- var R.JewelryQuant 1
- var R.ClericQuant 1
- var R.RingQuant 1
- var A.HerbQuant 1
- var A.TannerQuant 1
- var A.ClothingQuant 1
- var A.ScriptQuant 1
- var A.ClericQuant 1
- var A.OrigamiQuant 1
- var A.JewelryQuant 1
- var A.MagicQuant 1
- var A.SlingsQuant 1
- var A.PuzzleQuant 1
- var A.FootwearQuant 1
- var A.ShieldsQuant 1
- var A.WeaponQuant 1
- var A.ArmorQuant 1
- var A.GenQuant 1
- var A.FlowerQuant 1
- var A.MusicQuant 1
- RETURN
- ##############################
- # WARNINGS
- ##############################
- WELCOME:
- ECHO
- ECHO ************************************************************
- ECHO * Welcome $charactername - Circle $circle $guild !~
- ECHO * SHROOM'S ULTIMATE GENIE3 STEALING SCRIPT version %version
- ECHO * Completely automated Progressive Stealing!
- ECHO * Send bug reports/feedback to skultamaphon@gmail.com
- ECHO ************************************************************
- ECHO
- pause 2
- ECHO
- ECHO ************************************************************
- ECHO *** MAKE SURE YOU HAVE PLENTY OF PLATS IN THE BANK
- ECHO *** IN THE CITIES YOU ARE STEALING IN TO PAY YOUR FINES!
- ECHO ************************************************************
- ECHO
- pause
- RETURN
- UNKNOWN.LOCATION:
- ECHO ********************************************************
- ECHO **** ERROR: UNKNOWN STARTING LOCATION!
- ECHO **** SCRIPT ONLY SUPPORTS THE FOLLOWING CITIES:
- ECHO **** THEREN / RIVERHAVEN / ARTHE DALE
- ECHO **** CROSSINGS / LETH / SHARD / HIB
- ECHO **** RATHA / AESRY
- ECHO **** MOVE TO A VALID CITY AND RESTART SCRIPT
- ECHO *********************************************************
- pause 5
- ECHO **** ABORTING SCRIPT
- pause
- put #parse DONE STEALING
- put #parse STEALING DONE
- exit
- TOO.HURT:
- ECHO
- ECHO **********************************************************
- ECHO * YOU ARE TOO INJURED TO STEAL!
- ECHO * GO GET HEALED FIRST NUB!
- ECHO **********************************************************
- put #parse DONE STEALING
- exit
- BAG.ALERT:
- ECHO
- ECHO **************************************************************************************************
- ECHO * !!!! ERROR!!! ERROR!!!! ERROR!!!! ERROR!!!! ERROR!!!! ERROR!!!!
- ECHO * You CANNOT set BIN_CONTAINER and PAWN_CONTAINER as the same container!!
- ECHO * If you are binning AND pawning.. You MUST set them to different containers!
- ECHO * THIEVES - If you are binning and pawning, you MUST have THREE different containers (bin/pawn/safe).
- ECHO * If you want to use only two containers and have bin/pawn as the same container, set PAWN to OFF
- ECHO * It is NOT recommended to turn BIN OFF, as over time this will kill your THIEF REP
- ECHO ***************************************************************************************************
- ECHO
- exit
- THEREN.NOSTEAL:
- ECHO
- ECHO ***************************************************************************************************
- ECHO **** Sorry! Theren is a bit too hard for noobs.
- ECHO **** Come back when you have a little more Thievery skill (~100+)
- ECHO **** It is recommended to start in either Crossings or Riverhaven as a noob
- ECHO **** AUTOMATICALLY SENDING YOU TO RIVERHAVEN IN 10 SECONDS
- ECHO **** ABORT NOW IF YOU DO NOT WISH TO CONTINUE
- ECHO ***************************************************************************************************
- ECHO
- pause 10
- gosub AUTOMOVE portal
- send .%TRAVEL_SCRIPT haven
- waitforre ^REACHED YOUR DESTINATION
- goto HAVEN.STEAL
- put #parse DONE STEALING
- exit
- TOO.MANY.FINES:
- put #echo >Log Red **** WARNING!!! TOO MANY FINES IN %CITY !! RESET YOUR HEAT!!!
- ECHO
- ECHO ****************************** WARNING !!!! *******************************************************************************************
- ECHO **** YOU ARE AT MAXIMUM HEAT LEVEL IN THIS PROVINCE!!
- ECHO **** YOU HAVE TOO MANY OUTSTANDING FINES OR TOO MANY STEALING CHARGES IN A SHORT TIME TO STEAL FROM THIS PROVINCE!
- ECHO **** YOU ARE AT A VERY HIGH RISK OF BEING THUGGED (IF THIEF)! GO TO JAIL RIGHT NOW!!!
- ECHO
- ECHO **** YOU MUST GO SURRENDER TO A TOWN GUARD AND GO TO JAIL ~IMMEDIATELY~ TO BEGIN TO RESET YOUR 'HEAT'!
- ECHO **** LAY LOW FOR A FEW DAYS OR STEAL FROM A DIFFERENT PROVINCE TO LET YOUR HEAT "COOL DOWN" IN THIS PROVINCE
- ECHO **** YOU ~MUST~ GO TO JAIL FIRST TO LET YOUR HEAT BEGIN TO RESET!!
- ECHO ***************************************************************************************************************************************
- pause 10
- ECHO ***************************************************************************************************************************************
- ECHO *** DO NOT PASS GO! DO NOT COLLECT $200!!!
- ECHO *** GO ~DIRECTLY~ TO JAIL AND THEN ~DO NOT STEAL IN THIS PROVINCE~ FOR A FEW DAYS TO LET YOUR HEAT RESET!!
- ECHO *** If you are getting caught too often, email me your thievery ranks and log of your items you are getting caught on
- ECHO *** skultamaphon@gmail.com - shroomismschism @ AIM
- ECHO ***************************************************************************************************************************************
- ECHO
- pause 8
- ECHO *** LOOKING FOR A GUARD TO SURRENDER TO!
- if $hidden then gosub unhide
- pause 0.5
- if matchre("$roomobjs","(Khal Gwaerd)") then put surrender gwaerd
- if matchre("$roomobjs","(Shard sentinel)") then put surrender sentin
- if matchre("$roomobjs","(Riverhaven Warden)") then put surrender warden
- if matchre("$roomobjs","(Baronial guardsman)") then put surrender guard
- if matchre("$roomobjs","(town guard)") then put surrender guard
- if matchre("$roomobjs","(high guard)") then put surrender guard
- pause
- gosub AUTOMOVE guard
- if matchre("$roomobjs","(Khal Gwaerd)") then put surrender gwaerd
- if matchre("$roomobjs","(Shard sentinel)") then put surrender sentin
- if matchre("$roomobjs","(Riverhaven Warden)") then put surrender warden
- if matchre("$roomobjs","(Baronial guardsman)") then put surrender guard
- if matchre("$roomobjs","(town guard)") then put surrender guard
- if matchre("$roomobjs","(high guard)") then put surrender guard
- pause
- gosub AUTOMOVE 2
- if matchre("$roomobjs","(Khal Gwaerd)") then put surrender gwaerd
- if matchre("$roomobjs","(Shard sentinel)") then put surrender sentin
- if matchre("$roomobjs","(Riverhaven Warden)") then put surrender warden
- if matchre("$roomobjs","(Baronial guardsman)") then put surrender guard
- if matchre("$roomobjs","(town guard)") then put surrender guard
- if matchre("$roomobjs","(high guard)") then put surrender guard
- gosub AUTOMOVE 3
- if matchre("$roomobjs","(Khal Gwaerd)") then put surrender gwaerd
- if matchre("$roomobjs","(Shard sentinel)") then put surrender sentin
- if matchre("$roomobjs","(Riverhaven Warden)") then put surrender warden
- if matchre("$roomobjs","(Baronial guardsman)") then put surrender guard
- if matchre("$roomobjs","(town guard)") then put surrender guard
- if matchre("$roomobjs","(high guard)") then put surrender guard
- put #parse DONE STEALING
- put #parse DONE STEALING
- pause 0.5
- exit
- NOSKILLS:
- put #echo >Log Red **** ERROR: Missing your Thievery.Ranks variable in Genie!!
- ECHO
- ECHO ***************************** ERROR!!! *************************************
- ECHO **** MISSING YOUR THIEVERY.RANKS VARIABLE IN GENIE!!
- ECHO **** THIS IS USUALLY DUE TO LOGGING MULTIPLE CHARACTERS ON THE SAME CLIENT
- ECHO **** OR IF YOU DO NOT HAVE THE EXPTRACKER PLUGIN INSTALLED/ENABLED!
- ECHO **** TYPE EXP 0 ON YOUR STEALING CHARACTER, CLOSE GENIE AND RE-OPEN
- ECHO **** SCRIPT WILL END IN 10 SECONDS
- ECHO ****************************************************************************
- ECHO
- put exp 0
- pause 10
- put #parse DONE STEALING
- put #parse DONE STEALING
- pause 0.5
- exit
- BAG.FULL:
- put #echo >Log Red **** Steal script error - Safe Container is too full!
- ECHO
- ECHO **********************************************************************************************
- ECHO ***** ERROR! SAFE CONTAINER IS TOO FULL!
- ECHO ***** EMPTY YOUR SAFE CONTAINER SOME OR GET RID OF UNNECESSARY ITEMS IN YOUR BAGS
- ECHO **********************************************************************************************
- ECHO
- put #parse DONE STEALING
- put #parse DONE STEALING
- pause 0.5
- exit
- NO.FUNDS:
- put #echo >Log Red **********************************************************************************
- put #echo >Log Red **** WARNING!! WARNING!! OUT OF FUNDS TO PAY FINE IN %CITY !!
- put #echo >Log Red **** Get some money from another town and pay your fine and get your gear!!
- put #echo >Log Red **** You must pay your fine and get your stuff or it will rot!!
- put #echo >Log Red **********************************************************************************
- ECHO
- ECHO ***********************************************************************************************
- ECHO * WARNING! YOU DON'T HAVE ENOUGH MONEY TO PAY THIS FINE!
- ECHO * GO GET SOME FUNDS FROM ANOTHER BANK AND PAY YOUR FINE AND GET YOUR STUFF!
- ECHO * IT IS RECOMMENDED TO KEEP PLENTY OF PLATS IN THE BANK FOR THOSE THIEVERY CHARGES
- ECHO * THEY CAN REALLY RACK UP ESPECIALLY IF YOU DO NOT REGULARLY CLEAR YOUR HEAT!
- ECHO ***********************************************************************************************
- ECHO
- put #parse DONE STEALING
- put #parse DONE STEALING
- pause 0.5
- exit
- NO.PASSWORD:
- ECHO
- ECHO ***********************************************************************************************
- ECHO * YOU DIDN'T SET YOUR THIEF GUILD PASSWORDS!
- ECHO * SET VARIABLES HAVEN_PW and SHARD_PW TO ~YOUR~ PASSWORDS
- ECHO ***********************************************************************************************
- ECHO
- exit
- NOOB:
- ECHO
- ECHO ***********************************************************************************************
- ECHO * It appears you have under 20 ranks in thievery!
- ECHO * I just added support for complete noobs!!
- ECHO * Please let me know if you run across any bugs or something is way too hard!
- ECHO ***********************************************************************************************
- ECHO
- pause 5
- RETURN
- ARMOR.WARN:
- ECHO
- ECHO *************************************************************************************
- ECHO ** WARNING: Script could not find all your armor
- ECHO ** Remove any remaining armor and type "GO" to continue
- ECHO *************************************************************************************
- ECHO
- matchre RETURN GO|go
- matchwait
- HELP:
- ECHO
- ECHO # - USAGE - Simply start script with .steal
- ECHO # - For Troubleshooting/testing - .steal <label to skip to> <starting city> <type anything to SKIP BAG CHECK AND TURN ON DEBUG>
- ECHO # - For example - .steal CROSS.TO.CARD CROSS BLAH will skip directly to CROSS.TO.CARD label, Set Crossing as your start city and skip the bag check and turn on debug mode
- ECHO # - THIS IS FOR TESTING/TROUBLESHOOTING PURPOSES ONLY!!! Usually after already starting stealing script and you want to restart it halfway through.
- ECHO # - Skips the bag check so it doesn't put already stolen items in your safe container
- ECHO # - This is assuming you already went through the beginning bag check - USE AT YOUR OWN RISK!
- ECHO # - I am not responsible for any lost items if you use this incorrectly.
- ECHO
- exit
- ### DEFAULT VARIABLES
- DefaultVariables:
- var runTime 0
- var Banked 0
- var TotalProfit 0
- var Profit 0
- var Plat 0
- var Gold 0
- var Silver 0
- var Bronze 0
- var Copper 0
- var Plats 0
- var Golds 0
- var Silvers 0
- var Bronzes 0
- var Coppers 0
- put #tvar Plat 0
- put #tvar Gold 0
- put #tvar Silver 0
- put #tvar Bronze 0
- put #tvar Copper 0
- put #var StealingProfit 0
- var itemLocation
- var stolen 0
- var grabbed 0
- var adjusted 0
- var caught 0
- var Jailed 0
- var Charges 0
- var Binned 0
- var Pawned 0
- var AltCount 0
- var EndEarly OFF
- var SECOND_ITEM 0
- var SECOND_PAWN OFF
- var goPawn OFF
- var marking OFF
- var noLearn OFF
- var noSteal OFF
- var Rite OFF
- var Eyes OFF
- var nosell null
- var armor null
- var armor1 null
- var armor2 null
- var armor3 null
- var armor4 null
- var armor5 null
- var armor6 null
- var armor7 null
- var armor8 null
- var armor9 null
- var armor10 null
- var total_armor 0
- var ALT1 null
- var ALT2 null
- var ALT3 null
- var ALT4 null
- var ALT5 null
- var ALT6 null
- var ALT7 null
- var ALT8 null
- var ALT9 null
- RETURN
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement