· 10 years ago · Feb 07, 2016, 05:48 AM
1#debuglevel 10
2#--------------------------------------------------------------------------------------------------------
3# ULTIMATE GENIE3 PROGRESSIVE STEALING SCRIPT v5.8 for Dragonrealms. Updated 9/24/15
4# By Shroom of TF / Azothy of Prime. With code contributions from Pelic/Rubinium.
5# © 2005 Chris Sansalone, all rights reserved. Not for resale or distribution without author's consent.
6# Send any bug reports/feedback to: skultamaphon@gmail.com / Shroomismschism @ AIM
7#--------------------------------------------------------------------------------------------------------
8#
9# ------------------------ IMPORTANT INFO / PREREQUISITES ------------------------------------------------
10# MANDATORY - You need to make sure you have the latest version of Automapper and maps.
11# See this thread on the genie forums for syncing your maps folder to the map repository, so you can always have the most updated maps
12# http://www.genieclient.com/bulletin/topic/3592-how-to-use-the-genie-map-repository/
13#
14# MANDATORY - Requires my modified travel script. This script is for city to city travel.
15# LATEST VERSION HERE - http://pastebin.com/tVwTjDQP
16#
17# MANDATORY - ExpTracker 3.0 Plugin for Genie
18# http://www.genieclient.com/bulletin/files/file/26-experience-tracker/
19#
20# MAY REQUIRE using my modified Automapper script
21# IF you have problems with the default automapper script not moving properly
22# http://pastebin.com/wx1cM7ty
23#
24# Completely Optional - Uses Time Plugin
25#
26#--------------------------------------------------------------------------------------------------------
27# ----------------------------- SCRIPT NOTES AND FUNCTIONALITY ------------------------------------------
28# SUPPORTED CITIES: (Can start in any location in these cities)
29# - Therenborough, Riverhaven, Arthe Dale, Crossing, Leth Deriel, Shard, Hib, Ratha, Aesry
30#
31# - STEALS from every shop in every supported city, moving from city to city until mind locked
32# - Automatically determines what items to steal based on your skill level. NEVER change item variables!
33# - As you progress in Thievery ranks, the script progressively steals harder items. Trains from 20 ranks to 1350+
34#
35# - If you go to JAIL, script will RECOVER, pay your fine, retrieve your items and continue where it left off.
36#
37# - It will remove all your ARMOR before the stealing run, put it in a safe container, and put it all back on when the script finishes.
38#
39# AUTOMATICALLY HIDES/STASHES YOUR IMPORTANT ITEMS - Never lose items!
40# - IF any items in your bags match names with items you will steal, it will store those in your SAFE_CONTAINER and close it!
41# - This will prevent ever accidentally binning or pawning ANY of your important items or armor!!
42#
43# - THIEVES: Will mark ALL items before stealing, leave shop if there is too much heat.
44# - THIEVES will Bin 50% and Pawn 50% by default. Or Bin 100% by setting var PAWN OFF
45# - THIEVES Will also make use of Khris and Thief passages for travel to Leth and contacts for finding haven guild.
46# - 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.
47# - Non-Thieves: Will only steal 1-5 times per shop and will PAWN ALL items and dump those that cant sell.
48#
49# CITY TRAVEL LOGIC:
50# - If you start in Theren it will go Theren > Haven > Arthe > Xing > Leth > Shard (or stop when locked)
51# - If you start in Hib it will go Hib > Shard > Leth > Arthe > Xing > Haven
52# - If you start in Aesry or Ratha, it will stop after it finishes that city, for obvious reasons.
53# - If you Start in Xing or Leth it will head north to Haven. If you start in Haven it will head south. Start in Shard it will head north.
54# - Currently, the script will NOT END in Hib or Theren, mainly due to limitations for many people (out of the way and a hassle)
55# - But if you START the script in Hib or Theren it will steal from there and move on.
56# -(Ice road to Hib being a pain.. shortcut to Theren requiring high levels of Athletics)
57#
58# SCRIPT USAGE -
59# 1 .steal
60# Default (no variables) - loads the script from the beginning
61# (THIS IS THE METHOD YOU SHOULD ALWAYS USE TO LOAD SCRIPT)
62#
63# 2 .steal LABEL.TO.SKIP.TO
64# (ONE variable) - The usage of a first variable will skip directly to that particular label in a script (It must be a valid label)
65# THIS METHOD IS MAINLY FOR TROUBLESHOOTING PURPOSES ONLY
66#
67# 3 .steal LABEL.TO.SKIP.TO TYPEANYTHING
68# (TWO variables) - A SECOND variable after the first, will SKIP THE BAG CHECK SECTION and then go to the specified label.
69# This will SKIP the bag check section, so it doesn't stash items into your safe container that you have already stolen
70# THIS IS USEFUL FOR RESTARTING THE SCRIPT MIDWAY THROUGH AND SKIPPING TO A CERTAIN LABEL,
71# WITHOUT THE SCRIPT PUTTING ALREADY STOLEN ITEMS INTO YOUR SAFE CONTAINER
72# OR FOR TROUBLESHOOTING PURPOSES. THIS WILL ALSO TURN DEBUGMODE 10 ON.
73# A SECOND VARIABLE SHOULD ~ONLY~ BE USED IF THE SCRIPT HAS ALREADY STASHED YOUR ITEMS FROM THE BEGINNING CHECK
74# YOU RISK LOSING YOUR ITEMS IF YOU USE A SECOND VARIABLE WITHOUT FIRST HAVING ALREADY STASHED YOUR ITEMS
75# STARTING THE SCRIPT WITH VARIABLES SHOULD ONLY REALLY BE USED FOR TROUBLESHOOTING OR TESTING PURPOSES
76#
77# --------------------------- DISCLAIMER --------------------------------------------------------------------------------------
78# ~~ I AM NOT RESPONSIBLE FOR ANY LOST ITEMS. IT IS **HIGHLY RECOMMENDED** TO REGISTER YOUR MOST VALUABLE ITEMS.
79# ~~ ALTHOUGH THIS SCRIPT DOES ~EVERYTHING POSSIBLE~ TO MAKE SURE IT DOESN'T LOSE YOUR ITEMS..
80# ~~ THERE IS ALWAYS A TINY CHANCE (HOWEVER SMALL) THAT SOMETHING MAY GO WRONG.
81# ~~ IF YOU WANT TO BE 100% SAFE, PUT YOUR MOST IMPORTANT ITEMS IN YOUR VAULT, OR A CLOSED CONTAINER,
82# ~~ THIS SCRIPT AUTOMATICALLY STASHES YOUR VULNERABLE ITEMS IN YOUR SAFE CONTAINER!
83# ~~ THIS IS A SPECIAL FEATURE THAT TOOK A WHILE TO PERFECT!
84# ~~ I TEST THIS SCRIPT WITH MULTIPLE SUPER RARE ITEMS~ I HAVE ONLY EVER LOST 1 or 2 ITEMS IN THOUSANDS OF RUNS,
85# ~~ DUE TO A BUG WHICH I FIXED YEARS AGO, ~BEFORE~ I HAD THIS AUTO-STASH FEATURE
86# ~~ NEVERTHELESS - REGISTER YOUR MOST IMPORTANT STUFF TO BE SURE. BETTER TO BE SAFE THEN SORRY!
87#----------------------------------------------------------------------------------------------------------------------------
88 gosub DefaultVariables
89
90#--------------------------------------------
91# USER VARIABLES - MANDATORY
92#--------------------------------------------
93## IF you are a THIEF and BINNING ~AND~ PAWNING - BIN_CONTAINER and PAWN_CONTAINER ~MUST~ BE TWO DIFFERENT CONTAINERS!
94## IF you are a NON-THIEF, JUST pawning, or JUST binning - then these SHOULD be the SAME container.
95 var PAWN_CONTAINER duffel bag
96 var BIN_CONTAINER leather haversack
97
98## WARNING!! SAFE_CONTAINER IS *MANDATORY* AND ~MUST~ BE A DIFFERENT CLOSABLE CONTAINER THEN BOTH BIN AND PAWN.
99## IF NOT YOU COULD LOSE YOUR ITEMS! IDEALLY THIS SHOULD BE YOUR LARGEST CONTAINER!
100 var SAFE_CONTAINER hit backpack
101
102## IMPORTANT_ITEMS is for ~DOUBLE CHECKING~ your most priceless items to ENSURE you don't lose them
103## Script will already scan your bags and stash any vulnerable items in your safe container.
104## This is just a secondary layer of protection! Not necessary but good for peace of mind.
105 var IMPORTANT_ITEMS
106
107## SINGLE_RUN - ON WILL STOP STEALING AFTER A SINGLE CITY RUN.
108## OFF WILL RUN UNTIL MIND LOCKED, MOVING FROM CITY TO CITY
109 var SINGLE_RUN OFF
110
111## SHARD RUN ON WILL LEAVE YOU IN SHARD DESPITE SINGLE RUN VARIABLE
112## Example: If you start in Hib, script will end in Shard, regardless of your thievery learningrate.
113## USEFUL FOR LOWER LEVELS WHO CAN'T CLIMB THE UNDERGONDOLA
114 var SHARD_RUN OFF
115
116## RETURN_HOME - YES returns you to your original starting city at the end of script.
117## NO stays at whatever city you finish in.
118 var RETURN_HOME YES
119
120## PLEAD INNOCENT OR GUILTY
121 var PLEAD innocent
122
123## MY CUSTOM TRAVEL SCRIPT NAME (if you want to use a separate script named travel)
124## YOU CAN RENAME IT ANYTHING YOU WANT, JUST CHANGE THE VARIABLE HERE IF IT IS DIFFERENT THAN .TRAVEL
125 var TRAVEL_SCRIPT travel
126
127## ARE YOU A PREMIUM MEMBER AND WANT TO USE THE PREMIUM BANK WHEN EXCHANGING CURRENCIES?
128## IF SO SET THIS VARIABLE TO ON
129 var PREMIUM OFF
130
131## STEALTH - ON continues stealing until both Thievery AND Stealth is locked
132## (Only works in Crossings - This is for noobs to boost stealth learning some)
133 var STEALTH ON
134
135## SNEAK ON WILL SNEAK FROM SHOP TO SHOP (Not recommended)
136##(THIS WILL INCREASE TOTAL TIME SIGNIFICANTLY!)
137 var SNEAK OFF
138
139## HEALTH CHECK - Will check for wounds before script, will exit script if you have significant injuries.
140## Recommend leaving ON or else you risk getting caught much more often.
141## You can turn this off if you want to script with bleeders..
142## Don't blame me if you script with injuries and get caught 100 times.
143 var HEALTH_CHECK ON
144
145###########################################
146# THIEF ONLY VARIABLES #
147# THIEVES MUST SET YOUR PASSWORDS! #
148##########################################
149 var HAVEN_PW tykovode
150 var SHARD_PW doiala
151 var khri1 plunder
152 var khri2 skulk
153## WARNING!! IT IS ~NOT~ RECOMMEND TO TURN BIN OFF!
154## NOT BINNING ITEMS FOR A LONG TIME CAN DESTROY YOUR THIEF REP - AND YOU RUN A VERY HIGH CHANCE OF BEING THUGGED!
155## WHICH MOST LIKELY MEANS INSTANT DEATH FROM USING THIEF PASSAGES OR ENTERING THE THIEF GUILD.
156## LEAVE BIN ON! I SPEAK FROM EXPERIENCE.
157## IF DESIRED, YOU CAN TURN PAWN OFF FOR MAXIMUM REP.
158 var BIN ON
159 var PAWN ON
160
161## MARK.ALL ON TO MARK EVERY ITEM YOU STEAL. * RECOMMENDED FOR HIGHER LEVEL THIEVES
162## MARK.ALL OFF TO SKIP THE SECOND AND FOURTH MARK * RECOMMENDED FOR LOWER LEVEL THIEVES WHO CANNOT MARK MORE THAN TWO TIMES
163## STEALCOUNT IS THE MAX NUMBER OF TIMES YOU WILL STEAL FROM A SHOP - REGARDLESS OF MARK.
164## 5 IS THE ABSOLUTE MAX FOR STEALCOUNT! ANY HIGHER AND YOU WILL BE CAUGHT.
165 var MARK.ALL ON
166 var STEALCOUNT 5
167
168###############################
169# NECROMANCER VARIABLES #
170###############################
171## FOR EOTB AND ROC CHOOSE EITHER OFF or ON
172## CHOOSE YOUR MANA AMOUNT AND CAST TIME (OR SET TO 0 TO WAIT FOR FULL CAST)
173 var EOTB ON
174 var eotbMana 20
175 var ROC OFF
176 var rocMana 5
177 var castPause 20
178## Enter any "room titles" where you do NOT want to cast. Several have been added as an example.
179## Note, all banks should already be accounted for.
180 var donotcastlist The Crossing, Western Gate|The Crossing, Hodierna Way|Northeast Wilds, Outside Northeast Gate
181
182###############################
183# EMPATH ONLY VARIABLES #
184###############################
185## POWER (Perceive), PercHealth and GuardianSpirit can be OFF or ON
186## CHOOSE ONE IF DESIRED TO PERCEIVE BEFORE EACH SHOP
187## POWER IS FOR NOOB EMPATHS WHILE PERC IS FOR HIGHER LEVEL EMPATHS
188## CHOOSE YOUR MANA AMOUNT AND CAST TIME (OR SET TO 0 TO WAIT FOR FULL CAST)
189 var POWER OFF
190 var PercHealth OFF
191 var GuardianSpirit OFF
192 var gsMana 15
193 var ECastPause 20
194
195###############################
196## TF VARIABLES #
197## IGNORE THESE IF NOT IN TF #
198###############################
199 var ClanItem NO
200 var CLAN_ITEM_NAME human skull
201 var MAIN_SCRIPT prime
202################################################
203# !!! END USER VARIABLES !!! #
204# DO NOT TOUCH ANYTHING BELOW! #
205################################################
206#############################################################################################################################################
207 put #var save
208ACTION.INIT:
209 var LAST ACTION.INIT
210 action math Pawned add 1 when You sell your
211 action math Binned add 1 when Nice work, $charactername
212 action math Charges add 1 when begins to shout for help|begins to shout loudly for help
213 action var Eyes ON when ^Your spell subtly alters|^You feel an unsteady|^Your spell injects more psychic corruption
214 action var Eyes OFF when ^Your corruptive mutation fades|^Your corruption fades
215 action var Rite ON when ^You weave a field of sublime|^The Rite of Contrition matrix redoubles
216 action var Rite OFF when ^The Rite of Contrition matrix loses
217 action var nosell $1 when ^\w+ shakes his head (.+)$
218 action var nosteal ON when ^You stop as you realize that the
219 action goto TOO.MANY.FINES when ^You think about stealing for a moment
220 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|Dwarves burst out from everywhere
221 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
222 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
223 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
224 action instant goto JAIL.CHECK when all your belongings have been stripped|^The guard brings you to the jail
225 action var noLearn ON; put #echo >log Orange *** Not learning from %item in %SHOP @ $Thievery.Ranks ranks when You don't feel you learned anything useful
226 action put #echo >log Red *** Caught in %SHOP stealing: %item @ $Thievery.Ranks ranks when notices you attempting|Guards\! Guards\!|begins to shout
227 action put #echo >log Purple *** Stealing Mind Locked! Not learning anymore when You feel that for the moment you've learned all you can
228 # action send exit when eval $health < 50
229 # action goto CLAN.HEAL when I now pronounce sentence
230 if ("%PREMIUM" = "ON") then gosub PREMIUM.CHECK
231 gosub GUILD.CHECK
232 if ("$guild" = "Necromancer") then gosub NECROSTART
233 gosub CITY.CHECK
234 gosub HEALTH_CHECK
235 gosub SKILLCHECK
236 gosub WELCOME
237######################################################################################################################################
238 var STEAL.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
239 var STEAL.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
240 var STEAL.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
241 var STEAL.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
242 var STEAL.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
243 var STEAL.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
244 var STEAL.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
245 var STEAL.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
246 var STEAL.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
247 var ODD.ITEMS cigar|scroll|naphtha|sling|mining helm|mining cap|ordinary shield|tobacco|bagpipes|cowl|dwarven hammer|lamp|robes|string
248 var large.items cauldron|stove|spear|wayerd pyramid|longbow
249######################################################################################################################################
250 var STEAL.LIST %STEAL.LIST.THEREN|%STEAL.LIST.HAVEN|%STEAL.LIST.ARTHE|%STEAL.LIST.CROSS|%STEAL.LIST.LETH|%STEAL.LIST.SHARD|%STEAL.LIST.HIB|%STEAL.LIST.RATHA|%STEAL.LIST.AESRY|%ODD.ITEMS
251######################################################################################################################################
252ARMOR.INIT:
253 var LAST ARMOR.INIT
254 echo
255 echo **** CHECKING WORN ARMOR...
256 echo
257 pause 0.2
258 gosub STOWING
259 gosub ARMOR.CHECK
260 if_2 then
261 {
262 echo
263 echo *** YOU STARTED SCRIPT WITH A SECOND VARIABLE
264 echo *** THIS IS FOR TROUBLESHOOTING/TESTING PURPOSES ONLY!!!
265 echo ( FOR STARTING SCRIPT MIDWAY AND JUMPING TO A LABEL, WHILE SKIPPING THE BAG CHECK )
266 echo
267 pause 2
268 echo !!!! WARNING !!! WARNING !!!!!
269 echo !!!! SKIPPING BAG CHECK !!!!
270 echo !!!! YOU MAY LOSE YOUR ITEMS IF YOU DID NOT ALREADY MOVE ITEMS TO YOUR SAFE CONTAINER!!
271 echo !!!! THIS IS ONLY INTENDED FOR TESTING AND SKIPPING BAG CHECK SO YOU DON'T STASH ALREADY STOLEN ITEMS
272 pause 3
273 echo !!!! ABORT SCRIPT ~NOW~ AND RESTART WITH NO OPTIONS (.steal) IF YOU ARE NOT DOING THIS ON PURPOSE !!
274 echo !!!! CONTINUING IN 7 SECONDS...
275 pause 5
276 echo
277 echo *** ~~~~ DEBUG MODE ENABLED ~~~~
278 echo *** STARTING SCRIPT FROM %1 LABEL...
279 echo
280 pause 2
281 debuglevel 10
282 goto START
283 }
284CHECKING.BAGS:
285 var LAST CHECKING.BAGS
286 echo
287 echo ****** CHECKING YOUR CURRENT BAG CONTENTS TO AVOID PAWNING/BINNING YOUR ITEMS....
288 echo ****** WILL STASH ALL VULNERABLE ITEMS IN YOUR: %SAFE_CONTAINER
289 echo
290 pause 0.2
291 gosub BAG.CHECK %PAWN_CONTAINER
292 gosub BAG.CHECK %BIN_CONTAINER
293
294START:
295 var LAST START
296 echo
297 echo *** THIEVERY SKILL RANGE - %skillrange
298 echo
299 pause
300 if ("%BIN" = "OFF") then
301 {
302 echo
303 echo *** PAWNING ALL ITEMS FOR MAX PROFIT...
304 echo
305 pause
306 }
307 timer start
308 gosub CITY.CHECK
309 if_1 then goto %1
310############################################################################################
311############################################################################################
312#### BEGIN STEALING SECTION #####
313############################################################################################
314############################################################################################
315MAINLOOP:
316STEALING.RUN:
317 var LAST STEALING.RUN
318 gosub STOWING
319STEAL.BEGIN:
320 put #echo >Log SkyBlue ** Starting Stealing Run from: %CITY
321 pause 0.5
322 goto %CITY.STEAL
323######################################################
324# THERENGIA STEALING (THEREN/ROSSMAN/RIVERHAVEN #
325######################################################
326### THERENBOROUGH
327THEREN.STEAL:
328 var CURRENT.CITY THEREN
329 var LAST THEREN.STEAL
330 if ("%POWER" = "ON") || ("%PercHealth" = "ON") || ("%GuardianSpirit" = "ON") || ("ROC" = "ON") || ("EOTB" = "ON") then
331 {
332 echo *** NOT CASTING ANY SPELLS WHILE IN THEREN!
333 echo *** TOO MANY MAGICALLY INERT ROOMS! THEREN SUCKS!
334 pause 3
335 }
336 if matchre("$roomobjs","(Baronial guardsman)") then put surrender guard
337 pause 0.5
338 pause 0.1
339 gosub COOKIE
340THEREN.EXP.CHECK.0:
341 if $Thievery.Ranks < 50 then goto THEREN.NOSTEAL
342 if $Thievery.Ranks >= 690 then goto THEREN.TO.ROSE
343THEREN.TO.TARSHA:
344 var LAST THEREN.TO.ROSE
345 gosub AUTOMOVE tarsha
346THEREN.TARSHA:
347 var shopcode T.Tarsha
348 var SHOP Tarsha's Emporium
349 gosub STEAL %T.Tarsha
350THEREN.TO.ROSE:
351 var LAST THEREN.TO.MUSIC
352 gosub AUTOMOVE theatre
353THEREN.ROSE:
354 var shopcode T.Rose
355 var SHOP Rose of the Theater - Attire
356 gosub STEAL %T.Rose
357THEREN.TO.MUSIC:
358 var LAST THEREN.EXP.CHECK.1:
359 gosub AUTOMOVE rose of the theatre
360THEREN.MUSIC:
361 var shopcode T.Music
362 var SHOP Rose of the Theater - Instruments
363 gosub STEAL %T.Music.Num %T.Music
364THEREN.EXP.CHECK.1:
365 if $Thievery.Ranks >= 590 then goto THEREN.TO.ARMOR
366THEREN.TO.HATS:
367 var LAST THEREN.EXP.CHECK.2
368 gosub AUTOMOVE hats
369THEREN.HATS:
370 var shopcode T.Hats
371 var SHOP Theren Hats
372 gosub STEAL %T.Hats
373THEREN.EXP.CHECK.2:
374 if $Thievery.Ranks >= 300 then goto THEREN.TO.ARMOR
375THEREN.TO.SWEET:
376 var LAST THEREN.TO.CUPCAKE
377 gosub AUTOMOVE sweet
378THEREN.SWEET:
379 var shopcode T.Sweet
380 var SHOP Theren Sweet Delights
381 gosub STEAL %T.Sweet
382THEREN.TO.CUPCAKE:
383 var LAST THEREN.TO.ARMOR
384 gosub AUTOMOVE cup
385THEREN.CUPCAKE:
386 var shopcode T.Cupcake
387 var SHOP Theren Cupcake
388 gosub STEAL %T.Cupcake
389THEREN.TO.ARMOR:
390 var LAST THEREN.TO.GIFT
391 gosub AUTOMOVE armor
392THEREN.ARMOR:
393 var shopcode T.Arm
394 var SHOP Theren Armor
395 gosub STEAL %T.Arm
396THEREN.TO.GIFT:
397 var LAST THEREN.EXP.CHECK.3
398 gosub AUTOMOVE gift
399THEREN.GIFT:
400 var shopcode T.Gift
401 var SHOP Theren Gift Shop
402 gosub STEAL %T.Gift
403THEREN.EXP.CHECK.3:
404 if $Thievery.Ranks >= 700 then goto THEREN.TO.KRRISH
405THEREN.TO.GENERAL:
406 var LAST THEREN.TO.KRRISH
407 gosub AUTOMOVE general
408THEREN.GENERAL:
409 var shopcode T.Gen
410 var SHOP Theren General Store
411 gosub STEAL %T.Gen
412THEREN.TO.KRRISH:
413 var LAST THEREN.TO.LENSE
414 gosub AUTOMOVE Krrish's home
415THEREN.KRRISH:
416 var shopcode T.Krrish
417 var SHOP Theren Krissh
418 gosub STEAL %T.Krrish
419THEREN.TO.LENSE:
420 var LAST THEREN.EXP.CHECK.4
421 gosub AUTOMOVE lense
422THEREN.LENSE:
423 var shopcode T.Lense
424 var SHOP Theren Konezu's Lenses
425 gosub STEAL %T.Lense
426THEREN.EXP.CHECK.4:
427 if $Thievery.Ranks >= 460 then goto THEREN.TO.MEN
428THEREN.TO.CLERIC:
429 var LAST THEREN.TO.MEN
430 gosub AUTOMOVE cleric
431THEREN.CLERIC:
432 var shopcode T.Cleric
433 var SHOP Theren Cleric Shop
434 gosub STEAL %T.Cleric
435THEREN.TO.MEN:
436 var LAST THEREN.TO.WOMEN
437 gosub AUTOMOVE men's
438THEREN.MEN:
439 var shopcode T.Men
440 var SHOP Theren Courtly Men's Study
441 gosub STEAL %T.Men
442THEREN.TO.WOMEN:
443 var LAST THEREN.TO.CLOTHING
444 gosub AUTOMOVE women's
445THEREN.WOMEN:
446 var shopcode T.Women
447 var SHOP Theren Courtly Women's Parlor
448 gosub STEAL %T.Women
449THEREN.TO.CLOTHING:
450 var LAST THEREN.TO.ARMORY
451 gosub AUTOMOVE clothing
452THEREN.CLOTHING:
453 var shopcode T.Cloth
454 var SHOP Theren Courtly Clothing
455 gosub STEAL %T.Cloth
456THEREN.TO.ARMORY:
457 var LAST THEREN.TO.ARMORY
458 gosub AUTOMOVE 103
459 gosub AUTOMOVE moat
460 put #goto 146
461 waitfor YOU HAVE ARRIVED
462 move ne
463 move e
464 move e
465 move s
466 pause 3
467THEREN.TO.DUNG:
468 put #goto dungeon
469 waitfor YOU HAVE ARRIVED
470THEREN.TO.ARMORY.CONT:
471 gosub AUTOMOVE armory
472THEREN.ARMORY:
473 var shopcode T.Armory
474 var SHOP Theren Keep Armory
475 gosub STEAL %T.Armory
476THEREN.LEAVE:
477 var LAST THEREN.LEAVE
478 gosub AUTOMOVE 69
479 send jump moat
480 echo *** STUNNED!! Pausing to recover....
481 pause 12
482THEREN.STUNNED:
483 var LAST THEREN.STUNNED
484 pause 11
485 if $stunned = 1 then goto THEREN.STUNNED
486 gosub STAND
487 pause 0.5
488 gosub AUTOMOVE 1
489 put go gate
490TRAVEL.HAVEN:
491TO.RIVERHAVEN:
492 pause 0.5
493 echo *** TRAVELLING TO HAVEN.....
494 send .%TRAVEL_SCRIPT haven
495 waitforre ^YOU HAVE ARRIVED
496 pause 0.1
497############################################
498# RIVERHAVEN STEALING
499############################################
500RIVERHAVEN.STEAL:
501HAVEN.STEAL:
502 var LAST HAVEN.STEAL
503 var CURRENT.CITY RIVERHAVEN
504 if matchre("$roomobjs","(Riverhaven Warden)") then put surrender warden
505 pause 0.5
506 pause 0.1
507 gosub COOKIE
508 if ("%guild" = "Necromancer") then gosub NECROPREP
509 gosub TIME.CHECK
510HAVEN.TO.TOG:
511 var LAST HAVEN.EXP.CHECK.0
512 gosub AUTOMOVE city tog
513HAVEN.TOG:
514 var shopcode RH.Tog
515 var SHOP Riverhaven Togs
516 gosub STEAL %RH.Tog
517HAVEN.EXP.CHECK.0:
518 if $Thievery.Ranks >= 340 then goto HAVEN.EXP.CHECK.1
519 if $Thievery.LearningRate > 31 then goto GO.PAWN.HAVEN
520HAVEN.TO.HERB:
521 var LAST HAVEN.EXP.CHECK.1
522 gosub AUTOMOVE herb
523HAVEN.HERB:
524 var shopcode RH.Herb
525 var SHOP Riverhaven Herbs
526 gosub STEAL %RH.Herb
527HAVEN.EXP.CHECK.1:
528 if $Thievery.Ranks >= 385 then goto HAVEN.EXP.CHECK.2
529HAVEN.TO.NAPHTHA:
530 var LAST HAVEN.EXP.CHECK.2
531 gosub AUTOMOVE Naptha
532HAVEN.NAPHTHA:
533 var shopcode RH.Naph
534 var SHOP Riverhaven Naptha Cart
535 var itemLocation %RH.Naph.Loc
536 gosub STEAL %RH.Naph
537HAVEN.EXP.CHECK.2:
538 var itemLocation
539 if $Thievery.Ranks >= 600 then goto HAVEN.TO.ARMS
540HAVEN.TO.FLOWER:
541 var LAST HAVEN.TO.ARMS
542 gosub AUTOMOVE cecel
543HAVEN.FLOWER:
544 var shopcode RH.Flow
545 var SHOP Riverhaven Florist
546 gosub STEAL %RH.Flow
547HAVEN.TO.ARMS:
548 var LAST HAVEN.EXP.CHECK.3
549 gosub AUTOMOVE noel
550HAVEN.ARMS:
551 var shopcode RH.Arms
552 var SHOP Riverhaven Noel's Arms
553 gosub STEAL %RH.Arms
554HAVEN.EXP.CHECK.3:
555 if $Thievery.Ranks >= 650 then goto HAVEN.EXP.CHECK.4
556 if $Thievery.LearningRate > 33 then goto GO.PAWN.HAVEN
557HAVEN.TO.GENERAL:
558 var LAST HAVEN.EXP.CHECK.4
559 gosub AUTOMOVE general
560HAVEN.GENERAL:
561 var shopcode RH.Gen
562 var SHOP Riverhaven General Store
563 gosub STEAL %RH.Gen
564HAVEN.EXP.CHECK.4:
565 if $Thievery.Ranks >= 600 then goto HAVEN.EXP.CHECK.5
566HAVEN.TO.CLOTH:
567 var LAST HAVEN.EXP.CHECK.5
568 gosub AUTOMOVE cloth
569HAVEN.CLOTH:
570 var shopcode RH.Cloth
571 var SHOP Riverhaven Clothiers
572 gosub STEAL %RH.Cloth
573HAVEN.EXP.CHECK.5:
574 # if $Thievery.Ranks >= 1200 then goto HAVEN.TO.JOY
575HAVEN.TO.ARTIFICER:
576 var LAST HAVEN.EXP.CHECK.6
577 gosub AUTOMOVE artif
578HAVEN.ARTIFICER:
579 var shopcode RH.Artif
580 var SHOP Riverhaven Artificer
581 gosub STEAL %RH.Artif
582HAVEN.EXP.CHECK.6:
583 if $Thievery.Ranks >= 138 then goto HAVEN.EXP.CHECK.7
584HAVEN.TO.LOCKSMITH:
585 var LAST HAVEN.EXP.CHECK.7
586 gosub AUTOMOVE locks
587HAVEN.LOCKSMITH:
588 var shopcode RH.Lock
589 var SHOP Riverhaven Locksmith
590 gosub STEAL %RH.Lock
591HAVEN.EXP.CHECK.7:
592 if $Thievery.LearningRate > 33 then goto GO.PAWN.HAVEN
593 if $Thievery.Ranks >= 414 then goto HAVEN.EXP.CHECK.8
594HAVEN.TO.JOY:
595 var LAST HAVEN.EXP.CHECK.8
596 gosub AUTOMOVE smara
597HAVEN.JOY:
598 var shopcode RH.Joy
599 var SHOP Riverhaven Joy Shop
600 gosub STEAL %RH.Joy
601 gosub MOVE out
602 pause 0.5
603HAVEN.EXP.CHECK.8:
604 if $Thievery.Ranks >= 238 then goto HAVEN.TO.MIRG
605HAVEN.TIME.0:
606 gosub TIME.CHECK
607 if ("%TIME" = "DAY") then goto HAVEN.TO.SMOKE
608 goto HAVEN.TO.MIRG
609HAVEN.TO.SMOKE:
610 var LAST HAVEN.TO.MIRG
611 gosub AUTOMOVE 42
612 send kneel
613 send go shop
614HAVEN.SMOKE:
615 var shopcode RH.Smoke
616 var SHOP Riverhaven Smoke Shop
617 gosub STEAL %RH.Smoke
618 send out
619 pause
620 gosub STAND
621 gosub HIDE
622HAVEN.TO.MIRG:
623 var LAST HAVEN.TO.WEAPON
624 gosub AUTOMOVE jewel
625HAVEN.MIRG:
626 var shopcode RH.Mirg
627 var SHOP Riverhaven Goldsmiths
628 gosub STEAL %RH.Mirg
629HAVEN.EXP.CHECK.9:
630 if $Thievery.LearningRate > 33 then goto GO.PAWN.HAVEN
631HAVEN.TO.WEAPON:
632 var LAST HAVEN.TO.BARD
633 gosub AUTOMOVE weapon
634HAVEN.WEAPON:
635 var shopcode RH.Weap
636 var SHOP Riverhaven Weapon Shop
637 gosub STEAL %RH.Weap
638HAVEN.TO.BARD:
639 var LAST HAVEN.TO.BARD2
640 gosub AUTOMOVE bard
641HAVEN.BARD:
642 var shopcode RH.Bard
643 var SHOP Riverhaven Bard Shop
644 gosub STEAL %RH.Bard
645HAVEN.TO.BARD2:
646 var LAST HAVEN.EXP.CHECK.10
647 gosub AUTOMOVE bard
648 gosub MOVE go curt
649HAVEN.BARD2:
650 var shopcode RH.Bard2
651 var SHOP Riverhaven Bard2 Shop
652 gosub STEAL %RH.Bard2
653HAVEN.EXP.CHECK.10:
654 if $Thievery.LearningRate > 33 then goto GO.PAWN.HAVEN
655HAVEN.TO.IRON:
656 var LAST HAVEN.TO.CLERIC
657 gosub AUTOMOVE iron
658HAVEN.IRONWORKS:
659 var shopcode RH.Iron
660 var SHOP Riverhaven Ironworks
661 gosub STEAL %RH.Iron
662HAVEN.TO.CLERIC:
663 var LAST HAVEN.TO.CLERIC2
664 gosub AUTOMOVE cleric shop
665HAVEN.EXP.CHECK.11:
666 if $Thievery.Ranks >= 465 then goto HAVEN.TO.CLERIC2
667HAVEN.CLERIC:
668 var shopcode RH.Cleric
669 var SHOP Riverhaven Cleric Shop
670 gosub STEAL %RH.Cleric
671HAVEN.TO.CLERIC2:
672 var LAST GO.PAWN.HAVEN
673 if !matchre("%guild","(Thief|Empath|Cleric)") then goto GO.PAWN.HAVEN
674 gosub MOVE go curt
675HAVEN.CLERIC2:
676 var shopcode RH.Cleric2
677 var SHOP Riverhaven Cleric2 Shop
678 gosub STEAL %RH.Cleric2
679GO.PAWN.HAVEN:
680 var CURRENT.CITY RIVERHAVEN
681 var LAST GO.PAWN.HAVEN
682 if ("%PAWN" = "OFF") then goto HAVEN.TO.BANK
683 gosub AUTOMOVE PAWN
684 pause 0.5
685 if ("%guild" = "Necromancer") then gosub NECROPREP
686 gosub PAWN.GOODS
687HAVEN.TO.BANK:
688 var LAST HAVEN.TO.BANK
689 if ("%guild" = "Thief") then send khri stop
690 if ("%guild" = "Necromancer") then goto HAVEN.TELLER
691 if ("%PREMIUM" = "ON") then goto HAVEN.PREMIUM
692 gosub AUTOMOVE exchange
693 gosub LIRUMS
694 goto HAVEN.TELLER
695HAVEN.PREMIUM:
696 gosub AUTOMOVE premium exchange
697 gosub LIRUMS
698HAVEN.TELLER:
699 gosub AUTOMOVE teller
700 var Banked 1
701 gosub BANK
702 if ("%guild" = "Thief") then gosub PUT with 4 silver
703 gosub MOVE go arch
704 if ("%guild" = "Necromancer") then gosub NECROPREP
705 gosub MOVE out
706 if ("%BIN" = "OFF") then goto DONE.STEALING.HAVEN
707GO.BIN.HAVEN:
708HAVEN.GO.BIN:
709HAVEN.FIND.GUILD:
710 var LAST HAVEN.FIND.GUILD
711 var BIN.HAVEN 0
712 pause 0.5
713 match hole1 selling off some stolen goods
714 match hole2 Crescent Way
715 match hole3 Silvermoon Road
716 match hole4 the boss is with his own kind
717 match hole5 cooped up
718 match hole6 around the rookery
719 matchre NO.CONTACTS Apparently there are too many eyes on you|USAGE|walks off|look of disgust
720 send contact guild
721 matchwait 7
722 goto NO.CONTACTS
723NO.CONTACTS:
724 var LOCATION LOST
725hole1:
726 var LAST hole1
727 gosub AUTOMOVE 33
728 gosub SEARCH
729 pause $roundtime
730 pause 0.5
731 gosub PUT knock door
732 gosub PUT whisper door %HAVEN_PW
733 gosub MOVE climb stair
734 gosub MOVE ne
735 gosub MOVE go corner
736athole1:
737 if matchre("$roomobjs","(Crow|Lady Swan)") then
738 {
739 var BIN.HAVEN 1
740 gosub BIN.GOODS
741 gosub CIRCLE.CHECK
742 }
743 gosub MOVE out
744 gosub MOVE sw
745 send climb stair
746 pause 0.5
747 send go door
748 pause 0.5
749 if ("%LOCATION" = "LOST") && ("%BIN.HAVEN" = "0") then goto hole2
750 goto HAVEN.DONE.ASSESS
751hole2:
752 var LAST hole2
753 gosub AUTOMOVE 47
754 gosub SEARCH
755 pause $roundtime
756 pause 0.5
757 gosub PUT knock door
758 gosub PUT whisper door %HAVEN_PW
759 gosub PUT look shadow
760 gosub PUT search shadow
761 pause 0.5
762 gosub MOVE go open
763 gosub MOVE go cor
764athole2:
765 if matchre("$roomobjs","(Crow|Lady Swan)") then
766 {
767 var BIN.HAVEN 1
768 gosub BIN.GOODS
769 gosub CIRCLE.CHECK
770 }
771 gosub MOVE out
772 gosub MOVE out
773 gosub MOVE go door
774 if ("%LOCATION" = "LOST") && ("%BIN.HAVEN" = "0") then goto hole3
775 goto HAVEN.DONE.ASSESS
776hole3:
777 var LAST hole3
778 gosub AUTOMOVE 36
779 gosub SEARCH
780 pause $roundtime
781 gosub PUT knock door
782 gosub PUT whisper door %HAVEN_PW
783 gosub PUT look floor
784 gosub MOVE go door
785 gosub MOVE go cor
786athole3:
787 if matchre("$roomobjs","(Crow|Lady Swan)") then
788 {
789 var BIN.HAVEN 1
790 gosub BIN.GOODS
791 gosub CIRCLE.CHECK
792 }
793 gosub MOVE out
794 send climb door
795 pause 0.5
796 gosub MOVE out
797 if ("%LOCATION" = "LOST") && ("%BIN.HAVEN" = "0") then goto hole4
798 goto HAVEN.DONE.ASSESS
799hole4:
800 var LAST hole4
801 gosub AUTOMOVE 302
802 gosub SEARCH
803 pause $roundtime
804 gosub PUT knock grat
805 gosub PUT whisper grat %HAVEN_PW
806 gosub MOVE go door
807 gosub MOVE ne
808 gosub MOVE go nook
809athole4:
810 if matchre("$roomobjs","(Crow|Lady Swan)") then
811 {
812 var BIN.HAVEN 1
813 gosub BIN.GOODS
814 gosub CIRCLE.CHECK
815 }
816 gosub MOVE out
817 gosub MOVE sw
818 gosub MOVE go door
819 gosub MOVE go grate
820 gosub MOVE out
821 if ("%LOCATION" = "LOST") && ("%BIN.HAVEN" = "0") then goto hole5
822 goto HAVEN.DONE.ASSESS
823hole5:
824 var LAST hole5
825 gosub AUTOMOVE 41
826 gosub SEARCH
827 pause $roundtime
828 pause 0.5
829 gosub PUT knock door
830 gosub PUT whisper door %HAVEN_PW
831 gosub MOVE n
832 gosub MOVE go corn
833athole5:
834 if matchre("$roomobjs","(Crow|Lady Swan)") then
835 {
836 var BIN.HAVEN 1
837 gosub BIN.GOODS
838 gosub CIRCLE.CHECK
839 }
840 gosub MOVE out
841 gosub MOVE s
842 gosub MOVE go door
843 if ("%LOCATION" = "LOST") && ("%BIN.HAVEN" = "0") then goto hole6
844 goto HAVEN.DONE.ASSESS
845hole6:
846 var LAST hole6
847 gosub AUTOMOVE 305
848 gosub SEARCH
849 pause $roundtime
850 gosub PUT knock door
851 gosub PUT whisper door %HAVEN_PW
852 gosub MOVE go arch
853 gosub MOVE climb st
854 gosub MOVE go cor
855athole6:
856 if matchre("$roomobjs","(Crow|Lady Swan)") then
857 {
858 var BIN.HAVEN 1
859 gosub BIN.GOODS
860 gosub CIRCLE.CHECK
861 }
862 gosub MOVE out
863 gosub MOVE climb sta
864 gosub MOVE go arc
865 gosub MOVE go door
866 goto HAVEN.DONE.ASSESS
867HAVEN.DONE.ASSESS:
868 var LAST HAVEN.DONE.ASSESS
869 math RunsCompleted add 1
870 send exp
871 waitforre ^EXP HELP for more information
872DONE.STEALING.HAVEN:
873 var LAST DONE.STEALING.HAVEN
874 gosub AUTOMOVE town
875 if ("%SINGLE_RUN" = "ON") then goto FINISHED.SCRIPT
876 if ($Thievery.LearningRate >= 30) then goto FINISHED.SCRIPT
877 if ("%CITY" = "SHARD") || ("%CITY" = "CROSSING") || ("%CITY" = "HIB") || ("%CITY" = "LETH") then goto FINISHED.SCRIPT
878 if ("%CITY" = "RIVERHAVEN") || ("%CITY" = "ROSSMAN") || ("%CITY" = "THEREN") && ($Thievery.LearningRate < 30) then goto TO.ARTHE
879 goto TO.ARTHE
880############################################################################
881## ZOLUREN STEALING SECTION (ARTHE / CROSSING / LETH ) ##
882############################################################################
883# ARTHE DALE
884CROSSING.STEAL:
885ARTHE.STEAL:
886TO.ARTHE:
887 var CURRENT.CITY ARTHE
888 var LAST TO.ARTHE
889 if ($zoneid = 30) && ($roomid != 8) then gosub AUTOMOVE 8
890 if ($zoneid = 1) && ($roomid != 42) then gosub AUTOMOVE 42
891 if ($zoneid = 7) then goto ARTHE
892 send .%TRAVEL_SCRIPT arthe
893 waitforre ^YOU HAVE ARRIVED
894 pause
895ARTHE:
896 var LAST CROSSING
897 gosub AUTOMOVE glaysker
898 pause 0.5
899 echo
900 echo *** STEALING FROM ARTHE DALE!
901 echo
902 gosub COOKIE
903 if ("%guild" = "Necromancer") then gosub NECROPREP
904ARTHE.EXP.CHECK.0:
905 if $Thievery.Ranks >= 460 then goto ARTHE.TO.ODDS
906ARTHE.TO.PATTERN:
907 var LAST ARTHE.TO.FASHION
908 gosub AUTOMOVE embroid
909ARTHE.THREADS:
910 var shopcode AD.Thread
911 var SHOP Arthe Dale Thread Shop
912 gosub STEAL %AD.Thread
913ARTHE.TO.FASHION:
914 var LAST ARTHE.TO.ODDS
915 gosub AUTOMOVE clothing
916ARTHE.FASHION:
917 var shopcode AD.Fash
918 var SHOP Arthe Dale Fashion Shop
919 gosub STEAL %AD.Fash
920ARTHE.TO.ODDS:
921 var LAST ARTHE.EXP.CHECK.1
922 gosub AUTOMOVE Odds
923ARTHE.ODDS:
924 var shopcode AD.Odds
925 var SHOP Arthe Dale Odds'n'Ends Shop
926 gosub STEAL %AD.Odds
927 if $hidden then gosub unhide
928 gosub MOVE out
929ARTHE.EXP.CHECK.1:
930 if $Thievery.Ranks >= 600 then goto ARTHE.TIME.0
931ARTHE.TO.BARD:
932 var LAST ARTHE.TIME.0
933 gosub AUTOMOVE music
934ARTHE.BARD:
935 var shopcode AD.Bard
936 var SHOP Arthe Dale Bard Shop
937 gosub STEAL %AD.Bard
938 gosub MOVE out
939ARTHE.TIME.0:
940 if ($Time.isDay = 1) then goto ARTHE.TO.ARMOR
941 if ($Time.isDay = 0) then goto ARTHE.EXP.CHECK.2
942 gosub TIME.CHECK
943 if ("%TIME" = "NIGHT") then goto ARTHE.EXP.CHECK.2
944ARTHE.TO.ARMOR:
945 var LAST ARTHE.EXP.CHECK.2
946 gosub AUTOMOVE Armor
947ARTHE.ARMOR:
948 var shopcode AD.Arm
949 var SHOP Arthe Dale Armor Shop
950 gosub STEAL %AD.Arm
951ARTHE.EXP.CHECK.2:
952 if $Thievery.Ranks >= 300 then goto ARTHE.TO.YULUGRI
953ARTHE.TO.FETA:
954 var LAST ARTHE.TO.YULUGRI
955 gosub AUTOMOVE feta
956ARTHE.FETA:
957 var shopcode AD.Feta
958 var itemLocation %AD.FETA.Loc
959 var SHOP Arthe Dale Feta's Kitchen
960 gosub STEAL %AD.Feta
961ARTHE.TO.YULUGRI:
962 var LAST ARTHE.EXP.CHECK.3
963 gosub AUTOMOVE Yulugri
964ARTHE.YULUGRI:
965 var shopcode AD.Map
966 var SHOP Arthe Dale Yulugri
967 gosub STEAL %AD.Map
968ARTHE.EXP.CHECK.3:
969 if $Thievery.Ranks >= 300 then goto LEAVE.ARTHE
970ARTHE.TO.SMOKE:
971 var LAST ARTHE.EXP.CHECK.4
972 gosub AUTOMOVE smoking
973ARTHE.SMOKE:
974 var shopcode AD.Smoke
975 var SHOP Arthe Dale Smoke Shop
976 gosub STEAL %AD.Smoke
977ARTHE.EXP.CHECK.4:
978 if $Thievery.Ranks >= 260 then goto LEAVE.ARTHE
979 if $Thievery.Ranks >= 220 then goto ARTHE.EXP.CHECK.7
980ARTHE.TO.TART:
981 var LAST ARTHE.EXP.CHECK.5
982 gosub AUTOMOVE 631
983ARTHE.TART:
984 var shopcode AD.Tart.E
985 var SHOP Arthe Dale TART E
986 gosub STEAL %AD.Tart.E
987ARTHE.EXP.CHECK.5:
988 if $Thievery.Ranks >= 195 then goto ARTHE.EXP.CHECK.6
989ARTHE.TO.TART.C:
990 var LAST ARTHE.EXP.CHECK.6
991 gosub AUTOMOVE 630
992ARTHE.TART.C:
993 var shopcode AD.Tart.C
994 var SHOP Arthe Dale TART C
995 gosub STEAL %AD.Tart.E
996ARTHE.EXP.CHECK.6:
997 if $Thievery.Ranks >= 212 then goto ARTHE.EXP.CHECK.7
998ARTHE.TO.TART.M:
999 var LAST ARTHE.EXP.CHECK.7
1000 gosub AUTOMOVE 629
1001ARTHE.TART.M:
1002 var shopcode AD.Tart.M
1003 var SHOP Arthe Dale TART M
1004 gosub STEAL %AD.Tart.E
1005ARTHE.EXP.CHECK.7:
1006 if $Thievery.Ranks >= 230 then goto LEAVE.ARTHE
1007ARTHE.TO.TART.L:
1008 var LAST ARTHE.EXP.CHECK.8
1009 gosub AUTOMOVE 628
1010ARTHE.TART.L:
1011 var shopcode AD.Tart.L
1012 var SHOP Arthe Dale TART L
1013 gosub STEAL %AD.Tart.E
1014ARTHE.EXP.CHECK.8:
1015 if $Thievery.Ranks >= 181 then goto LEAVE.ARTHE
1016ARTHE.TO.TART.F:
1017 gosub AUTOMOVE 627
1018ARTHE.TART.F:
1019 var shopcode AD.Tart.F
1020 var SHOP Arthe Dale TART F
1021 gosub STEAL %AD.Tart.E
1022LEAVE.ARTHE:
1023 var LAST ARTHE.EXP.CHECK.9
1024 if $hidden = 1 then gosub unhide
1025 pause 0.1
1026ARTHE.EXP.CHECK.9:
1027 if $Thievery.Ranks >= 890 then goto DONE.KAERNA
1028ARTHE.TO.KAERNA:
1029 var LAST DONE.KAERNA
1030 gosub AUTOMOVE grek
1031KAERNA.GENERAL:
1032 var shopcode KA.Grek
1033 var SHOP Kaerna General
1034 gosub STEAL %KA.Grek
1035DONE.KAERNA:
1036 if $hidden = 1 then gosub unhide
1037 if ("%guild" = "Thief") then
1038 {
1039 gosub COOKIE.START meditate
1040 }
1041 pause 0.5
1042 goto TO.CROSSING
1043##################################
1044#### CROSSINGS
1045##################################
1046TO.CROSSING:
1047 var CURRENT.CITY CROSSING
1048 var LAST CROSSING
1049 gosub AUTOMOVE crossing
1050 gosub AUTOMOVE 152
1051 goto WARRANT.CHECK.CROSS
1052XING:
1053CROSS:
1054CROSSING:
1055CROSSINGS:
1056WARRANT.CHECK.CROSS:
1057 var LAST CROSSINGS
1058 var CURRENT.CITY CROSSING
1059 echo
1060 echo *** STEALING FROM CROSSING!
1061 echo
1062 if matchre("$roomobjs","(town guard)") then put surrender guard
1063 pause 0.5
1064CROSSING.EXP.CHECK.0:
1065 if ($Thievery.LearningRate > 33) && ("%STEALTH" != "ON") then goto GO.CROSS.PAWN
1066 if ($Thievery.LearningRate > 33) && ($Stealth.LearningRate > 30) then goto GO.CROSS.PAWN
1067 gosub COOKIE
1068 if ("%guild" = "Necromancer") then gosub NECROPREP
1069 pause 0.2
1070CROSSING.TO.SCRIPT:
1071 var CURRENT.CITY CROSSING
1072 var LAST CROSSING.EXP.CHECK.1
1073 gosub AUTOMOVE Temple
1074 gosub AUTOMOVE Script
1075CROSSING.SCRIPTORIUM:
1076 var shopcode C.Script
1077 var SHOP Crossing Scriptorium
1078 gosub STEAL %C.Script.Num %C.Script
1079 if $hidden then gosub unhide
1080 gosub AUTOMOVE cross
1081 pause 0.5
1082CROSSING.EXP.CHECK.1:
1083 if $Thievery.Ranks >= 487 then goto CROSSING.EXP.CHECK.2
1084 if ($Thievery.LearningRate > 33) && ("%STEALTH" != "ON") then goto GO.CROSS.PAWN
1085 if ($Thievery.LearningRate > 33) && ($Stealth.LearningRate > 25) then goto GO.CROSS.PAWN
1086CROSSING.TO.CARD:
1087 var LAST CROSSING.EXP.CHECK.2
1088 gosub AUTOMOVE Card shop
1089CROSSING.CARD:
1090 var shopcode C.Card
1091 var SHOP Crossing Card Shop
1092 gosub STEAL %C.Card
1093CROSSING.EXP.CHECK.2:
1094 if $Thievery.Ranks >= 400 then goto CROSSING.EXP.CHECK.3
1095 if ($Thievery.LearningRate > 33) && ("%STEALTH" != "ON") then goto GO.CROSS.PAWN
1096 if ($Thievery.LearningRate > 33) && ($Stealth.LearningRate > 25) then goto GO.CROSS.PAWN
1097CROSSING.TO.CLOTHING:
1098 var LAST CROSSING.EXP.CHECK.3
1099 if $Thievery.LearningRate > 33 then goto GO.CROSS.PAWN
1100 gosub AUTOMOVE clothing
1101CROSSING.CLOTHING:
1102 var shopcode C.Stitch
1103 var SHOP Crossing Clothing Shop
1104 gosub STEAL %C.Stitch
1105CROSSING.EXP.CHECK.3:
1106 if $Thievery.Ranks >= 655 then goto CROSSING.EXP.CHECK.4
1107 if ($Thievery.LearningRate > 33) && ("%STEALTH" != "ON") then goto GO.CROSS.PAWN
1108 if ($Thievery.LearningRate > 33) && ($Stealth.LearningRate > 25) then goto GO.CROSS.PAWN
1109CROSSING.TO.JEWELRY:
1110 var LAST CROSSING.EXP.CHECK.4
1111 gosub AUTOMOVE jewel
1112CROSSING.JEWELRY:
1113 var shopcode C.Jewel
1114 var SHOP Crossing Jewelry Shop
1115 gosub STEAL %C.Jewel
1116CROSSING.EXP.CHECK.4:
1117 if $Thievery.Ranks >= 750 then goto CROSSING.EXP.CHECK.5
1118 if ($Thievery.LearningRate > 33) && ("%STEALTH" != "ON") then goto GO.CROSS.PAWN
1119 if ($Thievery.LearningRate > 33) && ($Stealth.LearningRate > 25) then goto GO.CROSS.PAWN
1120CROSSING.TO.GENERAL:
1121 var LAST CROSSING.EXP.CHECK.5
1122 gosub AUTOMOVE General
1123CROSSING.GENERAL:
1124 var shopcode C.Gen
1125 var SHOP Crossing General Store
1126 gosub STEAL %C.Gen
1127CROSSING.EXP.CHECK.5:
1128 if $Thievery.Ranks >= 481 then goto CROSSING.EXP.CHECK.6
1129 if ($Thievery.LearningRate > 33) && ("%STEALTH" != "ON") then goto GO.CROSS.PAWN
1130 if ($Thievery.LearningRate > 33) && ($Stealth.LearningRate > 25) then goto GO.CROSS.PAWN
1131CROSSING.TO.CLERIC:
1132 var LAST CROSSING.EXP.CHECK.6
1133 gosub AUTOMOVE duran
1134CROSSING.CLERIC:
1135 var shopcode C.Cler
1136 var SHOP Crossing Cleric Shop
1137 gosub STEAL %C.Cler
1138CROSSING.EXP.CHECK.6:
1139 if matchre("%guild","Cleric") && ($Thievery.Ranks >= 487) then goto CROSSING.TO.CLERIC2
1140 if ($Thievery.LearningRate > 33) && ("%STEALTH" != "ON") then goto GO.CROSS.PAWN
1141 if ($Thievery.LearningRate > 33) && ($Stealth.LearningRate > 25) then goto GO.CROSS.PAWN
1142 goto CROSSING.EXP.CHECK.7
1143CROSSING.TO.CLERIC2:
1144 var LAST CROSSING.EXP.CHECK.7
1145 gosub AUTOMOVE 957
1146CROSSING.CLERIC2:
1147 var shopcode C.Cler2
1148 var SHOP Crossing Cleric2 Shop
1149 gosub STEAL %C.Cler2
1150CROSSING.EXP.CHECK.7:
1151 if ($Thievery.LearningRate > 33) && ("%STEALTH" != "ON") then goto GO.CROSS.PAWN
1152 if ($Thievery.LearningRate > 33) && ($Stealth.LearningRate > 25) then goto GO.CROSS.PAWN
1153 if $Thievery.Ranks >= 520 then goto CROSSING.TO.MUSIC
1154CROSSING.TO.BATH:
1155 var LAST CROSSING.TO.LOCK
1156 gosub AUTOMOVE bathhouse
1157CROSSING.BATHHOUSE:
1158 var shopcode C.Bath
1159 var SHOP Crossing Bathhouse
1160 var itemLocation %C.Bath.Loc
1161 gosub STEAL %C.Bath.Num %C.Bath
1162CROSSING.TO.LOCK:
1163 var itemLocation
1164 var LAST CROSSING.TO.MUSIC
1165 if ($Thievery.LearningRate > 33) && ("%STEALTH" != "ON") then goto GO.CROSS.PAWN
1166 if ($Thievery.LearningRate > 33) && ($Stealth.LearningRate > 25) then goto GO.CROSS.PAWN
1167 if $Thievery.Ranks >= 150 && $Thievery.Ranks < 250 then goto CROSSING.TO.MUSIC
1168 gosub AUTOMOVE locks
1169CROSSING.LOCKSMITH:
1170 var shopcode C.Lock
1171 var SHOP Crossing Locksmith
1172 gosub STEAL %C.Lock
1173CROSSING.TO.MUSIC:
1174 var LAST CROSSING.TO.MUSIC.BACKROOM
1175 gosub AUTOMOVE Music
1176CROSSING.EXP.CHECK.8:
1177 if ($Thievery.LearningRate > 33) && ("%STEALTH" != "ON") then goto GO.CROSS.PAWN
1178 if ($Thievery.LearningRate > 33) && ($Stealth.LearningRate > 25) then goto GO.CROSS.PAWN
1179 if $Thievery.Ranks >= 600 then goto CROSSING.TO.MUSIC.BACKROOM
1180CROSSING.MUSIC:
1181 var shopcode C.Music
1182 var SHOP Crossing Music Shop
1183 gosub STEAL %C.Music
1184CROSSING.TO.MUSIC.BACKROOM:
1185 var LAST CROSSING.TO.ARMOR
1186 if $hidden then gosub unhide
1187 gosub MOVE go curtain
1188CROSSING.MUSIC.BACKROOM:
1189 var shopcode C.Music2
1190 var SHOP Xing music shop backroom
1191 var LAST CROSSING.TO.ARMOR
1192 gosub STEAL %C.Music2
1193 gosub MOVE go curtain
1194CROSSING.TO.ARMOR:
1195 var LAST CROSSING.TO.WEAPON
1196 gosub AUTOMOVE Armor
1197CROSSING.ARMOR:
1198 var shopcode C.Arm
1199 var SHOP Crossing Armor Shop
1200 gosub STEAL %C.Arm
1201CROSSING.TO.WEAPON:
1202 var LAST CROSSING.EXP.CHECK.9
1203 gosub AUTOMOVE Weapon
1204CROSSING.WEAPON:
1205 var shopcode C.Weap
1206 var SHOP Crossing Weapon Shop
1207 gosub STEAL %C.Weap
1208CROSSING.EXP.CHECK.9:
1209 if $Thievery.Ranks >= 350 then goto CROSSING.EXP.CHECK.10
1210 if ($Thievery.LearningRate > 33) && ("%STEALTH" != "ON") then goto GO.CROSS.PAWN
1211 if ($Thievery.LearningRate > 33) && ($Stealth.LearningRate > 25) then goto GO.CROSS.PAWN
1212CROSSING.TO.FLORIST:
1213 var LAST CROSSING.EXP.CHECK.10
1214 gosub AUTOMOVE Florist
1215CROSSING.FLORIST:
1216 var shopcode C.Flow
1217 var SHOP Crossing Florist
1218 gosub STEAL %C.Flow
1219CROSSING.EXP.CHECK.10:
1220 if $Thievery.Ranks >= 300 then goto CROSSING.TO.EMPATH
1221 if ($Thievery.LearningRate > 33) && ("%STEALTH" != "ON") then goto GO.CROSS.PAWN
1222 if ($Thievery.LearningRate > 33) && ($Stealth.LearningRate > 25) then goto GO.CROSS.PAWN
1223CROSSING.TO.SHOE:
1224 var LAST CROSSING.TO.EMPATH
1225 gosub AUTOMOVE Shoe
1226CROSSING.SHOES:
1227 var shopcode C.Cobb
1228 var SHOP Crossing Shoe Shop
1229 gosub STEAL %C.Cobb
1230CROSSING.TO.EMPATH:
1231 var LAST CROSSING.TO.EMPATH2
1232 if ($Thievery.LearningRate > 33) && ("%STEALTH" != "ON") then goto GO.CROSS.PAWN
1233 if ($Thievery.LearningRate > 33) && ($Stealth.LearningRate > 25) then goto GO.CROSS.PAWN
1234 if !matchre("%guild","(Thief|Empath|Trader)") then goto CROSSING.EXP.CHECK.11
1235 gosub AUTOMOVE Emmiline
1236CROSSING.EMPATH:
1237 var shopcode C.Empath
1238 var SHOP Crossing Empath Shop
1239 var SECOND_ITEM 1
1240 var secondary %C.Empath.Alt
1241 gosub STEAL %C.Empath
1242CROSSING.TO.EMPATH2:
1243 var LAST CROSSING.TO.EMPATH3
1244 gosub MOVE w
1245CROSSING.EMPATH2:
1246 var shopcode C.Empath2
1247 var SHOP Crossing Empath Shop 2
1248 gosub STEAL %C.Empath2
1249CROSSING.TO.EMPATH3:
1250 var LAST CROSSING.EXP.CHECK.11
1251 gosub MOVE e
1252 gosub MOVE go arch
1253CROSSING.EMPATH3:
1254 var shopcode C.Empath3
1255 var SHOP Crossing Empath Shop 3
1256 var SECOND_ITEM 1
1257 var itemLocation %C.Empath3.Loc
1258 var secondary %C.Empath3.Alt
1259 gosub STEAL %C.Empath3
1260 gosub MOVE go arch
1261 gosub MOVE go door
1262 gosub MOVE go step
1263CROSSING.EXP.CHECK.11:
1264 if ($Thievery.LearningRate > 33) && ("%STEALTH" != "ON") then goto GO.CROSS.PAWN
1265 if ($Thievery.LearningRate > 33) && ($Stealth.LearningRate > 25) then goto GO.CROSS.PAWN
1266 if $Thievery.Ranks >= 334 then goto CROSSING.TO.ALCHEMY
1267CROSSING.TO.HERBS:
1268 var LAST CROSSING.TO.ALCHEMY
1269 gosub AUTOMOVE Herb
1270CROSSING.HERBS:
1271 var shopcode C.Herb
1272 var SHOP Crossing Herb Shop
1273 gosub STEAL %C.Herb
1274CROSSING.TO.ALCHEMY:
1275 if $Thievery.Ranks >= 1050 then goto CROSSING.EXP.CHECK.13
1276 var LAST CROSSING.EXP.CHECK.12
1277 gosub AUTOMOVE Chizil
1278CROSSING.ALCHEMY:
1279 var shopcode C.Alch
1280 var SHOP Crossing Alchemy Shop
1281 gosub STEAL %C.Alch
1282CROSSING.EXP.CHECK.12:
1283 if $Thievery.Ranks >= 640 then goto CROSSING.EXP.CHECK.13
1284 if ($Thievery.LearningRate > 33) && ("%STEALTH" != "ON") then goto GO.CROSS.PAWN
1285 if ($Thievery.LearningRate > 33) && ($Stealth.LearningRate > 25) then goto GO.CROSS.PAWN
1286CROSSING.TO.TANNER:
1287 var LAST CROSSING.EXP.CHECK.13
1288 if $hidden then gosub unhide
1289 gosub AUTOMOVE tanner
1290CROSSING.TANNER:
1291 var shopcode C.Tann
1292 var SHOP Crossing Tanner
1293 var itemLocation %C.Tann.Loc
1294 gosub STEAL %C.Tann
1295CROSSING.EXP.CHECK.13:
1296 if $Thievery.Ranks >= 670 then goto CROSSING.TO.ARTIFICE
1297 if ($Thievery.LearningRate > 33) && ("%STEALTH" != "ON") then goto GO.CROSS.PAWN
1298 if ($Thievery.LearningRate > 33) && ($Stealth.LearningRate > 25) then goto GO.CROSS.PAWN
1299CROSSING.TO.HABER:
1300 var LAST CROSSING.TO.ARTIFICE
1301 gosub AUTOMOVE haber
1302CROSSING.HABERDASHERY:
1303 var shopcode C.Haber
1304 var SHOP Crossing Haberdashery
1305 gosub STEAL %C.Haber
1306CROSSING.TO.ARTIFICE:
1307 var LAST GO.CROSS.PAWN
1308 if $Thievery.Ranks >= 975 then goto GO.CROSS.PAWN
1309 gosub AUTOMOVE magic
1310CROSSING.ARTIFICER:
1311 var shopcode C.Artif
1312 var SHOP Crossing Artificer
1313 gosub STEAL %C.Artif
1314GO.PAWN.CROSS:
1315GO.CROSS.PAWN:
1316 var CURRENT.CITY CROSSING
1317 var LAST GO.CROSS.PAWN
1318 if $hidden then gosub unhide
1319 if ("%guild" = "Thief") then send khri stop
1320 if ("%PAWN" = "OFF") && ("%guild" = "Thief") then goto GO.CROSS.BIN
1321 gosub AUTOMOVE pawn
1322 gosub PAWN.GOODS
1323 if ("%BIN" = "OFF") then goto DONE.STEALING.CROSS2
1324## TO THIEF GUILD
1325GO.CROSS.BIN:
1326 var LAST GO.CROSS.BIN
1327 gosub AUTOMOVE 78
1328 goto GO.BIN.CONT
1329
1330##OLD SAND SPIT METHOD
1331 #gosub AUTOMOVE sand spit tavern
1332 #gosub MOVE go back area
1333 #gosub MOVE climb ladder
1334 #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
1335 # {
1336 # gosub MOVE go other barrel
1337 # goto GO.BIN.CONT
1338 # }
1339 #if matchre("$roomobjs" , "^You also see some old barrels") then
1340 # {
1341 # gosub MOVE go other barrel
1342 # goto GO.BIN.CONT
1343 # }
1344 #if matchre("$roomobjs" , "^You also see an old barrel with a thieves guild sign") then
1345 # {
1346 # gosub MOVE go barrel
1347 # goto GO.BIN.CONT
1348 # }
1349GO.BIN.CONT:
1350 gosub AUTOMOVE bin
1351 gosub BIN.GOODS
1352DONE.STEALING.CROSS:
1353 var LAST DONE.STEALING.CROSS
1354 gosub MOVE go door
1355 gosub CIRCLE.CHECK
1356 pause 0.5
1357 gosub MOVE go door
1358# Leaving the THIEF GUILD
1359DONE.STEALING.CROSS2:
1360 var LAST DONE.STEALING.CROSS2
1361 if ("%PREMIUM" = "ON") then goto CROSS.PREMIUM
1362 gosub AUTOMOVE exchange
1363 gosub KRONARS
1364 goto CROSS.TELLER
1365CROSS.PREMIUM:
1366 gosub AUTOMOVE premium exchange
1367 gosub KRONARS
1368CROSS.TELLER:
1369 gosub AUTOMOVE teller
1370 gosub BANK
1371 send with 10 silver
1372 gosub MOVE out
1373 if ("%guild" = "Necromancer") then gosub NECROPREP
1374 gosub MOVE out
1375CROSSING.DECIDE:
1376 if ($roomid != 42) then gosub AUTOMOVE 42
1377 if ("%SINGLE_RUN" = "ON") then goto FINISHED.SCRIPT
1378 if ($Thievery.LearningRate >= 30) then goto FINISHED.SCRIPT
1379 if ("%CITY" = "SHARD") || ("%CITY" = "HIB") || ("%CITY" = "CROSSING") || ("%CITY" = "LETH") && ($Thievery.LearningRate < 30) then goto TRAVEL.HAVEN
1380 if ("%CITY" = "RIVERHAVEN") || ("%CITY" = "ROSSMAN") || ("%CITY" = "THEREN") && ($Thievery.LearningRate < 30) then goto HEAD.TO.LETH
1381 goto HEAD.TO.LETH
1382#####################################
1383## LETH DERIEL
1384#####################################
1385HEAD.TO.LETH:
1386 var CURRENT.CITY LETH
1387 var LAST HEAD.TO.LETH
1388 if ($zoneid = 1) && ($roomid != 42) then gosub AUTOMOVE 42
1389 send .%TRAVEL_SCRIPT leth
1390 waitforre ^YOU HAVE ARRIVED
1391LETH.STEAL:
1392WARRANT.CHECK.LETH:
1393 var LAST WARRANT.CHECK.LETH
1394 if matchre("$roomobjs","(Elven Warden)") then put surrender warden
1395 pause 0.5
1396 echo
1397 echo *** STEALING FROM LETH DERIEL!
1398 echo
1399 gosub COOKIE
1400 if ("%guild" = "Necromancer") then gosub NECROPREP
1401LETH.EXP.CHECK.0:
1402 if $Thievery.LearningRate > 33 then goto DONE.STEALING.LETH
1403 if $Thievery.Ranks >= 520 then goto LETH.TO.BOWYER
1404LETH.TO.SKIN:
1405 var LAST LETH.TO.BOWYER
1406 gosub AUTOMOVE morik
1407LETH.SKIN.SHOP:
1408 var shopcode L.Skin
1409 var SHOP Leth Skin Shop
1410 gosub STEAL %L.Skin
1411LETH.TO.BOWYER:
1412 var LAST LETH.TO.ORIGAMI
1413 gosub AUTOMOVE Bow
1414LETH.BOWYER:
1415 var shopcode L.Bow
1416 var SHOP Leth Bowyer
1417 gosub STEAL %L.Bow
1418LETH.TO.ORIGAMI:
1419 var LAST LETH.EXP.CHECK.1
1420 gosub AUTOMOVE Origami
1421LETH.ORIGAMI.SHOP:
1422 var shopcode L.Orig
1423 var SHOP Leth Origami
1424 gosub STEAL %L.Orig.Num %L.Orig
1425LETH.EXP.CHECK.1:
1426 if $Thievery.LearningRate > 33 then goto DONE.STEALING.LETH
1427 if ($Thievery.Ranks > 400) then goto LETH.TO.WEAPON
1428 goto LETH.EXP.CHECK.2
1429LETH.TO.WEAPON:
1430 var LAST LETH.EXP.CHECK.2
1431 if $hidden then gosub unhide
1432 gosub AUTOMOVE weapon
1433LETH.WEAPON.SHOP:
1434 var shopcode L.Weap
1435 var SHOP Leth Weapon Shop
1436 gosub STEAL %L.Weap
1437LETH.EXP.CHECK.2:
1438 if $Thievery.Ranks >= 487 then goto LETH.TO.BARD2
1439LETH.TO.WICKER:
1440 var LAST LETH.EXP.CHECK.3
1441 gosub AUTOMOVE Wicker
1442LETH.WICKER.SHOP:
1443 var shopcode L.Wick
1444 var SHOP Leth Wicker Shop
1445 gosub STEAL %L.Wick
1446LETH.EXP.CHECK.3:
1447 if $Thievery.LearningRate > 33 then goto DONE.STEALING.LETH
1448 if $Thievery.Ranks >= 300 then goto LETH.TO.BARD2
1449LETH.TO.BARD:
1450 var LAST LETH.TO.BARD2
1451 gosub AUTOMOVE music
1452LETH.BARD.SHOP:
1453 var shopcode L.Bard
1454 var SHOP Leth Bard Shop
1455 gosub STEAL %L.Bard
1456LETH.TO.BARD2:
1457 var LAST LETH.EXP.CHECK.4
1458 if $Thievery.Ranks > 980 then goto LETH.EXP.CHECK.4
1459 gosub AUTOMOVE siny
1460LETH.BARD.SHOP2:
1461 var shopcode L.Bard2
1462 var SHOP Leth Bard2 Shop
1463 gosub STEAL %L.Bard2
1464LETH.EXP.CHECK.4:
1465 if $Thievery.LearningRate > 33 then goto DONE.STEALING.LETH
1466 if $Thievery.Ranks >= 700 then goto LETH.TO.WOOD
1467LETH.TO.CLOTHES:
1468 var LAST LETH.TO.WOOD
1469 gosub AUTOMOVE Clothing
1470LETH.CLOTHES.SHOP:
1471 var shopcode L.Cloth
1472 var SHOP Leth Clothes Shop
1473 gosub STEAL %L.Cloth
1474 if $hidden then gosub unhide
1475LETH.TO.WOOD:
1476 var LAST LETH.TO.GENERAL
1477 if $hidden then gosub unhide
1478 gosub AUTOMOVE wood
1479LETH.WOOD.SHOP:
1480 var shopcode L.Wood
1481 var SHOP Leth Wood Shop
1482 gosub STEAL %L.Wood
1483LETH.TO.GENERAL:
1484 var LAST LETH.EXP.CHECK.5
1485 gosub AUTOMOVE General
1486LETH.GENERAL.STORE:
1487 var shopcode L.Gen
1488 var SHOP Leth General Store
1489 var SECOND_ITEM 1
1490 var secondary %L.Gen.Alt
1491 gosub STEAL %L.Gen
1492LETH.EXP.CHECK.5:
1493 if $Thievery.LearningRate > 33 then goto DONE.STEALING.LETH
1494 if $Thievery.Ranks >= 465 then goto DONE.STEALING.LETH
1495LETH.TO.PERFUME:
1496 var LAST DONE.STEALING.LETH
1497 gosub AUTOMOVE Perfume
1498LETH.PERFUME.SHOP:
1499 var shopcode L.Perf
1500 var SHOP Leth Perfume Shop
1501 gosub STEAL %L.Perf
1502DONE.STEALING.LETH:
1503DONE.STEALING.LETH.BANK:
1504 var LAST DONE.STEALING.LETH
1505 gosub AUTOMOVE exchange
1506 gosub KRONARS
1507LETH.TELLER:
1508 gosub AUTOMOVE teller
1509 gosub BANK
1510 gosub AUTOMOVE portal
1511PAWN.LETH:
1512 send .%TRAVEL_SCRIPT cross
1513 waitforre ^YOU HAVE ARRIVED
1514GO.LETH.PAWN:
1515 var CURRENT.CITY LETH
1516 var LAST GO.LETH.PAWN
1517 if $hidden then gosub unhide
1518 if ("%guild" = "Thief") then send khri stop
1519 pause 0.5
1520 if ("%PAWN" = "OFF") then goto GO.LETH.BIN
1521 gosub AUTOMOVE PAWN
1522 gosub PAWN.GOODS
1523 if ("%BIN" = "OFF") then goto DONE.STEALING.LETH3
1524 if ("%guild" != "Thief") then goto DONE.STEALING.LETH3
1525GO.LETH.BIN:
1526 var LAST GO.LETH.BIN
1527 #gosub AUTOMOVE sand spit tavern
1528 #gosub MOVE go back area
1529 #gosub MOVE climb ladder
1530 #if matchre("$roomobjs" , "(You also see some old barrels|and an old barrel with a thieves guild)") then gosub MOVE go other barrel
1531 #else gosub MOVE go barrel
1532 gosub AUTOMOVE 78
1533 gosub AUTOMOVE bin
1534 gosub BIN.GOODS
1535DONE.STEALING.LETH2:
1536 var LAST DONE.STEALING.LETH2
1537 # Leaving the THIEF GUILD
1538 gosub MOVE go door
1539 gosub CIRCLE.CHECK
1540 pause 0.5
1541 gosub MOVE go door
1542DONE.STEALING.LETH3:
1543 var LAST DONE.STEALING.LETH3
1544 gosub AUTOMOVE exchange
1545 gosub KRONARS
1546LETH3.TELLER:
1547 gosub AUTOMOVE teller
1548 gosub BANK
1549LETH.DECIDE:
1550 if ($zoneid = 1) && ($roomid != 42) then gosub AUTOMOVE 42
1551 if ("%SINGLE_RUN" = "ON") then goto FINISHED.SCRIPT
1552 if $Thievery.LearningRate > 32 then goto FINISHED.SCRIPT
1553 if ("%CITY" = "CROSSING") || ("%CITY" = "RIVERHAVEN") || ("%CITY" = "ROSSMAN") || ("%CITY" = "THEREN") && ($Thievery.LearningRate < 30) then goto TO.SHARD
1554 if ("%CITY" = "SHARD") || ("%CITY" = "LETH") || ("%CITY" = "HIB") && ($Thievery.LearningRate < 30) then goto ARTHE.STEAL
1555 goto FINISHED.SCRIPT
1556############################################################################
1557## ILLITHI STEALING SECTION (SHARD / HIB / BOAR CLAN ETC ##
1558############################################################################
1559TO.SHARD:
1560 var LAST TO.SHARD
1561 if ("%guild" = "Thief") then send khri stop
1562 pause 0.5
1563 if ($zoneid = 61) && ($roomid != 18) then gosub AUTOMOVE 18
1564 send .%TRAVEL_SCRIPT shard
1565 waitforre ^YOU HAVE ARRIVED
1566OUTSIDE.SHARD:
1567 var LAST OUTSIDE.SHARD
1568 gosub AUTOMOVE east
1569 pause 0.5
1570 if ($zoneid = 66) then send go gate
1571SHARD.STEAL:
1572SHARD.STEALING:
1573WARRANT.CHECK.SHARD:
1574 var LAST SHARD.STEAL
1575 var CURRENT.CITY SHARD
1576 if matchre("$roomobjs","(Shard sentinel)") then put surrender sentin
1577 pause 0.5
1578 echo
1579 echo *** STEALING FROM SHARD!
1580 echo
1581 pause 0.5
1582 gosub TIME.CHECK
1583 if ("%TIME" = "NIGHT") then put #echo >Log Yellow *** Night time! Many shops closed. Reduced stealing. Much doh!
1584 gosub COOKIE
1585 if ("%guild" = "Necromancer") then gosub NECROPREP
1586SHARD.TO.GENERAL:
1587 var LAST SHARD.TIME.0
1588 gosub AUTOMOVE general
1589SHARD.GENERAL:
1590 var shopcode S.Gen
1591 var SHOP Shard General Store
1592 gosub STEAL %S.Gen
1593 gosub PUT go door
1594SHARD.TIME.0:
1595 if ($Time.isDay = 0) then goto SHARD.TO.CLERIC
1596 if ($Time.isDay = 1) then goto SHARD.TO.WEAPON
1597 if ("%TIME" = "NIGHT") then goto SHARD.TO.CLERIC
1598SHARD.TO.WEAPON:
1599 var LAST SHARD.EXP.CHECK.0
1600 gosub AUTOMOVE fiona
1601SHARD.WEAPON:
1602 var shopcode S.Weap
1603 var SHOP Shard Weapon Shop
1604 gosub STEAL %S.Weap
1605SHARD.EXP.CHECK.0:
1606 if $Thievery.Ranks >= 555 then goto SHARD.TO.CLERIC
1607SHARD.TO.CLOTHING:
1608 var LAST SHARD.TO.CLERIC
1609 gosub AUTOMOVE stitchery
1610SHARD.CLOTHING:
1611 var shopcode S.Stitch
1612 var SHOP Shard Stitchery
1613 gosub STEAL %S.Stitch
1614SHARD.TO.CLERIC:
1615 var LAST SHARD.TO.ALCHEMIST
1616 if $Thievery.Ranks >= 340 then goto SHARD.TO.ALCHEMIST
1617 gosub AUTOMOVE cleric shop
1618SHARD.CLERIC:
1619 var shopcode S.Cleric
1620 var SHOP Shard Cleric Shop
1621 gosub STEAL %S.Cleric
1622SHARD.TO.ALCHEMIST:
1623 if $Thievery.Ranks >= 1050 then goto SHARD.EXP.CHECK.1
1624 var LAST SHARD.TO.SHARD.EXP.CHECK.1
1625 gosub AUTOMOVE zieq
1626SHARD.ALCHEMIST:
1627 var shopcode S.Alch
1628 var SHOP Shard Alchemist
1629 gosub STEAL %S.Alch
1630SHARD.EXP.CHECK.1:
1631 if $Thievery.Ranks >= 334 then goto SHARD.TIME.1
1632 if $Thievery.LearningRate > 33 then goto GO.PAWN.SHARD
1633SHARD.TO.HERB:
1634 var LAST SHARD.TIME.1
1635 gosub AUTOMOVE herb
1636SHARD.HERB:
1637 var shopcode S.Herb
1638 var SHOP Shard Herb
1639 gosub STEAL %S.Herb
1640 gosub MOVE out
1641SHARD.TIME.1:
1642 if ($Time.isDay = 0) then goto SHARD.TO.REED
1643 if ($Time.isDay = 1) then goto SHARD.TO.ARTIFICER
1644 if ("%TIME" = "NIGHT") then goto SHARD.TO.REED
1645SHARD.TO.ARTIFICER:
1646 var LAST SHARD.TIME.2
1647 gosub AUTOMOVE magic
1648SHARD.ARTIFICER:
1649 var shopcode S.Artif
1650 var SHOP Shard Artificer
1651 gosub STEAL %S.Artif
1652 send out
1653 pause 0.5
1654SHARD.TIME.2:
1655 if ("%TIME" = "NIGHT") then goto SHARD.TO.ARMORY
1656SHARD.TO.MUSIC:
1657 var LAST SHARD.TO.LOCK
1658 gosub AUTOMOVE music
1659SHARD.MUSIC:
1660 var shopcode S.Music
1661 var SHOP Shard Music Shop
1662 gosub STEAL %S.Music
1663SHARD.TO.LOCK:
1664 var LAST SHARD.TIME.3
1665 if ($invisible = 1) then gosub stopinvis
1666 pause 0.1
1667 if ($invisible = 1) then gosub stopinvis
1668 gosub PUT ask malik about thieves
1669 gosub PUT order pick
1670 pause 0.001
1671 gosub PUT offer 999999999
1672 gosub PUT offer 999999999
1673 pause 0.5
1674 pause 0.1
1675 gosub STAND
1676SHARD.LOCK:
1677 var shopcode S.Lock
1678 var SHOP Shard Lockpick Shop
1679 gosub STEAL %S.Lock
1680 gosub PUT go trap
1681 pause 0.5
1682SHARD.TIME.3:
1683 if ("%TIME" = "NIGHT") then goto SHARD.TO.REED
1684SHARD.TO.ARMORY:
1685 var LAST SHARD.TO.REED
1686 gosub AUTOMOVE armor
1687SHARD.ARMORY:
1688 var shopcode S.Armor
1689 var SHOP Shard Armory
1690 gosub STEAL %S.Armor
1691SHARD.TO.REED:
1692 var LAST SHARD.TO.SCHOLAR
1693 gosub AUTOMOVE 593
1694SHARD.REED:
1695 var shopcode S.Reed
1696 var SHOP Shard Reed
1697 gosub STEAL %S.Reed.Num %S.Reed
1698SHARD.TO.SCHOLAR:
1699 var LAST SHARD.TIME.4
1700 gosub AUTOMOVE scholar
1701SHARD.SCHOLAR:
1702 var shopcode S.Museum
1703 var SHOP Shard Scholar's Museum Gift Shop
1704 gosub STEAL %S.Museum
1705SHARD.TIME.4:
1706 if ("%TIME" = "NIGHT") then goto SHARD.EXP.CHECK.2
1707SHARD.TO.BOWS:
1708 var LAST SHARD.EXP.CHECK.2
1709 gosub AUTOMOVE bows
1710SHARD.BOWS:
1711 var shopcode S.Bow
1712 var SHOP Shard Bowyer
1713 gosub STEAL %S.Bow
1714 gosub MOVE out
1715SHARD.EXP.CHECK.2:
1716 if $Thievery.Ranks < 200 then goto SHARD.TO.COIN
1717 if $Thievery.LearningRate > 33 then goto GO.PAWN.SHARD
1718SHARD.TO.SPIRE:
1719 var LAST SHARD.TO.COIN
1720 gosub AUTOMOVE spire
1721SHARD.SPIRE:
1722 var shopcode S.Spire
1723 var SHOP Spires of Glory
1724 gosub STEAL %S.Spire
1725SHARD.TO.COIN:
1726 if $Thievery.Ranks > 500 then goto SHARD.TO.TOKEN
1727 var LAST SHARD.TO.TOKEN
1728 gosub AUTOMOVE coin
1729SHARD.COIN:
1730 var shopcode S.Coin
1731 var SHOP Coin of the Realm
1732 var itemLocation %S.Coin.Loc
1733 gosub STEAL %S.Coin
1734SHARD.TO.TOKEN:
1735 var LAST SHARD.TO.BARBER
1736 gosub AUTOMOVE token
1737SHARD.TOKEN:
1738 var shopcode S.Token
1739 var SHOP Token Shop
1740 gosub STEAL %S.Token
1741SHARD.TO.BARBER:
1742 if $Thievery.Ranks > 950 then goto SHARD.TO.FRILLS
1743 var LAST SHARD.TO.FRILLS
1744 gosub AUTOMOVE barber
1745SHARD.BARBER:
1746 var shopcode S.Barber
1747 var SHOP Shard Barber Shop
1748 gosub STEAL %S.Barber
1749SHARD.TO.FRILLS:
1750 if $Thievery.Ranks >= 1050 then goto SHARD.TO.HERALDRY
1751 var LAST SHARD.TO.HERALDRY
1752 gosub AUTOMOVE Little
1753SHARD.FRILLS:
1754 var shopcode S.Frill
1755 var SHOP Shard Little Frills
1756 gosub STEAL %S.Frill
1757SHARD.TO.HERALDRY:
1758 var LAST SHARD.TO.GIFT
1759 gosub AUTOMOVE herald
1760SHARD.HERALDRY:
1761 var shopcode S.Herald
1762 var SHOP Shard Heraldry Shop
1763 var itemLocation %S.Herald.Loc
1764 gosub STEAL %S.Herald
1765SHARD.TO.GIFT:
1766 var LAST SHARD.TO.TOY
1767 gosub AUTOMOVE gift
1768SHARD.GIFT:
1769 var shopcode S.Gift
1770 var SHOP Shard Gift Shop
1771 var itemLocation %S.Gift.Loc
1772 gosub STEAL %S.Gift
1773SHARD.TO.TOY:
1774 if $Thievery.Ranks >= 1050 then goto SHARD.TO.MEMORY
1775 var LAST SHARD.TO.MEMORY
1776 gosub AUTOMOVE toy
1777SHARD.TOY:
1778 var shopcode S.Toy
1779 var SHOP Shard Toy Shop
1780 var itemLocation %S.Toy.Loc
1781 gosub STEAL %S.Toy
1782SHARD.TO.MEMORY:
1783 var LAST SHARD.TO.EASTGATE
1784 gosub AUTOMOVE 629
1785SHARD.MEMORY:
1786 var shopcode S.Memory
1787 var SHOP Shard Memories
1788 gosub STEAL %S.Memory.Num %S.Memory
1789SHARD.TO.EASTGATE:
1790 var LAST SHARD.TO.EASTGATE
1791 if $Thievery.LearningRate > 33 then goto GO.PAWN.SHARD
1792 if $hidden then gosub unhide
1793 gosub AUTOMOVE East Gate
1794SHARD.EXP.CHECK.3:
1795 if $Thievery.Ranks >= 600 then goto SHARD.TO.SURVIVAL
1796EASTGATE.TO.TANNER:
1797 gosub AUTOMOVE tanner
1798SHARD.TANNER:
1799 var shopcode S.Tanner
1800 var SHOP Shard Tanner
1801 gosub STEAL %S.Tanner
1802SHARD.TO.SURVIVAL:
1803 var LAST GO.PAWN.SHARD
1804 if $hidden then gosub unhide
1805 gosub AUTOMOVE survival
1806SHARD.SURVIVAL:
1807 var shopcode S.Surv
1808 var SHOP Shard Survival
1809 var itemLocation %S.Surv.Loc
1810 var SECOND_ITEM 1
1811 var secondary %S.Surv.Alt
1812 gosub STEAL %S.Surv
1813SHARD.TO.SURVIVAL2:
1814 gosub AUTOMOVE 33
1815SHARD.SURVIVAL2:
1816 var shopcode S.Surv2
1817 var SHOP Shard Survivalist Shop (Back room)
1818 var itemLocation %S.Surv2.Loc
1819 var SECOND_ITEM 1
1820 var secondary %S.Surv2.Alt
1821 gosub STEAL %S.Surv2
1822 goto DONE.STEAL.SHARD
1823TO.STEELCLAW.WEAPON:
1824 if $hidden then gosub unhide
1825 pause 0.5
1826 gosub AUTOMOVE weapon
1827STEELCLAW.WEAPON:
1828 var shopcode SC.Weap
1829 var SHOP SteelClaw Clan Weapons
1830 gosub STEAL %SC.Weap
1831DONE.STEAL.SHARD:
1832var LAST GO.PAWN.SHARD
1833 if $hidden then gosub unhide
1834 if ("%guild" = "Thief") then send khri stop
1835 pause 0.5
1836 gosub AUTOMOVE East
1837GO.PAWN.SHARD:
1838 var CURRENT.CITY SHARD
1839 var LAST GO.PAWN.SHARD
1840 if ("%PAWN" = "OFF") then goto GO.BIN.SHARD
1841 gosub AUTOMOVE PAWN
1842 gosub PAWN.GOODS
1843SHARD.BIN.DECIDE:
1844 if ("%BIN" = "OFF") then goto SHARD.TO.BANK
1845GO.BIN.SHARD:
1846 var CURRENT.CITY SHARD
1847 var LAST GO.BIN.SHARD
1848 gosub AUTOMOVE 93
1849 gosub MOVE go well
1850 gosub MOVE climb ladder
1851 gosub MOVE w
1852 gosub MOVE out
1853 gosub MOVE w
1854 gosub MOVE se
1855 gosub MOVE go gap
1856 send knock door
1857 wait
1858 pause 0.5
1859 send '%SHARD_PW
1860 pause 0.5
1861 gosub MOVE go door
1862 gosub MOVE go arch
1863 gosub MOVE go door
1864AT.SHARD.BIN:
1865 gosub BIN.GOODS
1866DONE.STEALING.SHARD:
1867 var LAST DONE.STEALING.SHARD
1868 gosub CIRCLE.CHECK
1869 pause 0.5
1870 gosub MOVE go door
1871 gosub MOVE go arch
1872 gosub MOVE go door
1873 gosub MOVE n
1874 gosub MOVE nw
1875 gosub MOVE e
1876 gosub MOVE go fiss
1877 gosub MOVE e
1878 gosub MOVE climb ladder
1879 gosub MOVE up
1880SHARD.TO.BANK:
1881 var LAST SHARD.TO.BANK
1882 gosub AUTOMOVE exchange
1883 gosub DOKORAS
1884SHARD.TELLER:
1885 gosub AUTOMOVE teller
1886 gosub BANK
1887 send with 5 silver
1888 if ("%guild" = "Necromancer") then gosub NECROPREP
1889 gosub AUTOMOVE exchange
1890 send exch all dok for kro
1891DONE.SHARD:
1892 if ("%CITY" = "CROSSING") || ("%CITY" = "RIVERHAVEN") || ("%CITY" = "ROSSMAN") || ("%CITY" = "THEREN") then goto FINISHED.SCRIPT
1893 if ("%CITY" = "HIB") || ("%CITY" = "SHARD") && ("%SHARD_RUN" = "ON") then goto FINISHED.SCRIPT
1894 if ($Thievery.LearningRate > 30) then goto FINISHED.SCRIPT
1895 if ("%SINGLE_RUN" = "ON") then goto FINISHED.SCRIPT
1896SHARD.TO.CROSS:
1897 var LAST SHARD.TO.CROSS
1898 if ("%CITY" = "SHARD") || ("%CITY" = "HIB") then
1899 {
1900 gosub AUTOMOVE E Gate
1901 gosub AUTOMOVE 65
1902 }
1903 goto HEAD.TO.LETH
1904GO.TO.CROSS:
1905 var LAST GO.TO.CROSS
1906 var BIN.CROSS 1
1907 var CITY CROSS
1908 gosub AUTOMOVE E Gate
1909 gosub AUTOMOVE 65
1910 pause 0.5
1911 send .%TRAVEL_SCRIPT cross
1912 waitforre ^YOU HAVE ARRIVED
1913 pause
1914 if ("%CITY" = "CROSSING") || ("%CITY" = "RIVERHAVEN") || ("%CITY" = "ROSSMAN") || ("%CITY" = "THEREN") then goto FINISHED.SCRIPT
1915 goto TO.ARTHE
1916GO.TO.HIB:
1917 var LAST GO.TO.HIB
1918 var BIN.HIB 1
1919 var CITY HIB
1920 gosub AUTOMOVE E Gate
1921 gosub AUTOMOVE 65
1922 pause 0.5
1923 send .%TRAVEL_SCRIPT hib
1924 waitforre ^YOU HAVE ARRIVED
1925####################################
1926# Hibarnhvidar
1927####################################
1928HIB.STEAL:
1929HIB.TO.SHIELD:
1930 var CURRENT.CITY HIB
1931 var LAST HIB.EXP.CHECK.0
1932 echo
1933 echo **** STEALING FROM HIB! ****
1934 echo
1935 pause 0.5
1936 gosub COOKIE
1937 if ("%guild" = "Necromancer") then gosub NECROPREP
1938 gosub AUTOMOVE shield
1939HIB.SHIELD:
1940 var shopcode H.Shield
1941 var SHOP Hib Shield Shop
1942 gosub STEAL %H.Shield
1943HIB.EXP.CHECK.0:
1944 if $Thievery.Ranks < 600 then goto HIB.TO.TOGGERY
1945HIB.TO.JEWELRY:
1946 var LAST HIB.TO.TOGGERY
1947 gosub AUTOMOVE jewelry
1948HIB.JEWELRY:
1949 var shopcode H.Jewel
1950 var SHOP Hib Jewelry
1951 gosub STEAL %H.Jewel
1952HIB.TO.TOGGERY:
1953 var LAST HIB.TO.SUNDRIES
1954 gosub AUTOMOVE togger
1955HIB.TOGGERY:
1956 var shopcode H.Tog
1957 var SHOP Hib Toggery
1958 gosub STEAL %H.Tog
1959HIB.TO.SUNDRIES:
1960 var LAST HIB.TO.LAMPS
1961 gosub AUTOMOVE general
1962HIB.SUNDRIES:
1963 var shopcode H.Sund
1964 var SHOP Hib Sundries
1965 gosub STEAL %H.Sund
1966 gosub MOVE OUT
1967HIB.TO.LAMPS:
1968 var LAST HIB.EXP.CHECK.1
1969 gosub AUTOMOVE lamp
1970HIB.LAMPS:
1971 var shopcode H.Lamp
1972 var SHOP Hib Lamps
1973 gosub STEAL %H.Lamp
1974HIB.EXP.CHECK.1:
1975 if $Thievery.Ranks >= 460 then goto HIB.TO.MUSIC
1976HIB.TO.HERBS:
1977 var LAST HIB.TO.MUSIC
1978 gosub AUTOMOVE herb
1979HIB.HERBS:
1980 var shopcode H.Herb
1981 var SHOP Hib Herbs
1982 gosub STEAL %H.Herb
1983HIB.TO.MUSIC:
1984 var LAST HIB.TO.ALCHEMY
1985 gosub AUTOMOVE music
1986HIB.MUSIC:
1987 var shopcode H.Music
1988 var SHOP Hib Music Store
1989 gosub STEAL %H.Music
1990HIB.TO.ALCHEMY:
1991 var LAST HIB.EXP.CHECK.2
1992 gosub AUTOMOVE alchemy
1993HIB.ALCHEMY:
1994 var shopcode H.Alch
1995 var SHOP Hib Alchemist
1996 gosub STEAL %H.Alch
1997HIB.EXP.CHECK.2:
1998 if $Thievery.Ranks >= 430 then goto LEAVE.HIB
1999HIB.TO.FORGE:
2000 var LAST LEAVE.HIB
2001 gosub AUTOMOVE forge
2002HIB.FORGE:
2003 var shopcode H.Forge
2004 var SHOP Hib Forge
2005 var itemLocation %H.Forge.Loc
2006 gosub STEAL %H.Forge
2007LEAVE.HIB:
2008 var LAST LEAVE.HIB
2009 gosub AUTOMOVE 75
2010 pause 0.5
2011 send .%TRAVEL_SCRIPT raven
2012 waitforre ^YOU HAVE ARRIVED
2013 pause 0.5
2014RAVEN.STEAL:
2015 var LAST RAVEN.EXP.CHECK.0
2016 gosub AUTOMOVE 179
2017RAVEN.GENERAL:
2018 var shopcode RP.Gen
2019 var SHOP Raven's Point General
2020 gosub STEAL %RP.Gen
2021RAVEN.EXP.CHECK.0:
2022 if $Thievery.Ranks >= 530 then goto RETURN.TO.SHARD
2023RAVEN.TO.TOBACCO:
2024 var LAST RETURN.TO.SHARD
2025 gosub AUTOMOVE 144
2026RAVEN.TOBACCO:
2027 var shopcode RP.Tobac
2028 var SHOP Raven's Point Tobacco
2029 gosub STEAL %RP.Tobac
2030RETURN.TO.SHARD:
2031 var LAST RETURN.TO.SHARD
2032 if $hidden then gosub unhide
2033 if ("%guild" = "Thief") then send khri stop
2034 pause 0.5
2035 gosub AUTOMOVE 133
2036 send .%TRAVEL_SCRIPT shard
2037 waitforre ^YOU HAVE ARRIVED
2038BACKINSHARD:
2039 var LAST BACKINSHARD
2040 gosub AUTOMOVE east
2041 goto SHARD.STEAL
2042
2043####################################
2044# RATHA STEALING
2045####################################
2046RATHA.STEAL:
2047 var CURRENT.CITY RATHA
2048 echo
2049 echo **** STEALING FROM RATHA! ****
2050 echo
2051 pause 0.5
2052 gosub COOKIE
2053 if ("%guild" = "Necromancer") then gosub NECROPREP
2054RATHA.EXP.CHECK.0:
2055 if $Thievery.Ranks < 500 then goto RATHA.TO.GENERAL
2056RATHA.TO.BAIT:
2057 var LAST RATHA.TO.GENERAL
2058 gosub AUTOMOVE bait
2059RATHA.BAIT:
2060 var shopcode R.Bait
2061 var SHOP Ratha Bait Shop
2062 gosub STEAL %R.Bait
2063RATHA.TO.GENERAL:
2064 var LAST RATHA.TO.HERB
2065 gosub AUTOMOVE general
2066RATHA.GENERAL:
2067 var shopcode R.Gen
2068 var SHOP Ratha General Store
2069 gosub STEAL %R.Gen
2070RATHA.TO.HERB:
2071 var LAST RATHA.TO.FORGE
2072 gosub AUTOMOVE herbalist
2073RATHA.HERB:
2074 var shopcode R.Herb
2075 var SHOP Ratha Herbalist
2076 gosub STEAL %R.Herb
2077RATHA.TO.FORGE:
2078 var LAST RATHA.TO.TAILOR
2079 gosub AUTOMOVE weapon
2080RATHA.FORGE:
2081 var shopcode R.Forge
2082 var SHOP Ratha Krrikt'k's Forge
2083 gosub STEAL %R.Forge
2084 gosub MOVE OUT
2085RATHA.TO.TAILOR:
2086 var LAST RATHA.TO.LEATHER
2087 gosub AUTOMOVE tailor
2088RATHA.TAILOR:
2089 var shopcode R.Tailor
2090 var SHOP Ratha Tailor
2091 gosub STEAL %R.Tailor
2092RATHA.TO.LEATHER:
2093 var LAST RATHA.TO.HAIR
2094 gosub AUTOMOVE leather
2095RATHA.LEATHER:
2096 var shopcode R.Leather
2097 var SHOP Ratha Leather
2098 gosub STEAL %R.Leather
2099RATHA.EXP.CHECK.1:
2100 #if $Thievery.Ranks >= 200 then goto RATHA.TO.MUSIC
2101RATHA.TO.HAIR:
2102 var LAST RATHA.TO.MUSIC
2103 gosub AUTOMOVE hair
2104RATHA.HAIR:
2105 var shopcode R.Hair
2106 var SHOP Ratha Hair Care
2107 gosub STEAL %R.Hair
2108RATHA.TO.MUSIC:
2109 var LAST RATHA.TO.MAGIC
2110 gosub AUTOMOVE music
2111RATHA.MUSIC:
2112 var shopcode R.Music
2113 var SHOP Ratha Music Shop
2114 gosub STEAL %R.Music
2115RATHA.TO.MAGIC:
2116 var LAST RATHA.TO.ORIGAMI
2117 gosub AUTOMOVE magic
2118RATHA.MAGIC:
2119 var shopcode R.Magic
2120 var SHOP Ratha Magic Supplies
2121 gosub STEAL %R.Magic
2122RATHA.TO.ORIGAMI:
2123 var LAST RATHA.TO.JEWELRY
2124 gosub AUTOMOVE origami
2125RATHA.ORIGAMI:
2126 var shopcode R.Origami
2127 var SHOP Ratha Origami Shop
2128 var itemLocation %R.Origami.LOC
2129 gosub STEAL %R.Origami
2130RATHA.TO.JEWELRY:
2131 var LAST RATHA.EXP.CHECK.2
2132 gosub AUTOMOVE jewelry
2133RATHA.JEWELRY:
2134 var shopcode R.Jewelry
2135 var SHOP Ratha Jewelry Shop
2136 gosub STEAL %R.Jewelry
2137RATHA.EXP.CHECK.2:
2138 #if $Thievery.Ranks >= 430 then goto RATHA.TO.RING
2139RATHA.TO.CLERIC:
2140 var LAST RATHA.TO.CLERIC2
2141 gosub AUTOMOVE divine
2142RATHA.CLERIC:
2143 var shopcode R.Cleric
2144 var SHOP Ratha Cleric Shop
2145 gosub STEAL %R.Cleric
2146RATHA.TO.CLERIC2:
2147 var LAST RATHA.TO.RING
2148 gosub AUTOMOVE odds
2149RATHA.CLERIC2:
2150 var shopcode R.Cleric2
2151 var SHOP Ratha Cleric Shop
2152 gosub STEAL %R.Cleric2
2153RATHA.TO.RING:
2154 var LAST GO.PAWN.RATHA
2155 gosub AUTOMOVE chabalu
2156RATHA.RING:
2157 var shopcode R.Ring
2158 var SHOP Ratha Ring Shop
2159 gosub STEAL %R.Ring
2160GO.PAWN.RATHA:
2161GO.RATHA.PAWN:
2162 var CURRENT.CITY RATHA
2163 var LAST GO.RATHA.PAWN
2164 if $hidden then gosub unhide
2165 if ("%guild" = "Thief") then send khri stop
2166 pause 0.5
2167 if ("%PAWN" = "OFF") then goto GO.RATHA.BIN
2168 gosub AUTOMOVE pawn
2169 gosub PAWN.GOODS
2170 if ("%BIN" = "OFF") then goto DONE.STEALING.RATHA2
2171GO.RATHA.BIN:
2172 var LAST GO.RATHA.BIN
2173 gosub AUTOMOVE chabalu
2174 pause 0.5
2175 send ask chabalu about cellar
2176 wait
2177 pause 0.5
2178 gosub MOVE trap door
2179 gosub MOVE go tunnel
2180 gosub MOVE west
2181 gosub AUTOMOVE bin
2182 pause 0.5
2183 gosub BIN.GOODS
2184DONE.STEALING.RATHA:
2185 var LAST DONE.STEALING.RATHA
2186 # Leaving the THIEF GUILD
2187 gosub CIRCLE.CHECK
2188 pause
2189DONE.STEALING.RATHA2:
2190 var LAST DONE.STEALING.CROSS2
2191 if ("%PREMIUM" = "ON") then goto RATHA.PREMIUM
2192 gosub AUTOMOVE 1exchange
2193 gosub LIRUMS
2194 goto RATHA.TELLER
2195RATHA.PREMIUM:
2196 gosub AUTOMOVE premium exchange
2197 gosub LIRUMS
2198RATHA.TELLER:
2199 gosub AUTOMOVE 1teller
2200 gosub BANK
2201 #send with 10 silver
2202#RATHA.SURRENDER:
2203 #var LAST RATHA.SURRENDER
2204 #gosub AUTOMOVE 1guard
2205 #if matchre("$roomobjs","(high guard)") then put surrender guard
2206 #pause 0.5
2207 #pause 0.5
2208 #gosub AUTOMOVE 252
2209 goto FINISHED.SCRIPT
2210
2211####################################
2212# AESRY STEALING
2213####################################
2214AESRY.STEAL:
2215AESRY.TO.HERB:
2216 var CURRENT.CITY AESRY
2217 var LAST AESRY.EXP.CHECK.0
2218 echo
2219 echo **** STEALING FROM AESRY! ****
2220 echo
2221 pause 0.5
2222 gosub COOKIE
2223 if ("%guild" = "Necromancer") then gosub NECROPREP
2224 gosub AUTOMOVE herb
2225AESRY.HERB:
2226 var shopcode A.Herb
2227 var SHOP Aesry Herb Shop
2228 gosub STEAL %A.Herb
2229AESRY.EXP.CHECK.0:
2230 if $Thievery.Ranks < 600 then goto AESRY.TO.CLOTHING
2231AESRY.TO.TANNER:
2232 var LAST AESRY.EXP.CHECK.1
2233 gosub AUTOMOVE tanning
2234AESRY.TANNER:
2235 var shopcode A.Tanner
2236 var SHOP Aesry Tanning Supplies
2237 gosub STEAL %A.Tanner
2238AESRY.EXP.CHECK.1:
2239 #if $Thievery.Ranks >= 700 then goto AESRY.TO.SCRIPT
2240AESRY.TO.CLOTHING:
2241 var LAST AESRY.TO.SCRIPT
2242 gosub AUTOMOVE clothing
2243AESRY.CLOTHING:
2244 var shopcode A.Clothing
2245 var SHOP Aesry Clothing Shop
2246 gosub STEAL %A.Clothing
2247AESRY.TO.SCRIPT:
2248 var LAST AESRY.TO.CLERIC
2249 gosub AUTOMOVE script
2250AESRY.SCRIPT:
2251 var shopcode A.Script
2252 var SHOP Aesry Scriptorium
2253 gosub STEAL %A.Script
2254AESRY.TO.CLERIC:
2255 var LAST AESRY.TO.ORIGAMI
2256 gosub AUTOMOVE clerical
2257AESRY.CLERIC:
2258 var shopcode A.Cleric
2259 var SHOP Aesry Clerical Supplies
2260 gosub STEAL %A.Cleric
2261AESRY.TO.ORIGAMI:
2262 var LAST AESRY.TO.JEWELRY
2263 gosub AUTOMOVE origami
2264AESRY.ORIGAMI:
2265 var shopcode A.Origami
2266 var SHOP Aesry Origami Shop
2267 gosub STEAL %A.Origami
2268AESRY.TO.JEWELRY:
2269 var LAST AESRY.TO.MAGIC
2270 gosub AUTOMOVE jewelry
2271AESRY.JEWELRY:
2272 var shopcode A.Jewelry
2273 var SHOP Aesry Jewelry Shop
2274 gosub STEAL %A.Jewelry
2275AESRY.TO.MAGIC:
2276 var LAST AESRY.TO.SLINGS
2277 gosub AUTOMOVE magic
2278AESRY.MAGIC:
2279 var shopcode A.Magic
2280 var SHOP Aesry Magic Supplies
2281 gosub STEAL %A.Magic
2282AESRY.TO.SLINGS:
2283 var LAST AESRY.TO.PUZZLE
2284 gosub AUTOMOVE bowyer
2285AESRY.SLINGS:
2286 var shopcode A.Slings
2287 var SHOP Aesry Slings and Arrows
2288 gosub STEAL %A.Slings
2289AESRY.TO.PUZZLE:
2290 var LAST AESRY.TO.FOOTWEAR
2291 gosub AUTOMOVE puzzle
2292AESRY.EXP.CHECK.2:
2293 #if $Thievery.Ranks >= 430 then goto AESRY.TO.SHIELDS
2294AESRY.PUZZLE:
2295 var shopcode A.Puzzle
2296 var SHOP Aesy Puzzle Shop
2297 gosub STEAL %A.Puzzle
2298AESRY.TO.FOOTWEAR:
2299 var LAST AESRY.TO.SHIELDS
2300 gosub AUTOMOVE footwear
2301AESRY.FOOTWEAR:
2302 var shopcode A.Footwear
2303 var SHOP Aesry Footwear
2304 gosub STEAL %A.Footwear
2305AESRY.TO.SHIELDS:
2306 var LAST AESRY.TO.WEAPON
2307 gosub AUTOMOVE shield
2308AESRY.SHIELDS:
2309 var shopcode A.Shields
2310 var SHOP Aesry Shields
2311 gosub STEAL %A.Shields
2312AESRY.TO.WEAPON:
2313 var LAST AESRY.TO.ARMOR
2314 gosub AUTOMOVE weapon
2315AESRY.WEAPON:
2316 var shopcode A.Weapon
2317 var SHOP Aesry Weapon Shop
2318 gosub STEAL %A.Weapon
2319AESRY.TO.ARMOR:
2320 var LAST AESRY.TO.GENERAL
2321 gosub AUTOMOVE armor
2322AESRY.ARMOR:
2323 var shopcode A.Armor
2324 var SHOP Aesry Armor Shop
2325 gosub STEAL %A.Armor
2326AESRY.TO.GENERAL:
2327 var LAST AESRY.TO.FLOWER
2328 gosub AUTOMOVE general
2329AESRY.GENERAL:
2330 var shopcode A.General
2331 var SHOP Aesry General Store
2332 gosub STEAL %A.Gen
2333AESRY.TO.FLOWER:
2334 var LAST AESRY.TO.MUSIC
2335 gosub AUTOMOVE flower
2336AESRY.FLOWER:
2337 var shopcode A.Flower
2338 var SHOP Aesry Flower Shop
2339 gosub STEAL %A.Flower
2340AESRY.TO.MUSIC:
2341 var LAST GO.PAWN.AESRY
2342 gosub AUTOMOVE bardic
2343AESRY.MUSIC:
2344 var shopcode A.Music
2345 var SHOP Aesry Music Shop
2346 gosub STEAL %A.Music
2347GO.PAWN.AESRY:
2348GO.AESRY.PAWN:
2349 var CURRENT.CITY AESRY
2350 var LAST GO.AESRY.PAWN
2351 if $hidden then gosub unhide
2352 if ("%guild" = "Thief") then send khri stop
2353 pause 0.5
2354 gosub AUTOMOVE pawn
2355 gosub PAWN.GOODS
2356DONE.STEALING.AESRY:
2357 var LAST DONE.STEALING.AESRY
2358 if ("%PREMIUM" = "ON") then goto AESRY.PREMIUM
2359 gosub AUTOMOVE exchange
2360 gosub LIRUMS
2361 goto AESRY.TELLER
2362AESRY.PREMIUM:
2363 gosub AUTOMOVE exchange
2364 gosub LIRUMS
2365AESRY.TELLER:
2366 gosub AUTOMOVE teller
2367 gosub BANK
2368 goto FINISHED.SCRIPT
2369
2370############################################################################################
2371############################################################################################
2372FINISHED.SCRIPT:
2373 timer stop
2374 gosub TIME.CALC
2375 gosub COMBINE.BANK
2376 echo
2377 echo *** DONE STEALING!
2378 echo
2379 pause 0.1
2380 send open my %SAFE_CONTAINER
2381 pause 0.5
2382 put #echo >Log Lime ***************** FINAL STEALING REPORT ******************
2383 put #echo >Log Lime *** Thievery Ranks: $Thievery.Ranks -- $Thievery.LearningRate/34
2384 put #echo >Log Lime *** Total Time: %runTime minutes
2385 put #echo >Log Lime *** Start City: %CITY | End City: %CURRENT.CITY
2386 put #echo >Log Lime *** %Charges Stealing Charge(s). %Jailed trip(s) to jail
2387 put #echo >Log Lime *** Binned: %Binned Items | Pawned: %Pawned Items
2388 put #echo >Log Lime *** Profit: %Plats Plat, %Golds Gold, %Silvers Silver, %Bronzes Bronze and %Coppers Copper
2389 put #echo >Log Lime ********************** END REPORT ***************************
2390 echo ********************* FINAL STEALING REPORT ****************************
2391 echo **** Thievery Ranks: $Thievery.Ranks -- $Thievery.LearningRate/34
2392 echo **** Total Time: %runTime minutes
2393 echo **** Start City: %CITY | End City: %CURRENT.CITY
2394 echo **** %Charges Stealing Charge(s). %Jailed trip(s) to jail
2395 echo **** Binned: %Binned Items | Pawned: %Pawned Items
2396 echo **** Profit: %Plats Plat, %Golds Gold, %Silvers Silver, %Bronzes Bronze and %Coppers Copper
2397 echo ***********************************************************************
2398 pause 5
2399 if ("%ARMOR.STOW" = "ON") then gosub WEAR.ARMOR
2400 if ("%RETURN_HOME" != "YES") then goto COMPLETE
2401TRAVEL.HOME:
2402 echo **************************************
2403 echo * Travelling back to starting city!!
2404 echo **************************************
2405 pause
2406 if ($zoneid = 1) then
2407 {
2408 if ("%CITY" != "CROSSING") then
2409 {
2410 gosub AUTOMOVE 42
2411 goto TRAVEL
2412 }
2413 else goto AT.STARTING.CITY
2414 }
2415 if ($zoneid = 30) then
2416 {
2417 if ("%CITY" != "RIVERHAVEN") then
2418 {
2419 gosub AUTOMOVE town
2420 goto TRAVEL
2421 }
2422 else goto AT.STARTING.CITY
2423 }
2424 if ($zoneid = 42) then
2425 {
2426 if ("%CITY" != "THEREN") then
2427 {
2428 gosub AUTOMOVE portal
2429 goto TRAVEL
2430 }
2431 else goto AT.STARTING.CITY
2432 }
2433 if ($zoneid = 61) then
2434 {
2435 if ("%CITY" != "LETH") then
2436 {
2437 gosub AUTOMOVE portal
2438 goto TRAVEL
2439 }
2440 else goto AT.STARTING.CITY
2441 }
2442 if ($zoneid = 67) then
2443 {
2444 if ("%CITY" != "SHARD") then
2445 {
2446 gosub AUTOMOVE east
2447 gosub AUTOMOVE 65
2448 goto TRAVEL
2449 }
2450 else goto AT.STARTING.CITY
2451 }
2452 if ($zoneid = 116) then
2453 {
2454 if ("%CITY" != "HIB") then
2455 {
2456 gosub AUTOMOVE 75
2457 goto TRAVEL
2458 }
2459 else goto AT.STARTING.CITY
2460 }
2461 if ($zoneid = 99) then goto ALREADY.THERE
2462 if ($zoneid = 90) then goto ALREADY.THERE
2463 pause 0.5
2464 goto COMPLETE
2465ALREADY.THERE:
2466 echo
2467 echo *** YOU ARE ON AN ISLAND! THIS IS YOUR STARTING CITY DOOFUS!
2468 echo
2469 goto COMPLETE
2470AT.STARTING.CITY:
2471 echo
2472 echo *** ALREADY AT YOUR STARTING CITY!
2473 echo
2474 goto COMPLETE
2475TRAVEL:
2476 pause 0.5
2477 send .%TRAVEL_SCRIPT %CITY
2478 waitforre YOU HAVE ARRIVED
2479TRAVEL.COMPLETE:
2480 put #echo >Log Chartreuse *** Returned you to Starting City: %CITY
2481COMPLETE:
2482 echo
2483 echo **** DONE STEALING!!
2484 echo
2485 pause 0.5
2486 put #parse DONE PAWNING
2487 put #parse DONE STEALING
2488 exit
2489############################################################################################
2490## CLAN DEVELOPMENT
2491############################################################################################
2492CLAN.HEAL:
2493 put #echo >Log Red Your hands were cut off! Looking for healer!
2494 action goto CLAN.HEAL1 when eval $stunned = 1
2495 pause 3
2496CLAN.HEAL1:
2497 pause 10
2498 if $stunned = 1 then goto CLAN.HEAL
2499 action remove eval $stunned = 1
2500 gosub stand
2501CLAN.TO.EMPATH:
2502 gosub AUTOMOVE portal
2503 gosub MOVE go meeting portal
2504 send lean gwyd
2505 send lean bedlam
2506 pause 40
2507 gosub MOVE go exit portal
2508 pause
2509 goto %LAST
2510############################################################################################
2511# END OF STEALING RUN TRAINING
2512############################################################################################
2513############################################################################################
2514############################################################################################
2515############################################################################################
2516### ~~~ SCRIPT ENGINE BEGIN ~~~
2517############################################################################################
2518############################################################################################
2519############################################################################################
2520################################
2521# STEALING SUB-ROUTINE #
2522################################
2523STEAL:
2524 var item $0
2525 if ("%noSteal" = "ON") then goto STEAL.RETURN
2526 if ("%guild" != "Thief") then var STEALCOUNT %%shopcodeQuant
2527 pause 0.1
2528 pause 0.1
2529 pause 0.1
2530 if ("%guild" = "Empath") && ("%POWER" = "ON") then gosub POWER.CHECK.NOOB
2531 if ("%guild" = "Empath") && ("%PercHealth" = "ON") then gosub PercHealth
2532STEAL.1:
2533 if contains("%item" , "nothing") then goto STEAL.RETURN
2534 if ("$righthand" != "Empty") || ("$lefthand" != "Empty") then gosub stowing
2535MARKING:
2536 if ("%guild" != "Thief") then goto STEALING
2537 if ("%marking" = "OFF") then goto STEALING
2538 if !$hidden then
2539 {
2540 gosub HIDE
2541 pause $roundtime
2542 }
2543 if $roundtime > 0 then pause 0.5
2544 pause 0.1
2545 pause 0.1
2546 pause 0.1
2547 matchre MARKING ^\.\.\.wait|^Sorry\,
2548 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
2549 matchre SECONDARY.CHECK Mark what\?|^Something appears different
2550 matchre STEAL.LAST perhaps it's a little risky|troublesome to be unnoticed|troublesome to lift|about even odds
2551 matchre TOO.HOT you are being watched|looking for a reason to call the guards|beyond foolish|pretty sure you'll be caught
2552 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
2553 matchre TOO.HOT somewhat of a long shot|don't think well of your chances to lift it|may be quite the struggle to nab|Guards! Guards!
2554 matchre TOO.HOT miracles occasionally happen|you'll be spotted pretty easily|maybe you shouldn't try it
2555 matchre STEALING Roundtime|^You can not make marks on|it should be possible
2556 send mark %item %itemLocation
2557 matchwait
2558MARK.LAST:
2559 var marking OFF
2560 goto STEALING
2561STEAL.LAST:
2562 var stolen 5
2563 goto STEALING
2564STEALING:
2565 math stolen add 1
2566STEAL.REAL:
2567 if !$hidden then gosub HIDE
2568 if $roundtime > 0 then pause
2569 pause 0.2
2570 pause 0.1
2571 pause 0.1
2572 matchre STEAL.REAL ^\.\.\.wait|^Sorry\,
2573 matchre STEAL.1 ^You need at least one hand free
2574 matchre STEAL.RETURN You haven't picked something|You can't steal
2575 matchre TOO.HOT for help\.|realize that you are being watched|^Guards! Guards!
2576 matchre STEAL.CHECK Roundtime
2577 send steal %item %itemLocation
2578 matchwait
2579STEAL.CHECK:
2580 if ("%noLearn" = "ON") then goto STEAL.RETURN
2581 if (%stolen >= %STEALCOUNT) then goto STEAL.RETURN
2582 if (%stolen = 1) then
2583 {
2584 if ("%MARK.ALL" = "ON") then
2585 {
2586 goto MARKING
2587 }
2588 else goto STEALING
2589 }
2590 if (%stolen = 2) then
2591 {
2592 gosub stow
2593 goto MARKING
2594 }
2595 if (%stolen = 3) then goto MARKING
2596 if (%stolen = 4) then
2597 {
2598 if ("%MARK.ALL" = "ON") then
2599 {
2600 gosub STOW
2601 goto MARKING
2602 }
2603 else gosub STOW
2604 goto STEALING
2605 }
2606 if (%stolen = 5) then goto MARKING
2607 if (%stolen >= 6) then
2608 {
2609 gosub stow
2610 goto STEAL.RETURN
2611 }
2612 goto STEAL.RETURN
2613TOO.HOT:
2614 var LEAVE.SHOP YES
2615 put #echo >log Orchid Leaving: %SHOP... TOO HOT!
2616STEAL.RETURN:
2617 action remove You don't feel you learned anything useful from this trivial theft
2618 action remove notices you attempting to make the grab and begins to shout for help.
2619 var stolen 0
2620 var noLearn OFF
2621 var noSteal OFF
2622 var itemLocation
2623 if ("%guild" = "Thief") then var marking ON
2624 if ("$righthand" != "Empty") || ("$lefthand" != "Empty") then gosub stow
2625 if $hidden then if ("%SNEAK" = "OFF") then gosub unhide
2626 if ("%guild" = "Necromancer") && (%ROC = 0) then gosub NECROPREP
2627 RETURN
2628SECONDARY.CHECK:
2629 if (%SECOND_ITEM = 0) then goto STEAL.RETURN
2630 echo
2631 echo *** OUT OF STOCK! CHECKING FOR SECONDARY ITEMS..
2632 echo
2633 var item %secondary
2634 var SECOND_ITEM 0
2635 goto STEAL.1
2636#######################
2637# PAWNING ROUTINE #
2638#######################
2639PAWN:
2640 var PAWN.ITEM $0
2641PAWN.GET:
2642 if %c < 1 then RETURN
2643 pause 0.001
2644 pause 0.001
2645 matchre PAWN.GET ^\.\.\.wait|^Sorry\,
2646 matchre PAWN.BIN ^You need a free hand
2647 matchre PAWN.SELL ^You get
2648 matchre PAWN.SELL ^You are already
2649 matchre PAWN.SELL ^You pick up
2650 matchre RETURN ^What were you referring to\?
2651 matchre RETURN ^You aren't holding that\.
2652 matchre RETURN ^Please rephrase that command\.|^I could not
2653 send get my %PAWN.ITEM in my %bag
2654 matchwait
2655PAWN.SELL:
2656 counter subtract 1
2657 if ($invisible = 1) then gosub stopinvis
2658 if ((matchre("%nosell", "$righthand")) || (matchre("%nosell", "$lefthand")) then goto PAWN.BIN
2659 matchre PAWN.SELL ^\.\.\.wait|^Sorry\,
2660 matchre PAWN.GET ^You sell your
2661 matchre PAWN.BIN ^You can't pawn
2662 matchre PAWN.BIN slit a throat for this|isn't worth my time|shakes his head
2663 matchre BUCKET You'll want to empty that first
2664 send sell my %PAWN.ITEM
2665 matchwait 5
2666PAWN.BIN:
2667 if ("%BIN" = "OFF") then goto BUCKET
2668 matchre PAWN.BIN ^\.\.\.wait|^Sorry\,
2669 matchre PAWN.GET ^You put
2670 matchre PAWN.GET ^What were you referring to\?
2671 matchre PAWN.GET ^You aren't holding that\.
2672 matchre PAWN.GET ^Please rephrase that command\.
2673 matchre BUCKET ^That's too heavy to go in there\!
2674 matchre BUCKET ^You can't put that in there\!
2675 matchre BUCKET ^There is no more room|too long to fit
2676 matchre BUCKET ^But that's closed\.
2677 matchre BUCKET ^What were you|^You can't do that
2678 matchre BUCKET ^There isn't enough room .* for your .* to fit\.
2679 if ("$lefthand" != "Empty") then send put $lefthandnoun in my %BIN_CONTAINER
2680 if ("$righthand" != "Empty") then send put $righthandnoun in my %BIN_CONTAINER
2681 matchwait 5
2682BUCKET:
2683 if "$zoneid" = "30" then
2684 {
2685 gosub EMPTY.HANDS
2686 goto PAWN.GET
2687 }
2688 pause 0.1
2689 matchre BUCKET ^\.\.\.wait|^Sorry\,
2690 matchre PAWN.GET ^You put
2691 matchre PAWN.GET ^You drop
2692 matchre PAWN.GET ^You toss
2693 if ("$lefthand" != "Empty") then send put $lefthandnoun in bucket
2694 if ("$righthand" != "Empty") then send put $righthandnoun in bucket
2695 matchwait 1
2696 gosub EMPTY.HANDS
2697 goto PAWN.GET
2698#######################
2699# BINNING ROUTINE #
2700#######################
2701BIN:
2702 var BIN.ITEM $0
2703BIN.GET:
2704 if %c < 1 then RETURN
2705 pause 0.001
2706 matchre BIN.GET ^\.\.\.wait|^Sorry\,
2707 matchre BIN.DROP ^You need a free hand
2708 matchre BIN.ITEM ^You get
2709 matchre BIN.ITEM ^You are already
2710 matchre BIN.ITEM ^You pick up
2711 matchre RETURN ^What were you referring to\?
2712 matchre RETURN ^You aren't holding that\.
2713 matchre RETURN ^Please rephrase that command\.
2714 send get my %BIN.ITEM in my %bag
2715 matchwait 5
2716BIN.ITEM:
2717 counter subtract 1
2718 matchre BIN.ITEM ^\.\.\.wait|^Sorry\,
2719 matchre BIN.DROP \"You're not fooling anyone\, $charactername\.
2720 matchre BIN.DROP ^Swan raises an eyebrow
2721 matchre BIN.DROP ^Saishla raises an eyebrow in your direction
2722 matchre BIN.GET \"Nice work\, $charactername\.\"
2723 matchre RETURN ^What were you referring to\?
2724 matchre RETURN ^You aren't holding that\.
2725 matchre RETURN ^Please rephrase that command\.
2726 send put my %BIN.ITEM in bin
2727 matchwait 5
2728 #"
2729BIN.DROP:
2730 gosub STOW.BIN
2731 gosub EMPTY.HANDS
2732 goto BIN.GET
2733################################
2734# PAWNING / BINNING LOGIC #
2735################################
2736PAWN.GOODS:
2737 echo
2738 echo #### GETTING SOME COIN! ####
2739 echo #### PAWNING %CURRENT.CITY HAUL! ####
2740 echo
2741 pause 0.2
2742 var BINORPAWN PAWN
2743 gosub BAG.EMPTY %PAWN_CONTAINER
2744 pause 0.001
2745 if ("%BIN" = "OFF") then gosub BAG.EMPTY %BIN_CONTAINER
2746 gosub STOW
2747 gosub STOWING
2748 RETURN
2749BIN.GOODS:
2750 echo
2751 echo ######## Binning %CURRENT.CITY Haul! ########
2752 echo
2753 pause 0.2
2754 var BINORPAWN BIN
2755 gosub BAG.EMPTY %BIN_CONTAINER
2756 pause 0.001
2757 gosub BAG.EMPTY %PAWN_CONTAINER
2758 pause 0.5
2759 # send dump junk
2760 gosub STOW
2761 gosub STOWING
2762 RETURN
2763#############################
2764# STOW ROUTINE #
2765#############################
2766STOW:
2767 if (("$righthand" = "Empty") && ("$lefthand" = "Empty")) then return
2768 math STOW.LOOP add 1
2769 pause 0.1
2770 pause 0.1
2771 pause 0.01
2772 if contains("$lefthand" "$righthand" , "%large.items") then gosub EMPTY.HANDS
2773 if matchre("%item","(%BIN_CONTAINER|%PAWN_CONTAINER)") then gosub EMPTY.HANDS
2774 if %STOW.LOOP > 1 then goto SECOND.BAG
2775 matchre STOW ^\.\.\.wait|^Sorry\,
2776 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/i
2777 matchre STOW.RETURN /You put|What were you|You can't do|I could not|Perhaps you|Stow what/i
2778 if ("$righthand" != "Empty") then send put my $righthandnoun in my %BIN_CONTAINER
2779 if ("$lefthand" != "Empty") then send put my $lefthandnoun in my %PAWN_CONTAINER
2780 matchwait 7
2781 RETURN
2782SECOND.BAG:
2783 pause 0.001
2784 matchre SECOND.BAG ^\.\.\.wait|^Sorry\,
2785 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
2786 matchre STOW.RETURN /You put|What were you|I could not|Perhaps you|Stow what/i
2787 if ("$righthand" != "Empty") then send put my $righthandnoun in my %PAWN_CONTAINER
2788 if ("$lefthand" != "Empty") then send put my $lefthandnoun in my %BIN_CONTAINER
2789 matchwait 7
2790 RETURN
2791STOW.RETURN:
2792 var STOW.LOOP 0
2793 RETURN
2794DROP.ITEM:
2795 var STOW.LOOP 0
2796 gosub EMPTY.HANDS
2797 pause 0.2
2798 RETURN
2799STOW.BIN:
2800 pause 0.1
2801 put open my %SAFE_CONTAINER
2802 pause 0.001
2803 pause 0.001
2804 pause 0.001
2805 matchre SECOND.BAG ^\.\.\.wait|^Sorry\,
2806 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
2807 matchre STOW.BIN.RETURN /You put|What were you|I could not|Perhaps you|Stow what/i
2808 if ("$righthand" != "Empty") then send put my $righthandnoun in my %SAFE_CONTAINER
2809 if ("$lefthand" != "Empty") then send put my $lefthandnoun in my %SAFE_CONTAINER
2810 matchwait 7
2811STOW.BIN.RETURN:
2812 pause 0.001
2813 send close my %SAFE_CONTAINER
2814 pause 0.001
2815 RETURN
2816############################################################################################
2817# ARMOR REMOVAL
2818############################################################################################
2819ARMOR.CHECK:
2820 counter set 0
2821ARMOR.CHECK.1:
2822 pause 0.1
2823 pause 0.1
2824 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)
2825 matchre ARMOR.NONE You have nothing of that sort|You are wearing nothing of that sort|You aren't wearing anything like that
2826 send inv armor
2827 matchwait 5
2828 goto ARMOR.WARN
2829ARMOR.CHECK.2:
2830 pause 0.1
2831 pause 0.1
2832 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)
2833 matchre ARMOR.COMPLETE You have nothing of that sort|You are wearing nothing of that sort|You aren't wearing anything like that
2834 send inv armor
2835 matchwait 5
2836 goto ARMOR.WARN
2837REMOVE.AND.STOW:
2838 var armor $0
2839REMOVE.ARMOR:
2840 pause 0.1
2841 pause 0.1
2842 var LAST REMOVE.ARMOR
2843 matchre REMOVE.ARMOR ^\.\.\.wait|^Sorry\,
2844 matchre STOW.ARMOR ^You remove|^You loosen the straps securing|^You take|^You slide
2845 matchre STOW.ARMOR ^You sling|^You work your way out of|^You pull|^You slip|^You aren't
2846 send remove %armor
2847 matchwait 5
2848STOW.ARMOR:
2849 pause 0.1
2850 pause 0.1
2851 var LAST STOW.ARMOR
2852 matchre STOW.ARMOR ^\.\.\.wait|^Sorry\,
2853 matchre ARMOR.DONE ^You put|^You slip|^What were you
2854 matchre NO.MORE.STOWING any more room in|closed|no matter how you arrange|too heavy|too long
2855 send put %armor in my %SAFE_CONTAINER
2856 matchwait 5
2857ARMOR.DONE:
2858 counter add 1
2859 pause 0.5
2860 var total.armor %c
2861 var armor%c %armor
2862 goto ARMOR.CHECK.2
2863ARMOR.NONE:
2864 echo **** NO ARMOR FOUND!
2865 var ARMOR.STOW OFF
2866 RETURN
2867NO.MORE.STOWING:
2868 echo *** YOU HAVE NO MORE FREE BAG SPACE FOR ARMOR! MAKE SOME ROOM OR GET BIGGER BAGS!
2869 echo *** GONNA JUST GO FOR IT ANYWAY, YOU WILL BE HINDERED! QUIT SCRIPT IF YOU WANT TO ABORT
2870 put wear %armor
2871 wait
2872 pause 3
2873 goto ARMOR.COMPLETE
2874ARMOR.COMPLETE:
2875 var ARMOR.STOW ON
2876 echo #######################################
2877 echo # Saved Armor Count: %total.armor
2878 if %total.armor < 1 then RETURN
2879 echo # Armor1: %armor1
2880 if %total.armor < 2 then RETURN
2881 echo # Armor2: %armor2
2882 if %total.armor < 3 then RETURN
2883 echo # Armor3: %armor3
2884 if %total.armor < 4 then RETURN
2885 echo # Armor4: %armor4
2886 if %total.armor < 5 then RETURN
2887 echo # Armor5: %armor5
2888 if %total.armor < 6 then RETURN
2889 echo # Armor6: %armor6
2890 if %total.armor < 7 then RETURN
2891 echo # Armor7: %armor7
2892 if %total.armor < 8 then RETURN
2893 echo # Armor8: %armor8
2894 if %total.armor < 9 then RETURN
2895 echo # Armor9: %armor9
2896 if %total.armor < 10 then RETURN
2897 echo # Armor10: %armor10
2898 echo #######################################
2899 echo
2900 pause 1
2901 RETURN
2902############################################################################################
2903WEAR.ARMOR:
2904 echo **** PUTTING YOUR ARMOR BACK ON! ****
2905 send open my %SAFE_CONTAINER
2906 pause
2907 if %total.armor = 0 then RETURN
2908 if "%armor1" != "null" then
2909 {
2910 send get my %armor1 from my %SAFE_CONTAINER
2911 pause 0.5
2912 send wear my %armor1 from my %SAFE_CONTAINER
2913 pause 0.5
2914 }
2915 if "%armor2" != "null" then
2916 {
2917 gosub stowing
2918 send get my %armor2 from my %SAFE_CONTAINER
2919 pause 0.5
2920 send wear my %armor2 from my %SAFE_CONTAINER
2921 pause 0.5
2922 }
2923 if "%armor3" != "null" then
2924 {
2925 gosub stowing
2926 send get my %armor3 from my %SAFE_CONTAINER
2927 pause 0.5
2928 send wear my %armor3 from my %SAFE_CONTAINER
2929 pause 0.5
2930 }
2931 if "%armor4" != "null" then
2932 {
2933 gosub stowing
2934 send get my %armor4 from my %SAFE_CONTAINER
2935 pause 0.5
2936 send wear my %armor4 from my %SAFE_CONTAINER
2937 pause 0.5
2938 }
2939 if "%armor5" != "null" then
2940 {
2941 gosub stowing
2942 send get my %armor5 from my %SAFE_CONTAINER
2943 pause 0.5
2944 send wear my %armor5 from my %SAFE_CONTAINER
2945 pause 0.5
2946 }
2947 if "%armor6" != "null" then
2948 {
2949 gosub stowing
2950 send get my %armor6 from my %SAFE_CONTAINER
2951 pause 0.5
2952 send wear my %armor6 from my %SAFE_CONTAINER
2953 pause 0.5
2954 }
2955 if "%armor7" != "null" then
2956 {
2957 send get my %armor7 from my %SAFE_CONTAINER
2958 pause 0.5
2959 send wear my %armor7 from my %SAFE_CONTAINER
2960 pause 0.5
2961 }
2962 if "%armor8" != "null" then
2963 {
2964 send get my %armor8 from my %SAFE_CONTAINER
2965 pause 0.5
2966 send wear my %armor8 from my %SAFE_CONTAINER
2967 pause 0.5
2968 }
2969 if "%armor9" != "null" then
2970 {
2971 send get my %armor9 from my %SAFE_CONTAINER
2972 pause 0.5
2973 send wear my %armor9 from my %SAFE_CONTAINER
2974 pause 0.5
2975 }
2976 if "%armor10" != "null" then
2977 {
2978 send get my %armor10 from my %SAFE_CONTAINER
2979 pause 0.5
2980 send wear my %armor10 from my %SAFE_CONTAINER
2981 pause 0.5
2982 }
2983 RETURN
2984############################################################################################
2985############################################################################################
2986# GOSUBS
2987############################################################################################
2988############################################################################################
2989BAG.EMPTY:
2990 var bag $0
2991 pause .0001
2992 var contents null
2993 action var contents $1 when ^You rummage through .+ and see (.*)\.
2994 action var contents $1 when ^In the .* you see (.*)\.
2995 send look in my %bag
2996 waitforre ^In the .* you see|^There is nothing in there\.|^You rummage
2997 action remove ^In the .* you see (.*)\.|^You rummage through .+ and see (.*)\.
2998 if "%contents" = "null" then RETURN
2999 pause .0001
3000 eval contents replace("%contents" , ", " , "|")
3001 eval contents replace("%contents" , " and a" , "|a")
3002 eval contents replace("%contents" , " and an" , "|an")
3003 eval contents replace("%contents" , " and some" , "|some")
3004 var contents |%contents|
3005 eval total count("%contents", "|")
3006BAG.EMPTY.Loop:
3007 eval item element("%contents", 1)
3008 eval number count("%contents", "|%item")
3009 var count 0
3010 gosub BAG.EMPTY.RemoveLoop
3011 action setvariable item $1 when ^@(?:an?|some).* (\S+)$
3012 put #parse @%item
3013 counter set %count
3014 if contains("%STEAL.LIST", "%item") then gosub BAG.EMPTY.itemAction
3015 # if contains("%STEAL.LIST", "%item") then gosub %BINORPAWN %item
3016 if "%contents" != "|" then goto BAG.EMPTY.Loop
3017 RETURN
3018BAG.EMPTY.RemoveLoop:
3019 eval number count("%contents", "|%item|")
3020 eval contents replace("%contents" , "|%item|" , "|")
3021 eval contents replace("%contents" , "||" , "|")
3022 evalmath count %count + %number
3023 if !contains("%contents", "|%item|") then RETURN
3024 goto BAG.EMPTY.RemoveLoop
3025BAG.EMPTY.itemAction:
3026 gosub %BINORPAWN %item
3027 #counter subtract 1
3028 if %c < 1 then RETURN
3029 goto BAG.EMPTY.itemAction
3030############################################################################################
3031###############################################################################################
3032# UB3R 1337 CONTAINER CHECK
3033###############################################################################################
3034BAG.CHECK:
3035 var bag $0
3036 #var count 0
3037 pause 0.1
3038 var contents null
3039 send open my %SAFE_CONTAINER
3040 wait
3041 pause 0.001
3042 pause 0.001
3043 # action var contents $1 when ^You rummage through .+ and see (.*)\.
3044 action var contents $1 when ^In the .* you see (.*)\.
3045 send look in my %bag
3046 waitforre ^In the .* you see|^There is nothing in there\.
3047 action remove ^In the .* you see (.*)\.|^There is nothing in there\.
3048 pause 0.001
3049 pause 0.001
3050 if "%contents" = "null" then
3051 {
3052 send close my %SAFE_CONTAINER
3053 pause 0.5
3054 RETURN
3055 }
3056 eval contents replace("%contents" , ", " , "|")
3057 eval contents replace("%contents" , " and a" , "|a")
3058 eval contents replace("%contents" , " and an" , "|an")
3059 eval contents replace("%contents" , " and some" , "|some")
3060 var contents |%contents|
3061 eval total count("%contents", "|")
3062Loop:
3063 eval item element("%contents", 1)
3064 eval number count("%contents", "|%item")
3065 var count 0
3066 gosub RemoveLoop
3067 action var item $1 when ^@(?:an?|some) .* (\S+)$
3068 put #parse @%item
3069 counter set %count
3070 if contains("%IMPORTANT_ITEMS", "%item") then gosub storeitem
3071 if contains("%STEAL.LIST", "%item") then gosub storeitem
3072 if %contents != "|" then goto Loop
3073 send close my %SAFE_CONTAINER
3074 wait
3075 pause 0.001
3076 pause 0.001
3077 echo **** DONE STASHING ITEMS FROM %bag
3078 RETURN
3079RemoveLoop:
3080 eval number count("%contents", "|%item|")
3081 eval contents replace("%contents", "|%item|", "|")
3082 eval contents replace("%contents", "||" "|")
3083 evalmath count %count + %number
3084 if !contains("%contents", "|%item|") then RETURN
3085 goto RemoveLoop
3086storeitem:
3087 counter subtract 1
3088 gosub GET %item from my %bag
3089 gosub PUT_IT my %item in my %SAFE_CONTAINER
3090 if %c < 1 then RETURN
3091 goto storeitem
3092
3093#####################################
3094# THIEF BUFFS
3095#####################################
3096COOKIE:
3097 if ("%guild" = "Barbarian") then goto DANCE
3098 if ("%guild" != "Thief") then RETURN
3099 echo *** PUTTING UP KHRI ***
3100 if ($concentration < 50) then goto COOKIE.BREAK
3101 gosub COOKIE.START %khri1
3102 gosub COOKIE.START %khri2
3103 RETURN
3104COOKIE.START:
3105 var khri $0
3106COOKIE.START.CONTINUE:
3107 matchre COOKIE.START.CONTINUE ^\.\.\.wait|^Sorry\,
3108 matchre COOKIE.KNEEL ^Your mind and body are willing|Sitting, kneeling, or lying
3109 matchre COOKIE.START.CONTINUE ^\.\.\.wait|^Sorry\,
3110 matchre COOKIE.RETURN ^You're already using the .* meditation\.
3111 matchre COOKIE.RETURN ^You already
3112 matchre COOKIE.RETURN ^Roundtime\:?\s+\d+\s+sec(?:onds|s)?\.?
3113 matchre COOKIE.RETURN ^\[Roundtime\:?\s+\d+\s+sec(?:onds|s)?\.?\]
3114 matchre COOKIE.RETURN ^\(Roundtime\:?\s+\d+\s+sec(?:onds|s)?\.?\)
3115 matchre COOKIE.RETURN ^Focusing|^With intense focus|^You carefully relax your mind|You are not|Your mind|valid khri|^Your thoughts
3116 matchre COOKIE.BREAK You strain, but cannot focus|You have not recovered from|Your mind is already focused
3117 send khri %khri
3118 matchwait
3119COOKIE.BREAK:
3120 send khri stop
3121COOKIE.WAIT:
3122 pause 0.5
3123 put khri meditate
3124 pause
3125 pause
3126 if ($concentration > 50) then goto COOKIE
3127 echo
3128 echo *** WAITING FOR CONCENTRATION TO RECOVER.........
3129 echo
3130 pause 20
3131WAIT.DONE:
3132 if ($concentration < 50) then goto COOKIE.BREAK
3133COOKIE.BREAK.DONE:
3134 gosub EMPTY.HANDS
3135 goto COOKIE
3136COOKIE.KNEEL:
3137 gosub PUT kneel
3138 gosub PUT khri %khri
3139 pause $roundtime
3140 pause 0.5
3141 gosub stand
3142 RETURN
3143COOKIE.RETURN:
3144 pause $roundtime
3145 pause .001
3146 pause .001
3147 RETURN
3148#####################################
3149# BARB BUFFS
3150#####################################
3151DANCE:
3152 echo *** BARB DANCE ***
3153 gosub PUT form monkey
3154 pause $roundtime
3155 pause 0.5
3156 gosub PUT form panther
3157 pause $roundtime
3158 pause 0.5
3159 gosub PUT berserk wildfire
3160 pause 0.5
3161 RETURN
3162#####################################
3163# EMPATH BUFFS
3164#####################################
3165POWER.CHECK.NOOB:
3166 if ($Attunement.LearningRate > 30) then RETURN
3167 pause 0.5
3168 gosub PUT power
3169 pause
3170 pause
3171POWER.STUN.CHECK:
3172 if ($stunned = 1) then
3173 {
3174 echo *** STUNNED! PAUSING...
3175 pause 5
3176 goto POWER.STUN.CHECK
3177 }
3178 RETURN
3179
3180PercHealth:
3181 if ($Empathy.LearningRate > 32) then RETURN
3182 if ($Attunement.LearningRate > 32) then RETURN
3183 if ("%GuardianSpirit" = "ON") then GOSUB POWER.CHECK
3184 if ($zoneid = 42) then RETURN
3185 echo *** PERCEIVING HEALTH ***
3186 pause 0.001
3187 pause 0.001
3188 gosub PUT perceive health
3189 pause
3190 POWER.STUN.CHECK2:
3191 if $stunned = 1 then
3192 {
3193 echo *** STUNNED! PAUSING...
3194 pause 5
3195 goto POWER.STUN.CHECK2
3196 }
3197 pause 0.001
3198 pause 0.001
3199 RETURN
3200
3201POWER.CHECK:
3202 if ($Attunement.LearningRate > 30) then RETURN
3203 if ($zoneid = 42) then RETURN
3204 pause 0.001
3205 pause 0.001
3206 matchre RETURN ^You sense the Guardian Spirit spell upon you
3207 matchre GuardianSpirit ^Roundtime
3208 send power
3209 matchwait 3
3210 GOTO GuardianSpirit
3211GS1:
3212pause 5
3213GuardianSpirit:
3214 if (*"%GuardianSpirit" != "ON") then RETURN
3215 if ($zoneid = 42) then RETURN
3216 if ($Empathy.Ranks < 75) && ($Attunement.Ranks < 75) || ($Empathy.Ranks < 50) && ($Attunement.Ranks < 100) || ($Empathy.Ranks < 100) && ($Attunement.Ranks < 50) then
3217 {
3218 echo
3219 echo *** You do not appear to have enough combined Empathy or Attunement for Guardian Spirit ***
3220 echo *** If this is an error, please email/IM me with your Empathy and Attunement Ranks
3221 echo *** Turning Guardian Spirit OFF for now.
3222 pause 5
3223 var GuardianSpirit OFF
3224 RETURN
3225 }
3226 echo *** GUARDIAN SPIRIT ***
3227 pause 0.5
3228 gosub PREPARE gs %gsMana
3229 if (%ECastPause > 0) then gosub SPELL_WAIT
3230 else pause %ECastPause
3231 gosub SPELL_CAST
3232 RETURN
3233#####################################
3234# NECRO BUFFS
3235#####################################
3236NECROSTART:
3237 var Rite OFF
3238 var Eyes OFF
3239 action var $1 ON when ^You sense the (\w+)
3240 gosub PUT power
3241 pause 0.5
3242 pause 0.1
3243 action remove ^You sense the (\w+)
3244
3245NECROPREP:
3246 if ("$guild" != "Necromancer") then RETURN
3247 var cast $0
3248 pause 0.1
3249 gosub ROC
3250 gosub EOTB
3251 RETURN
3252
3253ROC:
3254 if ("%Rite" = "ON") then goto NECRO.DONE
3255 if ("%ROC" != "ON") then goto NECRO.DONE
3256 echo **** Checking ROC ****
3257 if ("$preparedspell" != "None") then gosub RELEASE
3258 if (((matchre("$roomobjs", "exchange board")) || (matchre("$roomname", "([T|t]eller|[E|e]xchange|[B|b]ank)")) || (matchre("$roomname", "(%donotcastlist)"))) then RETURN
3259 gosub NECRO.CHECKROOM
3260 gosub PREPARE roc %rocMana
3261 if (%castPause > 0) then gosub SPELL_WAIT
3262 else
3263 {
3264 pause %castPause
3265 if ((!("$roomplayers" = "")) && (matchre("$preparedspell", "(Rite of Contrition|Eyes of the Blind)")) then gosub MOVE.RANDOM
3266 gosub SPELL_CAST
3267 }
3268 RETURN
3269
3270EOTB:
3271 if ("%EOTB" != "ON") then goto NECRO.DONE
3272 if (("%Eyes" = "ON") && ($invisible = 1)) then goto NECRO.DONE
3273 echo **** Checking EOTB ****
3274 if ("$preparedspell" != "None") then gosub RELEASE
3275## ** Waits for invis pulse or casts the spell if invisible is off..
3276 if (("%Eyes" = "ON") && ($invisible = 0)) then
3277 {
3278## ** This return is slightly different, it will not wait for pulse inside the exchange.
3279## ** It will also not wait for a pulse if destination = exchange, account or any teller trips to the exchange when moving areas.
3280## ** It should wait for a pulse inside the teller if going anywhere else.
3281 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
3282 matchre EOTB ^Your spell subtly|^Your corruptive mutation fades
3283 matchwait 30
3284 put #echo >log Red *** Error with EOTB not pulsing invis. Attempting to recast.
3285 }
3286 if ($invisible = 1) then RETURN
3287
3288## ** If script made it to this section then EOTB must be recast.
3289## ** This will not cast while inside the bank or any other unapproved rooms.
3290 if (((matchre("$roomobjs", "exchange rate board")) || (matchre("$roomname", "([T|t]eller|[E|e]xchange|[B|b]ank)")) || (matchre("$roomname", "(%donotcastlist)"))) then RETURN
3291 if ($stamina < 50) then RETURN
3292 gosub NECRO.CHECKROOM
3293 gosub PREPARE eotb %eotbMana
3294 if (%castPause > 0) then gosub SPELL_WAIT
3295 else
3296 {
3297 pause %castPause
3298 if ((!("$roomplayers" = "")) && (matchre("$preparedspell", "(Rite of Contrition|Eyes of the Blind)")) then gosub MOVE.RANDOM
3299 gosub SPELL_CAST
3300 }
3301 RETURN
3302NECRO.DONE:
3303 delay 0.0001
3304 RETURN
3305
3306NECRO.CHECKROOM:
3307 if !("$roomplayers" = "") then gosub MOVE.RANDOM
3308 send search
3309 waitforre ^Roundtime|^You scan the
3310 pause $roundtime
3311 pause 0.5
3312 if !("$roomplayers" = "") then gosub MOVE.RANDOM
3313 echo **** FOUND EMPTY ROOM! ***
3314RETURN
3315
3316stopinvis:
3317 gosub PUT hum scale
3318 pause 0.1
3319 pause 0.1
3320 gosub PUT stop hum
3321 RETURN
3322##############################################################################################
3323# UBER PROFIT TRACKING / BANK EXCHANGE V.9000 W/ CROSS SCRIPT INJECTION #
3324##############################################################################################
3325BANK:
3326 send wealth
3327 waitforre ^Wealth|^I could|^\.\.\.wait|^Sorry\,
3328 pause 0.001
3329 action (balancecheck) var Plat $1 when ^.*\s(\d+)\splatinum\,?
3330 action (balancecheck) var Gold $1 when ^.*\s(\d+)\sgold\,?
3331 action (balancecheck) var Silver $1 when ^.*\s(\d+)\ssilver\,?
3332 action (balancecheck) var Bronze $1 when ^.*\s(\d+)\sbronze\,?
3333 action (balancecheck) var Copper $1 when ^.*\s(\d+)\scopper
3334 action (balancecheck) off
3335 action (profitparse) var Plat $1 when ^PROFITPARSE\s(\d+)\d\d\d\d\sPROFITPARSE
3336 action (profitparse) var Gold $1 when ^PROFITPARSE\s\d+(\d)\d\d\d\sPROFITPARSE
3337 action (profitparse) var Gold $1 when ^PROFITPARSE\s(\d)\d\d\d\sPROFITPARSE
3338 action (profitparse) var Silver $1 when ^PROFITPARSE\s\d+\d(\d)\d\d\sPROFITPARSE
3339 action (profitparse) var Silver $1 when ^PROFITPARSE\s\d(\d)\d\d\sPROFITPARSE
3340 action (profitparse) var Silver $1 when ^PROFITPARSE\s(\d)\d\d\sPROFITPARSE
3341 action (profitparse) var Bronze $1 when ^PROFITPARSE\s\d+\d\d(\d)\d\sPROFITPARSE
3342 action (profitparse) var Bronze $1 when ^PROFITPARSE\s\d\d(\d)\d\sPROFITPARSE
3343 action (profitparse) var Bronze $1 when ^PROFITPARSE\s\d(\d)\d\sPROFITPARSE
3344 action (profitparse) var Bronze $1 when ^PROFITPARSE\s(\d)\d\sPROFITPARSE
3345 action (profitparse) var Copper $1 when ^PROFITPARSE\s\d+\d\d\d(\d)\sPROFITPARSE
3346 action (profitparse) var Copper $1 when ^PROFITPARSE\s\d\d\d(\d)\sPROFITPARSE
3347 action (profitparse) var Copper $1 when ^PROFITPARSE\s\d\d(\d)\sPROFITPARSE
3348 action (profitparse) var Copper $1 when ^PROFITPARSE\s\d(\d)\sPROFITPARSE
3349 action (profitparse) var Copper $1 when ^PROFITPARSE\s(\d)\sPROFITPARSE
3350 action (profitparse) off
3351 var preDeposit 0
3352 var postDeposit 0
3353 var profit 0
3354 gosub BANK.COIN.CLEAR
3355 action (balancecheck) on
3356 pause 0.01
3357 if ($invisible = 1) then gosub stopinvis
3358 put -check balance;-1 encumbrance
3359 waitforre ^\s*Encumbrance\s*\:
3360 pause 0.01
3361 action (balancecheck) off
3362 gosub BANK.COIN.MATH
3363 gosub BANK.PREDEP.MATH
3364 pause 0.01
3365 if ($invisible = 1) then gosub stopinvis
3366 put -deposit all;-1 encumbrance
3367 waitforre ^\s*Encumbrance\s*\:
3368 pause 0.01
3369 gosub BANK.COIN.CLEAR
3370 action (balancecheck) on
3371 pause 0.01
3372 if ($invisible = 1) then gosub stopinvis
3373 put -check balance;-1 encumbrance
3374 waitforre ^\s*Encumbrance\s*\:
3375 pause 0.01
3376 action (balancecheck) off
3377 gosub BANK.COIN.MATH
3378 gosub BANK.POSTDEP.MATH
3379 evalmath profit (%postDeposit - %preDeposit)
3380 math Profit add %profit
3381 pause 0.01
3382 gosub BANK.COIN.CLEAR
3383 action (profitparse) on
3384 put #parse PROFITPARSE %Profit PROFITPARSE
3385 action (profitparse) off
3386
3387## Multiple Bank Deposit Adding
3388 if (%Banked > 0) then
3389 {
3390 put #tvar Plat 0
3391 put #tvar Gold 0
3392 put #tvar Silver 0
3393 put #tvar Bronze 0
3394 put #tvar Copper 0
3395 }
3396 math Banked add 1
3397
3398SAVE.PROFIT:
3399## Saves your profit from each bank deposit in temp global variables for use in other scripts and for multiple city deposits
3400 put #tvar Plat %Plat
3401 put #tvar Gold %Gold
3402 put #tvar Silver %Silver
3403 put #tvar Bronze %Bronze
3404 put #tvar Copper %Copper
3405 pause 0.1
3406 put #statusbar 1 Stealing Profit: %Plat Plat, %Gold Gold, %Silver Silver, %Bronze Bronze and %Copper Copper
3407 put #parse MONEY DONE
3408 RETURN
3409#############################################
3410# BANK GOSUBS
3411#############################################
3412COMBINE.BANK:
3413 math Plats add $Plat
3414 math Golds add $Gold
3415 math Silvers add $Silver
3416 math Bronzes add $Bronze
3417 math Coppers add $Copper
3418 RETURN
3419BANK.COIN.CLEAR:
3420 var Copper 0
3421 var Bronze 0
3422 var Silver 0
3423 var Gold 0
3424 var Plat 0
3425 RETURN
3426BANK.COIN.MATH:
3427 math Bronze multiply 10
3428 math Silver multiply 100
3429 math Gold multiply 1000
3430 math Plat multiply 10000
3431 RETURN
3432BANK.PREDEP.MATH:
3433 math preDeposit add %Copper
3434 math preDeposit add %Bronze
3435 math preDeposit add %Silver
3436 math preDeposit add %Gold
3437 math preDeposit add %Plat
3438 RETURN
3439BANK.POSTDEP.MATH:
3440 math postDeposit add %Copper
3441 math postDeposit add %Bronze
3442 math postDeposit add %Silver
3443 math postDeposit add %Gold
3444 math postDeposit add %Plat
3445 RETURN
3446#############################################
3447## EXCHANGE
3448#############################################
3449LIRUMS:
3450 var Target.Currency LIRUMS
3451 gosub EXCHANGE KRONARS
3452 gosub EXCHANGE DOKORAS
3453 goto EXCHANGE.FINISH
3454KRONARS:
3455 var Target.Currency KRONARS
3456 gosub EXCHANGE LIRUMS
3457 gosub EXCHANGE DOKORAS
3458 goto EXCHANGE.FINISH
3459DOKORAS:
3460 var Target.Currency DOKORAS
3461 gosub EXCHANGE KRONARS
3462 gosub EXCHANGE LIRUMS
3463 goto EXCHANGE.FINISH
3464EXCHANGE:
3465 var Coin $0
3466EXCHANGE.CONTINUE:
3467 if ($invisible = 1) then gosub stopinvis
3468 pause 0.1
3469 matchre EXCHANGE.CONTINUE ^\.\.\.wait\s+\d+\s+sec(?:onds?|s)?\.?|^Sorry\,
3470 matchre RETURN ^You hand your money to the money-changer\.\s*After collecting a.* fee, .* hands you .*\.
3471 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\.\"
3472 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 .*\.
3473 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\.\"
3474 matchre RETURN ^But you don't have any .*\.
3475 matchre FINISH ^There is no money-changer here\.
3476 put EXCHANGE ALL %Coin FOR %Target.Currency
3477 matchwait
3478EXCHANGE.FINISH:
3479 put #parse EXCHANGE DONE!
3480 RETURN
3481############################################################################################
3482############################################################################################
3483# JAILED / DEBT PAYING ROUTINE #
3484# ROBUST AS A MOTHERFUCKER #
3485############################################################################################
3486############################################################################################
3487JAIL.CHECK:
3488 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
3489 put #parse TAKING CARE OF BUSINESS
3490 put #script pause %MAIN_SCRIPT
3491 if ($zoneid = 1) then goto CROSSING.JAIL
3492 if ($zoneid = 30) then goto HAVEN.JAIL
3493 if ($zoneid = 42) then goto THEREN.JAIL
3494 if ($zoneid = 61) then goto LETH.JAIL
3495 if ($zoneid = 116) then goto HIB.JAIL
3496 if ($zoneid = 67) then goto SHARD.JAIL
3497 if ($zoneid = 99) then goto AESRY.JAIL
3498 if ($zoneid = 90) then goto RATHA.JAIL
3499 pause 0.5
3500 goto JAILED
3501
3502AESRY.JAIL:
3503JAIL.AESRY:
3504 var CURRENT.CITY Aesry
3505 echo Aesry JAIL
3506 put #parse Aesry JAIL
3507 goto JAILED
3508RATHA.JAIL:
3509JAIL.RATHA:
3510 var CURRENT.CITY Ratha
3511 echo Ratha JAIL
3512 put #parse Ratha JAIL
3513 goto JAILED
3514THEREN.JAIL:
3515JAIL.THEREN:
3516 var CURRENT.CITY Theren
3517 echo Theren JAIL
3518 put #parse Theren JAIL
3519 goto JAILED
3520HAVEN.JAIL:
3521JAIL.HAVEN:
3522 var CURRENT.CITY Riverhaven
3523 echo RIVERHAVEN JAIL
3524 put #parse RIVERHAVEN JAIL
3525 goto JAILED
3526LETH.JAIL:
3527JAIL.LETH:
3528 var CURRENT.CITY Leth
3529 echo LETH JAIL
3530 put #parse LETH JAIL
3531 goto JAILED
3532CROSSING.JAIL:
3533CROSS.JAIL:
3534JAIL.CROSS:
3535 var CURRENT.CITY Crossing
3536 echo CROSSING JAIL
3537 put #parse CROSS JAIL
3538 goto JAILED
3539HIB.JAIL:
3540JAIL.HIB:
3541 var CURRENT.CITY Hib
3542 echo HIB JAIL
3543 put #parse HIB JAIL
3544 goto JAILED
3545SHARD.JAIL:
3546JAIL.SHARD:
3547 var CURRENT.CITY Shard
3548 echo SHARD JAIL
3549 put #parse SHARD JAIL
3550 goto JAILED
3551
3552JAILED:
3553 math Jailed add 1
3554 echo *** YOU'VE BEEN JAILED! ***
3555 echo *** WAITING FOR SENTENCE! ***
3556 put #echo >log Red **** ARRESTED IN %CURRENT.CITY!! *****
3557 put #beep
3558 matchre PLEAD ^The eyes of the court are upon you|PLEAD INNOCENT or PLEAD GUILTY|Your silence shall be taken|plead
3559 matchwait 220
3560 goto JAILED
3561PLEAD:
3562 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
3563 send plead %PLEAD
3564 wait
3565 pause 0.5
3566 pause 0.1
3567 if ($roomid = 23) then goto STOCKS
3568GET.SACK:
3569GET_SACK:
3570 pause 0.1
3571 pause 0.1
3572 match DEBT You glance down at your empty hands
3573 match SACK sack
3574 send glance
3575 matchwait
3576DEBT:
3577 gosub STAND
3578 echo
3579 echo **** Getting some coin to pay fine ****
3580 echo
3581 if ($zoneid = 42) then goto THEREN.JAIL.GET.FINE
3582 gosub clear
3583 if ("%guild" = "Necromancer") then gosub NECROPREP
3584 if ($zoneid = 90) then
3585 {
3586 var GUARD 1guard
3587 if ($roomid = 349) then var GUARD 1guard
3588 if ($roomid = 581) then var GUARD 3guard
3589 }
3590 pause 0.1
3591TO.TELLER:
3592 var plat 20
3593 if ($zoneid = 116) then
3594 {
3595 gosub automove 2teller
3596 goto FINECHECK.DOKORAS
3597 }
3598 if ($zoneid = 90) then
3599 {
3600 gosub AUTOMOVE 1teller
3601 goto FINECHECK.LIRUMS
3602 }
3603 gosub AUTOMOVE teller
3604 if ($zoneid = 67) then goto FINECHECK.DOKORAS
3605 if ($zoneid = 116) then goto FINECHECK.DOKORAS
3606 if ($zoneid = 61) then goto FINE.CHECK.KRONARS
3607 if ($zoneid = 1) then goto FINE.CHECK.KRONARS
3608 if ($zoneid = 30) then goto FINECHECK.LIRUMS
3609 if ($zoneid = 99) then goto FINECHECK.LIRUMS
3610 if ($zoneid = 34a) then goto FINECHECK.LIRUMS
3611 if ($zoneid = 42) then goto FINECHECK.LIRUMS
3612 pause
3613 echo
3614 echo *** UKNOWN JAIL LOCATION!!
3615 echo *** CRITICAL ERROR!
3616 echo
3617 put #echo >Log Red ***CRITICAL ERROR!!!!
3618 put #echo >Log Red ***UNKOWN JAIL LOCATION: Zone- $zoneid Room- $roomid
3619 pause 0.1
3620FINECHECK:
3621FINE.CHECK.KRONARS:
3622 matchre SET_FINE \((\d+) copper Kronars\)$
3623 match NO_FINE Wealth:
3624 send wealth
3625 matchwait
3626FINECHECK.LIRUMS:
3627 matchre SET_FINE_LIRUM \((\d+) copper Lirums\)$
3628 match NO_FINE Wealth:
3629 send wealth
3630 matchwait
3631FINECHECK.DOKORAS:
3632 matchre SET_FINE_DOKORAS \((\d+) copper Dokoras\)$
3633 match NO_FINE Wealth:
3634 send wealth
3635 matchwait
3636SET_FINE_LIRUM:
3637 pause 0.1
3638 var fine $1
3639 var currency lirum
3640 if (%fine > 250000) then goto BIGGER_FINE
3641 if (%fine > 100000) then goto BIG_FINE
3642 goto WITHDRAW
3643SET_FINE_DOKORAS:
3644 pause 0.1
3645 var fine $1
3646 var currency dokora
3647 if (%fine > 250000) then goto BIGGER_FINE
3648 if (%fine > 100000) then goto BIG_FINE
3649 goto WITHDRAW
3650SET_FINE:
3651 pause 0.1
3652 var fine $1
3653 var currency kronar
3654 if (%fine > 200000) then goto BIGGER_FINE
3655 if (%fine > 100000) then goto BIG_FINE
3656 goto WITHDRAW
3657WITHDRAW:
3658 if ($invisible = 1) then gosub stopinvis
3659 pause 0.2
3660 pause 0.1
3661 matchre TO.TELLER ^You must be at a bank teller's window
3662 matchre PAY_DEBT ^The clerk counts out
3663 matchre NO.FUNDS we are not lending money|You don't have that much
3664 send withdraw %fine copper
3665 matchwait
3666BIG_FINE:
3667 if ($invisible = 1) then gosub stopinvis
3668 pause 0.2
3669 pause 0.1
3670 matchre TO.TELLER ^You must be at a bank teller's window
3671 matchre PAY_DEBT ^The clerk counts out
3672 matchre NO.FUNDS we are not lending money|You don't have that much
3673 send withdraw %plat plat
3674 matchwait
3675BIGGER_FINE:
3676 if (%fine >= 2000000) then var plat 300
3677 if (%fine >= 1500000) then var plat 200
3678 if (%fine >= 1200000) then var plat 150
3679 if (%fine >= 900000) then var plat 120
3680 if (%fine >= 500000) then var plat 90
3681 if (%fine >= 450000) then var plat 50
3682 if (%fine >= 400000) then var plat 45
3683 if (%fine >= 350000) then var plat 40
3684 if (%fine >= 250000) then var plat 35
3685 if (%fine >= 200000) then var plat 25
3686 goto BIG_FINE
3687NO_FINE:
3688 echo
3689 echo *** You have no fine
3690 echo
3691 goto RETURN_TO_JAIL
3692PAY_DEBT:
3693 echo
3694 echo **** Paying off your debt! ***
3695 echo
3696 pause
3697 pause 0.5
3698 # Walking to pay off the debt
3699 gosub AUTOMOVE debt
3700 if ($invisible = 1) then gosub stopinvis
3701 send pay %fine
3702 pause
3703 if ($zoneid = 116) then
3704 {
3705 gosub automove 2teller
3706 goto DONE_DEBT
3707 }
3708 if ($zoneid = 90) then
3709 {
3710 gosub AUTOMOVE 1teller
3711 goto DONE_DEBT
3712 }
3713 gosub AUTOMOVE teller
3714DONE_DEBT:
3715 pause 0.1
3716 if ($invisible = 1) then gosub stopinvis
3717 send dep all
3718 pause 0.1
3719RETURN_TO_JAIL:
3720 echo
3721 echo **** Heading back to jail now ****
3722 echo
3723 if ($zoneid = 42) then goto THEREN.KEEP.JAIL
3724 if ($zoneid = 90) then goto RATHA.JAIL.RETURN
3725 if ($zoneid = 67) then goto SHARD.JAIL.RETURN
3726 if ($zoneid = 116) then goto HIB.JAIL.RETURN
3727 # Walking to the Guard House
3728 gosub AUTOMOVE Guard
3729 goto CLAN
3730RATHA.JAIL.RETURN:
3731 gosub AUTOMOVE %GUARD
3732 goto CLAN
3733HIB.JAIL.RETURN:
3734 gosub AUTOMOVE 200
3735 goto CLAN
3736 SHARD.JAIL.RETURN:
3737 gosub AUTOMOVE sentin
3738CLAN:
3739 if ("$gamename" = "DRF") && ("%ClanItem" != "NO") then goto CLAN_ITEM
3740 else goto THE_SACK
3741CLAN_ITEM_PAUSE:
3742 pause 8
3743CLAN_ITEM:
3744 if ("%ClanItem" = "NO") then goto THE_SACK
3745 if ("$gamename" = "DRF") then send remove %CLAN_ITEM_NAME
3746 pause
3747THE_SACK:
3748 if ($invisible = 1) then gosub stopinvis
3749 pause 0.5
3750 matchre THE_SACK ^\.\.\.wait|^Sorry, you may only|What were you|I could not|Please rephrase
3751 matchre SACK_PRE ^You reach for your sack and retrieve the equipment
3752 matchre CLAN_ITEM_PAUSE ^You'll need to not be wearing anything
3753 matchre DEBT paid off your debt to society
3754 matchre SACK ^Realizing you're wearing too much
3755 send get $charactername sack
3756 matchwait
3757 goto GET_SACK
3758STOCKS:
3759echo
3760echo *** You got the stocks! Wait it out!
3761echo
3762waitforre ^You accept a sack and retrieve the equipment
3763SACK_PRE:
3764 if ("%ClanItem" = "YES") then put wear %CLAN_ITEM_NAME
3765 if ("%ClanItem" = "YES") then put rub %CLAN_ITEM_NAME
3766 pause 0.5
3767 send open my small sack
3768 wait
3769 pause 0.5
3770SACK:
3771 pause 0.5
3772 pause 0.5
3773 matchre STOW.IT mining cowl|mining cap|mining helm
3774 matchre ITEM khuj|quarterstaff|quarter staff|halberd|toad
3775 match OPEN_SACK That is closed.
3776 matchre GET_SACK_ITEM (\S+)(\.)
3777 matchre NO_MORE_ITEMS ^There is nothing in there|^I could not find
3778 send look in my small sack
3779 matchwait
3780STOW.IT:
3781 var item $0
3782 send get %item from my sack
3783 pause 0.5
3784 pause 0.2
3785 send stow %item in my %BIN_CONTAINER
3786 pause 0.5
3787 send stow %item in my %PAWN_CONTAINER
3788 goto SACK
3789ITEM:
3790 var item $0
3791 gosub GET %item from my sack
3792 pause 0.5
3793 send wear %item
3794 pause 0.5
3795 send stow %item
3796 goto SACK
3797OPEN_SACK:
3798 send wear %CLAN_ITEM_NAME
3799 pause 0.5
3800 send open my sack
3801 wait
3802 goto SACK
3803GET_SACK_ITEM:
3804 pause
3805 if $1 = there then goto NO_MORE_ITEMS
3806 send get $1 from my sack
3807 pause 0.5
3808 if (("$1" = "backpack")||("$1" = "cauldron")) then
3809 {
3810 pause 0.5
3811 goto SACK
3812 }
3813 if ("$1" = ("obsidian")||("$1" = "toad")) then
3814 {
3815 send wear my $1
3816 send stow my $1
3817 }
3818 else
3819 {
3820 send stow my $1
3821 send wear my $1
3822 }
3823 pause 0.5
3824 goto SACK
3825NO_MORE_ITEMS:
3826 send drop sack
3827 pause
3828 echo
3829 echo **** Returning to what you were doing ****
3830 echo
3831 if ($standing = 0) then gosub stand
3832 if contains("$lefthand" "$righthand" , "%large.items") then gosub EMPTY.HANDS
3833CHECKLOC:
3834 if ($zoneid = 67) then goto SHARDJAIL
3835 if ($zoneid = 116) then goto HIBJAIL
3836 if ($zoneid = 61) then goto LETHJAIL
3837 if ($zoneid = 1) then goto CROSSJAIL
3838 if ($zoneid = 30) then goto HAVENJAIL
3839 if ($zoneid = 42) then goto THEREN.JAIL.LEAVE
3840 if ($zoneid = 90) then goto RATHAJAIL
3841 if ($zoneid = 99) then goto AESRYJAIL
3842RATHAJAIL:
3843 gosub AUTOMOVE 51
3844 put #script resume %MAIN_SCRIPT
3845 put #parse TAKING CARE OF BUSINESS
3846 pause 0.5
3847 goto END
3848AESRYJAIL:
3849 gosub AUTOMOVE 76
3850 put #script resume %MAIN_SCRIPT
3851 put #parse TAKING CARE OF BUSINESS
3852 pause 0.5
3853 goto END
3854CROSSJAIL:
3855 gosub AUTOMOVE 42
3856 put #script resume %MAIN_SCRIPT
3857 put #parse TAKING CARE OF BUSINESS
3858 pause 0.5
3859 goto END
3860LETHJAIL:
3861 gosub AUTOMOVE portal
3862 put #script resume %MAIN_SCRIPT
3863 pause 0.5
3864 put #parse TAKING CARE OF BUSINESS
3865 pause 0.5
3866 goto END
3867HAVENJAIL:
3868 gosub AUTOMOVE town
3869 put #script resume %MAIN_SCRIPT
3870 put #parse TAKING CARE OF BUSINESS
3871 pause 0.5
3872 goto END
3873SHARDJAIL:
3874 gosub AUTOMOVE 57
3875 put #script resume %MAIN_SCRIPT
3876 put #parse TAKING CARE OF BUSINESS
3877 pause 0.5
3878 goto END
3879HIBJAIL:
3880 gosub AUTOMOVE 75
3881 put #script resume %MAIN_SCRIPT
3882 put #parse TAKING CARE OF BUSINESS
3883 pause 0.5
3884 goto END
3885THEREN.JAIL.LEAVE:
3886 save THEREN.JAIL.END
3887 goto THEREN.KEEP.ESCAPE
3888THEREN.JAIL.GET.FINE:
3889 save TO.TELLER
3890 goto THEREN.KEEP.ESCAPE
3891THEREN.KEEP.ESCAPE:
3892 gosub AUTOMOVE 69
3893 send jump moat
3894 pause 12
3895THEREN.STUNNED.WAIT:
3896 pause 10
3897 if $stunned = 1 then goto THEREN.STUNNED.WAIT
3898 pause 0.5
3899 gosub STAND
3900 pause 0.5
3901 goto THEREN.MOAT.LEAVE
3902THEREN.MOAT.LEAVE:
3903 var location THEREN.MOAT.LEAVE
3904 gosub MOVE s
3905 pause 2
3906 goto %s
3907THEREN.KEEP.JAIL:
3908 var location THEREN.KEEP.JAIL
3909 gosub AUTOMOVE 103
3910 gosub AUTOMOVE moat
3911 put #goto 146
3912 waitfor YOU HAVE ARRIVED
3913 move ne
3914 move e
3915 move e
3916 move s
3917 pause 3
3918 gosub AUTOMOVE dungeon
3919 gosub STAND
3920 goto CLAN_ITEM
3921THEREN.JAIL.END:
3922 gosub AUTOMOVE 1
3923 pause 2
3924END:
3925 put #script resume %MAIN_SCRIPT
3926 put #script abort jail
3927 put #parse FREE FROM JAIL
3928 put #echo >Log SkyBlue *** RECOVERED FROM JAIL VIA STEALING SCRIPT
3929 put #echo >Log SkyBlue *** CONTINUING SCRIPT FROM LAST CHECKPOINT..
3930 echo
3931 echo *** FREE FROM JAIL!
3932 pause 0.5
3933 pause
3934 goto %LAST
3935FREE.CROSSING:
3936 goto %LAST
3937FREE.LETH:
3938 goto GO.LETH.PAWN
3939FREE.HAVEN:
3940FREE.THEREN:
3941 goto %LAST
3942 goto GO.PAWN.STUFF.HAVEN
3943##########################################################################################################################################
3944##########################################################################################################################################
3945# LOCATION CHECKING LOGIC
3946##########################################################################################################################################
3947##########################################################################################################################################
3948CITY.CHECK:
3949 if $zoneid = 42 then gosub AUTOMOVE quad
3950 #if $zoneid = 30 then gosub AUTOMOVE town
3951 if $zoneid = 7 then gosub AUTOMOVE arthe
3952 if $zoneid = 61 then gosub AUTOMOVE portal
3953 if $zoneid = 67 then gosub AUTOMOVE 1
3954 if $zoneid = 116 then gosub AUTOMOVE 75
3955 if $zoneid = 99 then var CITY AESRY
3956 if $zoneid = 90 then var CITY RATHA
3957 if $zoneid = 42 then var CITY THEREN
3958 if $zoneid = 30 then var CITY RIVERHAVEN
3959 if $zoneid = 7 then var CITY ARTHE
3960 if $zoneid = 1 then var CITY CROSSING
3961 if $zoneid = 61 then var CITY LETH
3962 if $zoneid = 67 then var CITY SHARD
3963 if $zoneid = 116 then var CITY HIB
3964 if !matchre("$zoneid","(1|7|42|30|61|67|90|99|116)") then goto ERROR.UNKNOWN
3965 echo
3966 echo *** STARTING CITY: %CITY
3967 echo
3968 pause 0.5
3969 RETURN
3970
3971ERROR.UNKNOWN:
3972 put #beep
3973 echo
3974 echo **** ERROR: UNKNOWN LOCATION!
3975 echo **** SCRIPT ONLY SUPPORTS THE FOLLOWING CITIES:
3976 echo **** THEREN / RIVERHAVEN
3977 echo **** CROSSINGS / ARTHE DALE
3978 echo **** LETH DERIEL / SHARD / HIBARNHVIDAR
3979 echo **** RATHA / AESRY
3980 echo *** MOVE TO VALID CITY AND RESTART SCRIPT
3981 echo
3982 put #beep
3983 put #beep
3984 pause 3
3985 echo **** ERROR: UNKNOWN LOCATION!
3986 echo **** ABORTING SCRIPT
3987 put #beep
3988 put #beep
3989 put #beep
3990 put #parse DONE STEALING
3991 put #parse STEALING DONE
3992 exit
3993############################################################################################
3994##########################
3995# MOVEMENT ENGINE
3996##########################
3997##### AUTOMOVE SUBROUTINE #####
3998AUTOMOVE:
3999 var RandomLoop 0
4000 pause 0.1
4001 if $roomid = 0 then GOSUB moveRandomDirection
4002 pause 0.1
4003 pause 0.1
4004 var Destination $0
4005 if ("%guild" = "Necromancer") then gosub EOTB
4006 if !$standing then gosub STAND
4007 if $roomid = %Destination then RETURN
4008AUTOMOVE_GO:
4009 matchre AUTOMOVE_RETURN ^SHOP CLOSED\!|SHOP CLOSED
4010 matchre AUTOMOVE_FAILED ^AUTOMAPPER MOVEMENT FAILED|^MOVE FAILED
4011 matchre AUTOMOVE_RETURN ^YOU HAVE ARRIVED
4012 send #goto %Destination
4013 matchwait
4014AUTOMOVE_STAND:
4015 send STAND
4016 pause 0.5
4017 if $standing then RETURN
4018 goto AUTOMOVE_STAND
4019AUTOMOVE_FAILED:
4020 pause 0.5
4021 pause 0.5
4022 pause 0.5
4023 goto AUTOMOVE_GO
4024AUTOMOVE_RETURN:
4025 if matchre("%Destination", "teller|exchange|debt|PAWN") then if $invisible = 1 then gosub stopinvis
4026 pause 0.2
4027 pause 0.1
4028 pause 0.1
4029 RETURN
4030######################
4031# Random Movement Subroutine
4032######################
4033moveRandomDirection:
4034if $north then
4035{
4036put north
4037wait
4038return
4039}
4040if $northwest then
4041{
4042put northwest
4043wait
4044return
4045}
4046if $northeast then
4047{
4048put northeast
4049wait
4050return
4051}
4052if $southeast then
4053{
4054put southeast
4055wait
4056return
4057}
4058if $south then
4059{
4060put south
4061wait
4062return
4063}
4064if $west then
4065{
4066put west
4067return
4068}
4069if $east then
4070{
4071put east
4072wait
4073return
4074}
4075if $southwest then
4076{
4077put southwest
4078wait
4079return
4080}
4081if $out then
4082{
4083put out
4084wait
4085return
4086}
4087if $up then
4088{
4089put up
4090wait
4091return
4092}
4093if $down then
4094{
4095put down
4096wait
4097return
4098}
4099if matchre("$roomobjs","doorway|door") then
4100{
4101put go door
4102wait
4103return
4104}
4105if matchre("$roomobjs","archway|arch") then
4106{
4107put go arch
4108wait
4109return
4110}
4111echo ALERT!!! No random direction possible!!
4112echo Missing a room descriptor
4113echo Attempting to reset room exit vars
4114#might need a counter here to prevent infinite loops
4115math RandomLoop add 1
4116put look
4117waitforre ^Obvious
4118pause 0.5
4119pause 0.5
4120if %RandomLoop > 5 then RETURN
4121goto moveRandomDirection
4122
4123MOVE.RANDOM:
4124 random 1 8
4125 if %r = 1 and $north = 0 then goto MOVE.RANDOM
4126 if %r = 2 and $northeast = 0 then goto MOVE.RANDOM
4127 if %r = 3 and $east = 0 then goto MOVE.RANDOM
4128 if %r = 4 and $southeast = 0 then goto MOVE.RANDOM
4129 if %r = 5 and $south = 0 then goto MOVE.RANDOM
4130 if %r = 6 and $southwest = 0 then goto MOVE.RANDOM
4131 if %r = 7 and $west = 0 then goto MOVE.RANDOM
4132 if %r = 8 and $northwest = 0 then goto MOVE.RANDOM
4133 #
4134 if %r = 1 then var Direction NORTH
4135 if %r = 2 then var Direction NORTHEAST
4136 if %r = 3 then var Direction EAST
4137 if %r = 4 then var Direction SOUTHEAST
4138 if %r = 5 then var Direction SOUTH
4139 if %r = 6 then var Direction SOUTHWEST
4140 if %r = 7 then var Direction WEST
4141 if %r = 8 then var Direction NORTHWEST
4142 #
4143 if %r = 1 then var Reverse.Direction SOUTH
4144 if %r = 2 then var Reverse.Direction SOUTHWEST
4145 if %r = 3 then var Reverse.Direction WEST
4146 if %r = 4 then var Reverse.Direction NORTHWEST
4147 if %r = 5 then var Reverse.Direction NORTH
4148 if %r = 6 then var Reverse.Direction NORTHEAST
4149 if %r = 7 then var Reverse.Direction EAST
4150 if %r = 8 then var Reverse.Direction SOUTHEAST
4151 #
4152 var Exits 0
4153 if $north = 1 then math Exits add 1
4154 if $northeast = 1 then math Exits add 1
4155 if $east = 1 then math Exits add 1
4156 if $southeast = 1 then math Exits add 1
4157 if $south = 1 then math Exits add 1
4158 if $southwest = 1 then math Exits add 1
4159 if $west = 1 then math Exits add 1
4160 if $northwest = 1 then math Exits add 1
4161 #
4162 # don't move "back" on a path unless we hit a dead end
4163 if %Exits > 1 and "%Last.Direction" = "%Reverse.Direction" then goto MOVE.RANDOM
4164 #
4165 var Last.Direction %Direction
4166 gosub MOVE.RESUME
4167 RETURN
4168MOVE:
4169 var Direction $0
4170 pause 0.1
4171 pause 0.1
4172MOVE.RESUME:
4173 matchre MOVE.RESUME ^\.\.\.wait|^Sorry\,
4174 matchre MOVE.RETREAT ^You are engaged to .*\!
4175 matchre MOVE.STAND ^You can't do that while lying down\.
4176 matchre MOVE.STAND ^You must be standing to do that\.
4177 matchre MOVE.STAND ^You must stand first\.
4178 matchre MOVE.STAND ^Stand up first\.
4179 matchre MOVE.FAILED ^You can't go there\.
4180 matchre MOVE.FAILED ^I could not find what you were referring to\.
4181 matchre MOVE.FAILED ^What were you referring to\?
4182 matchre MOVE.RETURN ^It's pitch dark|^Obvious
4183 send %Direction
4184 matchwait
4185MOVE.RETREAT:
4186 matchre MOVE.RETREAT ^\.\.\.wait|^Sorry\,
4187 matchre MOVE.RETREAT ^You retreat back to pole range.
4188 matchre MOVE.RETREAT ^You try to back away
4189 matchre MOVE.STAND ^You must stand first\.
4190 matchre MOVE.RESUME ^You retreat from combat\.
4191 matchre MOVE.RESUME ^You are already as far away as you can get\!
4192 send RETREAT
4193 matchwait
4194MOVE.STAND:
4195 matchre MOVE.STAND ^\.\.\.wait|^Sorry\,
4196 matchre MOVE.STAND ^You are overburdened and cannot manage to stand\.
4197 matchre MOVE.STAND ^The weight
4198 matchre MOVE.STAND ^You try
4199 matchre MOVE.RESUME ^You are already standing\.
4200 matchre MOVE.RESUME ^You stand back up\.
4201 matchre MOVE.RESUME ^You stand up\.
4202 send STAND
4203 matchwait
4204MOVE.FAILED:
4205 gosub clear
4206 goto MOVE.RANDOM
4207MOVE.RETURN:
4208 RETURN
4209
4210##########################################
4211# UTILITY GOSUBS #
4212##########################################
4213############################################################################################
4214SKILLCHECK:
4215 send skill thievery
4216 echo
4217 echo **** Checking Your Skills.............
4218 echo
4219 pause 0.5
4220 if $Thievery.Ranks < 20 then goto NOOB
4221 if $Thievery.Ranks >= 20 && $Thievery.Ranks < 40 then goto CLASS1
4222 if $Thievery.Ranks >= 40 && $Thievery.Ranks < 60 then goto CLASS2
4223 if $Thievery.Ranks >= 60 && $Thievery.Ranks < 100 then goto CLASS3
4224 if $Thievery.Ranks >= 100 && $Thievery.Ranks < 150 then goto CLASS4
4225 if $Thievery.Ranks >= 150 && $Thievery.Ranks < 200 then goto CLASS5
4226 if $Thievery.Ranks >= 200 && $Thievery.Ranks < 250 then goto CLASS6
4227 if $Thievery.Ranks >= 250 && $Thievery.Ranks < 300 then goto CLASS7
4228 if $Thievery.Ranks >= 300 && $Thievery.Ranks < 400 then goto CLASS8
4229 if $Thievery.Ranks >= 400 && $Thievery.Ranks < 500 then goto CLASS9
4230 if $Thievery.Ranks >= 500 && $Thievery.Ranks < 600 then goto CLASS10
4231 if $Thievery.Ranks >= 600 && $Thievery.Ranks < 700 then goto CLASS11
4232 if $Thievery.Ranks >= 700 && $Thievery.Ranks < 800 then goto CLASS12
4233 if $Thievery.Ranks >= 800 && $Thievery.Ranks < 900 then goto CLASS13
4234 if $Thievery.Ranks >= 900 && $Thievery.Ranks < 1000 then goto CLASS14
4235 if $Thievery.Ranks >= 1000 && $Thievery.Ranks < 1200 then goto CLASS15
4236 if $Thievery.Ranks >= 1200 then goto CLASS16
4237 pause 0.1
4238 goto SKILLCHECK
4239############################################################################################
4240EMPTY.HANDS:
4241 delay 0.0001
4242 if ("$lefthand" != "Empty") then gosub empty left
4243 if ("$righthand" != "Empty") then gosub empty right
4244 pause 0.1
4245 RETURN
4246EMPTY:
4247var hand $0
4248EMPTY.IT:
4249 pause 0.1
4250 pause 0.1
4251 matchre EMPTY.IT ^\.\.\.wait|^Sorry\,
4252 matchre LOWER.HAND Whoah\!
4253 matchre LOWER.HAND If you still wish to drop it
4254 matchre WEBBED ^You can't do that while entangled in a web
4255 matchre IMMOBILE ^You don't seem to be able to move to do that
4256 matchre RETURN ^You drop
4257 matchre RETURN already empty
4258 matchre RETURN ^What were you referring to\?
4259 matchre RETURN ^Please rephrase that command\.
4260 matchre RETURN ^What were you referring to\?
4261 matchre RETURN ^But you aren't holding that\.
4262 matchre RETURN ^Roundtime
4263 matchre RETURN ^Having no further use for .*\, you discard it\.
4264 matchre RETURN ^I could not find what you were referring to\.
4265 matchre RETURN shatters
4266 send empty %hand
4267 matchwait
4268LOWER.HAND:
4269 pause 0.1
4270 pause 0.1
4271 if "$righthand" != "Empty" then send lower $righthandnoun
4272 if "$lefthand" != "Empty" then send lower $lefthandnoun
4273 pause 0.1
4274 pause 0.1
4275 pause 0.1
4276 RETURN
4277#CIRCLE
4278CIRCLE.CHECK:
4279 if $zoneid = 1 then var GL kalag
4280 if $zoneid = 30 then var GL crow
4281 if $zoneid = 67 then var GL saishla
4282 if $zoneid = 90 then var GL dwillig
4283 pause 0.5
4284 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
4285 matchre CIRCLE.RETURN You have some work to do|you should work on
4286 put ask %GL about exp
4287 put ask %GL about exp
4288 matchwait 9
4289 RETURN
4290CIRCLE.UP:
4291 pause 0.1
4292 pause 0.1
4293 action var circle $1;put #var circle $1 when Circle: (\d+)
4294 send info;encum
4295 waitforre ^\s*Encumbrance\s*\:
4296 action remove Circle: (\d+)
4297 pause 0.1
4298 pause 0.1
4299 put #echo >Log Chartreuse *** DING!!! CIRCLE $circle ! ****
4300 goto CIRCLE.CHECK
4301CIRCLE.RETURN:
4302 pause 0.1
4303 pause 0.1
4304 RETURN
4305############################################################################################
4306GUILD.CHECK:
4307 echo
4308 echo **** CHECKING GUILD...................
4309 echo
4310 pause 0.1
4311 pause 0.1
4312 pause 0.1
4313 action var guild $1;put #var guild $1 when Guild: (\S+)
4314 action var circle $1;put #var circle $1 when Circle: (\d+)
4315 send info;encum
4316 waitforre ^\s*Encumbrance\s*\:
4317 action remove Guild: (\S+)
4318 action remove Circle: (\d+)
4319 pause 0.1
4320 echo **** Guild: %guild ****
4321 echo **** Circle: %circle ****
4322 if ("%guild" = "Thief") then
4323 {
4324 var marking ON
4325 if ("%HAVEN_PW" = "null") || ("%SHARD_PW" = "null") then goto NO.PASSWORD
4326 if ("%BIN" = "ON") && ("%PAWN" = "ON") && ("%BIN_CONTAINER" = "%PAWN_CONTAINER") then goto BAG.ALERT
4327 #if (%STEALCOUNT = 5) && ($Thievery.Ranks < 120) then var STEALCOUNT 4
4328 }
4329 if ("%guild" != "Thief") then
4330 {
4331 var BIN OFF
4332 var marking OFF
4333 }
4334 if $gamename != DRF then var ClanItem NO
4335 put #var save
4336 RETURN
4337############################################################################################
4338TIME.CALC:
4339 evalmath runTime (%t / 60)
4340 evalmath runTime round(%runTime,2)
4341 RETURN
4342TIME.CHECK:
4343 echo **** CHECKING TIME....
4344 matchre NIGHT.TIME early evening|mid-evening|late evening|evening|midnight|night|dawn|sunset|approaching sunrise|sunrise|you can't tell
4345 matchre DAY.TIME early morning|mid-morning|midday|late morning|noon|early afternoon|mid-afternoon|late afternoon|dusk
4346 send time
4347 matchwait 5
4348 goto NIGHT.TIME
4349DAY.TIME:
4350 put #var TIME DAY
4351 var TIME DAY
4352 send observe weather
4353 pause 0.5
4354 RETURN
4355NO.TIME:
4356NIGHT.TIME:
4357 put #var TIME NIGHT
4358 var TIME NIGHT
4359 send observe weather
4360 pause 0.5
4361 RETURN
4362##############################################################################################
4363PREMIUM.CHECK:
4364 matchre PREMIUM.NO ^You are not currently a Premium
4365 matchre PREMIUM.YES ^Your premium service has been continuous
4366 put ltb info
4367 matchwait 5
4368 goto PREMIUM.NO
4369PREMIUM.NO:
4370 var PREMIUM OFF
4371 echo *** PREMIUM ACCOUNT NOT ACTIVE
4372 echo *** USING REGULAR BANK TO EXCHANGE COINS
4373 pause
4374 RETURN
4375PREMIUM.YES:
4376 var PREMIUM ON
4377 echo *** PREMIUM ACCOUNT ENABLED
4378 echo *** USING PREMIUM BANK TO EXCHANGE COINS
4379 pause
4380 RETURN
4381##############################################################################################
4382PAUSE:
4383 if ($roundtime > 0) then pause $roundtime
4384 pause 0.5
4385 pause 0.1
4386 RETURN
4387STAND:
4388 pause 0.2
4389 matchre STAND ^Roundtime\:?|^\[Roundtime\:?|^\(Roundtime\:?
4390 matchre STAND ^\.\.\.wait|^Sorry\,
4391 matchre STAND ^You are so unbalanced you cannot manage to stand\.
4392 matchre STAND ^The weight of all your possessions prevents you from standing\.
4393 matchre STAND ^You are overburdened and cannot manage to stand\.
4394 matchre STAND ^You are still stunned
4395 matchre STAND ^You try
4396 matchre STUNNED ^You are still stunned
4397 matchre WEBBED ^You can't do that while entangled in a web
4398 matchre IMMOBILE ^You don't seem to be able to move to do that
4399 matchre RETURN ^You are already standing\.
4400 matchre RETURN ^You stand back up\.
4401 matchre RETURN ^You stand up\.
4402 matchre RETURN ^There doesn't seem to be anything to stand on here
4403 matchre RETURN ^You swim back up
4404 matchre RETURN ^You are already standing\.
4405 matchre RETURN ^You're unconscious
4406 send STAND
4407 matchwait
4408RET.HIDE:
4409 put stop hum
4410 wait
4411 pause 0.1
4412 pause 0.1
4413 put ret
4414 put ret
4415 pause 0.5
4416 pause 0.2
4417HIDE:
4418 pause 0.1
4419 matchre HIDE ^\.\.\.wait|^Sorry\,
4420 matchre RET.HIDE You are too close|^You are a bit|^You are too busy
4421 matchre STUNNED ^You are still stunned
4422 matchre WEBBED ^You can't do that while entangled in a web
4423 matchre IMMOBILE ^You don't seem to be able to move to do that
4424 matchre RETURN ^.* notices your attempt to hide\!
4425 matchre RETURN ^.* reveals you, ruining your hiding attempt\!|
4426 matchre RETURN ^.* discovers you, ruining your hiding place\!
4427 matchre RETURN ^You melt|^You blend|^Eh\?|^You slip|^Roundtime|You look around
4428 send hide
4429 matchwait 5
4430 RETURN
4431SNEAK:
4432 var direction $0
4433 if (("%guild" = "Thief") && (%circle < 50)) then goto SNEAK.HIDE
4434SNEAKING:
4435 pause 0.1
4436 matchre SNEAK.PAUSE ^\.\.\.wait|^Sorry\,
4437 matchre RETURN Roundtime|You sneak|You duck|You quickly slip
4438 send sneak %direction
4439 matchwait 5
4440SNEAK.PAUSE:
4441 pause
4442 goto SNEAKING
4443SNEAK.HIDE:
4444 pause 0.2
4445 matchre STUNNED ^You are still stunned
4446 matchre WEBBED ^You can't do that while entangled in a web
4447 matchre IMMOBILE ^You don't seem to be able to move to do that
4448 matchre SNEAK.HIDE notices your attempt|reveals you|ruining your hiding place|discovers you
4449 matchre SNEAKING ^You melt|^You blend|^Eh\?|^You slip|^Roundtime|You look around
4450 send hide
4451 matchwait
4452UNHIDE:
4453 pause 0.1
4454 matchre UNHIDE ^\.\.\.wait|^Sorry\,
4455 matchre STUNNED ^You are still stunned
4456 matchre WEBBED ^You can't do that while entangled in a web
4457 matchre IMMOBILE ^You don't seem to be able to move to do that
4458 matchre RETURN ^But you are not hidden\!
4459 matchre RETURN ^You come out of hiding\.
4460 send UNHIDE
4461 matchwait 5
4462 RETURN
4463STOWING:
4464 var location STOWING
4465 pause 0.1
4466 if "$righthandnoun" = "rope" then put coil my rope
4467 if "$righthand" = "bundle" || "$lefthand" = "bundle" then put wear bund;drop bun
4468 if matchre("$righthandnoun","(crossbow|bow|short bow)") then gosub unload
4469#CHANGING
4470 if matchre("$righthand","(partisan|shield|buckler|crossbow|lumpy bundle|halberd|staff|longbow|khuj)") then put empty right
4471 if matchre("$lefthand","(partisan|shield|buckler|crossbow|lumpy bundle|halberd|staff|longbow|khuj)") then put empty left
4472 if matchre("$lefthand","(longbow|khuj)") then put empty left
4473 if "$righthand" != "Empty" then put empty right
4474 if "$lefthand" != "Empty" then put empty left
4475 RETURN
4476STOWIT:
4477 var location stow1
4478 var todo $0
4479stow1:
4480 pause 0.1
4481 pause 0.1
4482 if matchre("$righthand","longbow") then goto stow4
4483 matchre stow2 any more room|no matter how you arrange|^That's too heavy|too thick|too long|too wide|not designed to carry
4484 matchre RETURN ^Wear what\?|^Stow what\?
4485 matchre RETURN ^You put your|^You easily|^You strap
4486 matchre RETURN ^You stop as you realize
4487 matchre RETURN ^But that is already in your inventory\.
4488 matchre RETURN ^That can't be picked up
4489 matchre location.unload ^You should unload the
4490 matchre location.unload ^You need to unload the
4491 send stow %todo
4492 send stow %todo
4493 goto retry
4494stow2:
4495 pause 0.3
4496 pause 0.1
4497 var location stow2
4498 matchre RETURN ^Wear what\?|^Stow what\?
4499 matchre RETURN ^You put your|^You easily|^You strap
4500 matchre RETURN ^But that is already in your inventory\.
4501 matchre stow3 any more room|no matter how you arrange|^That's too heavy|too thick|too long|too wide|not designed to carry
4502 matchre location.unload ^You should unload the
4503 matchre location.unload ^You need to unload the
4504 send stow %todo in my %PAWN_CONTAINER
4505 goto retry
4506stow3:
4507 pause 0.3
4508 pause 0.1
4509 var location stow3
4510 if "$lefthandnoun" = "bundle" then send drop bun
4511 if "$righthandnoun" = "bundle" then send drop bun
4512 matchre RETURN ^Wear what\?|^Stow what\?
4513 matchre RETURN ^You put your|^You easily|^You strap
4514 matchre RETURN ^But that is already in your inventory\.
4515 matchre stow4 any more room|no matter how you arrange|^That's too heavy|too thick|too long|too wide|not designed to carry
4516 matchre location.unload ^You should unload the
4517 matchre location.unload ^You need to unload the
4518 send stow %todo in my %BIN_CONTAINER
4519 send stow %todo in my %BIN_CONTAINER
4520 goto retry
4521stow4:
4522 pause 0.5
4523 pause 0.1
4524 var location stow4
4525 if "$lefthandnoun" = "bundle" then send drop bun
4526 if "$righthandnoun" = "bundle" then send drop bun
4527 matchre RETURN ^Wear what\?|^Stow what\?
4528 matchre RETURN ^You put your|^You easily|^You strap
4529 matchre RETURN ^But that is already in your inventory\.
4530 matchre STOW.DROP any more room|no matter how you arrange|^That's too heavy|too thick|too long|too wide
4531 matchre location.unload ^You should unload the
4532 matchre location.unload ^You need to unload the
4533 send stow %todo in my %PAWN_CONTAINER
4534 send stow %todo in my %SAFE_CONTAINER
4535 goto retry
4536
4537REM.WEAR:
4538 put rem bund
4539 put drop bund
4540 wait
4541 pause 0.5
4542 goto wear1
4543#### WEAR SUB
4544WEAR:
4545 delay 0.0001
4546 var stow $0
4547 var LOCATION WEAR_1
4548 WEAR_1:
4549 matchre WAIT ^\.\.\.wait|^Sorry\,
4550 matchre IMMOBILE ^You don't seem to be able to move to do that
4551 matchre WEBBED ^You can't do that while entangled in a web
4552 matchre STUNNED ^You are still stunned
4553 matchre STOW_1 ^You can't wear that\!
4554 matchre STOW_1 ^You can't wear any more items like that\.
4555 matchre STOW_1 ^You need at least one free hand for that\.
4556 matchre STOW_1 ^This .* can't fit over the .* you are already wearing which also covers and protects your .*\.
4557 matchre RETURN ^You (?:sling|put|slide|slip|attach|work|strap) .*\.
4558 matchre RETURN ^You are already wearing that\.
4559 matchre RETURN ^What were you referring to\?
4560 matchre RETURN ^Wear what\?
4561 send wear %stow
4562 matchwait 15
4563 put #echo >$Log Crimson $datetime *** MISSING MATCH IN WEAR! (utility.inc) ***
4564 put #echo >$Log Crimson $datetime Stow = %stow
4565 put #log $datetime MISSING MATCH IN WEAR (utility.inc)
4566 return
4567search:
4568 var todo $0
4569 var location search
4570 matchre RETURN ^Success\!
4571 matchre RETURN ^Roundtime
4572 matchre RETURN ^You search around for a moment
4573 put search %todo
4574 matchwait 5
4575 goto retry
4576retry:
4577 matchre location ^\.\.\.wait
4578 matchre location ^Sorry, you may
4579 matchre location ^Sorry, system is slow
4580 matchre location ^You don't seem to be able to move to do that
4581 matchre location.p ^It's all a blur
4582 matchre location.p ^You're unconscious\!
4583 matchre location.p ^You are still stunned
4584 matchre location.p There is no need for violence here\.
4585 matchre location.p ^You can't do that while entangled in a web
4586 matchre location.p ^You struggle against the shadowy webs to no avail\.
4587 matchre location.p ^You attempt that, but end up getting caught in an invisible box\.
4588 matchre location1 ^You should stop playing before you do that\.
4589 matchre location1 ^You are a bit too busy performing to do that\.
4590 matchre location1 ^You are concentrating too much upon your performance to do that\.
4591 matchwait
4592location.unload:
4593 gosub unload
4594 var location stow1
4595 gosub stow1
4596 goto %location
4597location.unload1:
4598 gosub unload
4599 var location wear1
4600 gosub wear1
4601 goto %location
4602location1:
4603 gosub stop.humming1
4604 goto %location
4605location.p:
4606 pause
4607location:
4608 pause 0.3
4609 goto %location
4610RETURN.p:
4611 pause 0.1
4612unload:
4613 var location unload
4614 matchre RETURN ^You unload the
4615 matchre RETURN ^You remain concealed by your surroundings, convinced that your unloading
4616 matchre RETURN ^Roundtime:
4617 matchre RETURN ^But your
4618 matchre RETURN ^You don't have a
4619 matchre RETURN ^You can't unload such a weapon\.
4620 matchre RETURN ^Your
4621 send unload
4622 goto retry
4623
4624#### PUT SUB
4625PUT:
4626 delay 0.0001
4627 var command $0
4628 var LOCATION PUT_1
4629 PUT_1:
4630 matchre WAIT ^\.\.\.wait|^Sorry\,
4631 matchre IMMOBILE ^You don't seem to be able to move to do that
4632 matchre WEBBED ^You can't do that while entangled in a web
4633 matchre STUNNED ^You are still stunned
4634 matchre PUT_STOW ^You need a free hand
4635 matchre WAIT ^\[Enter your command again if you want to\.\]
4636 matchre RETURN_CLEAR ^Roundtime\:?|^\[Roundtime\:?|^\(Roundtime\:?
4637 matchre RETURN_CLEAR ^I could not find what you were referring to\.
4638 matchre RETURN_CLEAR ^Please rephrase that command\.
4639 matchre RETURN_CLEAR ^What were you referring to\?
4640 matchre RETURN_CLEAR ^.* what\?
4641 matchre RETURN_CLEAR ^You (?:hand|push|move|put|whisper|lean|tap|stop|drop|place|knock|fade|toss|set|add|offer|search|circle|fake|slip|weave|shove|try|must|wave|sit|fail|turn|are already|can't|glance|bend|kneel|carefully|quietly|sense|begin|rub|sprinkle) .*(?:\.|\!|\?)
4642 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\.
4643 matchre RETURN_CLEAR ^USAGE\:
4644 matchre RETURN_CLEAR ^Your (?:actions|dance).*\.
4645 matchre RETURN_CLEAR ^You.*analyze
4646 matchre RETURN_CLEAR ^Having no further use for .*\, you discard it\.
4647 matchre RETURN_CLEAR ^You don't have a .* coin on you\!\s*The .* spider looks at you in forlorn disappointment\.
4648 matchre RETURN_CLEAR ^The .* spider turns away\, looking like it's not hungry for what you're offering\.
4649 matchre RETURN_CLEAR ^Brother Durantine nods slowly\.
4650 matchre RETURN_CLEAR ^Durantine waves a small censer over a neatly-wrapped package and intones a short prayer before he hands it to you\.
4651 matchre RETURN_CLEAR ^After a moment\, .*\.
4652 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\.
4653 matchre RETURN_CLEAR ^Maybe you should stand up\.
4654 matchre RETURN_CLEAR ^The clerk counts out .*\.
4655 matchre RETURN_CLEAR ^The .* is not damaged enough to warrant repair\.
4656 matchre RETURN_CLEAR ^There is no more room in .*\.
4657 matchre RETURN_CLEAR ^There is nothing in there\.
4658 matchre RETURN_CLEAR ^In the .* you see .*\.
4659 matchre RETURN_CLEAR ^This spell cannot be targeted\.
4660 matchre RETURN_CLEAR ^You cannot figure out how to do that\.
4661 matchre RETURN_CLEAR ^You will now store .* in your .*\.
4662 matchre RETURN_CLEAR ^That tool does not seem suitable for that task\.
4663 matchre RETURN_CLEAR ^There isn't any more room in .* for that\.
4664 matchre RETURN_CLEAR ^\[Ingredients can be added by using ASSEMBLE Ingredient1 WITH Ingredient2\]
4665 matchre RETURN_CLEAR ^\s*LINK ALL CANCEL\s*\- Breaks all links
4666 matchre RETURN_CLEAR ^This ritual may only be performed on a corpse\.
4667 matchre RETURN_CLEAR ^There is nothing else to face\!
4668 matchre RETURN_CLEAR ^You're already stalking
4669 matchre RETURN_CLEAR ^An offer
4670 matchre RETURN_CLEAR ^Malik nods
4671 matchre RETURN_CLEAR ^Obvious exits
4672 matchre RETURN_CLEAR ^Obvious paths
4673 matchre RETURN_CLEAR ^But the merchant can't see you|are invisible
4674 matchre STAND ^You should stand up first\.
4675 # matchre RETURN_CLEAR ^
4676 matchre RETURN ^\s*Encumbrance\s*\:
4677 send %command
4678 matchwait 15
4679 put #echo >$Log Crimson $datetime *** MISSING MATCH IN PUT! ***
4680 put #echo >$Log Crimson $datetime Command = %command
4681 put #log $datetime MISSING MATCH IN PUT
4682 RETURN
4683
4684PUT_STOW:
4685 gosub stow
4686 goto PUT_1
4687
4688#### GET SUB
4689GET:
4690 delay 0.0001
4691 var get $0
4692 var LOCATION GET_1
4693 GET_1:
4694 matchre WAIT ^\.\.\.wait|^Sorry\,
4695 matchre WAIT ^You struggle with .* great weight but can't quite lift it\!
4696 matchre IMMOBILE ^You don't seem to be able to move to do that
4697 matchre WEBBED ^You can't do that while entangled in a web
4698 matchre STUNNED ^You are still stunned
4699 matchre HOLD_1 ^But that is already in your inventory\.
4700 # matchre RETURN ^\s*You get .*\.
4701 matchre RETURN ^You pick up .*\.
4702 matchre RETURN ^You carefully remove .* from the bundle\.
4703 matchre RETURN ^You are already holding that\.
4704 matchre RETURN ^Get what\?
4705 matchre RETURN ^I could not find what you were referring to\.
4706 matchre RETURN ^What were you referring to\?
4707 matchre RETURN ^You (?:get|grab) .*(?:\.|\!|\?)
4708 matchre RETURN ^As best it can\, .* moves in your direction\.
4709 send get %get
4710 matchwait 15
4711 put #echo >$Log Crimson $datetime *** MISSING MATCH IN GET! ***
4712 put #echo >$Log Crimson $datetime Get = %get
4713 put #log $datetime MISSING MATCH IN GET
4714 RETURN
4715
4716#### DOUBLE PUT SUB
4717PUT_IT:
4718 delay 0.0001
4719 var putit $0
4720 var LOCATION PUT_IT_1
4721 PUT_IT_1:
4722 matchre WAIT ^\.\.\.wait|^Sorry\,
4723 matchre IMMOBILE ^You don't seem to be able to move to do that
4724 matchre WEBBED ^You can't do that while entangled in a web
4725 matchre STUNNED ^You are still stunned
4726 matchre RETURN ^You (?:hand|push|move|put|tap|drop|place|knock|toss|set|add|search|circle|fake|slip|weave|shove|try|must|wave|sit|fail|turn|are already|can't|glance|bend|kneel|carefully|quietly|sense|begin|rub|sprinkle) .*(?:\.|\!|\?)
4727 matchre RETURN ^Please rephrase that command\.
4728 matchre RETURN ^.* what\?
4729 matchre RETURN ^I could not find what you were referring to\.
4730 matchre RETURN ^What were you referring to\?
4731 send put %putit
4732 matchwait 15
4733 put #echo >$Log Crimson $datetime *** MISSING MATCH IN PUT_IT! ***
4734 put #echo >$Log Crimson $datetime PutIt = %putit
4735 put #log $datetime MISSING MATCH IN PUT_IT
4736 RETURN
4737
4738#### SPELL CASTING
4739PREPARE:
4740 delay 0.0001
4741 var prepare $0
4742 var LOCATION PREPARE_1
4743 PREPARE_1:
4744 matchre WAIT ^\.\.\.wait|^Sorry\,
4745 matchre STUNNED ^You are still stunned
4746 matchre WEBBED ^You can't do that while entangled in a web
4747 matchre IMMOBILE ^You don't seem to be able to move to do that
4748 matchre SPELL_CAST_RETURN ^You are already preparing the .* spell\!
4749 matchre SPELL_CAST_RETURN ^You begin chanting .* to invoke the .* spell\.
4750 matchre SPELL_CAST_RETURN ^You mutter .* to yourself while preparing the .* spell\.
4751 matchre SPELL_CAST_RETURN ^With .* movements you prepare your body for the .* spell\.
4752 matchre SPELL_CAST_RETURN ^You raise your .* skyward\, chanting the .* of the .* spell\.
4753 matchre SPELL_CAST_RETURN ^You trace .* sigil in the air\, shaping the pattern of the .* spell\.
4754 matchre SPELL_CAST_RETURN ^You rock back and forth\, humming tunelessly as you invoke the .* spell\.
4755 matchre SPELL_CAST_RETURN ^The wailing of lost souls accompanies your preparations of the .* spell\.
4756 matchre SPELL_CAST_RETURN ^Your eyes darken to black as a starless night as you prepare the .* spell\.
4757 matchre SPELL_CAST_RETURN ^You close your eyes and breathe deeply, gathering energy for the .* spell\.
4758 matchre SPELL_CAST_RETURN ^Your eyes darken to black as a starless night as you prepare the .* spell\.
4759 matchre SPELL_CAST_RETURN ^The wailing of lost souls accompanies your preparations of the .* spell\.
4760 matchre SPELL_CAST_RETURN ^A soft breeze surrounds your body as you confidently prepare the .* spell\.
4761 matchre SPELL_CAST_RETURN ^Tiny tendrils of lightning jolt between your hands as you prepare the .* spell\.
4762 matchre SPELL_CAST_RETURN ^Heatless orange flames blaze between your fingertips as you prepare the .* spell\.
4763 matchre SPELL_CAST_RETURN ^Entering a trance-like state\, your hands begin to tremble as you prepare the .* spell\.
4764 matchre SPELL_CAST_RETURN ^You adeptly sing the incantations for the .* spell\, setting the words to a favorite tune\.
4765 matchre SPELL_CAST_RETURN ^You bring your hand slowly to your forehead as you begin chanting the words of the .* spell\.
4766 matchre SPELL_CAST_RETURN ^Icy blue frost crackles up your arms with the ferocity of a blizzard as you begin to prepare the .* spell\!
4767 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\.
4768 matchre SPELL_CAST_RETURN ^You giggle to yourself as you move through the syncopated gestures that accompany the preparations of the .* spell\.
4769 matchre SPELL_CAST_RETURN ^Darkly gleaming motes of sanguine light swirl briefly about your fingertips as you gesture while uttering the .* spell\.
4770 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\.
4771 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\.
4772 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\.
4773 matchre SPELL_CAST_RETURN ^You begin reciting a solemn incantation\, causing familiar patterns of geometric shapes to circle your hand as the .* spell forms\.
4774 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\.
4775 matchre SPELL_CAST_RETURN ^You recall the exact details of the .* symbiosis\, preparing to integrate it with the next spell you cast\.
4776 matchre SPELL_CAST_RETURN ^But you've already prepared the .* symbiosis\!
4777 matchre SPELL_CAST_DONE ^What do you want to prepare\?
4778 matchre SPELL_CAST_DONE ^That is not a spell you can cast\.
4779 matchre SPELL_CAST_DONE ^You wouldn't have the first clue how to do that\.
4780 matchre SPELL_CAST_DONE ^You stop\, convinced that there's no way to control that much mana\.
4781 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\.
4782 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\.
4783 send prepare %prepare
4784 matchwait 15
4785 put #echo >$Log Crimson $datetime *** MISSING MATCH IN PREPARE! (utility.inc) ***
4786 put #echo >$Log Crimson $datetime Prepare = %prepare
4787 put #log $datetime MISSING MATCH IN PREPARE! (utility.inc)
4788 goto SPELL_CAST_RETURN
4789SPELL_WAIT:
4790 delay 0.0001
4791 if ("$preparedspell" = "None") then return
4792 matchre SPELL_CAST ^You feel fully prepared to cast your spell\.
4793 matchre SPELL_CAST_FAIL ^Your concentration slips for a moment\, and your spell is lost\.
4794 matchwait
4795SPELL_CAST:
4796 delay 0.0001
4797 var LOCATION SPELL_CAST_1
4798 if ((!("$roomplayers" = "")) && (matchre("$preparedspell", "(Rite of Contrition|Eyes of the Blind)")) then gosub MOVE.RANDOM
4799 SPELL_CAST_1:
4800 matchre WAIT ^\.\.\.wait|^Sorry\,
4801 matchre STUNNED ^You are still stunned
4802 matchre WEBBED ^You can't do that while entangled in a web
4803 matchre IMMOBILE ^You don't seem to be able to move to do that
4804 matchre SPELL_CAST_DONE ^Roundtime\:?|^\[Roundtime\:?|^\(Roundtime\:?
4805 matchre SPELL_CAST_DONE ^You wave your hand\.
4806 matchre SPELL_CAST_DONE ^You gesture\.
4807 matchre SPELL_CAST_DONE ^Your heart skips a beat
4808 matchre SPELL_CAST_DONE ^Focus the power of justice on whom\?
4809 matchre SPELL_CAST_DONE ^A brilliant silver glow surrounds .* for a few moments\, then fades\, leaving it somehow changed\.
4810 matchre SPELL_CAST_FAIL ^You don't have a spell prepared\!
4811 matchre SPELL_CAST_FAIL ^Your concentration slips for a moment\, and your spell is lost\.
4812 put -cast;-2 gesture
4813 matchwait
4814SPELL_WAIT_TARGET:
4815 delay 0.0001
4816 if ("$preparedspell" = "None") then return
4817 matchre RETURN ^You feel fully prepared to cast your spell\.
4818 matchre RETURN ^Your concentration slips for a moment\, and your spell is lost\.
4819 matchre RETURN ^Your target pattern dissipates because the creature is dead\, but the main spell remains intact
4820 matchwait
4821SPELL_CAST_TARGET:
4822 delay 0.0001
4823 if ("$preparedspell" = "None") then return
4824 var target $0
4825 var LOCATION SPELL_CAST_TARGET_1
4826 SPELL_CAST_TARGET_1:
4827 matchre WAIT ^\.\.\.wait|^Sorry\,
4828 matchre STUNNED ^You are still stunned
4829 matchre WEBBED ^You can't do that while entangled in a web
4830 matchre IMMOBILE ^You don't seem to be able to move to do that
4831 matchre SPELL_CAST_DONE ^Roundtime\:?|^\[Roundtime\:?|^\(Roundtime\:?
4832 matchre SPELL_CAST_DONE ^You gesture\.
4833 matchre SPELL_CAST_DONE ^Your heart skips
4834 matchre SPELL_CAST_DONE ^Focus the power of justice on whom\?
4835 matchre SPELL_CAST_DONE ^A brilliant silver glow surrounds .* for a few moments\, then fades\, leaving it somehow changed\.
4836 matchre SPELL_CAST_FAIL ^You don't have a spell prepared\!
4837 matchre SPELL_CAST_FAIL ^Your concentration slips for a moment\, and your spell is lost\.
4838 put -cast %target;-2 gesture
4839 matchwait
4840SPELL_CAST_DONE:
4841 delay 0.0001
4842 put #queue clear
4843 return
4844SPELL_CAST_FAIL:
4845 delay 0.0001
4846 gosub RELEASE
4847SPELL_CAST_RETURN:
4848 delay 0.0001
4849 return
4850RELEASE_MANA:
4851 delay 0.0001
4852 if ("$preparedspell" != "None") then gosub RELEASE spell
4853 gosub RELEASE mana
4854 put #echo Crimson *****************************************************
4855 put #echo Crimson ***** ATTUNEMENT IS LOW. WAITING TO REGAIN IT. *****
4856 put #echo Crimson *****************************************************
4857 if ($mana < 80) then waiteval ($mana > 79)
4858CHECK_MANA:
4859 delay 0.0001
4860 if ($mana < 25) then goto RELEASE_MANA
4861 return
4862RELEASE:
4863 delay 0.0001
4864 var release $0
4865 var LOCATION RELEASE_1
4866 RELEASE_1:
4867 matchre WAIT ^\.\.\.wait|^Sorry\,
4868 matchre STUNNED ^You are still stunned
4869 matchre WEBBED ^You can't do that while entangled in a web
4870 matchre IMMOBILE ^You don't seem to be able to move to do that
4871 matchre RETURN ^\s*Encumbrance\s*\:
4872 put -release %release;-encumbrance
4873 matchwait
4874HARNESS:
4875 delay 0.0001
4876 var harness $0
4877 var LOCATION HARNESS_1
4878 HARNESS_1:
4879 matchre WAIT ^\.\.\.wait|^Sorry\,
4880 matchre STUNNED ^You are still stunned
4881 matchre WEBBED ^You can't do that while entangled in a web
4882 matchre IMMOBILE ^You don't seem to be able to move to do that
4883 matchre RELEASE ^You strain\, but cannot harness that much power\.
4884 matchre RETURN ^You tap into the mana from .* of the surrounding streams and
4885 send harness %harness
4886 matchwait
4887
4888#### HEALTH CHECKING
4889HEALTH_CHECK:
4890 if ("%HEALTH_CHECK" = "ON") then RETURN
4891 delay 0.0001
4892 put #tvar needHealing 0
4893 delay 0.5
4894 matchre HEALTH.GOOD ^You have no significant injuries\.
4895 matchre HEALTH.BAD ^hand
4896 matchre HEALTH.BAD ^\s*Encumbrance\s+\:
4897 put -health;-2 encumbrance
4898 matchwait 15
4899 goto HEALTH_CHECK
4900HEALTH.BAD:
4901 delay 0.0001
4902 put #tvar needHealing 1
4903 delay 0.5
4904 goto TOO.HURT
4905HEALTH.GOOD:
4906 delay 0.0001
4907 put #queue clear
4908 put #tvar needHealing 0
4909 delay 0.5
4910 RETURN
4911
4912#### CATCH AND RETRY SUBS
4913WAIT:
4914 delay 0.0001
4915 pause 0.1
4916 if (!$standing) then gosub STAND
4917 goto %LOCATION
4918WEBBED:
4919 delay 0.0001
4920 if ($webbed) then waiteval (!$webbed)
4921 if (!$standing) then gosub STAND
4922 goto %LOCATION
4923IMMOBILE:
4924 delay 0.0001
4925 if contains("$prompt" , "I") then pause 20
4926 if (!$standing) then gosub STAND
4927 goto %LOCATION
4928STUNNED:
4929 delay 0.0001
4930 if ($stunned) then waiteval (!$stunned)
4931 if (!$standing) then gosub STAND
4932 goto %LOCATION
4933#### RETURNS
4934RETURN_CLEAR:
4935 delay 0.0001
4936 put #queue clear
4937 pause 0.0001
4938 return
4939RETURN:
4940 delay 0.0001
4941 return
4942#########################################################
4943
4944#########################################################################################
4945# PROGRESSIVE ITEM VARIABLE SECTION
4946#
4947# Please report any bugs, or items updates to skultamaphon at gmail.com
4948# If an item is too hard or stops teaching too early please let me know!
4949###########################################################################################
4950###########################
4951# SKILLS 20-39
4952###########################
4953CLASS1:
4954 ## THEREN
4955 var skillrange 20-39
4956 var T.Tarsha canons
4957 var T.Rose <nothing>
4958 var T.Music <nothing>
4959 var T.Music.Num
4960 var T.Hats <nothing>
4961 var T.Arm <nothing>
4962 var T.Gift <nothing>
4963 var T.Sweet cake
4964 var T.Cupcake cupcake
4965 var T.Gen charcoal
4966 var T.Krrish <nothing>
4967 var T.Lense <nothing>
4968 var T.Cleric block
4969 var T.Men <nothing>
4970 var T.Women <nothing>
4971 var T.Cloth <nothing>
4972 var T.Armory <nothing>
4973 var T.Forge copper slug
4974 ## HAVEN
4975 var skillrange 20-39
4976 var RH.Herb water
4977 var RH.Iron <nothing>
4978 var RH.Naph <nothing>
4979 var RH.Naph.Loc on cart
4980 var RH.Flow black orchid
4981 var RH.Seli <nothing>
4982 var RH.Arms <nothing>
4983 var RH.Gen purse
4984 var RH.Cloth <nothing>
4985 var RH.Artif <nothing>
4986 var RH.Joy chocolate
4987 var RH.Smoke <nothing>
4988 var RH.Weap <nothing>
4989 var RH.Bard pick
4990 var RH.Bard2 <nothing>
4991 var RH.Cleric grey-brown feather
4992 var RH.Cleric2 <nothing>
4993 var RH.Lock ordinary lockpick
4994 var RH.Tog <nothing>
4995 var RH.Tog2 <nothing>
4996 var RH.Mirg <nothing>
4997 ## ARTHE DALE
4998 var skillrange 20-39
4999 var AD.Feta biscuit
5000 var AD.FETA.Loc
5001 var AD.Thread <nothing>
5002 var AD.Fash <nothing>
5003 var AD.Odds <nothing>
5004 var AD.Bard <nothing>
5005 var AD.Map <nothing>
5006 var AD.Arm <nothing>
5007 var AD.Smoke <nothing>
5008 var AD.Tart.E <nothing>
5009 var AD.Tart.C <nothing>
5010 var AD.Tart.M <nothing>
5011 var AD.Tart.L <nothing>
5012 var AD.Tart.F <nothing>
5013 var KA.Grek cheese
5014 ## CROSSINGS
5015 var skillrange 20-39
5016 var C.Alch water
5017 var C.Artif <nothing>
5018 var C.Bath reed
5019 var C.Bath.Num
5020 var C.Bath.Loc
5021 var C.Card <nothing>
5022 var C.Gen bark
5023 var C.Weap <nothing>
5024 var C.Arm rugged gloves
5025 var C.Music pick
5026 var C.Music2 <nothing>
5027 var C.Lock <nothing>
5028 var C.Empath <nothing>
5029 var C.Empath.Alt <nothing>
5030 var C.Empath2 <nothing>
5031 var C.Empath3 <nothing>
5032 var C.Empath3.Loc
5033 var C.Empath3.Alt <nothing>
5034 var C.Cler chamomile
5035 var C.Haber <nothing>
5036 var C.Script <nothing>
5037 var C.Tann <nothing>
5038 var C.Tann.Loc
5039 var C.Jewel <nothing>
5040 var C.Stitch <nothing>
5041 var C.Cobb <nothing>
5042 var C.Herb <nothing>
5043 var C.Flow rose
5044 ## LETH
5045 var skillrange 20-39
5046 var L.Skin <nothing>
5047 var L.Bow flights
5048 var L.Orig <nothing>
5049 var L.Orig.Num
5050 var L.Weap <nothing>
5051 var L.Wick <nothing>
5052 var L.Bard <nothing>
5053 var L.Bard2 <nothing>
5054 var L.Cloth <nothing>
5055 var L.Wood <nothing>
5056 var L.Gen <nothing>
5057 var L.Gen.Alt <nothing>
5058 var L.Perf <nothing>
5059 ## SHARD
5060 var skillrange 20-39
5061 var S.Gen charcoal
5062 var S.Weap <nothing>
5063 var S.Cleric chamomile
5064 var S.Stitch gloves
5065 var S.Alch water
5066 var S.Herb <nothing>
5067 var S.Artif <nothing>
5068 var S.Music pick
5069 var S.Armor leather gloves
5070 var S.Reed <nothing>
5071 var S.Reed.Num
5072 var S.Bow flights
5073 var S.Lock <nothing>
5074 var S.Coin <nothing>
5075 var S.Coin.Loc
5076 var S.Frill <nothing>
5077 var S.Herald <nothing>
5078 var S.Herald.Loc on rack
5079 var S.Gift <nothing>
5080 var S.Gift.Loc
5081 var S.Toy <nothing>
5082 var S.Toy.Loc
5083 var S.Memory <nothing>
5084 var S.Memory.Num first
5085 var S.Token <nothing>
5086 var S.Museum <nothing>
5087 var S.Barber razor
5088 var S.Tanner <nothing>
5089 var S.Surv <nothing>
5090 var S.Surv.Loc
5091 var S.Surv.Alt <nothing>
5092 var S.Surv2 chicken flights
5093 var S.Surv2.Loc
5094 var S.Surv2.Alt hawk flights
5095 var S.Spire <nothing>
5096 # HIB AND RAVEN'S POINT
5097 var skillrange 20-39
5098 var SC.Weap <nothing>
5099 var H.Shield <nothing>
5100 var H.Jewel <nothing>
5101 var H.Tog <nothing>
5102 var H.Herb <nothing>
5103 var H.Sund incense
5104 var H.Lamp charcoal
5105 var H.Music <nothing>
5106 var H.Alch <nothing>
5107 var H.Forge zinc bar
5108 var H.Forge.Loc on tab
5109 var RP.Gen flights
5110 var RP.Tobac <nothing>
5111 # RATHA
5112 var skillrange 20-39
5113 var R.Bait worms
5114 var R.Gen rope
5115 var R.Herb water
5116 var R.Forge <nothing>
5117 var R.Tailor stockings
5118 var R.Leather <nothing>
5119 var R.Hair unguent
5120 var R.Music <nothing>
5121 var R.Magic <nothing>
5122 var R.Origami <nothing>
5123 var R.Origami.LOC
5124 var R.Jewelry <nothing>
5125 var R.Cleric chamomile
5126 var R.Cleric2 <nothing>
5127 var R.Ring <nothing>
5128 # AESRY SURLAENIS'A
5129 var skillrange 20-39
5130 var A.Herb water
5131 var A.Tanner <nothing>
5132 var A.Clothing <nothing>
5133 var A.Script <nothing>
5134 var A.Cleric pao
5135 var A.Origami <nothing>
5136 var A.Jewelry <nothing>
5137 var A.Magic <nothing>
5138 var A.Slings flights
5139 var A.Puzzle <nothing>
5140 var A.Footwear <nothing>
5141 var A.Shields <nothing>
5142 var A.Weapon <nothing>
5143 var A.Armor <nothing>
5144 var A.Gen charcoal
5145 var A.Flower <nothing>
5146 var A.Music pick
5147 pause 0.1
5148 gosub ITEM.COUNT0
5149 RETURN
5150##################################
5151# SKILLS 40-59
5152##################################
5153CLASS2:
5154 ## THEREN
5155 var skillrange 40-59
5156 var T.Tarsha canons
5157 var T.Rose socks
5158 var T.Music cloth
5159 var T.Music.Num
5160 var T.Hats nightcap
5161 var T.Arm <nothing>
5162 var T.Gift <nothing>
5163 var T.Sweet cake
5164 var T.Cupcake cupcake
5165 var T.Gen charcoal
5166 var T.Krrish <nothing>
5167 var T.Lense <nothing>
5168 var T.Cleric incense
5169 var T.Men <nothing>
5170 var T.Women <nothing>
5171 var T.Cloth <nothing>
5172 var T.Armory <nothing>
5173 var T.Forge copper slug
5174 ## HAVEN
5175 var skillrange 40-59
5176 var RH.Herb mixing stick
5177 var RH.Iron <nothing>
5178 var RH.Naph <nothing>
5179 var RH.Naph.Loc on cart
5180 var RH.Flow black orchid
5181 var RH.Seli <nothing>
5182 var RH.Arms dart
5183 var RH.Gen flint
5184 var RH.Cloth gown
5185 var RH.Artif <nothing>
5186 var RH.Joy truffle
5187 var RH.Smoke pouch
5188 var RH.Weap <nothing>
5189 var RH.Bard pick
5190 var RH.Bard2 hairpin
5191 var RH.Cleric incense
5192 var RH.Cleric2 <nothing>
5193 var RH.Lock ordinary lockpick
5194 var RH.Tog <nothing>
5195 var RH.Tog2 <nothing>
5196 var RH.Mirg <nothing>
5197 # ARTHE DALE
5198 var skillrange 40-59
5199 var AD.Feta milk
5200 var AD.FETA.Loc on counter
5201 var AD.Thread pouch
5202 var AD.Fash <nothing>
5203 var AD.Odds <nothing>
5204 var AD.Bard <nothing>
5205 var AD.Map <nothing>
5206 var AD.Arm smooth rocks
5207 var AD.Smoke <nothing>
5208 var AD.Tart.E <nothing>
5209 var AD.Tart.C <nothing>
5210 var AD.Tart.M <nothing>
5211 var AD.Tart.L <nothing>
5212 var AD.Tart.F <nothing>
5213 var KA.Grek socks
5214 # CROSSINGS
5215 var skillrange 40-59
5216 var C.Alch alcohol
5217 var C.Artif <nothing>
5218 var C.Bath reed
5219 var C.Bath.Num
5220 var C.Bath.Loc
5221 var C.Card <nothing>
5222 var C.Gen small box
5223 var C.Weap arrows
5224 var C.Arm rugged gloves
5225 var C.Music pick
5226 var C.Music2 <nothing>
5227 var C.Lock slim lockpick
5228 var C.Empath <nothing>
5229 var C.Empath.Alt <nothing>
5230 var C.Empath2 <nothing>
5231 var C.Empath3 <nothing>
5232 var C.Empath3.Loc on hook
5233 var C.Empath3.Alt
5234 var C.Cler lavender
5235 var C.Haber hood
5236 var C.Script <nothing>
5237 var C.Tann <nothing>
5238 var C.Tann.Loc
5239 var C.Jewel <nothing>
5240 var C.Stitch hair bow
5241 var C.Cobb <nothing>
5242 var C.Herb <nothing>
5243 var C.Flow rose
5244 # LETH DERIEL
5245 var skillrange 40-59
5246 var L.Skin <nothing>
5247 var L.Bow arrowhead
5248 var L.Orig <nothing>
5249 var L.Orig.Num
5250 var L.Weap <nothing>
5251 var L.Wick <nothing>
5252 var L.Bard <nothing>
5253 var L.Bard2 cloth
5254 var L.Cloth <nothing>
5255 var L.Wood <nothing>
5256 var L.Gen <nothing>
5257 var L.Gen.Alt <nothing>
5258 var L.Perf <nothing>
5259 # SHARD
5260 var skillrange 40-59
5261 var S.Gen hairbrush
5262 var S.Weap <nothing>
5263 var S.Cleric sirese flower
5264 var S.Stitch gloves
5265 var S.Alch mixing stick
5266 var S.Herb <nothing>
5267 var S.Artif <nothing>
5268 var S.Music rag
5269 var S.Armor leather gloves
5270 var S.Reed <nothing>
5271 var S.Reed.Num
5272 var S.Bow glue
5273 var S.Lock iron keyblank
5274 var S.Coin <nothing>
5275 var S.Coin.Loc
5276 var S.Frill gloves
5277 var S.Herald <nothing>
5278 var S.Herald.Loc on rack
5279 var S.Gift <nothing>
5280 var S.Gift.Loc
5281 var S.Toy whistle
5282 var S.Toy.Loc
5283 var S.Memory <nothing>
5284 var S.Memory.Num first
5285 var S.Token <nothing>
5286 var S.Museum <nothing>
5287 var S.Barber oil
5288 var S.Tanner <nothing>
5289 var S.Surv oil
5290 var S.Surv.Loc
5291 var S.Surv.Alt <nothing>
5292 var S.Surv2 glue
5293 var S.Surv2.Loc
5294 var S.Surv2.Alt hawk flights
5295 var S.Spire <nothing>
5296 # HIB AND RAVEN'S POINT
5297 var skillrange 40-59
5298 var SC.Weap <nothing>
5299 var H.Shield <nothing>
5300 var H.Jewel <nothing>
5301 var H.Tog toothpicks
5302 var H.Herb <nothing>
5303 var H.Sund incense
5304 var H.Lamp torch
5305 var H.Music cloth
5306 var H.Alch mixing stick
5307 var H.Forge copper slug
5308 var H.Forge.Loc on tab
5309 var RP.Gen flights
5310 var RP.Tobac pine pipe
5311 # RATHA
5312 var skillrange 40-59
5313 var R.Bait cheese
5314 var R.Gen biscuit
5315 var R.Herb alcohol
5316 var R.Forge <nothing>
5317 var R.Tailor stockings
5318 var R.Leather <nothing>
5319 var R.Hair unguent
5320 var R.Music rag
5321 var R.Magic <nothing>
5322 var R.Origami <nothing>
5323 var R.Origami.LOC
5324 var R.Jewelry <nothing>
5325 var R.Cleric plume feather
5326 var R.Cleric2 <nothing>
5327 var R.Ring <nothing>
5328 # AESRY SURLAENIS'A
5329 var skillrange 40-59
5330 var A.Herb stick
5331 var A.Tanner thread
5332 var A.Clothing <nothing>
5333 var A.Script <nothing>
5334 var A.Cleric sage
5335 var A.Origami paper
5336 var A.Jewelry <nothing>
5337 var A.Magic <nothing>
5338 var A.Slings fishtail arrowhead
5339 var A.Puzzle beanbags
5340 var A.Footwear socks
5341 var A.Shields <nothing>
5342 var A.Weapon <nothing>
5343 var A.Armor <nothing>
5344 var A.Gen flint
5345 var A.Flower <nothing>
5346 var A.Music pick
5347 pause 0.1
5348 gosub ITEM.COUNT1
5349 RETURN
5350##################################
5351# SKILLS 60-99
5352##################################
5353CLASS3:
5354 ## THEREN
5355 var skillrange 60-99
5356 var T.Tarsha canons
5357 var T.Rose socks
5358 var T.Music cloth
5359 var T.Music.Num
5360 var T.Hats nightcap
5361 var T.Arm <nothing>
5362 var T.Gift <nothing>
5363 var T.Sweet cake
5364 var T.Cupcake cupcake
5365 var T.Gen carving knife
5366 var T.Krrish <nothing>
5367 var T.Lense <nothing>
5368 var T.Cleric incense
5369 var T.Men <nothing>
5370 var T.Women <nothing>
5371 var T.Cloth <nothing>
5372 var T.Armory <nothing>
5373 var T.Forge copper slug
5374 ## HAVEN
5375 var skillrange 60-99
5376 var RH.Herb oil
5377 var RH.Iron <nothing>
5378 var RH.Naph <nothing>
5379 var RH.Naph.Loc on cart
5380 var RH.Flow black orchid
5381 var RH.Seli claw gloves
5382 var RH.Arms bolts
5383 var RH.Gen bark
5384 var RH.Cloth sash
5385 var RH.Artif <nothing>
5386 var RH.Joy water
5387 var RH.Smoke sungrown cigar
5388 var RH.Weap club
5389 var RH.Bard pick
5390 var RH.Bard2 hairpin
5391 var RH.Cleric candle
5392 var RH.Cleric2 <nothing>
5393 var RH.Lock stout lockpick
5394 var RH.Tog <nothing>
5395 var RH.Tog2 <nothing>
5396 var RH.Mirg <nothing>
5397 # ARTHE DALE
5398 var skillrange 60-99
5399 var AD.Feta yogurt
5400 var AD.FETA.Loc
5401 var AD.Thread pouch
5402 var AD.Fash snood
5403 var AD.Odds <nothing>
5404 var AD.Bard <nothing>
5405 var AD.Map <nothing>
5406 var AD.Arm hood
5407 var AD.Smoke sungrown cigar
5408 var AD.Tart.E <nothing>
5409 var AD.Tart.C <nothing>
5410 var AD.Tart.M tart
5411 var AD.Tart.L <nothing>
5412 var AD.Tart.F <nothing>
5413 var KA.Grek boots
5414 # CROSSINGS
5415 var skillrange 60-99
5416 var C.Alch pestle
5417 var C.Artif <nothing>
5418 var C.Bath soap
5419 var C.Bath.Num
5420 var C.Bath.Loc in basin
5421 var C.Card <nothing>
5422 var C.Gen flint
5423 var C.Weap arrows
5424 var C.Arm rugged aventail
5425 var C.Music rag
5426 var C.Music2 drum stick
5427 var C.Lock stout lockpick
5428 var C.Empath <nothing>
5429 var C.Empath.Alt <nothing>
5430 var C.Empath2 <nothing>
5431 var C.Empath3 <nothing>
5432 var C.Empath3.Loc on hook
5433 var C.Empath3.Alt <nothing>
5434 var C.Cler incense
5435 var C.Haber skullcap
5436 var C.Script <nothing>
5437 var C.Tann thread
5438 var C.Tann.Loc
5439 var C.Jewel hairpin
5440 var C.Stitch cloche
5441 var C.Cobb moccasins
5442 var C.Herb <nothing>
5443 var C.Flow <nothing>
5444 # LETH DERIEL
5445 var skillrange 60-99
5446 var L.Skin <nothing>
5447 var L.Bow arrowhead
5448 var L.Orig white paper
5449 var L.Orig.Num
5450 var L.Weap <nothing>
5451 var L.Wick <nothing>
5452 var L.Bard recorder
5453 var L.Bard2 cloth
5454 var L.Cloth <nothing>
5455 var L.Wood <nothing>
5456 var L.Gen <nothing>
5457 var L.Gen.Alt <nothing>
5458 var L.Perf <nothing>
5459 # SHARD
5460 var skillrange 60-99
5461 var S.Gen unguent
5462 var S.Weap <nothing>
5463 var S.Cleric incense
5464 var S.Stitch hood
5465 var S.Alch pestle
5466 var S.Herb <nothing>
5467 var S.Artif <nothing>
5468 var S.Music cloth
5469 var S.Armor collar
5470 var S.Reed <nothing>
5471 var S.Reed.Num
5472 var S.Bow shears
5473 var S.Lock iron keyblank
5474 var S.Coin <nothing>
5475 var S.Coin.Loc
5476 var S.Frill straw hat
5477 var S.Herald <nothing>
5478 var S.Herald.Loc on rack
5479 var S.Gift <nothing>
5480 var S.Gift.Loc
5481 var S.Toy whistle
5482 var S.Toy.Loc
5483 var S.Memory <nothing>
5484 var S.Memory.Num first
5485 var S.Token <nothing>
5486 var S.Museum <nothing>
5487 var S.Barber oil
5488 var S.Tanner thread
5489 var S.Surv wood pestle
5490 var S.Surv.Alt stone pestle
5491 var S.Surv.Loc
5492 var S.Surv2 falcon flights
5493 var S.Surv2.Alt wood shaper
5494 var S.Surv2.Loc
5495 var S.Spire <nothing>
5496 # HIB AND RAVEN'S POINT
5497 var skillrange 60-99
5498 var SC.Weap <nothing>
5499 var H.Shield <nothing>
5500 var H.Jewel <nothing>
5501 var H.Tog white soap
5502 var H.Herb <nothing>
5503 var H.Sund bone comb
5504 var H.Lamp lamp oil
5505 var H.Music cloth
5506 var H.Alch stone pestle
5507 var H.Forge copper slug
5508 var H.Forge.Loc on tab
5509 var RP.Gen flights
5510 var RP.Tobac pipe
5511 # RATHA
5512 var skillrange 60-99
5513 var R.Bait pole
5514 var R.Gen lobscouse stew
5515 var R.Herb pestle
5516 var R.Forge <nothing>
5517 var R.Tailor shirt
5518 var R.Leather <nothing>
5519 var R.Hair hairbrush
5520 var R.Music pick
5521 var R.Magic <nothing>
5522 var R.Origami <nothing>
5523 var R.Origami.LOC
5524 var R.Jewelry chain
5525 var R.Cleric wine
5526 var R.Cleric2 <nothing>
5527 var R.Ring <nothing>
5528 # AESRY SURLAENIS'A
5529 var skillrange 60-99
5530 var A.Herb pestle
5531 var A.Tanner thread
5532 var A.Clothing britches
5533 var A.Script <nothing>
5534 var A.Cleric incense
5535 var A.Origami <nothing>
5536 var A.Jewelry bracelet
5537 var A.Magic <nothing>
5538 var A.Slings shaper
5539 var A.Puzzle beanbags
5540 var A.Footwear socks
5541 var A.Shields <nothing>
5542 var A.Weapon <nothing>
5543 var A.Armor <nothing>
5544 var A.Gen trowel
5545 var A.Flower wristlet
5546 var A.Music bow
5547 pause 0.1
5548 gosub ITEM.COUNT1
5549 RETURN
5550##################################
5551# SKILLS 100-149
5552##################################
5553CLASS4:
5554 ## THEREN
5555 var skillrange 100-149
5556 var T.Tarsha gorget
5557 var T.Rose kilt
5558 var T.Music cloth
5559 var T.Music.Num
5560 var T.Hats nightcap
5561 var T.Arm <nothing>
5562 var T.Gift <nothing>
5563 var T.Sweet cake
5564 var T.Cupcake cupcake
5565 var T.Gen satchel
5566 var T.Krrish <nothing>
5567 var T.Lense <nothing>
5568 var T.Cleric mortar
5569 var T.Men <nothing>
5570 var T.Women <nothing>
5571 var T.Cloth <nothing>
5572 var T.Armory dagger
5573 var T.Forge copper slug
5574 ## HAVEN
5575 var skillrange 100-149
5576 var RH.Herb yelith root
5577 var RH.Iron bronze gauntlets
5578 var RH.Naph naphtha
5579 var RH.Naph.Loc on cart
5580 var RH.Flow <nothing>
5581 var RH.Seli studded helm
5582 var RH.Arms kris
5583 var RH.Gen knapsack
5584 var RH.Cloth robes
5585 var RH.Artif simple talisman
5586 var RH.Joy perfume
5587 var RH.Smoke apple pipe
5588 var RH.Weap club
5589 var RH.Bard tipper
5590 var RH.Bard2 beaded earrings
5591 var RH.Cleric pomander
5592 var RH.Cleric2 bottle
5593 var RH.Lock stout lockpick
5594 var RH.Tog beaded slippers
5595 var RH.Tog2 <nothing>
5596 var RH.Mirg <nothing>
5597 # ARTHE DALE
5598 var skillrange 100-149
5599 var AD.Feta wayfarer cheese
5600 var AD.FETA.Loc
5601 var AD.Thread pouch
5602 var AD.Fash neckerchief
5603 var AD.Odds fan
5604 var AD.Bard rag
5605 var AD.Map <nothing>
5606 var AD.Arm bodkin
5607 var AD.Smoke telgi cigar
5608 var AD.Tart.E tart
5609 var AD.Tart.C tart
5610 var AD.Tart.M tart
5611 var AD.Tart.L tart
5612 var AD.Tart.F tart
5613 var KA.Grek boots
5614 # CROSSINGS
5615 var skillrange 100-149
5616 var C.Alch pestle
5617 var C.Artif <nothing>
5618 var C.Bath towel
5619 var C.Bath.Num
5620 var C.Bath.Loc on stand
5621 var C.Card <nothing>
5622 var C.Gen knapsack
5623 var C.Weap dagger
5624 var C.Arm rugged gloves
5625 var C.Music cloth
5626 var C.Music2 maple guiro
5627 var C.Lock slim lockpick
5628 var C.Empath <nothing>
5629 var C.Empath.Alt <nothing>
5630 var C.Empath2 scalpel
5631 var C.Empath3 button
5632 var C.Empath3.Loc on case
5633 var C.Empath3.Alt <nothing>
5634 var C.Cler wine
5635 var C.Haber tam
5636 var C.Script <nothing>
5637 var C.Tann thread
5638 var C.Tann.Loc
5639 var C.Jewel pin
5640 var C.Stitch sash
5641 var C.Cobb sandals
5642 var C.Herb jadice flower
5643 var C.Flow <nothing>
5644 # LETH DERIEL
5645 var skillrange 100-149
5646 var L.Skin buckskin pelt
5647 var L.Bow bolts
5648 var L.Orig silver paper
5649 var L.Orig.Num
5650 var L.Weap <nothing>
5651 var L.Wick wicker quiver
5652 var L.Bard ocarina
5653 var L.Bard2 cloth
5654 var L.Cloth moufles
5655 var L.Wood <nothing>
5656 var L.Gen dice
5657 var L.Gen.Alt <nothing>
5658 var L.Perf <nothing>
5659 # SHARD
5660 var skillrange 100-149
5661 var S.Gen short sword
5662 var S.Weap targe
5663 var S.Cleric candle
5664 var S.Stitch cloak
5665 var S.Alch large bowl
5666 var S.Herb riolur leaf
5667 var S.Artif <nothing>
5668 var S.Music tipper
5669 var S.Armor reinforced greaves
5670 var S.Reed <nothing>
5671 var S.Reed.Num
5672 var S.Bow arrows
5673 var S.Lock bronze lockpick
5674 var S.Coin <nothing>
5675 var S.Coin.Loc
5676 var S.Frill willow fan
5677 var S.Herald <nothing>
5678 var S.Herald.Loc on rack
5679 var S.Gift doll
5680 var S.Gift.Loc on shelf
5681 var S.Toy whistle
5682 var S.Toy.Loc
5683 var S.Memory <nothing>
5684 var S.Memory.Num first
5685 var S.Token <nothing>
5686 var S.Museum <nothing>
5687 var S.Barber clippers
5688 var S.Tanner hide scraper
5689 var S.Surv wood pestle
5690 var S.Surv.Alt stone pestle
5691 var S.Surv.Loc
5692 var S.Surv2 wood shaper
5693 var S.Surv2.Alt steel shaper
5694 var S.Surv2.Loc
5695 var S.Spire <nothing>
5696 # HIB AND RAVEN'S POINT
5697 var skillrange 100-149
5698 var SC.Weap <nothing>
5699 var H.Shield <nothing>
5700 var H.Jewel <nothing>
5701 var H.Tog white soap
5702 var H.Herb <nothing>
5703 var H.Sund bone comb
5704 var H.Lamp lamp oil
5705 var H.Music cloth
5706 var H.Alch stone pestle
5707 var H.Forge copper slug
5708 var H.Forge.Loc on tab
5709 var RP.Gen flights
5710 var RP.Tobac pipe
5711CLASS4.ISLAND:
5712 # RATHA
5713 var skillrange 100-149
5714 var R.Bait pole
5715 var R.Gen polish
5716 var R.Herb large jar
5717 var R.Forge dagger
5718 var R.Tailor sash
5719 var R.Leather <nothing>
5720 var R.Hair clippers
5721 var R.Music tambourine
5722 var R.Magic talisman
5723 var R.Origami white paper
5724 var R.Origami.LOC
5725 var R.Jewelry bangle
5726 var R.Cleric candle
5727 var R.Cleric2 <nothing>
5728 var R.Ring <nothing>
5729 # AESRY SURLAENIS'A
5730 var skillrange 100-149
5731 var A.Herb pestle
5732 var A.Tanner shears
5733 var A.Clothing britches
5734 var A.Script trimmed scroll
5735 var A.Cleric candle
5736 var A.Origami <nothing>
5737 var A.Jewelry bracelet
5738 var A.Magic <nothing>
5739 var A.Slings canvas sling
5740 var A.Puzzle basic puzzle
5741 var A.Footwear pouch
5742 var A.Shields <nothing>
5743 var A.Weapon <nothing>
5744 var A.Armor <nothing>
5745 var A.Gen tinderbox
5746 var A.Flower wristlet
5747 var A.Music cloth
5748 gosub ITEM.COUNT2
5749 RETURN
5750##################################
5751# SKILLS 150-199
5752##################################
5753CLASS5:
5754 ## THEREN
5755 var skillrange 150-199
5756 var T.Tarsha canons
5757 var T.Rose shirt
5758 var T.Music four strings
5759 var T.Music.Num
5760 var T.Hats sailor hat
5761 var T.Arm <nothing>
5762 var T.Gift blue shirt
5763 var T.Sweet cake
5764 var T.Cupcake cupcake
5765 var T.Gen carving knife
5766 var T.Krrish <nothing>
5767 var T.Lense <nothing>
5768 var T.Cleric pestle
5769 var T.Men trousers
5770 var T.Women <nothing>
5771 var T.Cloth suspenders
5772 var T.Armory dagger
5773 var T.Forge copper slug
5774 ## HAVEN
5775 var skillrange 150-199
5776 var RH.Herb riolur leaf
5777 var RH.Iron bronze gauntlets
5778 var RH.Naph naphtha
5779 var RH.Naph.Loc on cart
5780 var RH.Flow <nothing>
5781 var RH.Seli studded helm
5782 var RH.Arms rapier
5783 var RH.Gen razor
5784 var RH.Cloth jerkin
5785 var RH.Artif simple talisman
5786 var RH.Joy troll
5787 var RH.Smoke lanival pipe
5788 var RH.Weap <nothing>
5789 var RH.Bard tipper
5790 var RH.Bard2 earrings
5791 var RH.Cleric pomander
5792 var RH.Cleric2 bottle
5793 var RH.Lock slim lockpick
5794 var RH.Tog beaded slippers
5795 var RH.Tog2 <nothing>
5796 var RH.Mirg <nothing>
5797 # ARTHE DALE
5798 var skillrange 150-199
5799 var AD.Feta anlibues cheese
5800 var AD.FETA.Loc
5801 var AD.Thread bobbin
5802 var AD.Fash shawl
5803 var AD.Odds fan
5804 var AD.Bard four strings
5805 var AD.Map <nothing>
5806 var AD.Arm sword
5807 var AD.Smoke cigarillo
5808 var AD.Tart.E tart
5809 var AD.Tart.C tart
5810 var AD.Tart.M tart
5811 var AD.Tart.L tart
5812 var AD.Tart.F tart
5813 var KA.Grek skinning knife
5814 # CROSSINGS
5815 var skillrange 150-199
5816 var C.Alch dracon crystals
5817 var C.Artif talisman
5818 var C.Bath bathrobe
5819 var C.Bath.Num
5820 var C.Bath.Loc
5821 var C.Card <nothing>
5822 var C.Gen sheath
5823 var C.Weap kris
5824 var C.Arm rugged vambraces
5825 var C.Music ocarina
5826 var C.Music2 ebony guiro
5827 var C.Lock lockpick ring
5828 var C.Empath <nothing>
5829 var C.Empath.Alt <nothing>
5830 var C.Empath2 garland
5831 var C.Empath3 button
5832 var C.Empath3.Loc on case
5833 var C.Empath3.Alt <nothing>
5834 var C.Cler silver vial
5835 var C.Haber jerkin
5836 var C.Script <nothing>
5837 var C.Tann bodkin
5838 var C.Tann.Loc
5839 var C.Jewel engagement ring
5840 var C.Stitch cloak
5841 var C.Cobb snowshoes
5842 var C.Herb junliar stem
5843 var C.Flow <nothing>
5844 # LETH DERIEL
5845 var skillrange 150-199
5846 var L.Skin deer skin
5847 var L.Bow long arrows
5848 var L.Orig case
5849 var L.Orig.Num fourth
5850 var L.Weap <nothing>
5851 var L.Weap.Loc in catalog
5852 var L.Wick wicker quiver
5853 var L.Bard flute
5854 var L.Bard2 four strings
5855 var L.Cloth tunic
5856 var L.Wood log
5857 var L.Gen dice
5858 var L.Gen.Alt <nothing>
5859 var L.Perf <nothing>
5860 # SHARD
5861 var skillrange 150-199
5862 var S.Gen clippers
5863 var S.Weap targe
5864 var S.Cleric armband
5865 var S.Stitch blouse
5866 var S.Alch tukai stones
5867 var S.Herb riolur leaf
5868 var S.Artif talisman
5869 var S.Music bow
5870 var S.Armor mail gauntlets
5871 var S.Reed <nothing>
5872 var S.Reed.Num
5873 var S.Bow crossbow bolts
5874 var S.Lock bronze keyblank
5875 var S.Coin coin case
5876 var S.Coin.Loc
5877 var S.Frill lace fan
5878 var S.Herald <nothing>
5879 var S.Herald.Loc on rack
5880 var S.Gift boggle doll
5881 var S.Gift.Loc in black basket
5882 var S.Toy whistle
5883 var S.Toy.Loc
5884 var S.Memory <nothing>
5885 var S.Memory.Num first
5886 var S.Token <nothing>
5887 var S.Museum <nothing>
5888 var S.Barber oil
5889 var S.Tanner scraper
5890 var S.Surv stone pestle
5891 var S.Surv.Alt wood pestle
5892 var S.Surv.Loc
5893 var S.Surv2 steel shaper
5894 var S.Surv2.Alt pine box
5895 var S.Surv2.Loc
5896 var S.Spire <nothing>
5897 # HIB AND RAVEN'S POINT
5898 var skillrange 150-199
5899 var SC.Weap <nothing>
5900 var H.Shield <nothing>
5901 var H.Jewel <nothing>
5902 var H.Tog white soap
5903 var H.Herb <nothing>
5904 var H.Sund bone comb
5905 var H.Lamp <nothing>
5906 var H.Music cloth
5907 var H.Alch stone pestle
5908 var H.Forge shaft
5909 var H.Forge.Loc on rack
5910 var RP.Gen pestle
5911 var RP.Gen.Loc on table
5912 var RP.Tobac pipe
5913 # RATHA
5914 var skillrange 150-199
5915 var R.Bait pole
5916 var R.Gen breaker
5917 var R.Herb cebi root
5918 var R.Forge dagger
5919 var R.Tailor tunic
5920 var R.Leather <nothing>
5921 var R.Hair clippers
5922 var R.Music flute
5923 var R.Magic <nothing>
5924 var R.Origami white paper
5925 var R.Origami.LOC
5926 var R.Jewelry clasp
5927 var R.Cleric vial
5928 var R.Cleric2 <nothing>
5929 var R.Ring <nothing>
5930 # AESRY SURLAENIS'A
5931 var skillrange 150-199
5932 var A.Herb cebi root
5933 var A.Tanner bodkin
5934 var A.Clothing tunic
5935 var A.Script trimmed scroll
5936 var A.Cleric wine
5937 var A.Origami plain paper
5938 var A.Jewelry bracelet
5939 var A.Magic <nothing>
5940 var A.Slings rocks
5941 var A.Puzzle intermediate puzzle
5942 var A.Footwear woolen tights
5943 var A.Shields kite shield
5944 var A.Weapon telek
5945 var A.Armor <nothing>
5946 var A.Gen razor
5947 var A.Flower necklace
5948 var A.Music bow
5949 gosub ITEM.COUNT2
5950 RETURN
5951##################################
5952# SKILLS 200-249
5953##################################
5954CLASS6:
5955 ## THEREN
5956 var skillrange 200-249
5957 var T.Tarsha greques
5958 var T.Rose shirt
5959 var T.Music four strings
5960 var T.Music.Num
5961 var T.Hats sailor hat
5962 var T.Arm <nothing>
5963 var T.Gift blue shirt
5964 var T.Sweet cake
5965 var T.Cupcake cupcake
5966 var T.Gen carving knife
5967 var T.Krrish <nothing>
5968 var T.Lense <nothing>
5969 var T.Cleric pestle
5970 var T.Men trousers
5971 var T.Women <nothing>
5972 var T.Cloth suspenders
5973 var T.Armory dagger
5974 var T.Forge copper slug
5975 ## HAVEN
5976 var skillrange 200-249
5977 var RH.Herb muljin sap
5978 var RH.Iron bronze gauntlets
5979 var RH.Naph naphtha
5980 var RH.Naph.Loc on cart
5981 var RH.Flow velvet rose
5982 var RH.Seli aventail
5983 var RH.Arms sword
5984 var RH.Gen shears
5985 var RH.Cloth doublet
5986 var RH.Artif simple talisman
5987 var RH.Joy bunny
5988 var RH.Smoke baron tobacco
5989 var RH.Weap mace
5990 var RH.Bard lyre
5991 var RH.Bard2 wristlet
5992 var RH.Cleric chalice
5993 var RH.Cleric2 black bottle
5994 var RH.Lock slim lockpick
5995 var RH.Tog ivory shirt
5996 var RH.Tog2 <nothing>
5997 var RH.Mirg anklet
5998 # ARTHE DALE
5999 var skillrange 200-249
6000 var AD.Feta butter cheese
6001 var AD.FETA.Loc
6002 var AD.Thread pattern
6003 var AD.Fash trousers
6004 var AD.Odds earring
6005 var AD.Bard itharr's
6006 var AD.Map pipe
6007 var AD.Arm wooden shield
6008 var AD.Smoke cigarillo
6009 var AD.Tart.E tart
6010 var AD.Tart.C tart
6011 var AD.Tart.M tart
6012 var AD.Tart.L tart
6013 var AD.Tart.F tart
6014 var KA.Grek charm
6015 # CROSSINGS
6016 var skillrange 200-249
6017 var C.Alch tincture jar
6018 var C.Artif talisman
6019 var C.Bath bathrobe
6020 var C.Bath.Num
6021 var C.Bath.Loc
6022 var C.Card case
6023 var C.Gen backpack
6024 var C.Weap mace
6025 var C.Arm chain aventail
6026 var C.Music bodhran skin
6027 var C.Music2 ebony guiro
6028 var C.Lock slim lockpick
6029 var C.Empath scalpel
6030 var C.Empath.Alt <nothing>
6031 var C.Empath2 garland
6032 var C.Empath3 oak stylus
6033 var C.Empath3.Loc on box
6034 var C.Empath3.Alt <nothing>
6035 var C.Cler basin
6036 var C.Haber trousers
6037 var C.Script satchel
6038 var C.Script.Num second
6039 var C.Tann shears
6040 var C.Tann.Loc
6041 var C.Jewel coral hairpin
6042 var C.Stitch blouse
6043 var C.Cobb thigh boots
6044 var C.Herb riolur leaf
6045 var C.Flow corsage
6046 # LETH DERIEL
6047 var skillrange 200-249
6048 var L.Skin sluagh hide
6049 var L.Bow long arrows
6050 var L.Orig case
6051 var L.Orig.Num third
6052 var L.Weap <nothing>
6053 var L.Weap.Loc in catalog
6054 var L.Wick mesh sack
6055 var L.Bard woodwind case
6056 var L.Bard2 four strings
6057 var L.Cloth doublet
6058 var L.Wood applewood log
6059 var L.Gen dice
6060 var L.Gen.Alt <nothing>
6061 var L.Perf panther perfume
6062 # SHARD
6063 var skillrange 200-249
6064 var S.Gen short sword
6065 var S.Weap targe
6066 var S.Cleric armband
6067 var S.Stitch cloak
6068 var S.Alch seol weed
6069 var S.Herb genich stem
6070 var S.Artif simple talisman
6071 var S.Music four strings
6072 var S.Armor choker
6073 var S.Reed thigh bag
6074 var S.Reed.Num second
6075 var S.Bow crossbow bolts
6076 var S.Lock wrist sheath
6077 var S.Coin coin case
6078 var S.Coin.Loc
6079 var S.Frill sandals
6080 var S.Herald target shield
6081 var S.Herald.Loc on rack
6082 var S.Gift boggle doll
6083 var S.Gift.Loc in black basket
6084 var S.Toy beard
6085 var S.Toy.Loc
6086 var S.Memory <nothing>
6087 var S.Memory.Num first
6088 var S.Token <nothing>
6089 var S.Museum <nothing>
6090 var S.Barber tincture jar
6091 var S.Tanner shears
6092 var S.Surv stone pestle
6093 var S.Surv.Alt wood pestle
6094 var S.Surv.Loc
6095 var S.Surv2 steel shaper
6096 var S.Surv2.Alt stone-tipped arrows
6097 var S.Surv2.Loc
6098 var S.Spire pouch
6099 # HIB AND RAVEN'S POINT
6100 var skillrange 200-249
6101 var SC.Weap <nothing>
6102 var H.Shield <nothing>
6103 var H.Jewel <nothing>
6104 var H.Tog towel
6105 var H.Herb yelith root
6106 var H.Sund bone comb
6107 var H.Lamp serpent lamp
6108 var H.Music scroll
6109 var H.Alch stone pestle
6110 var H.Forge shaft
6111 var H.Forge.Loc on rack
6112 var RP.Gen stone mortar
6113 var RP.Tobac pipe
6114 # RATHA
6115 var skillrange 200-249
6116 var R.Bait pole
6117 var R.Gen strap
6118 var R.Herb riolur leaf
6119 var R.Forge sap
6120 var R.Tailor trousers
6121 var R.Leather gauntlets
6122 var R.Hair <nothing>
6123 var R.Music six strings
6124 var R.Magic talisman
6125 var R.Origami white paper
6126 var R.Origami.LOC
6127 var R.Jewelry silver chain
6128 var R.Cleric censer
6129 var R.Cleric2 <nothing>
6130 var R.Ring <nothing>
6131 # AESRY SURLAENIS'A
6132 var skillrange 200-249
6133 var A.Herb nemoih root
6134 var A.Tanner scraper
6135 var A.Clothing shirt
6136 var A.Script painted scroll
6137 var A.Cleric sandals
6138 var A.Origami plain paper
6139 var A.Jewelry bracelet
6140 var A.Magic <nothing>
6141 var A.Slings rocks
6142 var A.Puzzle bunny
6143 var A.Footwear lace stockings
6144 var A.Shields kite shield
6145 var A.Weapon telek
6146 var A.Armor <nothing>
6147 var A.Gen razor
6148 var A.Flower circlet
6149 var A.Music four strings
6150 gosub ITEM.COUNT2
6151 RETURN
6152##################################
6153# SKILLS 250-299
6154##################################
6155CLASS7:
6156 ## THEREN
6157 var skillrange 250-299
6158 var T.Tarsha greques
6159 var T.Rose shirt
6160 var T.Music four strings
6161 var T.Music.Num
6162 var T.Hats sailor hat
6163 var T.Arm <nothing>
6164 var T.Gift blue shirt
6165 var T.Sweet cake
6166 var T.Cupcake cupcake
6167 var T.Gen reed torch
6168 var T.Krrish <nothing>
6169 var T.Lense <nothing>
6170 var T.Cleric pestle
6171 var T.Men trousers
6172 var T.Women <nothing>
6173 var T.Cloth suspenders
6174 var T.Armory dagger
6175 var T.Forge copper slug
6176 ## HAVEN
6177 var skillrange 250-299
6178 var RH.Herb riolur leaf
6179 var RH.Iron bronze gauntlets
6180 var RH.Naph naphtha
6181 var RH.Naph.Loc on cart
6182 var RH.Flow wreath
6183 var RH.Seli bronze gauntlets
6184 var RH.Arms composite bow
6185 var RH.Gen shears
6186 var RH.Cloth houpelande
6187 var RH.Artif cambrinth ring
6188 var RH.Joy bunny
6189 var RH.Smoke riverhaven tobacco
6190 var RH.Weap thorny mace
6191 var RH.Bard refill
6192 var RH.Bard2 necklace
6193 var RH.Cleric chalice
6194 var RH.Cleric2 black bottle
6195 var RH.Lock slim lockpick
6196 var RH.Tog ivory shirt
6197 var RH.Tog2 <nothing>
6198 var RH.Mirg anklet
6199 # ARTHE DALE
6200 var skillrange 250-299
6201 var AD.Feta kirm cheese
6202 var AD.FETA.Loc
6203 var AD.Thread pattern
6204 var AD.Fash trousers
6205 var AD.Odds earring
6206 var AD.Bard silverlock
6207 var AD.Map pipe
6208 var AD.Arm vest
6209 var AD.Smoke baron tobacco
6210 var AD.Tart.E tart
6211 var AD.Tart.C tart
6212 var AD.Tart.M tart
6213 var AD.Tart.L tart
6214 var AD.Tart.F tart
6215 var KA.Grek shirt
6216 # CROSSINGS
6217 var skillrange 250-299
6218 var C.Alch tincture jar
6219 var C.Artif talisman
6220 var C.Bath bathrobe
6221 var C.Bath.Num
6222 var C.Bath.Loc
6223 var C.Card case
6224 var C.Gen backpack
6225 var C.Weap hammer
6226 var C.Arm scale aventail
6227 var C.Music refill
6228 var C.Music2 violin bow
6229 var C.Lock lockpick ring
6230 var C.Empath slippers
6231 var C.Empath.Alt <nothing>
6232 var C.Empath2 mortar
6233 var C.Empath3 oak stylus
6234 var C.Empath3.Loc from box
6235 var C.Empath3.Alt <nothing>
6236 var C.Cler coffer
6237 var C.Haber doublet
6238 var C.Script satchel
6239 var C.Script.Num second
6240 var C.Tann pattern
6241 var C.Tann.Loc
6242 var C.Jewel bloodstone hairpin
6243 var C.Stitch leggings
6244 var C.Cobb hip boots
6245 var C.Herb ithor potion
6246 var C.Flow corsage
6247 # LETH DERIEL
6248 var skillrange 250-299
6249 var L.Skin cougar pelt
6250 var L.Bow leather quiver
6251 var L.Orig case
6252 var L.Orig.Num third
6253 var L.Weap <nothing>
6254 var L.Weap.Loc in catalog
6255 var L.Wick mesh sack
6256 var L.Bard mirliton
6257 var L.Bard2 refill
6258 var L.Cloth jerkin
6259 var L.Wood hazelwood log
6260 var L.Gen dice
6261 var L.Gen.Alt <nothing>
6262 var L.Perf panther perfume
6263 # SHARD
6264 var skillrange 250-299
6265 var S.Gen chain helm
6266 var S.Weap stiletto
6267 var S.Cleric bell
6268 var S.Stitch dress
6269 var S.Alch seolarn weed
6270 var S.Herb hisan salve
6271 var S.Artif elbaite runestone
6272 var S.Music refill
6273 var S.Lock wrist sheath
6274 var S.Armor mesh handguards
6275 var S.Coin coin case
6276 var S.Coin.Loc
6277 var S.Frill doll
6278 var S.Herald ordinary shield
6279 var S.Herald.Loc on rack
6280 var S.Gift badge
6281 var S.Gift.Loc on stand
6282 var S.Toy book
6283 var S.Toy.Loc
6284 var S.Reed thigh bag
6285 var S.Reed.Num second
6286 var S.Memory pin
6287 var S.Memory.Num first
6288 var S.Token <nothing>
6289 var S.Museum earring
6290 var S.Barber brass razor
6291 var S.Bow barbed arrows
6292 var S.Tanner potion
6293 var S.Surv marble pestle
6294 var S.Surv.Alt stone pestle
6295 var S.Surv.Loc
6296 var S.Surv2 stone-tipped arrows
6297 var S.Surv2.Alt steel shaper
6298 var S.Surv2.Loc
6299 var S.Spire pouch
6300 # HIB AND RAVEN'S POINT
6301 var skillrange 250-299
6302 var SC.Weap dirk
6303 var H.Shield ordinary shield
6304 var H.Jewel <nothing>
6305 var H.Tog shirt
6306 var H.Herb hisan salve
6307 var H.Sund lamp
6308 var H.Lamp serpent lamp
6309 var H.Music repair kit
6310 var H.Alch granite mortar
6311 var H.Forge shaft
6312 var H.Forge.Loc on rack
6313 var RP.Gen quiver
6314 var RP.Tobac tobacco pouch
6315 # RATHA
6316 var skillrange 250-299
6317 var R.Bait pole
6318 var R.Gen ditty bag
6319 var R.Herb ithor potion
6320 var R.Forge sap
6321 var R.Tailor vest
6322 var R.Leather gauntlets
6323 var R.Hair razor
6324 var R.Music refill
6325 var R.Magic talisman
6326 var R.Origami blue paper
6327 var R.Origami.LOC
6328 var R.Jewelry collar
6329 var R.Cleric censer
6330 var R.Cleric2 <nothing>
6331 var R.Ring <nothing>
6332 # AESRY SURLAENIS'A
6333 var skillrange 250-299
6334 var A.Herb ithor potion
6335 var A.Tanner shears
6336 var A.Clothing trousers
6337 var A.Script canvas scroll
6338 var A.Cleric armband
6339 var A.Origami white paper
6340 var A.Jewelry earcuff
6341 var A.Magic marble
6342 var A.Slings canvas sling
6343 var A.Puzzle wand
6344 var A.Footwear lace stockings
6345 var A.Shields kite shield
6346 var A.Weapon telek
6347 var A.Armor chausses
6348 var A.Gen mirror
6349 var A.Flower wreath
6350 var A.Music seven strings
6351 gosub ITEM.COUNT2
6352 RETURN
6353##################################
6354# SKILLS 300-399
6355##################################
6356CLASS8:
6357 ## THEREN
6358 var skillrange 300-399
6359 var T.Tarsha greques
6360 var T.Rose shirt
6361 var T.Music four strings
6362 var T.Music.Num
6363 var T.Hats sailor hat
6364 var T.Arm <nothing>
6365 var T.Gift blue shirt
6366 var T.Sweet cake
6367 var T.Cupcake cupcake
6368 var T.Gen reed torch
6369 var T.Krrish <nothing>
6370 var T.Lense <nothing>
6371 var T.Cleric pestle
6372 var T.Men trousers
6373 var T.Women <nothing>
6374 var T.Cloth suspenders
6375 var T.Armory dagger
6376 var T.Forge copper slug
6377 ## HAVEN
6378 var skillrange 300-399
6379 var RH.Herb ithor potion
6380 var RH.Iron chain greaves
6381 var RH.Naph naphtha
6382 var RH.Naph.Loc on cart
6383 var RH.Flow silk orchid
6384 var RH.Seli aventail
6385 var RH.Arms sword
6386 var RH.Gen stove
6387 var RH.Cloth dress
6388 var RH.Artif cambrinth ring
6389 var RH.Joy bunny
6390 var RH.Smoke baron tobacco
6391 var RH.Weap goat-head mace
6392 var RH.Bard mandolin
6393 var RH.Bard2 amulet
6394 var RH.Cleric pomander
6395 var RH.Cleric2 wood shaper
6396 var RH.Lock lockpick ring
6397 var RH.Tog linen shirt
6398 var RH.Tog2 <nothing>
6399 var RH.Mirg toe-bells
6400 # ARTHE DALE
6401 var skillrange 300-399
6402 var AD.Feta anlibues cheese
6403 var AD.FETA.Loc
6404 var AD.Thread pattern
6405 var AD.Fash frock
6406 var AD.Odds doll
6407 var AD.Bard peri'el's
6408 var AD.Map pipe
6409 var AD.Arm cuirass
6410 var AD.Smoke whiskey cigar
6411 var AD.Tart.E tart
6412 var AD.Tart.C tart
6413 var AD.Tart.M tart
6414 var AD.Tart.L tart
6415 var AD.Tart.F tart
6416 var KA.Grek barrel
6417 # CROSSINGS
6418 var skillrange 300-399
6419 var C.Alch tincture jar
6420 var C.Artif talisman
6421 var C.Bath bath towel
6422 var C.Bath.Num
6423 var C.Bath.Loc on rack
6424 var C.Card case
6425 var C.Gen stove
6426 var C.Weap sabre
6427 var C.Arm chain helm
6428 var C.Music repair kit
6429 var C.Music2 violin bow
6430 var C.Lock lockpick ring
6431 var C.Empath scalpel
6432 var C.Empath.Alt slippers
6433 var C.Empath2 mortar
6434 var C.Empath3 journal
6435 var C.Empath3.Loc on shelf
6436 var C.Empath3.Alt button
6437 var C.Cler habit
6438 var C.Haber tabard
6439 var C.Script satchel
6440 var C.Script.Num second
6441 var C.Tann pattern
6442 var C.Tann.Loc
6443 var C.Jewel bloodstone hairpin
6444 var C.Stitch shirt
6445 var C.Cobb hip boots
6446 var C.Herb ithor potion
6447 var C.Flow boutonniere
6448 # LETH DERIEL
6449 var skillrange 300-399
6450 var L.Skin reaver pelt
6451 var L.Bow composite bow
6452 var L.Orig origami case
6453 var L.Orig.Num fifth
6454 var L.Weap wolf-tail shield
6455 var L.Wick pannier
6456 var L.Bard keyed flute
6457 var L.Bard2 twelve strings
6458 var L.Cloth mantle
6459 var L.Wood ironwood log
6460 var L.Gen dice ankle sheath
6461 var L.Gen.Alt <nothing>
6462 var L.Perf spice perfume
6463 # SHARD
6464 var skillrange 300-399
6465 var S.Gen backtube
6466 var S.Weap oben
6467 var S.Cleric chalice
6468 var S.Stitch gown
6469 var S.Alch stove
6470 var S.Herb ithor potion
6471 var S.Artif belradi potion
6472 var S.Music gittern
6473 var S.Lock signet ring
6474 var S.Armor balaclava
6475 var S.Coin coin case
6476 var S.Coin.Loc on table
6477 var S.Frill doll
6478 var S.Herald medium shield
6479 var S.Herald.Loc on rack
6480 var S.Gift doll
6481 var S.Gift.Loc
6482 var S.Toy marionette
6483 var S.Toy.Loc on lion
6484 var S.Reed anklet
6485 var S.Reed.Num
6486 var S.Memory pin
6487 var S.Memory.Num first
6488 var S.Token token
6489 var S.Museum earrings
6490 var S.Barber horn razor
6491 var S.Bow short bow
6492 var S.Tanner potion
6493 var S.Surv hip pouch
6494 var S.Surv.Loc
6495 var S.Surv.Alt thigh quiver
6496 var S.Surv2 belt knife
6497 var S.Surv2.Loc
6498 var S.Surv2.Alt broad-barbed arrows
6499 var S.Spire backpack
6500 # HIB AND RAVEN'S POINT
6501 var skillrange 300-399
6502 var SC.Weap dirk
6503 var H.Shield oval shield
6504 var H.Jewel necklace
6505 var H.Tog robe
6506 var H.Herb lujeakave elixir
6507 var H.Sund broadsword
6508 var H.Lamp dragon lamp
6509 var H.Music bagpipe
6510 var H.Alch bucket
6511 var H.Forge zinc bar
6512 var H.Forge.Loc on tab
6513 var RP.Gen hammer
6514 var RP.Tobac tobacco pouch
6515 # RATHA
6516 var skillrange 300-399
6517 var R.Bait pole
6518 var R.Gen quiver
6519 var R.Herb tincture jar
6520 var R.Forge sap
6521 var R.Tailor kilt
6522 var R.Leather gauntlets
6523 var R.Hair razor
6524 var R.Music lyre
6525 var R.Magic cambrinth ring
6526 var R.Origami bird instructions
6527 var R.Origami.LOC
6528 var R.Jewelry collar
6529 var R.Cleric oil
6530 var R.Cleric2 <nothing>
6531 var R.Ring <nothing>
6532 # AESRY SURLAENIS'A
6533 var skillrange 300-399
6534 var A.Herb seolarn weed
6535 var A.Tanner potion
6536 var A.Clothing doublet
6537 var A.Script canvas scroll
6538 var A.Cleric armband
6539 var A.Origami blue paper
6540 var A.Jewelry haedor
6541 var A.Magic cube
6542 var A.Slings needle arrows
6543 var A.Puzzle rings
6544 var A.Footwear spidersilk stockings
6545 var A.Shields kite shield
6546 var A.Weapon garz
6547 var A.Armor chausses
6548 var A.Gen lantern
6549 var A.Flower pillow
6550 var A.Music drum pouch
6551 gosub ITEM.COUNT3
6552 RETURN
6553##################################
6554# SKILLS 400-499
6555##################################
6556CLASS9:
6557 ## THEREN
6558 var skillrange 400-499
6559 var T.Tarsha houppelande
6560 var T.Rose cloak
6561 var T.Music harp case
6562 var T.Music.Num
6563 var T.Hats head-dress
6564 var T.Arm leather sheath
6565 var T.Gift throwing dagger
6566 var T.Sweet cake
6567 var T.Cupcake cupcake
6568 var T.Gen backsheath
6569 var T.Krrish bone
6570 var T.Lense bone ring
6571 var T.Cleric mobar blood
6572 var T.Men trousers
6573 var T.Women <nothing>
6574 var T.Cloth suspenders
6575 var T.Armory quiver
6576 var T.Forge hilt
6577 ## HAVEN
6578 var skillrange 400-499
6579 var RH.Herb ithor potion
6580 var RH.Iron steel greaves
6581 var RH.Naph naphtha
6582 var RH.Naph.Loc on cart
6583 var RH.Flow velvet rose
6584 var RH.Seli aventail
6585 var RH.Arms sword
6586 var RH.Gen stove
6587 var RH.Cloth gown
6588 var RH.Artif cambrinth ring
6589 var RH.Joy troll
6590 var RH.Smoke baron tobacco
6591 var RH.Weap goat-head mace
6592 var RH.Bard boots
6593 var RH.Bard2 amulet
6594 var RH.Cleric pomander
6595 var RH.Cleric2 wood shaper
6596 var RH.Lock slim lockpick
6597 var RH.Tog linen shirt
6598 var RH.Tog2 <nothing>
6599 var RH.Mirg toe-bells
6600 # ARTHE DALE
6601 var skillrange 400-499
6602 var AD.Smoke whiskey cigar
6603 var AD.Thread pattern
6604 var AD.Fash overall
6605 var AD.Odds monocle
6606 var AD.Bard peri'el's song
6607 var AD.Map map
6608 var AD.Arm breastplate
6609 var AD.Feta biscuit
6610 var AD.FETA.Loc
6611 var AD.Tart.E tart
6612 var AD.Tart.C tart
6613 var AD.Tart.M tart
6614 var AD.Tart.L tart
6615 var AD.Tart.F tart
6616 var KA.Grek barrel
6617 # CROSSINGS
6618 var skillrange 400-499
6619 var C.Alch stove
6620 var C.Arm bascinet
6621 var C.Artif orb
6622 var C.Bath towel
6623 var C.Bath.Num second
6624 var C.Bath.Loc on rack
6625 var C.Card case
6626 var C.Gen portable stove
6627 var C.Weap light crossbow
6628 var C.Music case of silver
6629 var C.Music2 bohdran
6630 var C.Lock lockpick ring
6631 var C.Empath silk shirt
6632 var C.Empath.Alt broadsword
6633 var C.Empath2 silver chart
6634 var C.Empath3 petal
6635 var C.Empath3.Loc on case
6636 var C.Empath3.Alt bandage
6637 var C.Cler silver bell
6638 var C.Cler2 burlap sack
6639 var C.Haber tail coat
6640 var C.Script satchel
6641 var C.Script.Num second
6642 var C.Tann potion
6643 var C.Tann.Loc in catalog
6644 var C.Jewel diamond engagement ring
6645 var C.Stitch long coat
6646 var C.Cobb hip boots
6647 var C.Herb ithor potion
6648 var C.Flow boutonniere
6649 # LETH DERIEL
6650 var skillrange 400-499
6651 var L.Skin blood wolf pelt
6652 var L.Bow composite bow
6653 var L.Orig origami case
6654 var L.Orig.Num fifth
6655 var L.Weap hide shield
6656 var L.Wick willow backpack
6657 var L.Bard silverwood mirliton
6658 var L.Bard2 hat
6659 var L.Cloth silk jaque
6660 var L.Wood apple
6661 var L.Gen mesh backpack
6662 var L.Gen.Alt ankle sheath
6663 var L.Perf venom oil
6664 # SHARD
6665 var skillrange 400-499
6666 var S.Gen backtube
6667 var S.Weap oben
6668 var S.Cleric mobar blood
6669 var S.Stitch gown
6670 var S.Alch stove
6671 var S.Herb ithor potion
6672 var S.Artif belradi potion
6673 var S.Music gittern
6674 var S.Armor balaclava
6675 var S.Reed anklet
6676 var S.Reed.Num
6677 var S.Museum earrings
6678 var S.Bow short bow
6679 var S.Lock signet ring
6680 var S.Coin coin case
6681 var S.Coin.Loc on table
6682 var S.Frill doll
6683 var S.Herald medium shield
6684 var S.Herald.Loc on rack
6685 var S.Gift doll
6686 var S.Gift.Loc
6687 var S.Toy marionette
6688 var S.Toy.Loc on lion
6689 var S.Memory pin
6690 var S.Memory.Num second
6691 var S.Token token
6692 var S.Barber pearl razor
6693 var S.Tanner potion
6694 var S.Surv hip pouch
6695 var S.Surv.Loc
6696 var S.Surv.Alt thigh quiver
6697 var S.Surv2 belt knife
6698 var S.Surv2.Loc
6699 var S.Surv2.Alt broad-barbed arrows
6700 var S.Spire tabard
6701 # HIB AND RAVEN'S POINT
6702 var skillrange 400-499
6703 var SC.Weap adze
6704 var H.Shield oval shield
6705 var H.Jewel necklace
6706 var H.Tog robe
6707 var H.Herb lujeakave elixir
6708 var H.Sund broadsword
6709 var H.Lamp dragon lamp
6710 var H.Music bagpipe
6711 var H.Alch bucket
6712 var H.Forge zinc bar
6713 var H.Forge.Loc on tab
6714 var RP.Gen hammer
6715 var RP.Tobac tobacco pouch
6716 # RATHA
6717 var skillrange 400-499
6718 var R.Bait <nothing>
6719 var R.Gen quiver
6720 var R.Herb portable stove
6721 var R.Forge poignard
6722 var R.Tailor tunic
6723 var R.Leather gloves
6724 var R.Hair razor
6725 var R.Music repair kit
6726 var R.Magic naphtha
6727 var R.Origami primer
6728 var R.Origami.LOC
6729 var R.Jewelry wedding band
6730 var R.Cleric mobar blood
6731 var R.Cleric2 <nothing>
6732 var R.Ring <nothing>
6733 # AESRY SURLAENIS'A
6734 var skillrange 400-499
6735 var A.Herb ithor potion
6736 var A.Tanner pattern
6737 var A.Clothing trousers
6738 var A.Script parchment
6739 var A.Cleric mobar blood
6740 var A.Origami yak instructions
6741 var A.Jewelry ring
6742 var A.Magic marble
6743 var A.Slings wool sling
6744 var A.Puzzle bunny
6745 var A.Footwear clogs
6746 var A.Shields kite shield
6747 var A.Weapon telek
6748 var A.Armor chausses
6749 var A.Gen lantern
6750 var A.Flower pillow
6751 var A.Music syrinx
6752 gosub ITEM.COUNT3
6753 RETURN
6754##################################
6755# SKILLS 500-599
6756##################################
6757CLASS10:
6758 ## THEREN
6759 var skillrange 500-599
6760 var T.Tarsha houppelande
6761 var T.Rose cloak
6762 var T.Music harp case
6763 var T.Music.Num
6764 var T.Hats head-dress
6765 var T.Arm leather sheath
6766 var T.Gift throwing dagger
6767 var T.Sweet cake
6768 var T.Cupcake cupcake
6769 var T.Gen backsheath
6770 var T.Krrish bone
6771 var T.Lense bone ring
6772 var T.Cleric mobar blood
6773 var T.Men trousers
6774 var T.Women dark veil
6775 var T.Cloth suspenders
6776 var T.Armory quiver
6777 var T.Forge hilt
6778 ## HAVEN
6779 var skillrange 500-599
6780 var RH.Herb ithor potion
6781 var RH.Iron chain helm
6782 var RH.Naph naphtha
6783 var RH.Naph.Loc on cart
6784 var RH.Flow velvet rose
6785 var RH.Seli skull helm
6786 var RH.Arms longsword
6787 var RH.Gen stove
6788 var RH.Cloth gown
6789 var RH.Artif potion
6790 var RH.Joy troll
6791 var RH.Smoke baron tobacco
6792 var RH.Weap goat-head mace
6793 var RH.Bard silk trews
6794 var RH.Bard2 spirit earrings
6795 var RH.Cleric pomander
6796 var RH.Cleric2 pendant
6797 var RH.Lock slim lockpick
6798 var RH.Tog slippers
6799 var RH.Tog2 leggings
6800 var RH.Mirg silk fan
6801 # ARTHE DALE
6802 var skillrange 500-599
6803 var AD.Smoke whiskey cigar
6804 var AD.Thread pattern
6805 var AD.Fash overall
6806 var AD.Odds monocle
6807 var AD.Bard peri'el's song
6808 var AD.Map map
6809 var AD.Arm leather coat
6810 var AD.Feta biscuit
6811 var AD.FETA.Loc
6812 var AD.Tart.E tart
6813 var AD.Tart.C tart
6814 var AD.Tart.M tart
6815 var AD.Tart.L tart
6816 var AD.Tart.F tart
6817 var KA.Grek barrel
6818 # CROSSINGS
6819 var skillrange 500-599
6820 var C.Alch bucket
6821 var C.Arm chain tasset
6822 var C.Artif urn
6823 var C.Bath towel
6824 var C.Bath.Num fourth
6825 var C.Bath.Loc on rack
6826 var C.Card case
6827 var C.Gen portable stove
6828 var C.Weap light crossbow
6829 var C.Music case of silver
6830 var C.Music2 tapani
6831 var C.Lock lockpick ring
6832 var C.Empath silk shirt
6833 var C.Empath.Alt targe
6834 var C.Empath2 silver chart
6835 var C.Empath3 journal
6836 var C.Empath3.Loc on shelf
6837 var C.Empath3.Alt medallion
6838 var C.Cler silver bell
6839 var C.Cler2 armband
6840 var C.Haber tail coat
6841 var C.Script satchel
6842 var C.Script.Num first
6843 var C.Tann potion
6844 var C.Tann.Loc in catalog
6845 var C.Jewel diamond engagement ring
6846 var C.Stitch long coat
6847 var C.Cobb hip boots
6848 var C.Herb ithor potion
6849 var C.Flow boutonniere
6850 # LETH DERIEL
6851 var skillrange 500-599
6852 var L.Skin blood wolf pelt
6853 var L.Bow heavy crossbow
6854 var L.Orig origami case
6855 var L.Orig.Num fifth
6856 var L.Weap hide shield
6857 var L.Wick willow backpack
6858 var L.Bard silverwood mirliton
6859 var L.Bard2 hat
6860 var L.Cloth silk jaque
6861 var L.Wood caravan
6862 var L.Gen mesh backpack
6863 var L.Gen.Alt ankle sheath
6864 var L.Perf venom oil
6865 # SHARD
6866 var skillrange 500-599
6867 var S.Gen light crossbow
6868 var S.Weap oben
6869 var S.Cleric mobar blood
6870 var S.Stitch gown
6871 var S.Alch stove
6872 var S.Herb ithor potion
6873 var S.Artif belradi potion
6874 var S.Music gittern
6875 var S.Armor balaclava
6876 var S.Reed skirt
6877 var S.Reed.Num sixth
6878 var S.Museum plate
6879 var S.Bow light crossbow
6880 var S.Lock signet ring
6881 var S.Coin coin case
6882 var S.Coin.Loc on table
6883 var S.Frill doll
6884 var S.Herald medium shield
6885 var S.Herald.Loc on rack
6886 var S.Gift doll
6887 var S.Gift.Loc
6888 var S.Toy marionette
6889 var S.Toy.Loc on lion
6890 var S.Memory wrap
6891 var S.Memory.Num
6892 var S.Token token
6893 var S.Barber ivory razor
6894 var S.Tanner potion
6895 var S.Surv hip pouch
6896 var S.Surv.Loc
6897 var S.Surv.Alt thigh quiver
6898 var S.Surv2 chunenguti
6899 var S.Surv2.Loc on stand
6900 var S.Surv2.Alt longbow
6901 var S.Spire tabard
6902 # HIB AND RAVEN'S POINT
6903 var skillrange 500-599
6904 var SC.Weap adze
6905 var H.Shield oval shield
6906 var H.Jewel necklace
6907 var H.Tog robe
6908 var H.Herb lujeakave elixir
6909 var H.Sund envelope
6910 var H.Lamp dragon lamp
6911 var H.Music bagpipe
6912 var H.Alch bucket
6913 var H.Forge zinc bar
6914 var H.Forge.Loc on tab
6915 var RP.Gen hammer
6916 var RP.Tobac <nothing>
6917 # RATHA
6918 var skillrange 500-599
6919 var R.Bait <nothing>
6920 var R.Gen quiver
6921 var R.Herb bucket
6922 var R.Forge handaxe
6923 var R.Tailor tartan skirt
6924 var R.Leather boots
6925 var R.Hair razor
6926 var R.Music repair kit
6927 var R.Magic potion
6928 var R.Origami case
6929 var R.Origami.LOC
6930 var R.Jewelry pectoral
6931 var R.Cleric mobar blood
6932 var R.Cleric2 crystal vial
6933 var R.Ring <nothing>
6934 # AESRY SURLAENIS'A
6935 var skillrange 500-599
6936 var A.Herb bucket
6937 var A.Tanner potion
6938 var A.Clothing robe
6939 var A.Script parchment
6940 var A.Cleric thumb ring
6941 var A.Origami case
6942 var A.Jewelry pilonu
6943 var A.Magic marble
6944 var A.Slings crossbow
6945 var A.Puzzle box
6946 var A.Footwear harness
6947 var A.Shields oval shield
6948 var A.Weapon kasai
6949 var A.Armor coif
6950 var A.Gen lantern
6951 var A.Flower pillow
6952 var A.Music drum
6953 gosub ITEM.COUNT3
6954 RETURN
6955##################################
6956# SKILLS 600-699
6957##################################
6958CLASS11:
6959 ## THEREN
6960 var skillrange 600-699
6961 var T.Tarsha brocade bilaud
6962 var T.Rose woolen cloak
6963 var T.Music ebony harp
6964 var T.Music.Num
6965 var T.Hats head-dress
6966 var T.Arm leather sheath
6967 var T.Gift pyramid
6968 var T.Sweet cake
6969 var T.Cupcake cupcake
6970 var T.Gen towel
6971 var T.Krrish bones
6972 var T.Lense telescope
6973 var T.Cleric mobar blood
6974 var T.Men vest
6975 var T.Women dark veil
6976 var T.Cloth cane
6977 var T.Armory longsword
6978 var T.Forge hilt
6979 ## HAVEN
6980 var skillrange 600-699
6981 var RH.Herb ithor potion
6982 var RH.Iron ring mail
6983 var RH.Naph naphtha
6984 var RH.Naph.Loc on cart
6985 var RH.Flow velvet rose
6986 var RH.Seli skull helm
6987 var RH.Arms longsword
6988 var RH.Gen stove
6989 var RH.Cloth gown
6990 var RH.Artif potion
6991 var RH.Joy troll
6992 var RH.Smoke baron tobacco
6993 var RH.Weap goat-head mace
6994 var RH.Bard silk trews
6995 var RH.Bard2 spirit earrings
6996 var RH.Cleric pomander
6997 var RH.Cleric2 wood shaper
6998 var RH.Lock slim lockpick
6999 var RH.Tog gown
7000 var RH.Tog2 leggings
7001 var RH.Mirg belt
7002 # ARTHE DALE
7003 var skillrange 600-699
7004 var AD.Smoke whiskey cigar
7005 var AD.Thread thief pattern
7006 var AD.Fash overall
7007 var AD.Odds monocle
7008 var AD.Bard peri'el's song
7009 var AD.Map map
7010 var AD.Arm leather coat
7011 var AD.Feta biscuit
7012 var AD.FETA.Loc
7013 var AD.Tart.E tart
7014 var AD.Tart.C tart
7015 var AD.Tart.M tart
7016 var AD.Tart.L tart
7017 var AD.Tart.F tart
7018 var KA.Grek barrel
7019 # CROSSINGS
7020 var skillrange 600-699
7021 var C.Alch bucket
7022 var C.Arm chain shirt
7023 var C.Artif urn
7024 var C.Bath towel
7025 var C.Bath.Num fourth
7026 var C.Bath.Loc on rack
7027 var C.Card case
7028 var C.Gen portable stove
7029 var C.Weap greataxe
7030 var C.Music case of silver
7031 var C.Music2 tapani
7032 var C.Lock lockpick ring
7033 var C.Empath leather boots
7034 var C.Empath.Alt targe
7035 var C.Empath2 silver chart
7036 var C.Empath3 band
7037 var C.Empath3.Loc
7038 var C.Empath3.Alt medallion
7039 var C.Cler silver bell
7040 var C.Cler2 armband
7041 var C.Haber tail coat
7042 var C.Script satchel
7043 var C.Script.Num first
7044 var C.Tann potion
7045 var C.Tann.Loc in catalog
7046 var C.Jewel diamond wedding ring
7047 var C.Stitch long coat
7048 var C.Cobb hip boots
7049 var C.Herb ithor potion
7050 var C.Flow velvet rose
7051 # LETH DERIEL
7052 var skillrange 600-699
7053 var L.Skin blood wolf pelt
7054 var L.Bow heavy crossbow
7055 var L.Orig origami case
7056 var L.Orig.Num fifth
7057 var L.Weap hide shield
7058 var L.Wick willow backpack
7059 var L.Bard silverwood mirliton
7060 var L.Bard2 hat
7061 var L.Cloth silk jaque
7062 var L.Wood caravan
7063 var L.Gen mesh backpack
7064 var L.Gen.Alt ankle sheath
7065 var L.Perf venom oil
7066 # SHARD
7067 var skillrange 600-699
7068 var S.Gen great helm
7069 var S.Weap cutlass
7070 var S.Cleric mobar blood
7071 var S.Stitch gown
7072 var S.Alch stove
7073 var S.Herb ithor potion
7074 var S.Artif cambrinth ring
7075 var S.Music case of gold
7076 var S.Armor great helm
7077 var S.Reed skirt
7078 var S.Reed.Num fourth
7079 var S.Museum plate
7080 var S.Bow light crossbow
7081 var S.Lock diamondique lockpick
7082 var S.Coin coin case
7083 var S.Coin.Loc on table
7084 var S.Frill doll
7085 var S.Herald medium buckler
7086 var S.Herald.Loc on rack
7087 var S.Gift earring
7088 var S.Gift.Loc
7089 var S.Toy marionette
7090 var S.Toy.Loc on lion
7091 var S.Memory wrap
7092 var S.Memory.Num
7093 var S.Token token
7094 var S.Barber silver razor
7095 var S.Tanner potion
7096 var S.Surv cap
7097 var S.Surv.Loc
7098 var S.Surv.Alt thigh quiver
7099 var S.Surv2 longbow
7100 var S.Surv2.Loc on stand
7101 var S.Surv2.Alt chunenguti
7102 var S.Spire tabard
7103 # HIB AND RAVEN'S POINT
7104 var skillrange 600-699
7105 var SC.Weap adze
7106 var H.Shield oval shield
7107 var H.Jewel necklace
7108 var H.Tog robe
7109 var H.Herb lujeakave elixir
7110 var H.Sund envelope
7111 var H.Lamp dragon lamp
7112 var H.Music bagpipe
7113 var H.Alch bucket
7114 var H.Forge zinc bar
7115 var H.Forge.Loc on tab
7116 var RP.Gen hammer
7117 var RP.Tobac tobacco pouch
7118 # RATHA
7119 var skillrange 600-699
7120 var R.Bait <nothing>
7121 var R.Gen quiver
7122 var R.Herb bucket
7123 var R.Forge handaxe
7124 var R.Tailor tartan skirt
7125 var R.Leather boots
7126 var R.Hair razor
7127 var R.Music repair kit
7128 var R.Magic potion
7129 var R.Origami case
7130 var R.Origami.LOC
7131 var R.Jewelry pectoral
7132 var R.Cleric mobar blood
7133 var R.Cleric2 crystal vial
7134 var R.Ring <nothing>
7135 # AESRY SURLAENIS'A
7136 var skillrange 600-699
7137 var A.Herb bucket
7138 var A.Tanner potion
7139 var A.Clothing robe
7140 var A.Script parchment
7141 var A.Cleric thumb ring
7142 var A.Origami case
7143 var A.Jewelry pilonu
7144 var A.Magic marble
7145 var A.Slings crossbow
7146 var A.Puzzle box
7147 var A.Footwear harness
7148 var A.Shields oval shield
7149 var A.Weapon kasai
7150 var A.Armor coif
7151 var A.Gen lantern
7152 var A.Flower flask
7153 var A.Music drum
7154 gosub ITEM.COUNT4
7155 RETURN
7156##################################
7157# SKILLS 700-799
7158##################################
7159CLASS12:
7160 # THEREN
7161 var skillrange 700-799
7162 var T.Tarsha brocade bilaud
7163 var T.Rose woolen cloak
7164 var T.Music ebony harp
7165 var T.Music.Num
7166 var T.Hats head-dress
7167 var T.Arm leather sheath
7168 var T.Gift pyramid
7169 var T.Sweet cake
7170 var T.Cupcake cupcake
7171 var T.Gen towel
7172 var T.Krrish bones
7173 var T.Lense telescope
7174 var T.Cleric mobar blood
7175 var T.Men vest
7176 var T.Women dark veil
7177 var T.Cloth cane
7178 var T.Armory longsword
7179 var T.Forge hilt
7180 # HAVEN
7181 var skillrange 700-799
7182 var RH.Herb ithor potion
7183 var RH.Iron chain shirt
7184 var RH.Naph naphtha
7185 var RH.Naph.Loc on cart
7186 var RH.Flow velvet rose
7187 var RH.Seli skull helm
7188 var RH.Arms spear
7189 var RH.Gen stove
7190 var RH.Cloth gown
7191 var RH.Artif cambrinth orb
7192 var RH.Joy troll
7193 var RH.Smoke barons choice
7194 var RH.Weap mattock
7195 var RH.Bard mantle
7196 var RH.Bard2 spirit earrings
7197 var RH.Cleric pomander
7198 var RH.Cleric2 cambrinth ring
7199 var RH.Lock slim lockpick
7200 var RH.Tog gown
7201 var RH.Tog2 thumb ring
7202 var RH.Mirg chain anklet
7203 var RH.Lock slim lockpick
7204 # ARTHE DALE
7205 var skillrange 700-799
7206 var AD.Smoke whiskey cigar
7207 var AD.Thread thief pattern
7208 var AD.Fash overall
7209 var AD.Odds ribbon
7210 var AD.Bard peri'el's song
7211 var AD.Map map
7212 var AD.Arm ring mail
7213 var AD.Feta biscuit
7214 var AD.FETA.Loc
7215 var AD.Tart.E tart
7216 var AD.Tart.C tart
7217 var AD.Tart.M tart
7218 var AD.Tart.L tart
7219 var AD.Tart.F tart
7220 var KA.Grek barrel
7221 # CROSSINGS
7222 var skillrange 700-799
7223 var C.Alch bucket
7224 var C.Arm scale shirt
7225 var C.Artif urn
7226 var C.Bath towel
7227 var C.Bath.Num second
7228 var C.Bath.Loc on rack
7229 var C.Card case
7230 var C.Gen portable stove
7231 var C.Weap greataxe
7232 var C.Music case of silver
7233 var C.Music2 tapani
7234 var C.Lock lockpick ring
7235 var C.Empath silk shirt
7236 var C.Empath.Alt broadsword
7237 var C.Empath2 silver chart
7238 var C.Empath3 band
7239 var C.Empath3.Loc
7240 var C.Empath3.Alt medallion
7241 var C.Cler silver bell
7242 var C.Cler2 armband
7243 var C.Haber tail coat
7244 var C.Script satchel
7245 var C.Script.Num first
7246 var C.Tann potion
7247 var C.Tann.Loc in catalog
7248 var C.Jewel diamond wedding ring
7249 var C.Stitch long coat
7250 var C.Cobb hip boots
7251 var C.Herb ithor potion
7252 var C.Flow velvet rose
7253 # LETH DERIEL
7254 var skillrange 700-799
7255 var L.Skin blood wolf pelt
7256 var L.Bow heavy crossbow
7257 var L.Orig.Num fifth
7258 var L.Orig case
7259 var L.Weap hide shield
7260 var L.Wick willow backpack
7261 var L.Bard silverwood mirliton
7262 var L.Bard2 hat
7263 var L.Cloth silk jaque
7264 var L.Wood caravan
7265 var L.Gen mesh backpack
7266 var L.Gen.Alt ankle sheath
7267 var L.Perf venom oil
7268 # SHARD
7269 var skillrange 700-799
7270 var S.Gen leather armor
7271 var S.Weap blade
7272 var S.Cleric mobar blood
7273 var S.Stitch gown
7274 var S.Alch bucket
7275 var S.Herb ithor potion
7276 var S.Artif celestite runestone
7277 var S.Music case
7278 var S.Armor great helm
7279 var S.Reed skirt
7280 var S.Reed.Num fourth
7281 var S.Museum plate
7282 var S.Bow silverwillow crossbow
7283 var S.Lock diamondique lockpick
7284 var S.Coin coin case
7285 var S.Coin.Loc on table
7286 var S.Frill doll
7287 var S.Herald oval shield
7288 var S.Herald.Loc on rack
7289 var S.Gift doll
7290 var S.Gift.Loc
7291 var S.Toy marionette
7292 var S.Toy.Loc on lion
7293 var S.Memory wrap
7294 var S.Memory.Num
7295 var S.Token token
7296 var S.Barber silver razor
7297 var S.Tanner pelt potion
7298 var S.Surv cap
7299 var S.Surv.Loc
7300 var S.Surv.Alt cowl
7301 var S.Surv2 chunenguti
7302 var S.Surv2.Loc on stand
7303 var S.Surv2.Alt longbow
7304 var S.Spire armband
7305 # HIB AND RAVEN'S POINT
7306 var skillrange 700-799
7307 var SC.Weap adze
7308 var H.Shield kwarf
7309 var H.Jewel necklace
7310 var H.Tog robe
7311 var H.Herb lujeakave elixir
7312 var H.Sund envelope
7313 var H.Lamp dragon lamp
7314 var H.Music bagpipe
7315 var H.Alch bucket
7316 var H.Forge zinc bar
7317 var H.Forge.Loc on tab
7318 var RP.Gen hammer
7319 var RP.Tobac tobacco pouch
7320 # RATHA
7321 var skillrange 700-799
7322 var R.Bait <nothing>
7323 var R.Gen broadsword
7324 var R.Herb bucket
7325 var R.Forge jambaya
7326 var R.Tailor tartan skirt
7327 var R.Leather zombie mask
7328 var R.Hair razor
7329 var R.Music cittern
7330 var R.Magic charm
7331 var R.Origami case
7332 var R.Origami.LOC
7333 var R.Jewelry pectoral
7334 var R.Cleric mobar blood
7335 var R.Cleric2 crystal vial
7336 var R.Ring ironwood ring
7337 # AESRY SURLAENIS'A
7338 var skillrange 700-799
7339 var A.Herb bucket
7340 var A.Tanner potion
7341 var A.Clothing robe
7342 var A.Script parchment
7343 var A.Cleric chalice
7344 var A.Origami case
7345 var A.Jewelry pilonu
7346 var A.Magic marble
7347 var A.Slings crossbow
7348 var A.Puzzle box
7349 var A.Footwear thigh-boots
7350 var A.Shields oval shield
7351 var A.Weapon kasai
7352 var A.Armor coif
7353 var A.Gen lantern
7354 var A.Flower vial
7355 var A.Music drum
7356 gosub ITEM.COUNT4
7357 RETURN
7358##################################
7359# SKILLS 800-899
7360##################################
7361CLASS13:
7362 # THEREN
7363 var skillrange 800-899
7364 var T.Tarsha brocade bilaud
7365 var T.Rose woolen cloak
7366 var T.Music ebony harp
7367 var T.Music.Num
7368 var T.Hats head-dress
7369 var T.Arm chain handguards
7370 var T.Gift pyramid
7371 var T.Gen towel
7372 var T.Sweet cake
7373 var T.Cupcake cupcake
7374 var T.Krrish bowl
7375 var T.Lense telescope
7376 var T.Cleric mobar blood
7377 var T.Men vest
7378 var T.Women dark veil
7379 var T.Cloth cane
7380 var T.Armory longsword
7381 var T.Forge hilt
7382 # HAVEN
7383 var skillrange 800-899
7384 var RH.Herb ithor potion
7385 var RH.Iron chain shirt
7386 var RH.Naph naphtha
7387 var RH.Naph.Loc on cart
7388 var RH.Flow velvet rose
7389 var RH.Seli sheepskin robe
7390 var RH.Arms spear
7391 var RH.Gen portable stove
7392 var RH.Cloth gown
7393 var RH.Artif cambrinth orb
7394 var RH.Joy troll
7395 var RH.Smoke barons choice
7396 var RH.Weap mattock
7397 var RH.Bard mantle
7398 var RH.Bard2 spirit tailband
7399 var RH.Cleric pomander
7400 var RH.Cleric2 cambrinth ring
7401 var RH.Tog gown
7402 var RH.Tog2 thumb ring
7403 var RH.Mirg chain anklet
7404 var RH.Lock slim lockpick
7405 # ARTHE DALE
7406 var skillrange 800-899
7407 var AD.Smoke whiskey cigar
7408 var AD.Thread thief pattern
7409 var AD.Fash overall
7410 var AD.Odds ribbon
7411 var AD.Bard peri'el's song
7412 var AD.Map map
7413 var AD.Arm ring mail
7414 var AD.Feta biscuit
7415 var AD.FETA.Loc
7416 var AD.Tart.E tart
7417 var AD.Tart.C tart
7418 var AD.Tart.M tart
7419 var AD.Tart.L tart
7420 var AD.Tart.F tart
7421 var KA.Grek barrel
7422 # CROSSINGS
7423 var skillrange 800-899
7424 var C.Alch bucket
7425 var C.Arm scale shirt
7426 var C.Artif urn
7427 var C.Bath towel
7428 var C.Bath.Num second
7429 var C.Bath.Loc on rack
7430 var C.Card case
7431 var C.Gen portable stove
7432 var C.Weap greathammer
7433 var C.Music case of silver
7434 var C.Music2 tapani
7435 var C.Lock lockpick ring
7436 var C.Empath silk shirt
7437 var C.Empath.Alt broadsword
7438 var C.Empath2 silver chart
7439 var C.Empath3 cebi root
7440 var C.Empath3.Loc
7441 var C.Empath3.Alt medallion
7442 var C.Cler silver bell
7443 var C.Cler2 armband
7444 var C.Haber tail coat
7445 var C.Script satchel
7446 var C.Script.Num fourth
7447 var C.Tann potion
7448 var C.Tann.Loc in catalog
7449 var C.Jewel diamond wedding ring
7450 var C.Stitch long coat
7451 var C.Cobb hip boots
7452 var C.Herb ithor potion
7453 var C.Flow velvet rose
7454 # LETH DERIEL
7455 var skillrange 800-899
7456 var L.Skin blood wolf pelt
7457 var L.Bow heavy crossbow
7458 var L.Orig.Num fifth
7459 var L.Orig case
7460 var L.Weap takouba
7461 var L.Wick willow backpack
7462 var L.Bard silverwood mirliton
7463 var L.Bard2 hat
7464 var L.Cloth silk jaque
7465 var L.Wood caravan
7466 var L.Gen mesh backpack
7467 var L.Gen.Alt ankle sheath
7468 var L.Perf venom oil
7469 # SHARD
7470 var skillrange 800-899
7471 var S.Gen leather armor
7472 var S.Weap blade
7473 var S.Cleric mobar blood
7474 var S.Stitch gown
7475 var S.Alch bucket
7476 var S.Herb ithor potion
7477 var S.Artif celestite runestone
7478 var S.Music case
7479 var S.Armor great helm
7480 var S.Reed skirt
7481 var S.Reed.Num fourth
7482 var S.Museum globe
7483 var S.Bow silverwillow crossbow
7484 var S.Lock diamondique lockpick
7485 var S.Coin coin case
7486 var S.Coin.Loc on table
7487 var S.Frill doll
7488 var S.Herald oval shield
7489 var S.Herald.Loc on rack
7490 var S.Gift doll
7491 var S.Gift.Loc
7492 var S.Toy doll
7493 var S.Toy.Loc
7494 var S.Memory wrap
7495 var S.Memory.Num
7496 var S.Token token
7497 var S.Barber silver razor
7498 var S.Tanner pelt potion
7499 var S.Surv cap
7500 var S.Surv.Loc
7501 var S.Surv.Alt cowl
7502 var S.Surv2 chunenguti
7503 var S.Surv2.Loc on stand
7504 var S.Surv2.Alt longbow
7505 var S.Spire armband
7506 # HIB AND RAVEN'S POINT
7507 var skillrange 800-899
7508 var SC.Weap adze
7509 var H.Shield kwarf
7510 var H.Jewel necklace
7511 var H.Tog robe
7512 var H.Herb lujeakave elixir
7513 var H.Sund broadsword
7514 var H.Lamp dragon lamp
7515 var H.Music bagpipe
7516 var H.Alch bucket
7517 var H.Forge zinc bar
7518 var H.Forge.Loc on tab
7519 var RP.Gen hammer
7520 var RP.Tobac tobacco pouch
7521 # RATHA
7522 var skillrange 800-899
7523 var R.Bait <nothing>
7524 var R.Gen broadsword
7525 var R.Herb bucket
7526 var R.Forge jambaya
7527 var R.Tailor tartan skirt
7528 var R.Leather zombie mask
7529 var R.Hair razor
7530 var R.Music cittern
7531 var R.Magic charm
7532 var R.Origami case
7533 var R.Origami.LOC
7534 var R.Jewelry pectoral
7535 var R.Cleric mobar blood
7536 var R.Cleric2 prayer beads
7537 var R.Ring ironwood ring
7538 # AESRY SURLAENIS'A
7539 var skillrange 800-899
7540 var A.Herb bucket
7541 var A.Tanner potion
7542 var A.Clothing robe
7543 var A.Script parchment
7544 var A.Cleric chalice
7545 var A.Origami case
7546 var A.Jewelry pilonu
7547 var A.Magic marble
7548 var A.Slings crossbow
7549 var A.Puzzle box
7550 var A.Footwear thigh-boots
7551 var A.Shields oval shield
7552 var A.Weapon kasai
7553 var A.Armor coif
7554 var A.Gen lantern
7555 var A.Flower vial
7556 var A.Music drum
7557 gosub ITEM.COUNT5
7558 RETURN
7559##################################
7560# SKILLS 900-999
7561##################################
7562CLASS14:
7563 # THEREN
7564 var skillrange 900-999
7565 var T.Tarsha brocade bilaud
7566 var T.Rose woolen cloak
7567 var T.Music ebony harp
7568 var T.Music.Num
7569 var T.Hats head-dress
7570 var T.Arm chain handguards
7571 var T.Gift pyramid
7572 var T.Gen towel
7573 var T.Sweet cake
7574 var T.Cupcake cupcake
7575 var T.Krrish bowl
7576 var T.Lense telescope
7577 var T.Cleric mobar blood
7578 var T.Men tunic
7579 var T.Women dark veil
7580 var T.Cloth gold cufflinks
7581 var T.Armory pick
7582 var T.Forge hilt
7583 # HAVEN
7584 var skillrange 900-999
7585 var RH.Herb ithor potion
7586 var RH.Iron chain shirt
7587 var RH.Naph naphtha
7588 var RH.Naph.Loc on cart
7589 var RH.Flow velvet rose
7590 var RH.Seli sheepskin robe
7591 var RH.Arms flamberge
7592 var RH.Gen portable stove
7593 var RH.Cloth gown
7594 var RH.Artif cambrinth orb
7595 var RH.Joy troll
7596 var RH.Smoke barons choice
7597 var RH.Weap lucerne hammer
7598 var RH.Bard mantle
7599 var RH.Bard2 spirit tailband
7600 var RH.Cleric pomander
7601 var RH.Cleric2 cambrinth ring
7602 var RH.Tog gown
7603 var RH.Tog2 thumb ring
7604 var RH.Mirg chainmail belt
7605 var RH.Lock slim lockpick
7606 # ARTHE DALE
7607 var skillrange 900-999
7608 var AD.Smoke whiskey cigar
7609 var AD.Thread thief pattern
7610 var AD.Fash overall
7611 var AD.Odds ribbon
7612 var AD.Bard peri'el's song
7613 var AD.Map map
7614 var AD.Arm ring mail
7615 var AD.Feta biscuit
7616 var AD.FETA.Loc
7617 var AD.Tart.E tart
7618 var AD.Tart.C tart
7619 var AD.Tart.M tart
7620 var AD.Tart.L tart
7621 var AD.Tart.F tart
7622 var KA.Grek barrel
7623 # CROSSINGS
7624 var skillrange 900-999
7625 var C.Alch bucket
7626 var C.Arm plate fauld
7627 var C.Artif urn
7628 var C.Bath towel
7629 var C.Bath.Num second
7630 var C.Bath.Loc on rack
7631 var C.Card case
7632 var C.Gen portable stove
7633 var C.Weap greathammer
7634 var C.Music case of silver
7635 var C.Music2 tapani
7636 var C.Lock lockpick ring
7637 var C.Empath silk shirt
7638 var C.Empath.Alt broadsword
7639 var C.Empath2 rock chart
7640 var C.Empath3 cebi root
7641 var C.Empath3.Loc
7642 var C.Empath3.Alt medallion
7643 var C.Cler silver bell
7644 var C.Cler2 armband
7645 var C.Haber tail coat
7646 var C.Script satchel
7647 var C.Script.Num third
7648 var C.Tann potion
7649 var C.Tann.Loc in catalog
7650 var C.Jewel diamond wedding ring
7651 var C.Stitch long coat
7652 var C.Cobb hip boots
7653 var C.Herb ithor potion
7654 var C.Flow velvet rose
7655 # LETH DERIEL
7656 var skillrange 900-999
7657 var L.Skin blood wolf pelt
7658 var L.Bow heavy crossbow
7659 var L.Orig origami case
7660 var L.Orig.Num fifth
7661 var L.Weap takouba
7662 var L.Wick willow backpack
7663 var L.Bard silverwood mirliton
7664 var L.Bard2 hat
7665 var L.Cloth silk jaque
7666 var L.Wood caravan
7667 var L.Gen mesh backpack
7668 var L.Gen.Alt ankle sheath
7669 var L.Perf venom oil
7670 # SHARD
7671 var skillrange 900-999
7672 var S.Gen leather armor
7673 var S.Weap blade
7674 var S.Cleric mobar blood
7675 var S.Stitch gown
7676 var S.Alch bucket
7677 var S.Herb ithor potion
7678 var S.Artif celestite runestone
7679 var S.Music case
7680 var S.Armor great helm
7681 var S.Reed skirt
7682 var S.Reed.Num fourth
7683 var S.Museum globe
7684 var S.Bow silverwillow crossbow
7685 var S.Lock diamondique lockpick
7686 var S.Coin coin case
7687 var S.Coin.Loc on table
7688 var S.Frill doll
7689 var S.Herald oval shield
7690 var S.Herald.Loc on rack
7691 var S.Gift doll
7692 var S.Gift.Loc
7693 var S.Toy museum globe
7694 var S.Toy.Loc on lion
7695 var S.Memory wrap
7696 var S.Memory.Num
7697 var S.Token token
7698 var S.Barber silver razor
7699 var S.Tanner pelt potion
7700 var S.Surv mining cap
7701 var S.Surv.Loc
7702 var S.Surv.Alt mining helm
7703 var S.Surv2 chunenguti
7704 var S.Surv2.Loc on stand
7705 var S.Surv2.Alt longbow
7706 var S.Spire armband
7707 # HIB AND RAVEN'S POINT
7708 var skillrange 900-999
7709 var SC.Weap adze
7710 var H.Shield kwarf
7711 var H.Jewel necklace
7712 var H.Tog robe
7713 var H.Herb lujeakave elixir
7714 var H.Sund broadsword
7715 var H.Lamp dragon lamp
7716 var H.Music bagpipe
7717 var H.Alch bucket
7718 var H.Forge zinc bar
7719 var H.Forge.Loc on tab
7720 var RP.Gen hammer
7721 var RP.Tobac tobacco pouch
7722 # RATHA
7723 var skillrange 900-999
7724 var R.Bait <nothing>
7725 var R.Gen broadsword
7726 var R.Herb bucket
7727 var R.Forge jambaya
7728 var R.Tailor tartan skirt
7729 var R.Leather zombie mask
7730 var R.Hair razor
7731 var R.Music cittern
7732 var R.Magic charm
7733 var R.Origami case
7734 var R.Origami.LOC
7735 var R.Jewelry pectoral
7736 var R.Cleric mobar blood
7737 var R.Cleric2 prayer beads
7738 var R.Ring garnet ring
7739 # AESRY SURLAENIS'A
7740 var skillrange 900-999
7741 var A.Herb bucket
7742 var A.Tanner potion
7743 var A.Clothing robe
7744 var A.Script parchment
7745 var A.Cleric chalice
7746 var A.Origami case
7747 var A.Jewelry pilonu
7748 var A.Magic marble
7749 var A.Slings crossbow
7750 var A.Puzzle box
7751 var A.Footwear thigh-boots
7752 var A.Shields oval shield
7753 var A.Weapon kasai
7754 var A.Armor coif
7755 var A.Gen lantern
7756 var A.Flower vial
7757 var A.Music drum
7758 gosub ITEM.COUNT5
7759 RETURN
7760##################################
7761# SKILLS 1000-1200
7762##################################
7763CLASS15:
7764CLASS16:
7765CLASS17:
7766 var skillrange 1000-1200+
7767 var T.Tarsha brocade bilaud
7768 var T.Rose woolen cloak
7769 var T.Music bagpipe
7770 var T.Music.Num third
7771 var T.Hats head-dress
7772 var T.Arm chain handguards
7773 var T.Gift pyramid
7774 var T.Gen towel
7775 var T.Sweet cake
7776 var T.Cupcake cupcake
7777 var T.Krrish bowl
7778 var T.Lense telescope
7779 var T.Cleric mobar blood
7780 var T.Men tunic
7781 var T.Women dark veil
7782 var T.Cloth cane
7783 var T.Armory longsword
7784 var T.Forge hilt
7785 var skillrange 1000-1200
7786 var RH.Herb ithor potion
7787 var RH.Iron chain shirt
7788 var RH.Naph naphtha
7789 var RH.Naph.Loc on cart
7790 var RH.Flow velvet rose
7791 var RH.Seli sheepskin robe
7792 var RH.Arms flamberge
7793 var RH.Gen portable stove
7794 var RH.Cloth gown
7795 var RH.Artif cambrinth orb
7796 var RH.Joy troll
7797 var RH.Smoke barons choice
7798 var RH.Weap lucerne hammer
7799 var RH.Bard silk mantle
7800 var RH.Bard2 knot tailband
7801 var RH.Cleric pomander
7802 var RH.Cleric2 cambrinth ring
7803 var RH.Tog diadem
7804 var RH.Tog2 slippers
7805 var RH.Mirg charm
7806 var RH.Lock slim lockpick
7807 # ARTHE DALE
7808 var skillrange 1000-1200+
7809 var AD.Smoke whiskey cigar
7810 var AD.Thread thief pattern
7811 var AD.Fash overall
7812 var AD.Odds scarf
7813 var AD.Bard peri'el's song
7814 var AD.Map map
7815 var AD.Arm ring mail
7816 var AD.Feta biscuit
7817 var AD.FETA.Loc
7818 var AD.Tart.E tart
7819 var AD.Tart.C tart
7820 var AD.Tart.M tart
7821 var AD.Tart.L tart
7822 var AD.Tart.F tart
7823 var KA.Grek barrel
7824 # CROSSINGS
7825 var skillrange 1000-1200+
7826 var C.Alch bucket
7827 var C.Arm plate fauld
7828 var C.Artif bottle
7829 var C.Bath towel
7830 var C.Bath.Num second
7831 var C.Bath.Loc on rack
7832 var C.Card case
7833 var C.Gen portable stove
7834 var C.Weap parry stick
7835 var C.Music case of silver
7836 var C.Music2 tapani
7837 var C.Lock lockpick ring
7838 var C.Empath silk shirt
7839 var C.Empath.Alt broadsword
7840 var C.Empath2 rock chart
7841 var C.Empath3 cebi root
7842 var C.Empath3.Loc
7843 var C.Empath3.Alt medallion
7844 var C.Cler silver bell
7845 var C.Cler2 armband
7846 var C.Haber tail coat
7847 var C.Script satchel
7848 var C.Script.Num third
7849 var C.Tann potion
7850 var C.Tann.Loc in catalog
7851 var C.Jewel diamond wedding ring
7852 var C.Stitch long coat
7853 var C.Cobb hip boots
7854 var C.Herb ithor potion
7855 var C.Flow velvet rose
7856 # LETH DERIEL
7857 var skillrange 1000-1200+
7858 var L.Skin blood wolf pelt
7859 var L.Bow heavy crossbow
7860 var L.Orig.Num fifth
7861 var L.Orig case
7862 var L.Weap takouba
7863 var L.Wick willow backpack
7864 var L.Bard silverwood mirliton
7865 var L.Bard2 leather songbook
7866 var L.Cloth silk jaque
7867 var L.Wood caravan
7868 var L.Gen mesh tunic
7869 var L.Gen.Alt mesh backpack
7870 var L.Perf venom oil
7871 # SHARD
7872 var skillrange 1000-1200
7873 var S.Gen leather armor
7874 var S.Weap blade
7875 var S.Cleric mobar blood
7876 var S.Stitch gown
7877 var S.Alch bucket
7878 var S.Herb ithor potion
7879 var S.Artif celestite runestone
7880 var S.Music case
7881 var S.Armor great helm
7882 var S.Reed skirt
7883 var S.Reed.Num
7884 var S.Museum globe
7885 var S.Bow ironwood crossbow
7886 var S.Lock diamondique lockpick
7887 var S.Coin coin case
7888 var S.Coin.Loc on table
7889 var S.Frill doll
7890 var S.Herald oval shield
7891 var S.Herald.Loc on rack
7892 var S.Gift doll
7893 var S.Gift.Loc
7894 var S.Toy marionette
7895 var S.Toy.Loc on lion
7896 var S.Memory wrap
7897 var S.Memory.Num
7898 var S.Token token
7899 var S.Barber silver razor
7900 var S.Barber.Num
7901 var S.Tanner potion
7902 var S.Surv cap
7903 var S.Surv.Loc
7904 var S.Surv.Alt cowl
7905 var S.Surv2 chunenguti
7906 var S.Surv2.Loc on stand
7907 var S.Surv2.Alt longbow
7908 var S.Spire armband
7909 # HIB AND RAVEN'S POINT
7910 var skillrange 1000-1200+
7911 var SC.Weap adze
7912 var H.Shield curved shield
7913 var H.Jewel necklace
7914 var H.Tog robe
7915 var H.Herb lujeakave elixir
7916 var H.Sund broadsword
7917 var H.Lamp dragon lamp
7918 var H.Music bagpipe
7919 var H.Alch bucket
7920 var H.Forge zinc bar
7921 var H.Forge.Loc on tab
7922 var RP.Gen hammer
7923 var RP.Tobac tobacco pouch
7924 # RATHA
7925 var skillrange 1000-1200+
7926 var R.Bait <nothing>
7927 var R.Gen broadsword
7928 var R.Herb bucket
7929 var R.Forge jambaya
7930 var R.Tailor tartan skirt
7931 var R.Leather zombie mask
7932 var R.Hair razor
7933 var R.Music cittern
7934 var R.Magic charm
7935 var R.Origami case
7936 var R.Origami.LOC
7937 var R.Jewelry pectoral
7938 var R.Cleric mobar blood
7939 var R.Cleric2 gold vial
7940 var R.Ring garnet ring
7941 # AESRY SURLAENIS'A
7942 var skillrange 1000-1200+
7943 var A.Herb bucket
7944 var A.Tanner potion
7945 var A.Clothing robe
7946 var A.Script parchment
7947 var A.Cleric chalice
7948 var A.Origami case
7949 var A.Jewelry pilonu
7950 var A.Magic marble
7951 var A.Slings crossbow
7952 var A.Puzzle box
7953 var A.Footwear thigh-boots
7954 var A.Shields oval shield
7955 var A.Weapon kasai
7956 var A.Armor coif
7957 var A.Gen lantern
7958 var A.Flower vial
7959 var A.Music drum
7960 gosub ITEM.COUNT5
7961 RETURN
7962###############################################
7963###############################################
7964# ITEM QUANTITY
7965###############################################
7966###############################################
7967########################
7968# 20-49
7969########################
7970ITEM.COUNT0:
7971 var T.TarshaQuant 1
7972 var T.RoseQuant 1
7973 var T.MusicQuant 1
7974 var T.HatsQuant 1
7975 var T.ArmQuant 1
7976 var T.GiftQuant 1
7977 var T.SweetQuant 1
7978 var T.CupcakeQuant 1
7979 var T.GenQuant 1
7980 var T.KrrishQuant 1
7981 var T.LenseQuant 1
7982 var T.ClericQuant 1
7983 var T.MenQuant 1
7984 var T.WomenQuant 1
7985 var T.ClothQuant 1
7986 var T.ArmoryQuant 1
7987 var T.ForgeQuant 1
7988
7989 var RH.HerbQuant 1
7990 var RH.IronQuant 1
7991 var RH.NaphQuant 1
7992 var RH.FlowQuant 3
7993 var RH.SeliQuant 1
7994 var RH.ArmsQuant 1
7995 var RH.GenQuant 1
7996 var RH.ClothQuant 1
7997 var RH.ArtifQuant 1
7998 var RH.JoyQuant 2
7999 var RH.SmokeQuant 1
8000 var RH.WeapQuant 1
8001 var RH.BardQuant 1
8002 var RH.Bard2Quant 1
8003 var RH.ClericQuant 1
8004 var RH.Cleric2Quant 1
8005 var RH.LockQuant 1
8006 var RH.TogQuant 1
8007 var RH.Tog2Quant 1
8008 var RH.MirgQuant 1
8009
8010 var AD.FetaQuant 1
8011 var AD.ThreadQuant 1
8012 var AD.FashQuant 1
8013 var AD.OddsQuant 1
8014 var AD.BardQuant 1
8015 var AD.MapQuant 1
8016 var AD.ArmQuant 1
8017 var AD.SmokeQuant 1
8018 var AD.Tart.EQuant 1
8019 var AD.Tart.CQuant 1
8020 var AD.Tart.MQuant 1
8021 var AD.Tart.LQuant 1
8022 var AD.Tart.FQuant 1
8023 var KA.GrekQuant 1
8024
8025 var C.AlchQuant 5
8026 var C.ArtifQuant 1
8027 var C.BathQuant 1
8028 var C.CardQuant 1
8029 var C.GenQuant 4
8030 var C.WeapQuant 1
8031 var C.ArmQuant 1
8032 var C.MusicQuant 1
8033 var C.Music2Quant 1
8034 var C.LockQuant 1
8035 var C.EmpathQuant 1
8036 var C.Empath2Quant 1
8037 var C.Empath3Quant 1
8038 var C.ClerQuant 1
8039 var C.HaberQuant 1
8040 var C.ScriptQuant 1
8041 var C.TannQuant 1
8042 var C.JewelQuant 1
8043 var C.StitchQuant 1
8044 var C.CobbQuant 1
8045 var C.HerbQuant 1
8046 var C.FlowQuant 3
8047
8048 var L.SkinQuant 1
8049 var L.BowQuant 1
8050 var L.OrigQuant 1
8051 var L.WeapQuant 1
8052 var L.WickQuant 1
8053 var L.BardQuant 1
8054 var L.Bard2Quant 1
8055 var L.ClothQuant 1
8056 var L.WoodQuant 1
8057 var L.GenQuant 1
8058 var L.PerfQuant 1
8059
8060 var S.GenQuant 1
8061 var S.WeapQuant 1
8062 var S.ClericQuant 1
8063 var S.StitchQuant 1
8064 var S.AlchQuant 1
8065 var S.HerbQuant 1
8066 var S.ArtifQuant 1
8067 var S.MusicQuant 1
8068 var S.ArmorQuant 1
8069 var S.ReedQuant 1
8070 var S.MuseumQuant 1
8071 var S.BowQuant 1
8072 var S.SpireQuant 1
8073 var S.LockQuant 1
8074 var S.CoinQuant 1
8075 var S.FrillQuant 1
8076 var S.HeraldQuant 1
8077 var S.GiftQuant 1
8078 var S.ToyQuant 1
8079 var S.MemoryQuant 1
8080 var S.TokenQuant 1
8081 var S.BarberQuant 1
8082 var S.TannerQuant 1
8083 var S.SurvQuant 1
8084 var S.Surv2Quant 1
8085 var RP.GenQuant 1
8086 var RP.TobacQuant 1
8087
8088 var SC.WeapQuant 1
8089 var H.ShieldQuant 1
8090 var H.JewelQuant 1
8091 var H.TogQuant 1
8092 var H.HerbQuant 1
8093 var H.SundQuant 1
8094 var H.LampQuant 1
8095 var H.MusicQuant 1
8096 var H.AlchQuant 1
8097 var H.ForgeQuant 1
8098 var H.GenQuant 1
8099 var H.TobacQuant 1
8100
8101 var R.BaitQuant 2
8102 var R.GenQuant 3
8103 var R.HerbQuant 5
8104 var R.ForgeQuant 1
8105 var R.TailorQuant 1
8106 var R.LeatherQuant 1
8107 var R.HairQuant 1
8108 var R.MusicQuant 1
8109 var R.MagicQuant 1
8110 var R.OrigamiQuant 1
8111 var R.JewelryQuant 1
8112 var R.ClericQuant 1
8113 var R.RingQuant 1
8114
8115 var A.HerbQuant 5
8116 var A.TannerQuant 1
8117 var A.ClothingQuant 1
8118 var A.ScriptQuant 1
8119 var A.ClericQuant 1
8120 var A.OrigamiQuant 1
8121 var A.JewelryQuant 1
8122 var A.MagicQuant 1
8123 var A.SlingsQuant 1
8124 var A.PuzzleQuant 1
8125 var A.FootwearQuant 1
8126 var A.ShieldsQuant 1
8127 var A.WeaponQuant 1
8128 var A.ArmorQuant 1
8129 var A.GenQuant 3
8130 var A.FlowerQuant 1
8131 var A.MusicQuant 1
8132 RETURN
8133########################
8134# 50-99
8135########################
8136ITEM.COUNT1:
8137 var T.TarshaQuant 1
8138 var T.RoseQuant 1
8139 var T.MusicQuant 1
8140 var T.HatsQuant 1
8141 var T.ArmQuant 1
8142 var T.GiftQuant 1
8143 var T.SweetQuant 2
8144 var T.CupcakeQuant 2
8145 var T.GenQuant 2
8146 var T.KrrishQuant 1
8147 var T.LenseQuant 1
8148 var T.ClericQuant 1
8149 var T.MenQuant 1
8150 var T.WomenQuant 1
8151 var T.ClothQuant 1
8152 var T.ArmoryQuant 1
8153 var T.ForgeQuant 1
8154
8155 var RH.HerbQuant 2
8156 var RH.IronQuant 1
8157 var RH.NaphQuant 1
8158 var RH.FlowQuant 3
8159 var RH.SeliQuant 1
8160 var RH.ArmsQuant 2
8161 var RH.GenQuant 2
8162 var RH.ClothQuant 2
8163 var RH.ArtifQuant 1
8164 var RH.JoyQuant 2
8165 var RH.SmokeQuant 2
8166 var RH.WeapQuant 1
8167 var RH.BardQuant 1
8168 var RH.Bard2Quant 1
8169 var RH.ClericQuant 2
8170 var RH.Cleric2Quant 1
8171 var RH.LockQuant 1
8172 var RH.TogQuant 1
8173 var RH.Tog2Quant 1
8174 var RH.MirgQuant 1
8175
8176 var AD.FetaQuant 2
8177 var AD.ThreadQuant 2
8178 var AD.FashQuant 2
8179 var AD.OddsQuant 2
8180 var AD.BardQuant 1
8181 var AD.MapQuant 1
8182 var AD.ArmQuant 1
8183 var AD.SmokeQuant 2
8184 var AD.Tart.EQuant 1
8185 var AD.Tart.CQuant 2
8186 var AD.Tart.MQuant 2
8187 var AD.Tart.LQuant 2
8188 var AD.Tart.FQuant 1
8189 var KA.GrekQuant 1
8190
8191 var C.AlchQuant 4
8192 var C.ArtifQuant 2
8193 var C.BathQuant 2
8194 var C.CardQuant 2
8195 var C.GenQuant 2
8196 var C.WeapQuant 2
8197 var C.ArmQuant 2
8198 var C.MusicQuant 2
8199 var C.Music2Quant 1
8200 var C.LockQuant 2
8201 var C.EmpathQuant 2
8202 var C.Empath2Quant 1
8203 var C.Empath3Quant 1
8204 var C.ClerQuant 2
8205 var C.HaberQuant 2
8206 var C.ScriptQuant 2
8207 var C.TannQuant 2
8208 var C.JewelQuant 2
8209 var C.StitchQuant 2
8210 var C.CobbQuant 2
8211 var C.HerbQuant 2
8212 var C.FlowQuant 2
8213
8214 var L.SkinQuant 2
8215 var L.BowQuant 2
8216 var L.OrigQuant 2
8217 var L.WeapQuant 2
8218 var L.WickQuant 2
8219 var L.BardQuant 2
8220 var L.Bard2Quant 2
8221 var L.ClothQuant 2
8222 var L.WoodQuant 2
8223 var L.GenQuant 2
8224 var L.PerfQuant 2
8225
8226 var S.GenQuant 2
8227 var S.WeapQuant 2
8228 var S.ClericQuant 2
8229 var S.StitchQuant 2
8230 var S.AlchQuant 2
8231 var S.HerbQuant 2
8232 var S.ArtifQuant 2
8233 var S.MusicQuant 2
8234 var S.ArmorQuant 2
8235 var S.ReedQuant 2
8236 var S.MuseumQuant 2
8237 var S.BowQuant 2
8238 var S.LockQuant 2
8239 var S.CoinQuant 2
8240 var S.FrillQuant 2
8241 var S.HeraldQuant 2
8242 var S.SpireQuant 1
8243 var S.GiftQuant 2
8244 var S.ToyQuant 2
8245 var S.MemoryQuant 2
8246 var S.TokenQuant 2
8247 var S.BarberQuant 2
8248 var S.TannerQuant 2
8249 var S.SurvQuant 2
8250 var S.Surv2Quant 2
8251 var RP.GenQuant 1
8252 var RP.TobacQuant 1
8253
8254 var SC.WeapQuant 2
8255 var H.ShieldQuant 2
8256 var H.JewelQuant 2
8257 var H.TogQuant 2
8258 var H.HerbQuant 2
8259 var H.SundQuant 2
8260 var H.LampQuant 2
8261 var H.MusicQuant 2
8262 var H.AlchQuant 2
8263 var H.ForgeQuant 2
8264 var H.GenQuant 2
8265 var H.TobacQuant 2
8266
8267 var R.BaitQuant 3
8268 var R.GenQuant 3
8269 var R.HerbQuant 2
8270 var R.ForgeQuant 1
8271 var R.TailorQuant 2
8272 var R.LeatherQuant 2
8273 var R.HairQuant 2
8274 var R.MusicQuant 2
8275 var R.MagicQuant 1
8276 var R.OrigamiQuant 2
8277 var R.JewelryQuant 1
8278 var R.ClericQuant 2
8279 var R.RingQuant 1
8280
8281 var A.HerbQuant 2
8282 var A.TannerQuant 2
8283 var A.ClothingQuant 2
8284 var A.ScriptQuant 2
8285 var A.ClericQuant 2
8286 var A.OrigamiQuant 2
8287 var A.JewelryQuant 2
8288 var A.MagicQuant 2
8289 var A.SlingsQuant 2
8290 var A.PuzzleQuant 2
8291 var A.FootwearQuant 2
8292 var A.ShieldsQuant 2
8293 var A.WeaponQuant 2
8294 var A.ArmorQuant 2
8295 var A.GenQuant 2
8296 var A.FlowerQuant 3
8297 var A.MusicQuant 2
8298 RETURN
8299########################
8300# 100-299
8301########################
8302ITEM.COUNT2:
8303 var T.TarshaQuant 2
8304 var T.RoseQuant 2
8305 var T.MusicQuant 2
8306 var T.HatsQuant 2
8307 var T.ArmQuant 2
8308 var T.GiftQuant 2
8309 var T.SweetQuant 2
8310 var T.CupcakeQuant 2
8311 var T.GenQuant 2
8312 var T.KrrishQuant 2
8313 var T.LenseQuant 2
8314 var T.ClericQuant 2
8315 var T.MenQuant 2
8316 var T.WomenQuant 2
8317 var T.ClothQuant 2
8318 var T.ArmoryQuant 2
8319 var T.ForgeQuant 2
8320
8321 var RH.HerbQuant 3
8322 var RH.IronQuant 2
8323 var RH.NaphQuant 2
8324 var RH.FlowQuant 3
8325 var RH.SeliQuant 2
8326 var RH.ArmsQuant 2
8327 var RH.GenQuant 2
8328 var RH.ClothQuant 2
8329 var RH.ArtifQuant 2
8330 var RH.JoyQuant 2
8331 var RH.SmokeQuant 2
8332 var RH.WeapQuant 2
8333 var RH.BardQuant 2
8334 var RH.Bard2Quant 2
8335 var RH.ClericQuant 2
8336 var RH.Cleric2Quant 2
8337 var RH.LockQuant 2
8338 var RH.TogQuant 2
8339 var RH.Tog2Quant 2
8340 var RH.MirgQuant 2
8341
8342 var AD.FetaQuant 3
8343 var AD.ThreadQuant 3
8344 var AD.FashQuant 2
8345 var AD.OddsQuant 2
8346 var AD.BardQuant 3
8347 var AD.MapQuant 2
8348 var AD.ArmQuant 2
8349 var AD.SmokeQuant 2
8350 var AD.Tart.EQuant 2
8351 var AD.Tart.CQuant 2
8352 var AD.Tart.MQuant 3
8353 var AD.Tart.LQuant 2
8354 var AD.Tart.FQuant 3
8355 var KA.GrekQuant 2
8356
8357 var C.AlchQuant 4
8358 var C.ArtifQuant 2
8359 var C.BathQuant 3
8360 var C.CardQuant 2
8361 var C.GenQuant 4
8362 var C.WeapQuant 3
8363 var C.ArmQuant 3
8364 var C.MusicQuant 3
8365 var C.Music2Quant 2
8366 var C.LockQuant 3
8367 var C.EmpathQuant 2
8368 var C.Empath2Quant 2
8369 var C.Empath3Quant 2
8370 var C.ClerQuant 3
8371 var C.HaberQuant 4
8372 var C.ScriptQuant 2
8373 var C.TannQuant 3
8374 var C.JewelQuant 3
8375 var C.StitchQuant 3
8376 var C.CobbQuant 3
8377 var C.HerbQuant 3
8378 var C.FlowQuant 3
8379
8380 var L.SkinQuant 2
8381 var L.BowQuant 2
8382 var L.OrigQuant 2
8383 var L.WeapQuant 2
8384 var L.WickQuant 2
8385 var L.BardQuant 2
8386 var L.Bard2Quant 2
8387 var L.ClothQuant 2
8388 var L.WoodQuant 2
8389 var L.GenQuant 2
8390 var L.PerfQuant 2
8391
8392 var S.GenQuant 3
8393 var S.WeapQuant 2
8394 var S.ClericQuant 3
8395 var S.StitchQuant 3
8396 var S.AlchQuant 2
8397 var S.HerbQuant 1
8398 var S.ArtifQuant 1
8399 var S.MusicQuant 2
8400 var S.ArmorQuant 2
8401 var S.ReedQuant 2
8402 var S.MuseumQuant 1
8403 var S.BowQuant 2
8404 var S.LockQuant 2
8405 var S.CoinQuant 1
8406 var S.SpireQuant 2
8407 var S.FrillQuant 2
8408 var S.HeraldQuant 2
8409 var S.GiftQuant 1
8410 var S.ToyQuant 2
8411 var S.MemoryQuant 2
8412 var S.TokenQuant 2
8413 var S.BarberQuant 1
8414 var S.TannerQuant 2
8415 var S.SurvQuant 2
8416 var S.Surv2Quant 2
8417 var RP.GenQuant 2
8418 var RP.TobacQuant 1
8419
8420 var SC.WeapQuant 2
8421 var H.ShieldQuant 2
8422 var H.JewelQuant 2
8423 var H.TogQuant 1
8424 var H.HerbQuant 2
8425 var H.SundQuant 2
8426 var H.LampQuant 1
8427 var H.MusicQuant 2
8428 var H.AlchQuant 2
8429 var H.ForgeQuant 1
8430 var H.GenQuant 2
8431 var H.TobacQuant 2
8432
8433 var R.BaitQuant 4
8434 var R.GenQuant 4
8435 var R.HerbQuant 2
8436 var R.ForgeQuant 2
8437 var R.TailorQuant 3
8438 var R.LeatherQuant 3
8439 var R.HairQuant 3
8440 var R.MusicQuant 3
8441 var R.MagicQuant 2
8442 var R.OrigamiQuant 3
8443 var R.JewelryQuant 2
8444 var R.ClericQuant 2
8445 var R.RingQuant 1
8446
8447 var A.HerbQuant 2
8448 var A.TannerQuant 2
8449 var A.ClothingQuant 2
8450 var A.ScriptQuant 2
8451 var A.ClericQuant 2
8452 var A.OrigamiQuant 2
8453 var A.JewelryQuant 2
8454 var A.MagicQuant 2
8455 var A.SlingsQuant 2
8456 var A.PuzzleQuant 2
8457 var A.FootwearQuant 2
8458 var A.ShieldsQuant 1
8459 var A.WeaponQuant 2
8460 var A.ArmorQuant 2
8461 var A.GenQuant 2
8462 var A.FlowerQuant 3
8463 var A.MusicQuant 2
8464 RETURN
8465########################
8466# 300-599
8467########################
8468ITEM.COUNT3:
8469 var T.TarshaQuant 2
8470 var T.RoseQuant 2
8471 var T.MusicQuant 2
8472 var T.HatsQuant 2
8473 var T.ArmQuant 2
8474 var T.GiftQuant 2
8475 var T.SweetQuant 2
8476 var T.CupcakeQuant 2
8477 var T.GenQuant 2
8478 var T.KrrishQuant 2
8479 var T.LenseQuant 2
8480 var T.ClericQuant 2
8481 var T.MenQuant 2
8482 var T.WomenQuant 2
8483 var T.ClothQuant 2
8484 var T.ArmoryQuant 2
8485 var T.ForgeQuant 2
8486
8487 var RH.HerbQuant 3
8488 var RH.IronQuant 3
8489 var RH.NaphQuant 3
8490 var RH.FlowQuant 3
8491 var RH.SeliQuant 3
8492 var RH.ArmsQuant 3
8493 var RH.GenQuant 3
8494 var RH.ClothQuant 3
8495 var RH.ArtifQuant 3
8496 var RH.JoyQuant 3
8497 var RH.SmokeQuant 3
8498 var RH.WeapQuant 3
8499 var RH.BardQuant 3
8500 var RH.Bard2Quant 3
8501 var RH.ClericQuant 3
8502 var RH.Cleric2Quant 3
8503 var RH.LockQuant 3
8504 var RH.TogQuant 3
8505 var RH.Tog2Quant 3
8506 var RH.MirgQuant 3
8507
8508 var AD.FetaQuant 4
8509 var AD.ThreadQuant 4
8510 var AD.FashQuant 4
8511 var AD.OddsQuant 2
8512 var AD.BardQuant 4
8513 var AD.MapQuant 3
8514 var AD.ArmQuant 3
8515 var AD.SmokeQuant 3
8516 var AD.Tart.EQuant 4
8517 var AD.Tart.CQuant 4
8518 var AD.Tart.MQuant 3
8519 var AD.Tart.LQuant 4
8520 var AD.Tart.FQuant 3
8521 var KA.GrekQuant 3
8522
8523 var C.AlchQuant 4
8524 var C.ArtifQuant 2
8525 var C.BathQuant 3
8526 var C.CardQuant 3
8527 var C.GenQuant 4
8528 var C.WeapQuant 4
8529 var C.ArmQuant 3
8530 var C.MusicQuant 4
8531 var C.Music2Quant 2
8532 var C.LockQuant 3
8533 var C.EmpathQuant 3
8534 var C.Empath2Quant 2
8535 var C.Empath3Quant 2
8536 var C.ClerQuant 4
8537 var C.HaberQuant 3
8538 var C.ScriptQuant 3
8539 var C.TannQuant 4
8540 var C.JewelQuant 3
8541 var C.StitchQuant 3
8542 var C.CobbQuant 3
8543 var C.HerbQuant 3
8544 var C.FlowQuant 4
8545
8546 var L.SkinQuant 4
8547 var L.BowQuant 3
8548 var L.OrigQuant 3
8549 var L.WeapQuant 3
8550 var L.WickQuant 4
8551 var L.BardQuant 3
8552 var L.Bard2Quant 2
8553 var L.ClothQuant 3
8554 var L.WoodQuant 3
8555 var L.GenQuant 4
8556 var L.PerfQuant 3
8557
8558 var S.GenQuant 4
8559 var S.WeapQuant 3
8560 var S.ClericQuant 4
8561 var S.StitchQuant 3
8562 var S.AlchQuant 4
8563 var S.HerbQuant 3
8564 var S.ArtifQuant 2
8565 var S.MusicQuant 4
8566 var S.ArmorQuant 3
8567 var S.ReedQuant 3
8568 var S.MuseumQuant 3
8569 var S.BowQuant 4
8570 var S.SpireQuant 2
8571 var S.LockQuant 4
8572 var S.CoinQuant 3
8573 var S.FrillQuant 3
8574 var S.HeraldQuant 3
8575 var S.GiftQuant 3
8576 var S.ToyQuant 3
8577 var S.MemoryQuant 2
8578 var S.TokenQuant 3
8579 var S.BarberQuant 3
8580 var S.TannerQuant 2
8581 var S.SurvQuant 3
8582 var S.Surv2Quant 2
8583 var RP.GenQuant 2
8584 var RP.TobacQuant 2
8585
8586 var SC.WeapQuant 2
8587 var H.ShieldQuant 2
8588 var H.JewelQuant 3
8589 var H.TogQuant 3
8590 var H.HerbQuant 4
8591 var H.SundQuant 3
8592 var H.LampQuant 3
8593 var H.MusicQuant 3
8594 var H.AlchQuant 3
8595 var H.ForgeQuant 3
8596 var H.GenQuant 4
8597 var H.TobacQuant 3
8598
8599 var R.BaitQuant 4
8600 var R.GenQuant 3
8601 var R.HerbQuant 3
8602 var R.ForgeQuant 2
8603 var R.TailorQuant 3
8604 var R.LeatherQuant 3
8605 var R.HairQuant 3
8606 var R.MusicQuant 3
8607 var R.MagicQuant 2
8608 var R.OrigamiQuant 3
8609 var R.JewelryQuant 3
8610 var R.ClericQuant 3
8611 var R.RingQuant 2
8612
8613 var A.HerbQuant 4
8614 var A.TannerQuant 3
8615 var A.ClothingQuant 4
8616 var A.ScriptQuant 3
8617 var A.ClericQuant 3
8618 var A.OrigamiQuant 3
8619 var A.JewelryQuant 3
8620 var A.MagicQuant 2
8621 var A.SlingsQuant 3
8622 var A.PuzzleQuant 3
8623 var A.FootwearQuant 3
8624 var A.ShieldsQuant 3
8625 var A.WeaponQuant 3
8626 var A.ArmorQuant 3
8627 var A.GenQuant 3
8628 var A.FlowerQuant 3
8629 var A.MusicQuant 3
8630 RETURN
8631########################
8632# 600-799
8633########################
8634ITEM.COUNT4:
8635 var T.TarshaQuant 3
8636 var T.RoseQuant 2
8637 var T.MusicQuant 3
8638 var T.HatsQuant 3
8639 var T.ArmQuant 3
8640 var T.GiftQuant 3
8641 var T.SweetQuant 2
8642 var T.CupcakeQuant 2
8643 var T.GenQuant 3
8644 var T.KrrishQuant 3
8645 var T.LenseQuant 3
8646 var T.ClericQuant 3
8647 var T.MenQuant 3
8648 var T.WomenQuant 3
8649 var T.ClothQuant 3
8650 var T.ArmoryQuant 3
8651 var T.ForgeQuant 3
8652
8653 var RH.HerbQuant 4
8654 var RH.IronQuant 3
8655 var RH.NaphQuant 3
8656 var RH.FlowQuant 3
8657 var RH.SeliQuant 3
8658 var RH.ArmsQuant 4
8659 var RH.GenQuant 3
8660 var RH.ClothQuant 4
8661 var RH.ArtifQuant 3
8662 var RH.JoyQuant 3
8663 var RH.SmokeQuant 3
8664 var RH.WeapQuant 3
8665 var RH.BardQuant 4
8666 var RH.Bard2Quant 2
8667 var RH.ClericQuant 4
8668 var RH.Cleric2Quant 2
8669 var RH.LockQuant 3
8670 var RH.TogQuant 3
8671 var RH.Tog2Quant 2
8672 var RH.MirgQuant 2
8673
8674 var AD.FetaQuant 3
8675 var AD.ThreadQuant 4
8676 var AD.FashQuant 3
8677 var AD.OddsQuant 3
8678 var AD.BardQuant 3
8679 var AD.MapQuant 3
8680 var AD.ArmQuant 3
8681 var AD.SmokeQuant 3
8682 var AD.Tart.EQuant 3
8683 var AD.Tart.CQuant 3
8684 var AD.Tart.MQuant 3
8685 var AD.Tart.LQuant 3
8686 var AD.Tart.FQuant 3
8687 var KA.GrekQuant 3
8688
8689 var C.AlchQuant 4
8690 var C.ArtifQuant 2
8691 var C.BathQuant 4
8692 var C.CardQuant 3
8693 var C.GenQuant 4
8694 var C.WeapQuant 3
8695 var C.ArmQuant 3
8696 var C.MusicQuant 3
8697 var C.Music2Quant 2
8698 var C.LockQuant 3
8699 var C.EmpathQuant 3
8700 var C.Empath2Quant 2
8701 var C.Empath3Quant 2
8702 var C.ClerQuant 3
8703 var C.HaberQuant 4
8704 var C.ScriptQuant 3
8705 var C.TannQuant 3
8706 var C.JewelQuant 3
8707 var C.StitchQuant 4
8708 var C.CobbQuant 3
8709 var C.HerbQuant 3
8710 var C.FlowQuant 3
8711
8712 var L.SkinQuant 4
8713 var L.BowQuant 3
8714 var L.OrigQuant 3
8715 var L.WeapQuant 3
8716 var L.WickQuant 3
8717 var L.BardQuant 3
8718 var L.Bard2Quant 3
8719 var L.ClothQuant 3
8720 var L.WoodQuant 3
8721 var L.GenQuant 3
8722 var L.PerfQuant 4
8723
8724 var S.GenQuant 3
8725 var S.WeapQuant 3
8726 var S.ClericQuant 4
8727 var S.StitchQuant 4
8728 var S.AlchQuant 3
8729 var S.HerbQuant 4
8730 var S.ArtifQuant 3
8731 var S.MusicQuant 3
8732 var S.ArmorQuant 3
8733 var S.ReedQuant 3
8734 var S.MuseumQuant 2
8735 var S.BowQuant 3
8736 var S.SpireQuant 3
8737 var S.LockQuant 3
8738 var S.CoinQuant 3
8739 var S.FrillQuant 3
8740 var S.HeraldQuant 2
8741 var S.GiftQuant 3
8742 var S.ToyQuant 3
8743 var S.MemoryQuant 3
8744 var S.TokenQuant 2
8745 var S.BarberQuant 3
8746 var S.TannerQuant 3
8747 var S.SurvQuant 3
8748 var S.Surv2Quant 3
8749 var RP.GenQuant 4
8750 var RP.TobacQuant 4
8751
8752 var SC.WeapQuant 2
8753 var H.ShieldQuant 2
8754 var H.JewelQuant 2
8755 var H.TogQuant 2
8756 var H.HerbQuant 2
8757 var H.SundQuant 2
8758 var H.LampQuant 2
8759 var H.MusicQuant 2
8760 var H.AlchQuant 2
8761 var H.ForgeQuant 2
8762 var H.GenQuant 2
8763 var H.TobacQuant 2
8764
8765 var R.BaitQuant 4
8766 var R.GenQuant 4
8767 var R.HerbQuant 4
8768 var R.ForgeQuant 4
8769 var R.TailorQuant 3
8770 var R.LeatherQuant 3
8771 var R.HairQuant 4
8772 var R.MusicQuant 4
8773 var R.MagicQuant 3
8774 var R.OrigamiQuant 3
8775 var R.JewelryQuant 3
8776 var R.ClericQuant 3
8777 var R.RingQuant 2
8778
8779 var A.HerbQuant 4
8780 var A.TannerQuant 4
8781 var A.ClothingQuant 4
8782 var A.ScriptQuant 3
8783 var A.ClericQuant 4
8784 var A.OrigamiQuant 4
8785 var A.JewelryQuant 3
8786 var A.MagicQuant 3
8787 var A.SlingsQuant 3
8788 var A.PuzzleQuant 3
8789 var A.FootwearQuant 4
8790 var A.ShieldsQuant 3
8791 var A.WeaponQuant 3
8792 var A.ArmorQuant 3
8793 var A.GenQuant 4
8794 var A.FlowerQuant 4
8795 var A.MusicQuant 4
8796 RETURN
8797########################
8798# 800-1400
8799########################
8800ITEM.COUNT5:
8801 var T.TarshaQuant 4
8802 var T.RoseQuant 4
8803 var T.MusicQuant 4
8804 var T.HatsQuant 3
8805 var T.ArmQuant 3
8806 var T.GiftQuant 3
8807 var T.SweetQuant 3
8808 var T.CupcakeQuant 3
8809 var T.GenQuant 3
8810 var T.KrrishQuant 3
8811 var T.LenseQuant 3
8812 var T.ClericQuant 3
8813 var T.MenQuant 3
8814 var T.WomenQuant 3
8815 var T.ClothQuant 3
8816 var T.ArmoryQuant 3
8817 var T.ForgeQuant 3
8818
8819 var RH.HerbQuant 4
8820 var RH.IronQuant 3
8821 var RH.NaphQuant 4
8822 var RH.FlowQuant 4
8823 var RH.SeliQuant 4
8824 var RH.ArmsQuant 4
8825 var RH.GenQuant 4
8826 var RH.ClothQuant 3
8827 var RH.ArtifQuant 3
8828 var RH.JoyQuant 4
8829 var RH.SmokeQuant 4
8830 var RH.WeapQuant 4
8831 var RH.BardQuant 4
8832 var RH.Bard2Quant 4
8833 var RH.ClericQuant 4
8834 var RH.Cleric2Quant 3
8835 var RH.LockQuant 4
8836 var RH.TogQuant 3
8837 var RH.Tog3Quant 3
8838 var RH.MirgQuant 3
8839
8840 var AD.FetaQuant 4
8841 var AD.ThreadQuant 4
8842 var AD.FashQuant 4
8843 var AD.OddsQuant 4
8844 var AD.BardQuant 4
8845 var AD.MapQuant 4
8846 var AD.ArmQuant 4
8847 var AD.SmokeQuant 4
8848 var AD.Tart.EQuant 4
8849 var AD.Tart.CQuant 4
8850 var AD.Tart.MQuant 4
8851 var AD.Tart.LQuant 4
8852 var AD.Tart.FQuant 4
8853 var KA.GrekQuant 4
8854
8855 var C.AlchQuant 4
8856 var C.ArtifQuant 4
8857 var C.BathQuant 4
8858 var C.CardQuant 4
8859 var C.GenQuant 4
8860 var C.WeapQuant 4
8861 var C.ArmQuant 4
8862 var C.MusicQuant 4
8863 var C.Music2Quant 4
8864 var C.LockQuant 4
8865 var C.EmpathQuant 4
8866 var C.Empath2Quant 4
8867 var C.Empath3Quant 4
8868 var C.ClerQuant 4
8869 var C.HaberQuant 4
8870 var C.ScriptQuant 4
8871 var C.TannQuant 4
8872 var C.JewelQuant 4
8873 var C.StitchQuant 4
8874 var C.CobbQuant 4
8875 var C.HerbQuant 4
8876 var C.FlowQuant 4
8877
8878 var L.SkinQuant 4
8879 var L.BowQuant 4
8880 var L.OrigQuant 4
8881 var L.WeapQuant 4
8882 var L.WickQuant 4
8883 var L.BardQuant 4
8884 var L.Bard2Quant 4
8885 var L.ClothQuant 4
8886 var L.WoodQuant 4
8887 var L.GenQuant 4
8888 var L.PerfQuant 4
8889
8890 var S.GenQuant 4
8891 var S.WeapQuant 4
8892 var S.ClericQuant 4
8893 var S.StitchQuant 4
8894 var S.AlchQuant 4
8895 var S.HerbQuant 4
8896 var S.ArtifQuant 4
8897 var S.MusicQuant 4
8898 var S.ArmorQuant 4
8899 var S.ReedQuant 4
8900 var S.MuseumQuant 4
8901 var S.BowQuant 4
8902 var S.LockQuant 4
8903 var S.SpireQuant 4
8904 var S.CoinQuant 4
8905 var S.FrillQuant 4
8906 var S.HeraldQuant 4
8907 var S.GiftQuant 4
8908 var S.ToyQuant 4
8909 var S.MemoryQuant 4
8910 var S.TokenQuant 4
8911 var S.BarberQuant 4
8912 var S.TannerQuant 4
8913 var S.SurvQuant 4
8914 var S.Surv2Quant 4
8915 var RP.GenQuant 4
8916 var RP.TobacQuant 4
8917
8918 var SC.WeapQuant 4
8919 var H.ShieldQuant 4
8920 var H.JewelQuant 4
8921 var H.TogQuant 4
8922 var H.HerbQuant 4
8923 var H.SundQuant 4
8924 var H.LampQuant 4
8925 var H.MusicQuant 4
8926 var H.AlchQuant 4
8927 var H.ForgeQuant 4
8928 var H.GenQuant 4
8929 var H.TobacQuant 4
8930
8931 var R.BaitQuant 4
8932 var R.GenQuant 4
8933 var R.HerbQuant 4
8934 var R.ForgeQuant 4
8935 var R.TailorQuant 4
8936 var R.LeatherQuant 4
8937 var R.HairQuant 4
8938 var R.MusicQuant 4
8939 var R.MagicQuant 4
8940 var R.OrigamiQuant 4
8941 var R.JewelryQuant 4
8942 var R.ClericQuant 4
8943 var R.RingQuant 2
8944
8945 var A.HerbQuant 4
8946 var A.TannerQuant 4
8947 var A.ClothingQuant 4
8948 var A.ScriptQuant 4
8949 var A.ClericQuant 4
8950 var A.OrigamiQuant 4
8951 var A.JewelryQuant 4
8952 var A.MagicQuant 4
8953 var A.SlingsQuant 4
8954 var A.PuzzleQuant 4
8955 var A.FootwearQuant 4
8956 var A.ShieldsQuant 4
8957 var A.WeaponQuant 4
8958 var A.ArmorQuant 4
8959 var A.GenQuant 4
8960 var A.FlowerQuant 4
8961 var A.MusicQuant 4
8962 RETURN
8963##############################
8964# WARNINGS
8965##############################
8966WELCOME:
8967 echo ************************************************************
8968 echo * Welcome $charactername - Circle %circle %guild !~
8969 echo * To Shroom's Ultimate Genie3 Mainland Stealing Script!
8970 echo * Completely automated Progressive Stealing!
8971 echo * Send bug reports/feedback to skultamaphon@gmail.com
8972 echo ************************************************************
8973 pause
8974 echo ************************************************************
8975 echo *** MAKE SURE YOU HAVE PLENTY OF PLATS IN THE BANK
8976 echo *** IN THE CITIES YOU ARE STEALING IN TO PAY YOUR FINES!
8977 echo ************************************************************
8978 pause 2
8979 RETURN
8980TOO.HURT:
8981 echo
8982 echo **************************************************************************************************
8983 echo * YOU ARE TOO INJURED TO STEAL SHIT!
8984 echo * GO GET HEALED FIRST YOU NUB!
8985 echo ***************************************************************************************************
8986 put #parse DONE STEALING
8987 exit
8988BAG.ALERT:
8989 echo
8990 echo **************************************************************************************************
8991 echo * ERROR!!!
8992 echo * You cannot set BIN_CONTAINER and PAWN_CONTAINER as the same container!!
8993 echo * If you are binning AND pawning.. You MUST set them to different containers!
8994 echo * THIEVES - If you are binning and pawning, you MUST have THREE different containers (bin/pawn/safe).
8995 echo * If you want to use only two containers and have bin/pawn as the same container, set PAWN to OFF
8996 echo * It is NOT recommended to turn BIN OFF, as over time this will kill your THIEF REP
8997 echo ***************************************************************************************************
8998 exit
8999THEREN.NOSTEAL:
9000 echo ***************************************************************************************************
9001 echo **** Sorry! Theren is too hard for noobs.
9002 echo **** Come back when you have a little more Thievery skill (~100+)
9003 echo **** It is recommended to start in either Crossings or Riverhaven as a noob
9004 echo ***************************************************************************************************
9005 pause 10
9006 gosub AUTOMOVE portal
9007 send .%TRAVEL_SCRIPT haven
9008 waitforre ^YOU HAVE ARRIVED
9009 goto HAVEN.STEAL
9010 put #parse DONE STEALING
9011 exit
9012TOO.MANY.FINES:
9013 put #echo >Log Red **** TOO MANY FINES IN %CITY !! RESET YOUR HEAT!!!
9014 echo
9015 echo ****************************** WARNING !!!! ************************************************************************************************************
9016 echo **** YOU HAVE TOO MANY OUTSTANDING FINES TO STEAL FROM THIS PROVINCE!
9017 echo **** YOU ARE AT HIGH RISK OF BEING THUGGED! GO TO JAIL NOW!!!
9018 echo **** YOU MUST GO SURRENDER TO A TOWN GUARD AND GO TO JAIL IMMEDIATELY TO RESET YOUR 'HEAT'!
9019 echo **** LAY LOW FOR A FEW DAYS OR STEAL FROM A DIFFERENT PROVINCE TO LET YOUR HEAT "COOL DOWN"
9020 echo ********************************************************************************************************************************************************
9021 pause 5
9022 echo **********************************************************************************************************************************************************
9023 echo **** DO NOT PASS GO! GO DIRECTLY TO JAIL AND LAY LOW IN THIS TOWN FOR A FEW DAYS TO RESET YOUR HEAT!!
9024 echo *** If you are getting caught too often (on the same items),
9025 echo *** email me your thievery ranks and log of your items you are getting caught on
9026 echo *** skultamaphon@gmail.com - shroomismschism @ AIM
9027 echo **********************************************************************************************************************************************************
9028 pause 5
9029 gosub AUTOMOVE guard
9030 pause 2
9031 send surrender guard
9032 pause
9033 send surrender sent
9034 send surrender ward
9035 pause 0.5
9036 put #parse DONE STEALING
9037 exit
9038NO.FUNDS:
9039 put #echo >Log Red **** Warning: Out of funds in %CITY !!
9040 put #echo >Log Red **** Get some money from another town and pay your fine and get your stuff!!
9041 echo
9042 echo *************************************************************************************************************************************
9043 echo * WARNING! YOU DON'T HAVE ENOUGH MONEY TO PAY THIS FINE!
9044 echo * GO GET SOME FUNDS FROM ANOTHER BANK AND PAY YOUR FINE AND GET YOUR STUFF!
9045 echo * IT IS RECOMMENDED TO KEEP PLENTY OF PLATS IN THE BANK FOR THOSE THIEVERY CHARGES
9046 echo * THEY CAN REALLY RACK UP ESPECIALLY IF YOU DO NOT REGULARLY CLEAR YOUR HEAT!
9047 echo *************************************************************************************************************************************
9048 put #parse DONE STEALING
9049 exit
9050NO.PASSWORD:
9051 echo
9052 echo ***********************************************************************************************************
9053 echo * YOU DIDN'T SET YOUR THIEF GUILD PASSWORDS!
9054 echo * SET VARIABLES HAVEN_PW and SHARD_PW TO ~YOUR~ PASSWORDS
9055 echo ***********************************************************************************************************
9056 exit
9057NOOB:
9058 echo
9059 echo ***********************************************************************************************************
9060 echo * You are too Noob to steal from shops!!!
9061 echo * Hit the beggar or get some classes / steal some water until you get at least 20 ranks.
9062 echo ***********************************************************************************************************
9063 echo
9064 put #parse DONE STEALING
9065 exit
9066ARMOR.WARN:
9067 echo *************************************************************************************
9068 echo ** WARNING: Script could not find all your armor
9069 echo ** Remove any remaining armor and type "GO" to continue
9070 echo *************************************************************************************
9071 matchre RETURN GO|go
9072 matchwait
9073HELP:
9074 echo # - USAGE - Simply start script with .steal
9075 echo # - For Troubleshooting/testing - .steal <label to skip to> <type anything to SKIP BAG CHECK>
9076 echo # - For example - .steal CROSS.TO.CARD YES will skip directly to CROSS.TO.CARD label and skip the bag check and turn on debug mode
9077 echo # - This is for testing/troubleshooting purposes only, usually after already starting stealing script and you want to restart it halfway through.
9078 echo # - Skips the bag check so it doesn't put already stolen items in your safe container
9079 echo # - This is assuming you already went through the beginning bag check - USE AT YOUR OWN RISK!
9080 exit
9081
9082
9083### DEFAULT VARIABLES
9084DefaultVariables:
9085 var runTime 0
9086 var Banked 0
9087 var Profit 0
9088 var Plat 0
9089 var Gold 0
9090 var Silver 0
9091 var Bronze 0-
9092 var Copper 0
9093 var Plats 0
9094 var Golds 0
9095 var Silvers 0
9096 var Bronzes 0
9097 var Coppers 0
9098 put #tvar Plat 0
9099 put #tvar Gold 0
9100 put #tvar Silver 0
9101 put #tvar Bronze 0
9102 put #tvar Copper 0
9103 var currency kronar
9104 var itemLocation
9105 var Jailed 0
9106 var Charges 0
9107 var Binned 0
9108 var Pawned 0
9109 var SECOND_ITEM 0
9110 var SECOND_PAWN OFF
9111 var marking OFF
9112 var noLearn OFF
9113 var noSteal OFF
9114 var Rite OFF
9115 var Eyes OFF
9116 var nosell null
9117 var armor null
9118 var armor1 null
9119 var armor2 null
9120 var armor3 null
9121 var armor4 null
9122 var armor5 null
9123 var armor6 null
9124 var armor7 null
9125 var armor8 null
9126 var armor9 null
9127 var armor10 null
9128 var total.armor 0
9129 RETURN