· 10 years ago · Jun 22, 2016, 04:06 PM
1#%
2#% READ ME
3#%
4##################################################################################################
5# ULTIMATE GENIE3 PROGRESSIVE STEALING SCRIPT
6# By Shroom of DR: The Fallen, with tons of help from Pelic.
7#
8# Send bug reports, feature requests and feedback to: skultamaphon@gmail.com
9# Let me know if an item on the auto list is too hard or caps out too early!
10# Shroomismschism @ AIM
11#
12# IMPORTANT - Make sure you have the latest Automapper maps for Genie!
13# http://www.genieclient.com/bulletin/topic/3592-how-to-use-the-genie-map-repository/
14#
15# Use of this script requires secondary script called .travel
16# Available here - http://pastebin.com/tVwTjDQP
17#
18# What this Script does:
19# - Automatically determines what items to steal based on your skill level.
20# - As you move up in Thievery ranks, the script steals harder items. Will train from 20 ranks to 1200+
21# - Steals from multiple cities/provinces until mind locked Thievery or finished with your run
22#
23# - Pawns all the items, or if a thief, you can bin 50% of items by setting var BIN ON
24# - For thieves: Will mark all items before stealing, leave the shop if there is too much heat.
25# - Will also make use of Khri and thief passages for thieves.
26# - If you go to jail, script will recover, pay your fine and get your items and continue where it left off.
27#
28# - Script will intelligently check your bags before the stealing run,
29# To determine if any items in your bags match items that will be stolen
30# If so, it will stash those items in your SAFE.CONTAINER and keep that container closed during the script
31# To prevent accidentally binning or pawning any of your important items or armor!!
32#
33# CURRENTLY SUPPORTED CITIES:
34# - Therenborough, Riverhaven
35# - Arthe Dale, Crossing
36# - Leth Deriel, Shard
37# (Can start in any location in these cities)
38#
39# Depending what city you start in determines what direction it will go
40# Script will continue stealing from nearby cities until you are locked.
41####################################################################################################
42TOP:
43#debuglevel 5
44send exp 0
45waitforre ^EXP HELP for more information
46put #var save
47##################################
48# YOUR CUSTOM VARIABLES HERE #
49##################################
50
51# Probably a good idea to make the first container the same as your 'SAFE' container.
52var armor.container BACKPACK
53var armor.container2 HAVERSACK
54var armor.container3 HAVERSACK
55
56#====================================================================================
57#-ARMOR AND REMOVE VARIABLES HERE.
58# If stuff you wear isn't in these variables, add them in to the appropriate spot.
59var armor1 (claws|knuckles|footwraps|spikes|blades)
60var armor2 (targe\b|shield|aegis)
61var armor3 (greaves)
62var armor4 (gloves|gauntlets|sleeves)
63var armor5 (hauberk|robe|coat|leathers|shirt|lorica)
64var armor6 (balaclava|cowl|helm|hood|sallet|armet)
65var armor7 (mask)
66
67#Do you wear a chest harness that's hidden beneath your armor?
68 var chest.hide NO
69 var chestharness HARNESS
70
71#Do you wear a backsheath that's hidden beneath your armor?
72 var back.hide NO
73 var backharness BACKSHEATH
74#====================================================================================
75
76var PAWN.CONTAINER haversack
77var BIN.CONTAINER haversack
78var SAFE.CONTAINER backpack
79var STEALCOUNT 3
80var SNEAK OFF
81var BIN ON
82var SINGLE_RUN OFF
83
84## THIEF-ONLY VARIABLES (Ignore if not a thief)
85var BIN ON
86var STEALCOUNT 4
87var khri1 Plunder
88var khri2 Focus
89var HAVEN.PASSWORD ugly git
90var SHARD.PASSWORD none
91
92## TF-ONLY
93var CLANITEM YES
94var CLAN.ITEM.NAME human skull
95var MAIN.SCRIPT master
96
97##############################################################################################################################################
98## ~EXPLANATION OF USER VARIABLES BELOW~
99#
100## ~PAWN.CONTAINER~ is your MAIN pack to stow stolen items (for the pawn shop)
101## ~BIN.CONTAINER~ is your other main pack to stow stolen items (for binning)
102## You CAN set these two to the same container if you like.
103#
104## SAFE.CONTAINER IS YOUR "SAFE" CLOSABLE CONTAINER - (!!!THIS MUST BE A SEPARATE "SAFE" CONTAINER!!!)
105## THIS WILL STORE YOUR IMPORTANT ITEMS THAT MATCH ANY STEALING VARIABLES AND KEEP IT CLOSED
106## THIS WILL PREVENT THE SCRIPT FROM ACCIDENTALLY BINNING/PAWNING YOUR IMPORTANT ITEMS!!!
107#
108## IT IS IMPORTANT TO MAKE YOUR PAWN/BIN.CONTAINER AND SAFE.CONTAINER LARGE CONTAINERS SUCH AS BACKPACKS / DUFFEL BAGS / ETC.
109#
110## STEALCOUNT - (var STEALCOUNT 2, var STEALCOUNT 4, etc)
111## This tells the script how many times to try and steal from each shop (THIEVES ONLY)
112## Other guilds will default to max of 2 steals per shop due to lack of mark.
113#
114## BIN (OFF or ON) - If set to ON (THIEVES ONLY), it will PAWN 50% of the items and bin the rest.
115## If set to OFF, (automatic for NON-THIEVES), then it will skip binning, and will pawn all items and dump what can't be pawned.
116#
117## SNEAK (ON or OFF)
118## This simply makes you sneak around in between shops.
119## Script will automatically hide in the shop before stealing
120## If you have SNEAK set to OFF (Default), it will unhide AFTER stealing and before travelling. Faster for most.
121#
122## SINGLE_RUN (ON or OFF) - SET THIS TO ON IF YOU WANT THE SCRIPT TO STOP RUNNING
123## AFTER ONE CITY STEALING RUN (Arthe+Cross/PAWN, end) (Theren+Haven/PAWN, end) etc.
124## MAIN.SCRIPT (script name) - THIS IS THE NAME OF YOUR MAIN SCRIPT.
125## ONLY USED TO PAUSE MAIN SCRIPT WHEN GOING TO JAIL
126#
127## Khri1 - Your Primary Khri to use
128## Khri2 - Secondary Khi
129## HAVEN.PASSWORD - Your Riverhaven Thief Guild PW
130## SHARD.PASSWORD - Your Shard Thief Guild PW
131## CLANITEM - ONLY USED FOR TF
132## CLAN.ITEM.NAME - ONLY USED FOR TF
133##########################################################################################################################################################
134################################################
135################################################
136# END USER VARIABLES #
137# DO NOT TOUCH ANYTHING BELOW! #
138################################################
139
140#=====================#
141#--- DO NOT ADJUST ---#
142 var armor11 NONE
143 var armor22 NONE
144 var armor33 NONE
145 var armor44 NONE
146 var armor55 NONE
147 var armor66 NONE
148 var armor77 NONE
149#_____________________#
150
151#- Armor removal/wearing -#
152action (armors) var armor11 $1 when %armor1
153action (armors) var armor22 $1 when %armor2
154action (armors) var armor33 $1 when %armor3
155action (armors) var armor44 $1 when %armor4
156action (armors) var armor55 $1 when %armor5
157action (armors) var armor66 $1 when %armor6
158action (armors) var armor77 $1 when %armor7
159
160var large.items cauldron|stove|spear
161var Profit 0
162var Jailed 0
163var Charges 0
164var Binned 0
165var Pawn 0
166var currency kronar
167var item.Location
168var LAST MAINLOOP
169var SECOND.ITEM OFF
170var SECOND.PAWN OFF
171var marking OFF
172
173ACTION.INIT:
174action math Pawn add 1 when You sell your
175action math Binned add 1 when Nice work, $charactername
176action math Charges add 1 when have charged you with
177action goto CLAN.HEAL when I now pronounce sentence
178action 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|your belongings have been stripped|in a jail cell wearing a set of heavy manacles
179action instant goto JAIL.CHECK when strip you of all your possessions|binds your hands behind your back|your possessions have been stripped|the last thing you see before you black out|Do not resist, for your crimes must be answered for
180action 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
181action instant goto JAIL.CHECK when all your belongings have been stripped|you are in a jail cell wearing a set of heavy manacles
182action goto TOO.MANY.FINES when ^You think about stealing for a moment
183action put ##% >log Orange *** Not learning from %item in %SHOP @ $Thievery.Ranks ranks when You don't feel you learned anything useful
184action put ##% >log Red You were caught in %SHOP stealing a: %item when notices you attempting|Guards\! Guards\!|begins to shout
185action put ##% >log Purple Stealing Mind Locked! Not learning anymore when You feel that for the moment you've learned all you can
186#action send stand when eval $prone = 1
187#action put exit when eval $health < 50
188
189gosub GUILD.CHECK
190gosub SKILLCHECK
191pause .5
192pause .5
193#######################################################################################################################
194#######################################################################################################################
195var STEAL.LIST.ARTHE %AD.Feta|%AD.Thread|%AD.Fash|%AD.Odds|%AD.Bard|%AD.Map|%AD.Arm|%AD.Tart.E|%KA.Grek|%AD.Smoke|%AD.Tart.E|%AD.Tart.C|%AD.Tart.M|%AD.Tart.L|%AD.Tart.F|%KA.Grek
196var 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
197var 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
198var 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.Toy|%S.Memory|%S.Token|%S.Museum|%S.Barber|%S.Tanner|%S.Surv|%S.Surv.Alt|%S.Surv2|%S.Surv2.Alt
199var 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
200var 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
201var STEAL.LIST %STEAL.LIST.THEREN|%STEAL.LIST.HAVEN|%STEAL.LIST.ARTHE|%STEAL.LIST.CROSS|%STEAL.LIST.LETH|%STEAL.LIST.SHARD
202
203# var STEAL.LIST.HIB
204#######################################################################################################################
205#######################################################################################################################
206#% **** CHECKING FOR ARMOR......
207pause .5
208 action (armors) on
209 send INV COMBAT
210 waitforre ^\[Type|^You aren't
211 action (armors) off
212 goto armor.remove
213top2:
214pause .2
215if_3 then goto START
216
217# CHECKING BAGS
218#%
219#% ****** CHECKING YOUR CURRENT BAG CONTENTS
220#% ****** TO AVOID PAWNING/BINNING YOUR ITEMS....
221#% ****** WILL STASH ALL VULNERABLE ITEMS IN YOUR: %SAFE.CONTAINER
222#%
223pause
224gosub BAG.CHECK %PAWN.CONTAINER
225gosub BAG.CHECK %BIN.CONTAINER
226pause .5
227
228START:
229#%
230#% *** THIEVERY SKILL RANGE - %skillrange
231#%
232pause
233if ("%BIN" = "OFF") then
234{
235#%
236#% *** PAWNING ALL ITEMS FOR MAX PROFIT...
237#%
238pause
239}
240if_2 then var CITYCODE %2
241if_1 then goto %1
242
243############################################################################################
244############################################################################################
245#### BEGIN STEALING SECTION #####
246############################################################################################
247############################################################################################
248MAINLOOP:
249STEALING.RUN:
250var LAST STEALING.RUN
251gosub LOCATION.CHECK
252pause 0.2
253#%
254#% *** STARTING STEALING RUN from: %CITYCODE
255#%
256put stop play
257pause 0.1
258if "$righthand" != "Empty" then put stow right
259pause 0.1
260if "$lefthand" != "Empty" then put stow left
261pause 0.5
262STEAL.BEGIN:
263put ##% >Log Crimson ** Starting Stealing Run from: %CITYCODE
264goto %CITYCODE.STEAL
265
266######################################################
267# THERENGIA STEALING (THEREN/ROSSMAN/RIVERHAVEN #
268######################################################
269### THERENBOROUGH
270THEREN.STEAL:
271 var CURRENT.CITY THEREN
272 var LAST THEREN.STEAL
273 send stop hum
274 pause 0.5
275 gosub COOKIE
276
277THEREN.TO.TARSHA:
278 if $Thievery.Ranks < 50 then goto THEREN.NOSTEAL
279 if $Thievery.Ranks >= 690 then goto THEREN.TO.ROSE
280 gosub move tarsha
281THEREN.TARSHA:
282 var shopcode T.Tarsha
283 var SHOP Tarsha's Emporium
284 gosub STEAL %T.Tarsha
285 goto THEREN.TO.ROSE
286
287THEREN.TO.ROSE:
288 var LAST THEREN.TO.ROSE
289 gosub move theatre
290THEREN.ROSE:
291 var shopcode T.Rose
292 var SHOP Rose of the Theater - Attire
293 gosub STEAL %T.Rose
294 goto THEREN.TO.MUSIC
295
296THEREN.TO.MUSIC:
297 var LAST THEREN.TO.MUSIC
298 gosub move instrument
299THEREN.MUSIC:
300 var shopcode T.Music
301 var SHOP Rose of the Theater - Instruments
302 gosub STEAL %T.Music
303 goto THEREN.TO.HATS
304
305THEREN.TO.HATS:
306 var LAST THEREN.TO.HATS
307 if $Thievery.Ranks >= 590 then goto THEREN.TO.ARMOR
308 gosub move hats
309THEREN.HATS:
310 var shopcode T.Hats
311 var SHOP Theren Hats
312 gosub STEAL %T.Hats
313 goto THEREN.TO.SWEET
314
315THEREN.TO.SWEET:
316 var LAST THEREN.TO.SWEET
317 if $Thievery.Ranks >= 300 then goto THEREN.TO.ARMOR
318 gosub move sweet
319THEREN.SWEET:
320 var shopcode T.Sweet
321 var SHOP Theren Sweet Delights
322 gosub STEAL %T.Sweet
323 goto THEREN.TO.CUPCAKE
324
325THEREN.TO.CUPCAKE:
326 var LAST THEREN.TO.CUPCAKE
327 gosub move cup
328THEREN.CUPCAKE:
329 var shopcode T.Cupcake
330 var SHOP Theren Cupcake
331 gosub STEAL %T.Cupcake
332 goto THEREN.TO.ARMOR
333
334THEREN.TO.ARMOR:
335 var LAST THEREN.TO.ARMOR
336 gosub move armor
337THEREN.ARMOR:
338 var shopcode T.Arm
339 var SHOP Theren Armor
340 gosub STEAL %T.Arm
341 goto THEREN.TO.GIFT
342
343THEREN.TO.GIFT:
344 var LAST THEREN.TO.GIFT
345 gosub move gifts
346THEREN.GIFT:
347 var shopcode T.Gift
348 var SHOP Theren Gift Shop
349 gosub STEAL %T.Gift
350 goto THEREN.TO.GENERAL
351
352THEREN.TO.GENERAL:
353 var LAST THEREN.TO.GENERAL
354 if $Thievery.Ranks >= 700 then goto THEREN.TO.KRRISH
355 gosub move general
356THEREN.GENERAL:
357 var shopcode T.Gen
358 var SHOP Theren General Store
359 gosub STEAL %T.Gen
360 goto THEREN.TO.KRRISH
361
362THEREN.TO.KRRISH:
363 var LAST THEREN.TO.KRRISH
364 gosub move bones
365THEREN.KRRISH:
366 var shopcode T.Krrish
367 var SHOP Theren Krissh
368 gosub STEAL %T.Krrish
369 goto THEREN.TO.LENSE
370
371THEREN.TO.LENSE:
372 var LAST THEREN.TO.LENSE
373 gosub move lense
374THEREN.LENSE:
375 var shopcode T.Lense
376 var SHOP Theren Konezu's Lenses
377 gosub STEAL %T.Lense
378 goto THEREN.TO.CLERIC
379
380THEREN.TO.CLERIC:
381 var LAST THEREN.TO.CLERIC
382 if $Thievery.Ranks >= 700 then goto THEREN.TO.MEN
383 gosub move cleric
384THEREN.CLERIC:
385 var shopcode T.Cleric
386 var SHOP Theren Cleric Shop
387 gosub STEAL %T.Cleric
388 goto THEREN.TO.MEN
389
390THEREN.TO.MEN:
391 var LAST THEREN.TO.MEN
392 gosub move men's
393THEREN.MEN:
394 var shopcode T.Men
395 var SHOP Theren Courtly Men's Study
396 gosub STEAL %T.Men
397 goto THEREN.TO.WOMEN
398
399THEREN.TO.WOMEN:
400 var LAST THEREN.TO.WOMEN
401 gosub move women's
402THEREN.WOMEN:
403 var shopcode T.Women
404 var SHOP Theren Courtly Women's Parlor
405 gosub STEAL %T.Women
406 goto THEREN.TO.CLOTHING
407
408THEREN.TO.CLOTHING:
409 var LAST THEREN.TO.CLOTHING
410 gosub move clothing
411THEREN.CLOTHING:
412 var shopcode T.Cloth
413 var SHOP Theren Courtly Clothing
414 gosub STEAL %T.Cloth
415 goto THEREN.TO.ARMORY
416
417THEREN.TO.ARMORY:
418 var LAST THEREN.TO.ARMORY
419 gosub move moat
420 gosub move 146
421 gosub move dungeon
422THEREN.TO.ARMORY.CONT:
423 gosub move armory
424THEREN.ARMORY:
425 var shopcode T.Armory
426 var SHOP Theren Keep Armory
427 gosub STEAL %T.Armory
428 goto THEREN.TO.FORGE
429
430THEREN.TO.FORGE:
431 var LAST THEREN.TO.FORGE
432 if $Thievery.Ranks >= 800 then goto THEREN.LEAVE
433 gosub move forge
434THEREN.FORGE:
435 var shopcode T.Forge
436 var SHOP Theren Keep Forge
437 gosub STEAL %T.Forge
438 goto THEREN.LEAVE
439
440THEREN.LEAVE:
441 var LAST THEREN.LEAVE
442 gosub move 69
443 send jump moat
444 pause 10
445THEREN.STUNNED:
446 pause 10
447 if $stunned = 1 then goto THEREN.STUNNED
448 pause 0.5
449 gosub STAND
450 pause 0.5
451 gosub move portal
452 goto TO.RIVERHAVEN
453
454TRAVEL.HAVEN:
455TO.RIVERHAVEN:
456 pause .5
457 #% *** TRAVELLING.......
458 put .travel haven
459 waitforre YOU HAVE ARRIVED
460 pause .1
461 GOTO HAVEN.STEAL
462
463############################################
464# RIVERHAVEN STEALING
465############################################
466RIVERHAVEN.STEAL:
467HAVEN.STEAL:
468 var CURRENT.CITY RIVERHAVEN
469 send stop hum
470 pause 0.5
471 gosub COOKIE
472 gosub TIME.CHECK
473HAVEN.TO.TOG:
474 var LAST HAVEN.TO.TOG
475 gosub move city tog
476HAVEN.TOG:
477 var shopcode RH.Tog
478 var SHOP Riverhaven Togs
479 gosub STEAL %RH.Tog
480 goto HAVEN.TO.HERB
481
482HAVEN.TO.HERB:
483 var LAST HAVEN.TO.HERB
484 if $Thievery.LearningRate > 31 then goto GO.PAWN.HAVEN
485 if $Thievery.Ranks >= 350 then goto HAVEN.TO.NAPHTHA
486 gosub move herb
487HAVEN.HERB:
488 var shopcode RH.Herb
489 var SHOP Riverhaven Herbs
490 gosub STEAL %RH.Herb
491 goto HAVEN.TO.NAPHTHA
492
493HAVEN.TO.NAPHTHA:
494 var LAST HAVEN.TO.NAPHTHA
495 if $Thievery.Ranks >= 385 then goto HAVEN.TO.FLOWER
496 gosub move Naptha
497HAVEN.NAPHTHA:
498 var shopcode RH.Naph
499 var SHOP Riverhaven Naptha Cart
500 var item.Location %RH.Naph.Loc
501 gosub STEAL %RH.Naph
502 goto HAVEN.TO.FLOWER
503
504HAVEN.TO.FLOWER:
505 var LAST HAVEN.TO.FLOWER
506 if $Thievery.Ranks >= 900 then goto HAVEN.TO.ARMS
507 gosub move cecel
508HAVEN.FLOWER:
509 var shopcode RH.Flow
510 var SHOP Riverhaven Florist
511 gosub STEAL %RH.Flow
512 goto HAVEN.TO.ARMS
513
514HAVEN.TO.ARMS:
515 var LAST HAVEN.TO.ARMS
516 gosub move noel
517HAVEN.ARMS:
518 var shopcode RH.Arms
519 var SHOP Riverhaven Noel's Arms
520 gosub STEAL %RH.Arms
521 goto HAVEN.TO.GENERAL
522
523HAVEN.TO.GENERAL:
524 var LAST HAVEN.TO.GENERAL
525 if $Thievery.LearningRate > 32 then goto GO.PAWN.HAVEN
526 if $Thievery.Ranks >= 900 then goto HAVEN.TO.CLOTH
527 gosub move general
528HAVEN.GENERAL:
529 var shopcode RH.Gen
530 var SHOP Riverhaven General Store
531 gosub STEAL %RH.Gen
532 goto HAVEN.TO.CLOTH
533
534HAVEN.TO.CLOTH:
535 var LAST HAVEN.TO.CLOTH
536 if $Thievery.Ranks >= 900 then goto HAVEN.TO.ARTIFICER
537 gosub move cloth
538HAVEN.CLOTH:
539 var shopcode RH.Cloth
540 var SHOP Riverhaven Clothiers
541 gosub STEAL %RH.Cloth
542 goto HAVEN.TO.ARTIFICER
543
544HAVEN.TO.ARTIFICER:
545 var LAST HAVEN.TO.ARTIFICER
546 #if $Thievery.Ranks >= 1200 then goto HAVEN.TO.JOY
547 gosub move artif
548HAVEN.ARTIFICER:
549 var shopcode RH.Artif
550 var SHOP Riverhaven Artificer
551 gosub STEAL %RH.Artif
552 goto HAVEN.TO.LocKSMITH
553
554HAVEN.TO.LocKSMITH:
555 var LAST HAVEN.TO.LocKSMITH
556 if $Thievery.Ranks >= 500 then goto HAVEN.TO.MIRG
557 gosub move locks
558HAVEN.LocKSMITH:
559 var shopcode RH.Lock
560 var SHOP Riverhaven Locksmith
561 gosub STEAL %RH.Lock
562 goto HAVEN.TO.JOY
563
564HAVEN.TO.JOY:
565 var LAST HAVEN.TO.JOY
566 if $Thievery.LearningRate > 32 then goto GO.PAWN.HAVEN
567 if $Thievery.Ranks >= 414 then goto HAVEN.TIME
568 gosub move smara
569HAVEN.JOY:
570 var shopcode RH.Joy
571 var SHOP Riverhaven Joy Shop
572 gosub STEAL %RH.Joy
573 gosub walk out
574 pause .5
575 goto HAVEN.TIME
576
577HAVEN.TIME:
578 if $Thievery.Ranks >= 366 then goto HAVEN.TO.MIRG
579 gosub TIME.CHECK
580 if ("%TIME" = "DAY") then goto HAVEN.TO.SMOKE
581 goto HAVEN.TO.MIRG
582
583HAVEN.TO.SMOKE:
584 var LAST HAVEN.TO.SMOKE
585 gosub move 42
586 send kneel
587 send go shop
588HAVEN.SMOKE:
589 var shopcode RH.Smoke
590 var SHOP Riverhaven Smoke Shop
591 gosub STEAL %RH.Smoke
592 send out
593 pause
594 pause 0.5
595 gosub STAND
596 pause 0.5
597 gosub HIDE
598 goto HAVEN.TO.MIRG
599
600HAVEN.TO.MIRG:
601 var LAST HAVEN.TO.MIRG
602 gosub move jewel
603HAVEN.MIRG:
604 var shopcode RH.Mirg
605 var SHOP Riverhaven Goldsmiths
606 gosub STEAL %RH.Mirg
607 goto HAVEN.TO.WEAPON
608
609HAVEN.TO.WEAPON:
610 if $Thievery.LearningRate > 32 then goto GO.PAWN.HAVEN
611 var LAST HAVEN.TO.WEAPON
612 gosub move weapon
613HAVEN.WEAPON:
614 var shopcode RH.Weap
615 var SHOP Riverhaven Weapon Shop
616 gosub STEAL %RH.Weap
617 goto HAVEN.TO.BARD
618
619HAVEN.TO.BARD:
620 var LAST HAVEN.TO.BARD
621 gosub move bard
622HAVEN.BARD:
623 var shopcode RH.Bard
624 var SHOP Riverhaven Bard Shop
625 gosub STEAL %RH.Bard
626 goto HAVEN.TO.BARD2
627
628HAVEN.TO.BARD2:
629 var LAST HAVEN.TO.BARD2
630 gosub walk go curt
631HAVEN.BARD2:
632 var shopcode RH.Bard2
633 var SHOP Riverhaven Bard2 Shop
634 gosub STEAL %RH.Bard2
635 goto HAVEN.TO.IRON
636
637HAVEN.TO.IRON:
638 var LAST HAVEN.TO.IRON
639 if $Thievery.LearningRate > 32 then goto GO.PAWN.HAVEN
640 gosub move iron
641HAVEN.IRONWORKS:
642 var shopcode RH.Iron
643 var SHOP Riverhaven Ironworks
644 gosub STEAL %RH.Iron
645 goto HAVEN.TO.CLERIC
646
647HAVEN.TO.CLERIC:
648 var LAST HAVEN.TO.CLERIC
649 gosub move cleric shop
650HAVEN.CLERIC:
651 var shopcode RH.Cleric
652 var SHOP Riverhaven Cleric Shop
653 if $Thievery.Ranks >= 930 then goto HAVEN.TO.CLERIC2
654 gosub STEAL %RH.Cleric
655 goto HAVEN.TO.CLERIC2
656
657HAVEN.TO.CLERIC2:
658 var LAST HAVEN.TO.CLERIC2
659 if !matchre("$guild","(Thief|Empath|Cleric)") then goto GO.PAWN.HAVEN
660 gosub walk go curt
661HAVEN.CLERIC2:
662 var shopcode RH.Cleric2
663 var SHOP Riverhaven Cleric2 Shop
664 gosub STEAL %RH.Cleric2
665 goto GO.PAWN.HAVEN
666
667GO.PAWN.HAVEN:
668 var CURRENT.CITY RIVERHAVEN
669 var LAST GO.PAWN.HAVEN
670 gosub move PAWN
671 pause .5
672 gosub PAWN.GOODS
673
674HAVEN.TO.BANK:
675 if ("$guild" = "Thief") then send khri stop
676 pause .2
677 gosub move exchange
678 pause .1
679 put exchange all dok to lir
680 put exchange all kro to lir
681 pause .5
682 gosub move teller
683 pause 0.5
684 gosub bank
685 pause
686 gosub walk go arch
687 gosub walk out
688 if ("%BIN" = "OFF") then goto DONE.STEALING.HAVEN
689 goto HAVEN.FIND.GUILD
690
691HAVEN.FIND.GUILD:
692var BIN.HAVEN NO
693 pause 0.5
694 match hole1 selling off some stolen goods
695 match hole2 Crescent Way
696 match hole3 Silvermoon Road
697 match hole4 the boss is with his own kind
698 match hole5 cooped up
699 match hole6 around the rookery
700 matchre NO.CONTACTS Apparently there are too many eyes on you|USAGE|walks off|look of disgust
701 put contact guild
702 matchwait 7
703 goto NO.CONTACTS
704
705NO.CONTACTS:
706var LOCATION LOST
707
708hole1:
709gosub move 33
710put search
711pause
712pause
713send knock door
714pause 0.5
715put whisp door %HAVEN.PASSWORD
716pause
717gosub walk climb stair
718gosub walk ne
719gosub walk go corner
720if matchre("$roomobjs","(Crow|Lady Swan)") then
721{
722var BIN.HAVEN YES
723gosub BIN.GOODS
724}
725 gosub walk out
726 gosub walk sw
727 put climb stair
728 put go door
729if ("%LOCATION" = "LOST") && ("%BIN.HAVEN" = "NO") then goto hole2
730goto HAVEN.DONE.ASSESS
731
732hole2:
733gosub move 47
734put search
735pause
736pause
737send knock door
738pause 0.5
739put whisp door %HAVEN.PASSWORD
740pause
741put look shadow
742put sear shadow
743pause 0.5
744gosub walk go open
745gosub walk go cor
746if matchre("$roomobjs","(Crow|Lady Swan)") then
747{
748var BIN.HAVEN YES
749gosub BIN.GOODS
750}
751 gosub walk out
752 gosub walk out
753 gosub walk go door
754if ("%LOCATION" = "LOST") && ("%BIN.HAVEN" = "NO") then goto hole3
755goto HAVEN.DONE.ASSESS
756
757hole3:
758gosub move 36
759put search
760pause
761pause 1
762send knock door
763pause
764put whisp door %HAVEN.PASSWORD
765pause
766put look floor
767gosub walk go door
768gosub walk go cor
769if matchre("$roomobjs","(Crow|Lady Swan)") then
770{
771var BIN.HAVEN YES
772gosub BIN.GOODS
773}
774 gosub walk out
775 put climb door
776 gosub walk out
777if ("%LOCATION" = "LOST") && ("%BIN.HAVEN" = "NO") then goto hole4
778goto HAVEN.DONE.ASSESS
779
780hole4:
781gosub move 302
782put search
783pause
784pause .5
785send knock grat
786pause
787put whisp grat %HAVEN.PASSWORD
788pause .5
789gosub walk go door
790gosub walk ne
791gosub walk go nook
792if matchre("$roomobjs","(Crow|Lady Swan)") then
793{
794var BIN.HAVEN YES
795gosub BIN.GOODS
796}
797 gosub walk out
798 gosub walk sw
799 gosub walk go door
800 gosub walk go grate
801 gosub walk out
802if ("%LOCATION" = "LOST") && ("%BIN.HAVEN" = "NO") then goto hole5
803goto HAVEN.DONE.ASSESS
804
805hole5:
806gosub move 41
807put search
808pause
809pause 1
810put knock door
811pause .5
812put whisp door %HAVEN.PASSWORD
813pause .5
814gosub walk n
815gosub walk go corn
816if matchre("$roomobjs","(Crow|Lady Swan)") then
817{
818var BIN.HAVEN YES
819gosub BIN.GOODS
820}
821 gosub walk out
822 gosub walk s
823 gosub walk go door
824if ("%LOCATION" = "LOST") && ("%BIN.HAVEN" = "NO") then goto hole6
825goto HAVEN.DONE.ASSESS
826
827hole6:
828gosub move 305
829put search
830pause
831pause
832put knock door
833pause
834put whisp door %HAVEN.PASSWORD
835pause
836gosub walk go arch
837gosub walk climb st
838gosub walk go cor
839if matchre("$roomobjs","(Crow|Lady Swan)") then
840{
841var BIN.HAVEN YES
842gosub BIN.GOODS
843}
844 gosub walk out
845 put climb sta
846 gosub walk go arc
847 gosub walk go door
848goto HAVEN.DONE.ASSESS
849
850HAVEN.DONE.ASSESS:
851 var LAST HAVEN.DONE.ASSESS
852 math RunsCompleted add 1
853 put exp
854
855DONE.STEALING.HAVEN:
856 var LAST DONE.STEALING.HAVEN
857 gosub move town
858 pause 0.5
859 if ("%SINGLE_RUN" = "ON") then goto FINISHED.SCRIPT
860 if ($Thievery.LearningRate >= 30) then goto FINISHED.SCRIPT
861 if ("%CITYCODE" = "SHARD") || ("%CITYCODE" = "CROSSING") || ("%CITYCODE" = "HIB") || ("%CITYCODE" = "LETH") then goto FINISHED.SCRIPT
862 if ("%CITYCODE" = "RIVERHAVEN") || ("%CITYCODE" = "ROSSMAN") || ("%CITYCODE" = "THEREN") && ($Thievery.LearningRate < 30) then goto TO.ARTHE
863 goto TO.ARTHE
864
865
866############################################################################
867## ZOLUREN STEALING SECTION (ARTHE / CROSSING / LETH ) ##
868############################################################################
869# ARTHE DALE
870CROSSING.STEAL:
871ARTHE.STEAL:
872TO.ARTHE:
873 var CURRENT.CITY ARTHE DALE
874 var LAST TO.ARTHE
875 put .travel arthe
876 waitforre YOU HAVE ARRIVED
877 pause
878 gosub move glaysker
879 pause .5
880 #%
881 #% *** STEALING FROM ARTHE DALE!
882 #%
883 gosub COOKIE
884
885ARTHE.TO.PATTERN:
886 if $Thievery.Ranks >= 470 then goto ARTHE.TO.FASHION
887 gosub move embroid
888ARTHE.THREADS:
889 var shopcode AD.Thread
890 var SHOP Arthe Dale Thread Shop
891 gosub STEAL %AD.Thread
892 goto ARTHE.TO.FASHION
893
894ARTHE.TO.FASHION:
895 if $Thievery.Ranks >= 460 then goto ARTHE.TO.ODDS
896 gosub move clothing
897ARTHE.FASHION:
898 var shopcode AD.Fash
899 var SHOP Arthe Dale Fashion Shop
900 gosub STEAL %AD.Fash
901 goto ARTHE.TO.ODDS
902
903ARTHE.TO.ODDS:
904 gosub move Odds
905ARTHE.ODDS:
906 var shopcode AD.Odds
907 var SHOP Arthe Dale Odds'n'Ends Shop
908 gosub STEAL %AD.Odds
909 if $hidden = 1 then gosub unhide
910 goto ARTHE.TO.BARD
911
912ARTHE.TO.BARD:
913 if $Thievery.Ranks >= 600 then goto ARTHE.TO.ARMOR
914 gosub move music
915ARTHE.BARD:
916 var shopcode AD.Bard
917 var SHOP Arthe Dale Bard Shop
918 gosub STEAL %AD.Bard
919 goto ARTHE.TO.ARMOR
920
921ARTHE.TO.ARMOR:
922 gosub TIME.CHECK
923 if ("%TIME" = "NIGHT") then goto ARTHE.TO.FETA
924 gosub move Armor
925ARTHE.ARMOR:
926 var shopcode AD.Arm
927 var SHOP Arthe Dale Armor Shop
928 gosub STEAL %AD.Arm
929 goto ARTHE.TO.FETA
930
931ARTHE.TO.FETA:
932 if $Thievery.Ranks >= 300 then goto ARTHE.TO.YULUGRI
933 gosub move feta
934ARTHE.FETA:
935 var shopcode AD.Feta
936 var SHOP Arthe Dale Feta's Kitchen
937 gosub STEAL %AD.Feta
938 goto ARTHE.TO.YULUGRI
939
940ARTHE.TO.YULUGRI:
941 gosub move Yulugri
942ARTHE.YULUGRI:
943 var shopcode AD.Map
944 var SHOP Arthe Dale Yulugri
945 gosub STEAL %AD.Map
946 goto ARTHE.TO.SMOKE
947
948ARTHE.TO.SMOKE:
949 if $Thievery.Ranks >= 300 then goto LEAVE.ARTHE
950 gosub move smoking
951ARTHE.SMOKE:
952 var shopcode AD.Smoke
953 var SHOP Arthe Dale Smoke Shop
954 gosub STEAL %AD.Smoke
955 goto ARTHE.TO.TART
956
957ARTHE.TO.TART:
958 if $Thievery.Ranks >= 260 then goto LEAVE.ARTHE
959 gosub move 631
960ARTHE.TART:
961 var shopcode AD.Tart.E
962 var SHOP Arthe Dale TART E
963 gosub STEAL %AD.Tart.E
964 goto ARTHE.TO.TART.C
965
966ARTHE.TO.TART.C:
967 if $Thievery.Ranks >= 195 then goto ARTHE.TO.TART.M
968 gosub move 630
969ARTHE.TART.C:
970 var shopcode AD.Tart.C
971 var SHOP Arthe Dale TART C
972 gosub STEAL %AD.Tart.C
973 goto ARTHE.TO.TART.M
974
975ARTHE.TO.TART.M:
976 if $Thievery.Ranks >= 212 then goto ARTHE.TO.TART.L
977 gosub move 629
978ARTHE.TART.M:
979 var shopcode AD.Tart.M
980 var SHOP Arthe Dale TART M
981 gosub STEAL %AD.Tart.M
982 goto ARTHE.TO.TART.L
983
984ARTHE.TO.TART.L:
985 if $Thievery.Ranks >= 250 then goto LEAVE.ARTHE
986 gosub move 628
987ARTHE.TART.L:
988 var shopcode AD.Tart.L
989 var SHOP Arthe Dale TART L
990 gosub STEAL %AD.Tart.L
991 goto ARTHE.TO.TART.F
992
993ARTHE.TO.TART.F:
994 if $Thievery.Ranks >= 181 then goto LEAVE.ARTHE
995 gosub move 627
996ARTHE.TART.F:
997 var shopcode AD.Tart.F
998 var SHOP Arthe Dale TART F
999 gosub STEAL %AD.Tart.F
1000 goto LEAVE.ARTHE
1001
1002LEAVE.ARTHE:
1003 if $hidden = 1 then gosub unhide
1004 pause .1
1005
1006ARTHE.TO.KAERNA:
1007 if $Thievery.Ranks >= 890 then goto DONE.KAERNA
1008 gosub move grek
1009KAERNA.GENERAL:
1010 var shopcode KA.Grek
1011 var SHOP Kaerna General
1012 gosub STEAL %KA.Grek
1013 goto DONE.KAERNA
1014
1015DONE.KAERNA:
1016 if $hidden = 1 then gosub unhide
1017 if ("$guild" = "Thief") then
1018 {
1019 send khri check
1020 send khri start <none>
1021 }
1022 pause .5
1023 goto TO.CROSSING
1024
1025##################################
1026#### CROSSINGS
1027#################################
1028TO.CROSSING:
1029 var CURRENT.CITY CROSSING
1030 var LAST CROSSING
1031 pause .5
1032 gosub move crossing
1033 pause .5
1034 gosub move bank
1035 goto WARRANT.CHECK.CROSS
1036
1037XING:
1038CROSS:
1039CROSSING:
1040CROSSINGS:
1041WARRANT.CHECK.CROSS:
1042pause 0.1
1043put blink
1044pause 0.2
1045 var LAST CROSSING.STEALING
1046 var CURRENT.CITY CROSSING
1047 #%
1048 #% *** STEALING FROM CROSSING!
1049 #%
1050 if $Thievery.LearningRate > 32 then goto GO.CROSS.PAWN
1051 put stop hum
1052 gosub COOKIE
1053 pause .2
1054 goto CROSSING.TO.SCRIPT
1055
1056CROSSING.TO.SCRIPT:
1057 var CURRENT.CITY CROSSING
1058 var LAST CROSSING.TO.SCRIPT
1059 gosub move Temple
1060 pause 0.5
1061 pause 0.5
1062 pause 0.5
1063 gosub move Script
1064 goto CROSSING.SCRIPTORIUM
1065
1066CROSSING.SCRIPTORIUM:
1067 var shopcode C.Script
1068 var SHOP Crossing Scriptorium
1069 gosub STEAL %C.Script.Num %C.Script
1070 if $hidden = 1 then gosub unhide
1071 pause 0.5
1072 pause 0.5
1073 gosub move cross
1074 pause 0.5
1075 gosub walk ne
1076 pause 0.5
1077 pause
1078 pause 0.5
1079 goto CROSSING.TO.CARD
1080
1081CROSSING.TO.CARD:
1082 var LAST CROSSING.TO.CARD
1083 if $Thievery.LearningRate > 32 then goto GO.CROSS.PAWN
1084 if $Thievery.Ranks >= 487 then goto CROSSING.TO.CLOTHING
1085 gosub move Card shop
1086CROSSING.CARD:
1087 var shopcode C.Card
1088 var SHOP Crossing Card Shop
1089 gosub STEAL %C.Card
1090 goto CROSSING.TO.CLOTHING
1091
1092CROSSING.TO.CLOTHING:
1093 var LAST CROSSING.TO.CLOTHING
1094 if $Thievery.Ranks >= 895 then goto CROSSING.TO.JEWELRY
1095 gosub move clothing
1096CROSSING.CLOTHING:
1097 var shopcode C.Stitch
1098 var SHOP Crossing Clothing Shop
1099 gosub STEAL %C.Stitch
1100 goto CROSSING.TO.JEWELRY
1101
1102CROSSING.TO.JEWELRY:
1103 var LAST CROSSING.TO.JEWELRY
1104 if $Thievery.LearningRate > 32 then goto GO.CROSS.PAWN
1105 if $Thievery.Ranks >= 555 then goto CROSSING.TO.GENERAL
1106 gosub move jewel
1107CROSSING.JEWELRY:
1108 var shopcode C.Jewel
1109 var SHOP Crossing Jewelry Shop
1110 gosub STEAL %C.Jewel
1111 goto CROSSING.TO.GENERAL
1112
1113CROSSING.TO.GENERAL:
1114 var LAST CROSSING.TO.GENERAL
1115 if $Thievery.Ranks >= 700 then goto CROSSING.TO.CLERIC
1116 gosub move General
1117CROSSING.GENERAL:
1118 var shopcode C.Gen
1119 var SHOP Crossing General Store
1120 gosub STEAL %C.Gen
1121 goto CROSSING.TO.CLERIC
1122
1123CROSSING.TO.CLERIC:
1124 var LAST CROSSING.TO.CLERIC
1125 gosub move duran
1126CROSSING.CLERIC:
1127 if $Thievery.LearningRate > 32 then goto GO.CROSS.PAWN
1128 var shopcode C.Cler
1129 var SHOP Crossing Cleric Shop
1130 if $Thievery.Ranks >= 487 then goto CROSSING.CLERIC2
1131 gosub STEAL %C.Cler
1132 goto CROSSING.TO.BATH
1133
1134CROSSING.TO.CLERIC2:
1135 var LAST CROSSING.TO.CLERIC2
1136 gosub move 957
1137CROSSING.CLERIC2:
1138 var shopcode C.Cler2
1139 var SHOP Crossing Cleric2 Shop
1140 gosub STEAL %C.Cler2
1141 goto CROSSING.TO.BATH
1142
1143CROSSING.TO.BATH:
1144 var LAST CROSSING.TO.BATH
1145 if $Thievery.LearningRate > 32 then goto GO.CROSS.PAWN
1146 if $Thievery.Ranks >= 620 then goto CROSSING.TO.MUSIC
1147 gosub move bathhouse
1148CROSSING.BATHHOUSE:
1149 var shopcode C.Bath
1150 var SHOP Crossing Bathhouse
1151 var item.Location %C.Bath.Loc
1152 gosub STEAL %C.Bath.Num %C.Bath
1153 goto CROSSING.TO.LocK
1154
1155CROSSING.TO.LOCK:
1156 var LAST CROSSING.TO.LOCK
1157 gosub move locks
1158CROSSING.LOCKSMITH:
1159 var shopcode C.Lock
1160 var SHOP Crossing Locksmith
1161 gosub STEAL %C.Lock
1162 goto CROSSING.TO.MUSIC
1163
1164CROSSING.TO.MUSIC:
1165 var LAST CROSSING.TO.MUSIC
1166 gosub move Music
1167CROSSING.MUSIC:
1168 if $Thievery.LearningRate > 32 then goto GO.CROSS.PAWN
1169 if $Thievery.Ranks >= 895 then goto CROSSING.TO.MUSIC.BACKROOM
1170 var shopcode C.Music
1171 var SHOP Crossing Music Shop
1172 gosub STEAL %C.Music
1173 goto CROSSING.TO.MUSIC.BACKROOM
1174
1175CROSSING.TO.MUSIC.BACKROOM:
1176 var LAST CROSSING.TO.MUSIC.BACKROOM
1177 if $hidden = 1 then put unhi
1178 pause 0.5
1179 pause 0.5
1180 gosub walk go curtain
1181 pause
1182CROSSING.MUSIC.BACKROOM:
1183 var shopcode C.Music2
1184 var SHOP Xing music shop backroom
1185 gosub STEAL %C.Music2
1186 pause 0.5
1187 gosub walk go curtain
1188 pause 0.5
1189 pause 0.5
1190 goto CROSSING.TO.ARMOR
1191
1192CROSSING.TO.ARMOR:
1193 var LAST CROSSING.TO.ARMOR
1194 gosub move Armor
1195CROSSING.ARMOR:
1196 var shopcode C.Arm
1197 var SHOP Crossing Armor Shop
1198 gosub STEAL %C.Arm
1199 goto CROSSING.TO.WEAPON
1200
1201CROSSING.TO.WEAPON:
1202 var LAST CROSSING.TO.WEAPON
1203 gosub move Weapon
1204CROSSING.WEAPON:
1205 var shopcode C.Weap
1206 var SHOP Crossing Weapon Shop
1207 gosub STEAL %C.Weap
1208 goto CROSSING.TO.FLORIST
1209
1210CROSSING.TO.FLORIST:
1211 var LAST CROSSING.TO.FLORIST
1212 if $Thievery.LearningRate > 32 then goto GO.CROSS.PAWN
1213 if $Thievery.Ranks >= 360 then goto CROSSING.TO.SHOE
1214 gosub move Florist
1215CROSSING.FLORIST:
1216 var shopcode C.Flow
1217 var SHOP Crossing Florist
1218 gosub STEAL %C.Flow
1219 goto CROSSING.TO.SHOE
1220
1221CROSSING.TO.SHOE:
1222 var LAST CROSSING.TO.SHOE
1223 if $Thievery.Ranks >= 300 then goto CROSSING.TO.EMPATH
1224 gosub move Shoe
1225CROSSING.SHOES:
1226 var shopcode C.Cobb
1227 var SHOP Crossing Shoe Shop
1228 gosub STEAL %C.Cobb
1229 goto CROSSING.TO.EMPATH
1230
1231CROSSING.TO.EMPATH:
1232 var LAST CROSSING.TO.EMPATH
1233 if !matchre("$guild","(Thief|Empath|Cleric)") then goto CROSSING.TO.HERBS
1234 gosub move Emmiline
1235CROSSING.EMPATH:
1236 var shopcode C.Empath
1237 var SHOP Crossing Empath Shop
1238 var SECOND.ITEM ON
1239 var secondary %C.Empath.Alt
1240 gosub STEAL %C.Empath
1241 goto CROSSING.TO.EMPATH2
1242
1243CROSSING.TO.EMPATH2:
1244 var LAST CROSSING.TO.EMPATH2
1245 gosub walk w
1246CROSSING.EMPATH2:
1247 var shopcode C.Empath2
1248 var SHOP Crossing Empath Shop 2
1249 gosub STEAL %C.Empath2
1250 goto CROSSING.TO.EMPATH3
1251
1252CROSSING.TO.EMPATH3:
1253 var LAST CROSSING.TO.EMPATH3
1254 gosub walk e
1255 gosub walk go arch
1256CROSSING.EMPATH3:
1257 var shopcode C.Empath3
1258 var SHOP Crossing Empath Shop 3
1259 var SECOND.ITEM ON
1260 var item.Location %C.Empath3.Loc
1261 var secondary %C.Empath3.Alt
1262 gosub STEAL %C.Empath3
1263 gosub walk go arch
1264 gosub walk go door
1265 gosub walk go step
1266 pause 0.1
1267 pause 0.1
1268 goto CROSSING.TO.HERBS
1269
1270CROSSING.TO.HERBS:
1271 var LAST CROSSING.TO.HERBS
1272 if $Thievery.LearningRate > 32 then goto GO.CROSS.PAWN
1273 if $Thievery.Ranks >= 334 then goto CROSSING.TO.ALCHEMY
1274 gosub move Herb
1275CROSSING.HERBS:
1276 var shopcode C.Herb
1277 var SHOP Crossing Herb Shop
1278 gosub STEAL %C.Herb
1279 goto CROSSING.TO.ALCHEMY
1280
1281CROSSING.TO.ALCHEMY:
1282 var LAST CROSSING.TO.ALCHEMY
1283 gosub move Chizili
1284CROSSING.ALCHEMY:
1285 var shopcode C.Alch
1286 var SHOP Crossing Alchemy Shop
1287 gosub STEAL %C.Alch
1288 goto CROSSING.TO.TANNER
1289
1290CROSSING.TO.TANNER:
1291 var LAST CROSSING.TO.TANNER
1292 var item.Location %C.Tann.Loc
1293 if $hidden = 1 then put shiv
1294 if $Thievery.Ranks >= 640 then goto CROSSING.TO.HABER
1295 pause 0.1
1296 gosub move tanner
1297CROSSING.TANNER:
1298 var shopcode C.Tann
1299 var SHOP Crossing Tanner
1300 gosub STEAL %C.Tann
1301 goto CROSSING.TO.HABER
1302
1303CROSSING.TO.HABER:
1304 var LAST CROSSING.TO.HABER
1305 if $Thievery.Ranks >= 700 then goto CROSSING.TO.ARTIFICE
1306 gosub move haber
1307CROSSING.HABERDASHERY:
1308 var shopcode C.Haber
1309 var SHOP Crossing Haberdashery
1310 gosub STEAL %C.Haber
1311 goto CROSSING.TO.ARTIFICE
1312
1313CROSSING.TO.ARTIFICE:
1314 var LAST CROSSING.TO.ARTIFICE
1315 gosub move magic
1316CROSSING.ARTIFICER:
1317 var shopcode C.Artif
1318 var SHOP Crossing Artificer
1319 gosub STEAL %C.Artif
1320 goto GO.CROSS.PAWN
1321
1322GO.PAWN.CROSS:
1323GO.CROSS.PAWN:
1324 var CURRENT.CITY CROSSING
1325 var LAST GO.CROSS.PAWN
1326 if $hidden = 1 then put unhid
1327 if ("$guild" = "Thief") then send khri stop
1328 pause 0.5
1329 gosub move pawn
1330 pause .5
1331 gosub PAWN.GOODS
1332 pause .5
1333 if ("%BIN" = "OFF") then goto DONE.STEALING.CROSS2
1334
1335GO.CROSS.BIN:
1336 var LAST GO.CROSS.BIN
1337 gosub move sand spit tavern
1338 pause 0.5
1339 gosub walk go back area
1340 gosub walk climb ladder
1341 if matchre("$roomobjs" , "^You also see some old barrels") then gosub walk go other barrel
1342 else gosub walk go barrel
1343 gosub move bin
1344 gosub BIN.GOODS
1345 pause 0.5
1346
1347DONE.STEALING.CROSS:
1348 var LAST DONE.STEALING.CROSS
1349 # Leaving the THIEF GUILD
1350 gosub walk go door
1351 put ask kal about exp
1352 gosub walk go door
1353 pause 0.5
1354DONE.STEALING.CROSS2:
1355 var LAST DONE.STEALING.CROSS2
1356 gosub move exchange
1357 pause .1
1358 put exchange all dok to kro
1359 put exchange all lir to kro
1360 pause .5
1361 pause .1
1362 gosub move teller
1363 pause 0.5
1364 gosub bank
1365 pause
1366 gosub move 42
1367 pause .5
1368CROSSING.DECIDE:
1369 if ("%SINGLE_RUN" = "ON") then goto FINISHED.SCRIPT
1370 if ($Thievery.LearningRate >= 30) then goto FINISHED.SCRIPT
1371 if ("%CITYCODE" = "SHARD") || ("%CITYCODE" = "HIB") || ("%CITYCODE" = "CROSSING") || ("%CITYCODE" = "LETH") && ($Thievery.LearningRate < 30) then goto TRAVEL.HAVEN
1372 if ("%CITYCODE" = "RIVERHAVEN") || ("%CITYCODE" = "ROSSMAN") || ("%CITYCODE" = "THEREN") && ($Thievery.LearningRate < 30) then goto HEAD.TO.LETH
1373 goto HEAD.TO.LETH
1374
1375#####################################
1376## LETH DERIEL
1377#####################################
1378HEAD.TO.LETH:
1379 var CURRENT.CITY LETH
1380 var LAST HEAD.TO.LETH
1381 put .travel leth
1382 waitforre YOU HAVE ARRIVED
1383 pause .5
1384 send stop hum
1385
1386LETH.STEAL:
1387WARRANT.CHECK.LETH:
1388 var LAST WARRANT.CHECK.LETH
1389 #%
1390 #% *** STEALING FROM LETH DERIEL!
1391 #%
1392 gosub COOKIE
1393 gosub HIDE
1394
1395LETH.TO.SKIN:
1396 var LAST LETH.TO.SKIN
1397 if $Thievery.LearningRate > 32 then goto DONE.STEALING.LETH
1398 if $Thievery.Ranks >= 550 then goto LETH.TO.BOWYER
1399 gosub move morik
1400 goto LETH.SKIN.SHOP
1401
1402LETH.SKIN.SHOP:
1403 var shopcode L.Skin
1404 var SHOP Leth Skin Shop
1405 gosub STEAL %L.Skin
1406 goto LETH.TO.BOWYER
1407
1408LETH.TO.BOWYER:
1409 var LAST LETH.TO.BOWYER
1410 gosub move Bow
1411LETH.BOWYER:
1412 var shopcode L.Bow
1413 var SHOP Leth Bowyer
1414 gosub STEAL %L.Bow
1415 goto LETH.TO.ORIGAMI
1416
1417LETH.TO.ORIGAMI:
1418 var LAST LETH.TO.ORIGAMI
1419 gosub move Origami
1420LETH.ORIGAMI.SHOP:
1421 var shopcode L.Orig
1422 var SHOP Leth Origami
1423 gosub STEAL %L.Orig.num %L.Orig
1424 if $Thievery.LearningRate > 32 then goto DONE.STEALING.LETH
1425 if ($Thievery.Ranks > 400) then goto LETH.TO.WEAPON
1426 goto LETH.TO.WICKER
1427
1428LETH.TO.WEAPON:
1429 pause .5
1430 var LAST LETH.TO.WEAPON
1431 if "$hidden" = "1" then gosub unhide
1432 gosub move weapon
1433LETH.WEAPON.SHOP:
1434 var shopcode L.Weap
1435 var SHOP Leth Weapon Shop
1436 gosub STEAL %L.Weap
1437 goto LETH.TO.WICKER
1438
1439LETH.TO.WICKER:
1440 var LAST LETH.TO.WICKER
1441 if $Thievery.Ranks >= 487 then goto LETH.TO.BARD2
1442 gosub move Wicker
1443LETH.WICKER.SHOP:
1444 var shopcode L.Wick
1445 var SHOP Leth Wicker Shop
1446 gosub STEAL %L.Wick
1447 goto LETH.TO.BARD
1448
1449LETH.TO.BARD:
1450 var LAST LETH.TO.BARD
1451 if $Thievery.LearningRate > 32 then goto DONE.STEALING.LETH
1452 if $Thievery.Ranks >= 300 then goto LETH.TO.BARD2
1453 gosub move music
1454LETH.BARD.SHOP:
1455 var shopcode L.Bard
1456 var SHOP Leth Bard Shop
1457 gosub STEAL %L.Bard
1458 goto LETH.TO.BARD2
1459
1460LETH.TO.BARD2:
1461 var LAST LETH.TO.BARD2
1462 gosub move siny
1463LETH.BARD.SHOP2:
1464 var shopcode L.Bard2
1465 var SHOP Leth Bard2 Shop
1466 gosub STEAL %L.Bard2
1467 goto LETH.TO.CLOTHES
1468
1469LETH.TO.CLOTHES:
1470 var LAST LETH.TO.CLOTHES
1471 if $Thievery.LearningRate > 32 then goto DONE.STEALING.LETH
1472 if $Thievery.Ranks >= 920 then goto LETH.TO.WOOD
1473 gosub move Clothing
1474LETH.CLOTHES.SHOP:
1475 var shopcode L.Cloth
1476 var SHOP Leth Clothes Shop
1477 gosub STEAL %L.Cloth
1478 if "$hidden" = "1" then gosub unhide
1479 goto LETH.TO.WOOD
1480
1481LETH.TO.WOOD:
1482 var LAST LETH.TO.WOOD
1483 if "$hidden" = "1" then gosub unhide
1484 gosub move wood
1485LETH.WOOD.SHOP:
1486 var shopcode L.Wood
1487 var SHOP Leth Wood Shop
1488 gosub STEAL %L.Wood
1489 goto LETH.TO.GENERAL
1490
1491LETH.TO.GENERAL:
1492 var LAST LETH.TO.GENERAL
1493 gosub move General
1494LETH.GENERAL.STORE:
1495 var shopcode L.Gen
1496 var SHOP Leth General Store
1497 var SECOND.ITEM ON
1498 var secondary %L.Gen.Alt
1499 gosub STEAL %L.Gen
1500 if $Thievery.LearningRate > 32 then goto DONE.STEALING.LETH
1501 if $Thievery.Ranks >= 465 then goto DONE.STEALING.LETH
1502 goto LETH.TO.PERFUME
1503
1504LETH.TO.PERFUME:
1505 var LAST LETH.TO.PERFUME
1506 gosub move Perfume
1507LETH.PERFUME.SHOP:
1508 var shopcode L.Perf
1509 var SHOP Leth Perfume Shop
1510 gosub STEAL %L.Perf
1511 goto DONE.STEALING.LETH
1512
1513DONE.STEALING.LETH:
1514DONE.STEALING.LETH.BANK:
1515 var LAST LETH.DECIDE
1516 gosub move exchange
1517 pause .3
1518 send exchange all dok to kro
1519 send exchange all lir to kro
1520 pause .5
1521 pause .5
1522 gosub move teller
1523 pause .5
1524 gosub bank
1525 pause
1526 gosub move portal
1527 pause .5
1528 pause .5
1529LETH.DECIDE:
1530 if ("%SINGLE_RUN" = "ON") then goto PAWN.LETH
1531 if $Thievery.LearningRate > 30 then goto PAWN.LETH
1532 if ("%CITYCODE" = "CROSSING") || ("%CITYCODE" = "RIVERHAVEN") || ("%CITYCODE" = "ROSSMAN") || ("%CITYCODE" = "THEREN") && ($Thievery.LearningRate < 30) then goto TO.SHARD
1533 if ("%CITYCODE" = "SHARD") || ("%CITYCODE" = "LETH") || ("%CITYCODE" = "HIB") && ($Thievery.LearningRate < 30) then goto ARTHE.STEAL
1534 goto PAWN.LETH
1535
1536PAWN.LETH:
1537 put .travel cross
1538 waitforre YOU HAVE ARRIVED
1539GO.LETH.PAWN:
1540 var CURRENT.CITY LETH
1541 var LAST GO.LETH.PAWN
1542 if $hidden = 1 then put unhid
1543 if ("$guild" = "Thief") then send khri stop
1544 pause 0.5
1545 gosub move PAWN
1546 pause .5
1547 gosub PAWN.GOODS
1548 pause .5
1549 if ("%BIN" = "OFF") then goto DONE.STEALING.LETH3
1550
1551GO.LETH.BIN:
1552 var LAST GO.LETH.BIN
1553 gosub move sand spit tavern
1554 pause 0.5
1555 gosub walk go back area
1556 gosub walk climb ladder
1557 if matchre("$roomobjs" , "^You also see some old barrels") then gosub walk go other barrel
1558 else gosub walk go barrel
1559 gosub move bin
1560 pause 0.5
1561 gosub BIN.GOODS
1562 pause 0.5
1563
1564DONE.STEALING.LETH2:
1565 var LAST DONE.STEALING.LETH2
1566 # Leaving the THIEF GUILD
1567 gosub walk go door
1568 put ask kal about exp
1569 gosub walk go door
1570 pause 0.5
1571DONE.STEALING.LETH3:
1572var LAST DONE.STEALING.LETH3
1573 gosub move exchange
1574 pause .2
1575 put exchange all dok to kro
1576 put exchange all lir to kro
1577 pause .5
1578 pause .1
1579 gosub move teller
1580 pause 0.5
1581 gosub bank
1582 pause
1583 goto FINISHED.SCRIPT
1584
1585############################################################################
1586## ILLITHI STEALING SECTION (SHARD / HIB / BOAR CLAN ETC ##
1587############################################################################
1588
1589TO.SHARD:
1590var LAST TO.SHARD
1591pause .5
1592if ("$guild" = "Thief") then send khri stop
1593put .travel shard
1594waitforre YOU HAVE ARRIVED
1595pause .5
1596OUTSIDE.SHARD:
1597var LAST OUTSIDE.SHARD
1598pause .5
1599gosub move shard
1600pause .5
1601
1602SHARD.STEAL:
1603SHARD.STEALING:
1604WARRANT.CHECK.SHARD:
1605 var LAST SHARD.STEAL
1606 var CURRENT.CITY SHARD
1607 pause 0.5
1608 #%
1609 #% *** STEALING FROM SHARD!
1610 #%
1611 gosub COOKIE
1612 gosub TIME.CHECK
1613
1614SHARD.TO.GENERAL:
1615 var LAST SHARD.TO.GENERAL
1616 gosub move general
1617SHARD.GENERAL:
1618 var shopcode S.Gen
1619 var SHOP Shard General Store
1620 gosub STEAL %S.Gen
1621 goto SHARD.TO.WEAPON
1622
1623SHARD.TO.WEAPON:
1624 var LAST SHARD.TO.WEAPON
1625 if ("%TIME" = "NIGHT") then goto SHARD.TO.CLERIC
1626 gosub move fiona
1627SHARD.WEAPON:
1628 var shopcode S.Weap
1629 var SHOP Shard Weapon Shop
1630 gosub STEAL %S.Weap
1631 goto SHARD.TO.CLOTHING
1632
1633SHARD.TO.CLOTHING:
1634 if $Thievery.Ranks >= 555 then goto SHARD.TO.CLERIC
1635 var LAST SHARD.TO.CLOTHING
1636 gosub move stitchery
1637SHARD.CLOTHING:
1638 var shopcode S.Stitch
1639 var SHOP Shard Stitchery
1640 gosub STEAL %S.Stitch
1641 goto SHARD.TO.CLERIC
1642
1643SHARD.TO.CLERIC:
1644 if $Thievery.Ranks >= 670 then goto SHARD.TO.ALCHEMIST
1645 var LAST SHARD.TO.CLERIC
1646 gosub move cleric shop
1647SHARD.CLERIC:
1648 var shopcode S.Cleric
1649 var SHOP Shard Cleric Shop
1650 gosub STEAL %S.Cleric
1651 goto SHARD.TO.ALCHEMIST
1652
1653SHARD.TO.ALCHEMIST:
1654 var LAST SHARD.TO.ALCHEMIST
1655 gosub move herb
1656SHARD.ALCHEMIST:
1657 var shopcode S.Alch
1658 var SHOP Shard Alchemist
1659 gosub STEAL %S.Alch
1660 goto SHARD.TO.HERB
1661
1662SHARD.TO.HERB:
1663 var LAST SHARD.TO.HERB
1664 if $Thievery.Ranks >= 334 then goto SHARD.TO.ARTIFICER
1665 gosub move herb
1666SHARD.HERB:
1667 var shopcode S.Herb
1668 var SHOP Shard Herb
1669 gosub STEAL %S.Herb
1670 goto SHARD.TO.ARTIFICER
1671
1672SHARD.TO.ARTIFICER:
1673 var LAST SHARD.TO.ARTIFICER
1674 if ("%TIME" = "NIGHT") then goto SHARD.TO.ARMORY
1675 gosub move magic
1676SHARD.ARTIFICER:
1677 var shopcode S.Artif
1678 var SHOP Shard Artificer
1679 gosub STEAL %S.Artif
1680 goto SHARD.TO.MUSIC
1681
1682SHARD.TO.MUSIC:
1683 var LAST SHARD.TO.MUSIC
1684 if ("%TIME" = "NIGHT") then goto SHARD.TO.ARMORY
1685 gosub move music
1686SHARD.MUSIC:
1687 var shopcode S.Music
1688 var SHOP Shard Music Shop
1689 gosub STEAL %S.Music
1690 goto SHARD.TO.LocK
1691
1692SHARD.TO.LocK:
1693 var LAST SHARD.TO.ARMORY
1694 put ask malik about thieves
1695 pause 0.5
1696 put order pick
1697 pause 0.5
1698 pause 0.1
1699 put offer 999999999
1700 put offer 999999999
1701 pause 12
1702 gosub STAND
1703SHARD.LocK:
1704 var shopcode S.Lock
1705 var SHOP Shard Lockpick Shop
1706 gosub STEAL %S.Lock
1707 put go trap
1708 pause 0.5
1709 pause
1710 pause 0.5
1711 goto SHARD.TO.ARMORY
1712
1713SHARD.TO.ARMORY:
1714 var LAST SHARD.TO.ARMORY
1715 if ("%TIME" = "NIGHT") then goto SHARD.TO.REED
1716 gosub move armor
1717SHARD.ARMORY:
1718 var shopcode S.Armor
1719 var SHOP Shard Armory
1720 gosub STEAL %S.Armor
1721 goto SHARD.TO.REED
1722
1723SHARD.TO.REED:
1724 var LAST SHARD.TO.REED
1725 gosub move 593
1726SHARD.REED:
1727 var shopcode S.Reed
1728 var SHOP Shard Reed
1729 gosub STEAL %S.Reed.num %S.Reed
1730 goto SHARD.TO.SCHOLAR
1731
1732SHARD.TO.SCHOLAR:
1733 var LAST SHARD.TO.SCHOLAR
1734 gosub move scholar
1735SHARD.SCHOLAR:
1736 var shopcode S.Museum
1737 var SHOP Shard Scholar's Museum Gift Shop
1738 gosub STEAL %S.Museum
1739 goto SHARD.TO.BOWS
1740
1741SHARD.TO.BOWS:
1742 var LAST SHARD.TO.BOWS
1743 if ("%TIME" = "NIGHT") then goto SHARD.TO.COIN
1744 gosub move bows
1745SHARD.BOWS:
1746 var shopcode S.Bow
1747 var SHOP Shard Bowyer
1748 gosub STEAL %S.Bow
1749 pause 2
1750 send out
1751 waitforre ^You|^Obvious
1752 pause 0.5
1753 goto SHARD.TO.COIN
1754
1755SHARD.TO.COIN:
1756 var LAST SHARD.TO.COIN
1757 if $Thievery.Ranks >= 485 then goto SHARD.TO.FRILLS
1758 gosub move coin
1759SHARD.COIN:
1760 var shopcode S.Coin
1761 var SHOP Coin of the Realm
1762 var item.Location %SHARD.COIN.Loc
1763 gosub STEAL %S.Coin
1764 goto SHARD.TO.TOKEN
1765
1766SHARD.TO.TOKEN:
1767 var LAST SHARD.TO.TOKEN
1768 gosub move token
1769SHARD.TOKEN:
1770 var shopcode S.Token
1771 var SHOP Token Shop
1772 gosub STEAL %S.Token
1773 goto SHARD.TO.BARBER
1774
1775SHARD.TO.BARBER:
1776 var LAST SHARD.TO.BARBER
1777 gosub move barber
1778SHARD.BARBER:
1779 var shopcode S.Barber
1780 var SHOP Shard Barber Shop
1781 gosub STEAL %S.Barber
1782 goto SHARD.TO.FRILLS
1783
1784SHARD.TO.FRILLS:
1785 var LAST SHARD.TO.FRILLS
1786 gosub move Little
1787SHARD.FRILLS:
1788 var shopcode S.Frill
1789 var SHOP Shard Little Frills
1790 gosub STEAL %S.Frill
1791 goto SHARD.TO.HERALDRY
1792
1793SHARD.TO.HERALDRY:
1794 var LAST SHARD.TO.HERALDRY
1795 gosub move herald
1796SHARD.HERALDRY:
1797 var shopcode S.Herald
1798 var SHOP Shard Heraldry Shop
1799 var item.Location %S.Herald.Loc
1800 gosub STEAL %S.Herald
1801 goto SHARD.TO.GIFT
1802
1803SHARD.TO.GIFT:
1804 var LAST SHARD.TO.GIFT
1805 gosub move gift
1806SHARD.GIFT:
1807 var shopcode S.Gift
1808 var SHOP Shard Gift Shop
1809 var item.Location %S.Gift.Loc
1810 gosub STEAL %S.Gift
1811 goto SHARD.TO.TOY
1812
1813SHARD.TO.TOY:
1814 var LAST SHARD.TO.TOY
1815 gosub move toy
1816SHARD.TOY:
1817 var shopcode S.Toy
1818 var SHOP Shard Toy Shop
1819 var item.Location %S.Toy.Loc
1820 gosub STEAL %S.Toy
1821 goto SHARD.TO.MEMORY
1822
1823SHARD.TO.MEMORY:
1824 var LAST SHARD.TO.MEMORY
1825 gosub move 629
1826SHARD.MEMORY:
1827 var shopcode S.Memory
1828 var SHOP Shard Toy Shop
1829 gosub STEAL %S.Memory
1830 goto SHARD.TO.TANNER
1831
1832SHARD.TO.TANNER:
1833 var LAST SHARD.TO.TANNER
1834 if $hidden = 1 then put unhid
1835 pause .5
1836 gosub move EastGate
1837EAST.TO.TANNER:
1838 if $Thievery.Ranks >= 600 then goto SHARD.TO.SURVIVAL
1839 pause 0.5
1840 gosub move tanner
1841SHARD.TANNER:
1842 var shopcode S.Tanner
1843 var SHOP Shard Tanner
1844 gosub STEAL %S.Tanner
1845 goto SHARD.TO.SURVIVAL
1846
1847SHARD.TO.SURVIVAL:
1848 var LAST SHARD.TO.SURVIVAL
1849 if $hidden = 1 then put unhid
1850 pause .5
1851 gosub move survival
1852SHARD.SURVIVAL:
1853 var shopcode S.Surv
1854 var SHOP Shard Survival
1855 var item.Location %S.Surv.Loc
1856 var SECOND.ITEM ON
1857 var secondary %S.Surv.Alt
1858 gosub STEAL %S.Surv
1859 goto SHARD.TO.SURVIVAL2
1860
1861SHARD.TO.SURVIVAL2:
1862 var LAST SHARD.TO.SURVIVAL2
1863 gosub move 33
1864SHARD.SURVIVAL2:
1865 var shopcode S.Surv2
1866 var SHOP Shard Survivalist Shop (Back room)
1867 var item.Location %S.Surv2.Loc
1868 var SECOND.ITEM ON
1869 var secondary %S.Surv2.Alt
1870 gosub STEAL %S.Surv2
1871 goto DONE.STEAL.SHARD
1872
1873TO.STEELCLAW.WEAPON:
1874 var LAST TO.STEELCLAW.WEAPON
1875 if $hidden = 1 then put unhid
1876 pause 0.5
1877 gosub move weapon
1878STEELCLAW.WEAPON:
1879 var shopcode SC.Weap
1880 var SHOP SteelClaw Clan Weapons
1881 gosub STEAL %SC.Weap
1882
1883DONE.STEAL.SHARD:
1884 var LAST GO.PAWN.SHARD
1885 if $hidden = 1 then put unhid
1886 if ("$guild" = "Thief") then send khri stop
1887 pause 0.2
1888 pause 0.5
1889 gosub move east
1890 pause 0.5
1891 pause 0.5
1892 goto GO.PAWN.SHARD
1893
1894GO.PAWN.SHARD:
1895 var CURRENT.CITY SHARD
1896 var LAST GO.PAWN.SHARD
1897 gosub move PAWN
1898 pause .5
1899 gosub PAWN.GOODS
1900 pause .5
1901 if ("%BIN" = "OFF") then goto SHARD.TO.BANK
1902
1903GO.BIN.SHARD:
1904 var LAST GO.BIN.SHARD
1905 gosub move 93
1906 gosub walk go well
1907 gosub walk climb ladder
1908 gosub walk w
1909 gosub walk out
1910 gosub walk w
1911 gosub walk se
1912 gosub walk go gap
1913 put knock door
1914 pause
1915 put '%SHARD.PASSWORD
1916 pause 0.5
1917 pause 0.5
1918 gosub walk go door
1919 gosub walk go arch
1920 gosub walk s
1921 pause .5
1922 gosub BIN.GOODS
1923 pause .5
1924
1925DONE.STEALING.SHARD:
1926 var LAST DONE.STEALING.SHARD
1927 put ask sais about exp
1928 pause .5
1929 gosub walk n
1930 gosub walk go arch
1931 gosub walk go door
1932 gosub walk n
1933 gosub walk nw
1934 gosub walk e
1935 gosub walk go fiss
1936 gosub walk e
1937 gosub walk climb ladder
1938 gosub walk up
1939 pause 0.5
1940 goto SHARD.TO.BANK
1941
1942SHARD.TO.BANK:
1943 var LAST SHARD.TO.BANK
1944 gosub move exchange
1945 pause .1
1946 put exchange all kro to dok
1947 put exchange all lir to dok
1948 pause
1949 gosub move teller
1950 pause 0.5
1951 gosub bank
1952 pause
1953 if ("%CITYCODE" = "CROSSING") || ("%CITYCODE" = "RIVERHAVEN") || ("%CITYCODE" = "ROSSMAN") || ("%CITYCODE" = "THEREN") then goto FINISHED.SCRIPT
1954 if ($Thievery.LearningRate > 30 then goto FINISHED.SCRIPT
1955 if ("%SINGLE_RUN" = "ON") then goto FINISHED.SCRIPT
1956
1957SHARD.TO.CROSS:
1958 var LAST SHARD.TO.CROSS
1959 if ("%CITYCODE" = "SHARD") || ("%CITYCODE" = "HIB") then
1960 {
1961 gosub move north
1962 gosub move 65
1963 }
1964 goto HEAD.TO.LETH
1965
1966GO.TO.CROSS:
1967 var LAST GO.TO.CROSS
1968 var BIN.CROSS ON
1969 var CITY CROSS
1970 gosub move north
1971 gosub move 65
1972 pause .5
1973 send .travel cross
1974 waitforre YOU HAVE ARRIVED
1975 pause
1976 if ("%CITYCODE" = "CROSSING") || ("%CITYCODE" = "RIVERHAVEN") || ("%CITYCODE" = "ROSSMAN") || ("%CITYCODE" = "THEREN") then goto FINISHED.SCRIPT
1977 goto TO.ARTHE
1978
1979GO.TO.HIB:
1980 var LAST GO.TO.HIB
1981 var BIN.HIB ON
1982 var CITY HIB
1983 gosub move N Gate
1984 pause .5
1985 gosub move 65
1986 pause .5
1987 send .travel hib
1988 waitforre YOU HAVE ARRIVED
1989
1990####################################
1991# Hibarnhvidar
1992####################################
1993HIB.STEAL:
1994HIB.TO.SHIELD:
1995 var CURRENT.CITY HIB
1996 #%
1997 #% **** STEALING FROM HIB! ****
1998 #%
1999 pause .5
2000 gosub COOKIE
2001 gosub move shield
2002
2003HIB.SHIELD:
2004 var shopcode H.Shield
2005 var SHOP Hib Shield Shop
2006 gosub STEAL %H.Shield
2007 goto HIB.TO.JEWELRY
2008
2009HIB.TO.JEWELRY:
2010 if $Thievery.Ranks < 600 then goto HIB.TO.TOGGERY
2011 var LAST HIB.TO.JEWELRY
2012 gosub move jewelry
2013HIB.JEWELRY:
2014 var shopcode H.Jewel
2015 var SHOP Hib Jewelry
2016 gosub STEAL %H.Jewel
2017 goto HIB.TO.TOGGERY
2018
2019HIB.TO.TOGGERY:
2020 var LAST HIB.TO.TOGGERY
2021 gosub move togger
2022HIB.TOGGERY:
2023 var shopcode H.Tog
2024 var SHOP Hib Toggery
2025 gosub STEAL %H.Tog
2026 goto HIB.TO.SUNDRIES
2027
2028HIB.TO.SUNDRIES:
2029 var LAST HIB.TO.SUNDRIES
2030 gosub move general
2031HIB.SUNDRIES:
2032 var shopcode H.Sund
2033 var SHOP Hib Sundries
2034 gosub STEAL %H.Sund
2035 put go door
2036 pause
2037 goto HIB.TO.LAMPS
2038
2039HIB.TO.LAMPS:
2040 var LAST HIB.TO.LAMPS
2041 gosub move lamp
2042HIB.LAMPS:
2043 var shopcode H.Lamp
2044 var SHOP Hib Lamps
2045 gosub STEAL %H.Lamp
2046 goto HIB.TO.HERBS
2047
2048HIB.TO.HERBS:
2049 if $Thievery.Ranks >= 460 then goto HIB.TO.MUSIC
2050 var LAST HIB.TO.HERBS
2051 gosub move herb
2052HIB.HERBS:
2053 var shopcode H.Herb
2054 var SHOP Hib Herbs
2055 gosub STEAL %H.Herb
2056 goto HIB.TO.MUSIC
2057
2058HIB.TO.MUSIC:
2059 var LAST HIB.TO.MUSIC
2060 gosub move music
2061HIB.MUSIC:
2062 var shopcode H.Music
2063 var SHOP Hib Music Store
2064 gosub STEAL %H.Music
2065 goto HIB.TO.ALCHEMY
2066
2067HIB.TO.ALCHEMY:
2068 var LAST HIB.TO.ALCHEMY
2069 gosub move alchemy
2070HIB.ALCHEMY:
2071 var shopcode H.Alch
2072 var SHOP Hib Alchemist
2073 gosub STEAL %H.Alch
2074 goto HIB.TO.FORGE
2075
2076HIB.TO.FORGE:
2077 var LAST HIB.TO.FORGE
2078 if $Thievery.Ranks >= 430 then goto LEAVE.HIB
2079 gosub move forge
2080HIB.FORGE:
2081 var shopcode H.Forge
2082 var SHOP Hib Forge
2083 var item.Location %H.Forge.Loc
2084 gosub STEAL %H.Forge
2085 goto LEAVE.HIB
2086
2087LEAVE.HIB:
2088 var LAST LEAVE.HIB
2089 gosub move 75
2090 send .travel raven
2091 waitforre YOU HAVE ARRIVED
2092 goto RAVEN.STEAL
2093
2094RAVEN.STEAL:
2095 var LAST RAVEN.STEAL
2096 gosub move 179
2097RAVEN.GENERAL:
2098 var shopcode R.Gen
2099 var SHOP Raven's Point General
2100 gosub STEAL %R.Gen
2101 goto RAVEN.TO.TOBACCO
2102
2103RAVEN.TO.TOBACCO:
2104 if $Thievery.Ranks >= 600 then goto RETURN.TO.SHARD
2105 var LAST RAVEN.TOBACCO
2106 gosub move 144
2107RAVEN.TOBACCO:
2108 var shopcode R.Tobac
2109 var SHOP Raven's Point Tobacco
2110 gosub STEAL %R.Tobac
2111 goto RETURN.TO.SHARD
2112
2113RETURN.TO.SHARD:
2114 var LAST RETURN.TO.SHARD
2115 if $hidden = 1 then put unhid
2116 if ("$guild" = "Thief") then send khri stop
2117 pause
2118 gosub move 133
2119 send .travel shard
2120 waitforre YOU HAVE ARRIVED
2121BACKINSHARD:
2122 var LAST BACKINSHARD
2123 pause
2124 gosub move shard
2125 pause
2126 goto SHARD.STEAL
2127
2128########################################################################################
2129########################################################################################
2130
2131FINISHED.SCRIPT:
2132 #%
2133 #% *** DONE STEALING!
2134 #%
2135 pause .1
2136 send open my %SAFE.CONTAINER
2137 pause .1
2138 put ##% >Log Cyan **** FINAL STEALING REPORT ****
2139 put ##% >Log Cyan ~ Binned: %Binned Items | Pawned: %Pawn Items
2140 put ##% >Log Cyan ~ %Charges Stealing Charge(s)! | Jailed %Jailed Time(s)!
2141 put ##% >Log Cyan ~ Thievery Learning Rate: $Thievery.LearningRate / 34
2142 put ##% >Log Cyan ~ Profit: %Plat Plat, %Gold Gold, %Silver Silver, %Bronze Bronze and %Copper Copper
2143 put #parse DONE PAWNING
2144 put #parse DONE STEALING
2145 put #parse DONE STEALING
2146 put #parse !STEAL DONE!
2147 put #parse !STEAL DONE!
2148 put #parse !STEAL DONE!
2149 put #statusbar 5 Stealing: @time@
2150 goto all.done
2151 exit
2152
2153########################################################################################
2154########################################################################################
2155
2156## IN DEVELOPMENT
2157CLAN.HEAL:
2158put ##% >Log Red Your hands were cut off! Looking for healer!
2159action goto CLAN.HEAL1 when eval $stunned = 1
2160pause 3
2161CLAN.HEAL1:
2162pause 10
2163if $stunned = 1 then goto CLAN.HEAL
2164action remove eval $stunned = 1
2165gosub stand
2166gosub move arch
2167gosub move 9
2168put lean gator
2169put lean sawbone
2170pause 40
2171gosub move leave
2172pause
2173goto %LAST
2174
2175#############################################################
2176# END OF STEALING RUN TRAINING
2177# BEGIN MANAGEMENT ENGINE GOSUBS
2178#############################################################
2179
2180################################
2181# PAWNING / BINNING LOGIC #
2182################################
2183#######################################################################################################################
2184PAWN.GOODS:
2185 #%
2186 #% #### GETTING SOME COIN! ####
2187 #% #### PAWNING %CURRENT.CITY HAUL! ####
2188 #%
2189 pause 0.2
2190 var BINORPAWN PAWN
2191 gosub BAG.EMPTY %PAWN.CONTAINER
2192 if ("%BIN" = "OFF") then gosub BAG.EMPTY %BIN.CONTAINER
2193 gosub STOW
2194 gosub STOWING
2195 return
2196#######################################################################################################################
2197BIN.GOODS:
2198 #%
2199 #% ######## Binning %CURRENT.CITY Haul! ########
2200 #%
2201 pause 0.5
2202 var BINORPAWN BIN
2203 gosub BAG.EMPTY %BIN.CONTAINER
2204 gosub STOW
2205 gosub STOWING
2206 return
2207#######################################################################################################################
2208
2209################################
2210# STEALING SUB-ROUTINE #
2211################################
2212STEAL:
2213 var item $0
2214 if ("%guild" != "Thief") then var STEALCOUNT %%shopcodeQuant
2215
2216STEAL.1:
2217 if ("$righthand" != "Empty") || ("$lefthand" != "Empty") then gosub stowing
2218 if contains("%item" , "nothing") then goto STEAL.RETURN
2219MARKING:
2220 if ("$hidden" != "1") then gosub HIDE
2221 if ("%marking" == "OFF") then goto STEALING
2222 pause .5
2223 pause .2
2224 matchre MARKING ^\.\.\.wait\s+\d+\s+sec(?:onds|s)?\.?|^Sorry\,
2225 matchre MARK.LAST to take unwanted notice of you
2226 matchre SECONDARY.CHECK Mark what\?|^Something appears different
2227 matchre TOO.HOT you are being watched|looking for a reason to call the guards|beyond foolish|pretty sure you'll be caught
2228 matchre TOO.HOT it would likely be futile|gavel #%es through your mind|feel the taste of bitter failure
2229 matchre TOO.HOT a long shot|chances to lift it|quite the struggle|Guards! Guards!
2230 matchre STEALING Roundtime|^You can not make marks on
2231 put mark %item %item.Location
2232 matchwait
2233
2234MARK.LAST:
2235 var marking OFF
2236
2237STEALING:
2238 pause .1
2239 pause .2
2240 pause .2
2241 matchre STEALING ^\.\.\.wait\s+\d+\s+sec(?:onds|s)?\.?|^Sorry\,
2242 matchre STEAL.1 ^You need at least one hand free
2243 matchre STEAL.RETURN You haven't picked something|You can't steal
2244 matchre TOO.HOT for help\.|realize that you are being watched
2245 matchre STEAL.CHECK Roundtime
2246 put steal %item %item.Location
2247 matchwait
2248
2249STEAL.CHECK:
2250 math stolen add 1
2251 if %stolen >= %STEALCOUNT then goto STEAL.RETURN
2252 if %stolen <= 1 then goto MARKING
2253 if %stolen == 2 then gosub stow
2254 if %stolen <= 3 then goto MARKING
2255 if %stolen == 4 then gosub stow
2256 if %stolen == 5 then goto MARKING
2257 if %stolen >= 6 then goto STEAL.RETURN
2258 goto MARKING
2259
2260TOO.HOT:
2261 var LEAVE.SHOP YES
2262 put ##% >log Orchid Leaving: %SHOP.. too hot!
2263STEAL.RETURN:
2264 action remove You don't feel you learned anything useful from this trivial theft
2265 action remove notices you attempting to make the grab and begins to shout for help.
2266 var stolen 0
2267 var item.Location
2268 if ("$guild" = "Thief") then var marking ON
2269 if ("$righthand" != "Empty") || ("$lefthand" != "Empty") then gosub stow
2270 if ("$hidden" = "1") then
2271 {
2272 put shiv
2273 wait
2274 }
2275 pause .1
2276 pause .1
2277 RETURN
2278
2279SECONDARY.CHECK:
2280 if ("%SECOND.ITEM" = "OFF") then goto STEAL.RETURN
2281 var item %secondary
2282 var SECOND.ITEM OFF
2283 #%
2284 #% *** OUT OF STOCK! CHECKING FOR SECONDARY ITEMS..
2285 #%
2286 goto STEAL.1
2287
2288
2289#######################
2290# BINNING ROUTINE #
2291#######################
2292BIN:
2293 var BIN.ITEM $0
2294BIN.GET:
2295 matchre BIN.GET ^\.\.\.wait\s+\d+\s+sec(?:onds|s)?\.?|^Sorry\,
2296 matchre BIN.ITEM You get|You are already|You pick up
2297 matchre RETURN What were you referring|^Please rephrase that command|I could not|But that is
2298 send get my %BIN.ITEM in my %bag
2299 matchwait
2300BIN.ITEM:
2301 matchre BIN.ITEM ^\.\.\.wait\s+\d+\s+sec(?:onds|s)?\.?|^Sorry\,
2302 match BIN.DROP about as cold as it gets
2303 matchre BIN.GET ^A bored-looking Human boy says|Nice work
2304 matchre RETURN ^Please rephrase that command|You aren't
2305 send put my %BIN.ITEM in bin
2306 matchwait
2307BIN.DROP:
2308 gosub EMPTY.HANDS
2309 goto BIN.GET
2310
2311
2312#######################
2313# PAWNING ROUTINE #
2314#######################
2315PAWN:
2316 var PAWN.ITEM $0
2317PAWN.GET:
2318 matchre PAWN.GET ^\.\.\.wait\s+\d+\s+sec(?:onds|s)?\.?|^Sorry\,
2319 matchre PAWN.BIN ^You need a free hand
2320 matchre PAWN.SELL /You get|already holding|You pick up/i
2321 matchre RETURN What were you referring|^Please rephrase that command|I could not|But that is
2322 send get my %PAWN.ITEM in my %bag
2323 matchwait
2324PAWN.SELL:
2325 matchre PAWN.SELL ^\.\.\.wait\s+\d+\s+sec(?:onds|s)?\.?|^Sorry\,
2326 matchre PAWN.GET You sell your|hands you
2327 matchre PAWN.BIN shakes his head|looks puzzled|worth|idiots|Waste all|That's not worth|isn't worth my time|no need|scowls and says|I don't want|slit a throat|You need to be
2328 matchre BUCKET You'll want to empty that first
2329 send sell my %PAWN.ITEM
2330 matchwait
2331PAWN.BIN:
2332 if ("%BIN" = "OFF") then goto BUCKET
2333 matchre PAWN.BIN ^\.\.\.wait\s+\d+\s+sec(?:onds|s)?\.?|^Sorry\,
2334 matchre PAWN.GET /you put your|What were you|you should be holding|stow help/i
2335 matchre BUCKET /long to fit|There isn't any more room|That's|too heavy|no matter/i
2336 matchre BUCKET What were you|You can't do that
2337 if "$lefthand" != "Empty" then send put $lefthandnoun in my %BIN.CONTAINER
2338 if "$righthand" != "Empty" then send put $righthandnoun in my %BIN.CONTAINER
2339 matchwait 2
2340BUCKET:
2341 pause 0.1
2342 matchre PAWN.GET /You put|You drop|Perhaps|You toss/i
2343 if contains("$roomobjs"," bucket of viscous gloop") then
2344 {
2345 if "$lefthand" != "Empty" then send put $lefthandnoun in bucket
2346 if "$righthand" != "Empty" then send put $righthandnoun in bucket
2347 }
2348 gosub EMPTY.HANDS
2349 matchwait 2
2350 if ("$lefthand" != "Empty") || ("$righthand" != "Empty") then gosub EMPTY.HANDS
2351 GOTO PAWN.GET
2352
2353###########################################################
2354###########################################################
2355BAG.EMPTY:
2356 var bag $0
2357 var contents
2358 action var contents $1 when ^In the .+ you see (.*)\.
2359 put look in my %bag
2360 waitforre ^In the .* you see|^There is nothing in there\.|^What were|^I could not
2361 eval contents replace("%contents", ", ", "|")
2362 eval contents replace("%contents", " and ", "|")
2363 var contents |%contents|
2364 eval total count("%contents", "|")
2365BAG.EMPTY.Loop:
2366 eval item element("%contents", 1)
2367 eval number count("%contents", "|%item")
2368 var count 0
2369 gosub BAG.EMPTY.RemoveLoop
2370 action setvariable item $1 when ^@(?:an?|some).* (\S+)$
2371 put #parse @%item
2372 counter set %count
2373 if contains("%STEAL.LIST", "%item") then gosub BAG.EMPTY.itemAction
2374 if %contents != "|" then goto BAG.EMPTY.Loop
2375 action remove ^In the .+ you see (.*)\
2376 return
2377BAG.EMPTY.RemoveLoop:
2378 eval number count("%contents", "|%item|")
2379 eval contents replace("%contents", "|%item|", "|")
2380 eval contents replace("%contents", "||" "|")
2381 evalmath count %count + %number
2382 if !contains("%contents", "|%item|") then return
2383 goto BAG.EMPTY.RemoveLoop
2384BAG.EMPTY.itemAction:
2385 counter subtract 1
2386 pause 0.2
2387 gosub %BINORPAWN %item
2388 pause 0.2
2389 if %c = 0 then return
2390 goto BAG.EMPTY.itemAction
2391#######################################################################
2392#######################################################################
2393
2394#############################
2395# STOW ROUTINE #
2396#############################
2397
2398STOW:
2399 math STOW.LOOP add 1
2400 pause 0.1
2401 if contains("$lefthand" "$righthand" , "%large.items") then gosub EMPTY.HANDS
2402 if %STOW.LOOP > 1 then goto SECOND.BAG
2403 matchre STOW ^\.\.\.wait\s+\d+\s+sec(?:onds|s)?\.?|^Sorry\,
2404 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
2405 matchre STOW.RETURN /You put|What were you|You can't do|I could not|Perhaps you|Stow what/i
2406 if "$righthand" != "Empty" then put put $righthandnoun in my %BIN.CONTAINER
2407 if "$lefthand" != "Empty" then put put $lefthandnoun in my %PAWN.CONTAINER
2408 matchwait 7
2409 RETURN
2410SECOND.BAG:
2411 pause .1
2412 matchre SECOND.BAG ^\.\.\.wait\s+\d+\s+sec(?:onds|s)?\.?|^Sorry\,
2413 matchre DROP.ITEM /You just can't get|You can't do|no matter how you arrange|any more room|too wide|too heavy|too long to fit|won't fit/i
2414 matchre STOW.RETURN /You put|What were you|I could not|Perhaps you|Stow what/i
2415 if "$righthand" != "Empty" then put put $righthandnoun in my %PAWN.CONTAINER
2416 if "$lefthand" != "Empty" then put put $lefthandnoun in my %BIN.CONTAINER
2417 matchwait 7
2418 RETURN
2419
2420STOW.RETURN:
2421 var STOW.LOOP 0
2422 RETURN
2423
2424DROP.ITEM:
2425 var STOW.LOOP 0
2426 gosub EMPTY.HANDS
2427 pause 0.1
2428 RETURN
2429
2430#############################################################################################
2431# CONTAINER CHECK
2432# This portion checks your bags before the script starts,
2433# For any items matching the names of the items you will be stealing
2434# If it finds anything, it will stow it in your %SAFE.CONTAINER variable and keep this closed.
2435# This will avoid pawning or binning any of your important items accidentally!
2436##############################################################################################
2437
2438BAG.CHECK:
2439 var bag $0
2440 var contents NULL
2441 send open my %SAFE.CONTAINER
2442 wait
2443 #action var contents $1 when ^You rummage through .+ and see (.*)\.
2444 action var contents $1 when ^In the .+ you see (.*)\.
2445 send look in my %bag
2446 waitforre ^In the .* you see|^There is nothing in there\.|^What were|^I could not
2447 pause 0.5
2448 if "%contents" = "NULL" then return
2449 eval contents replace("%contents", ", ", "|")
2450 eval contents replace("%contents", " and ", "|")
2451 var contents |%contents|
2452 eval total count("%contents", "|")
2453
2454Loop:
2455 eval item element("%contents", 1)
2456 eval number count("%contents", "|%item")
2457 var count 0
2458 gosub RemoveLoop
2459 action var item $1 when ^@(?:an?|some) .* (\S+)$
2460 put #parse @%item
2461 counter set %count
2462 if contains("%STEAL.LIST", "%item") then gosub storeitem
2463 if %contents != "|" then goto Loop
2464 send close my %SAFE.CONTAINER
2465 pause .1
2466 #% **** DONE STASHING ITEMS FROM %bag
2467 return
2468
2469RemoveLoop:
2470 eval number count("%contents", "|%item|")
2471 eval contents replace("%contents", "|%item|", "|")
2472 eval contents replace("%contents", "||" "|")
2473 evalmath count %count + %number
2474 if !contains("%contents", "|%item|") then return
2475 goto RemoveLoop
2476
2477storeitem:
2478 counter subtract 1
2479 pause 0.1
2480 send get %item from my %bag
2481 wait
2482 pause 0.1
2483 put put my %item in my %SAFE.CONTAINER
2484 wait
2485 pause 0.2
2486 if %c = 0 then return
2487 goto storeitem
2488
2489
2490##########################################
2491#< UTILITY GOSUBS >#
2492##########################################
2493
2494##### EMPTY HANDS #####
2495EMPTY.HANDS:
2496 pause 0.1
2497 if "$lefthand" != "Empty" then send empty left
2498 pause 0.1
2499 if "$righthand" != "Empty" then send empty right
2500 RETURN
2501
2502PAUSE:
2503 pause
2504 if $roundtime > 0 then pause
2505 goto %LAST
2506
2507STAND:
2508 if $roundtime > 0 then pause
2509 if $standing = 0 then put stand
2510 pause 0.5
2511 pause 0.5
2512 if $standing = 0 then put stand
2513 pause 0.5
2514 RETURN
2515
2516RETURN:
2517pause .1
2518 RETURN
2519
2520HIDE:
2521 matchre HIDE.PAUSE ^\.\.\.wait|^Sorry, you may only type|fail|You are too close|^You are a bit|^You are too busy
2522 matchre HIDE notices your attempt|reveals you|ruining your hiding place|discovers you
2523 matchre RETURN ^You melt|^You blend|^Eh\?|^You slip|^Roundtime|You look around
2524 send hide
2525 matchwait
2526HIDE.PAUSE:
2527 send stop hum
2528 pause
2529 goto HIDE
2530
2531SNEAK:
2532 var direction $0
2533 if (("%guild" = "Thief") && (%level < 50)) then goto SNEAK.HIDE
2534SNEAKING:
2535 matchre SNEAK.PAUSE ^\.\.\.wait|^Sorry, you may only type
2536 matchre RETURN Roundtime|You sneak|You duck|You quickly slip
2537 send sneak %direction
2538 matchwait
2539SNEAK.PAUSE:
2540 pause
2541 goto SNEAKING
2542SNEAK.HIDE:
2543 pause 0.2
2544 matchre SNEAK.HIDE notices your attempt|reveals you|ruining your hiding place|discovers you
2545 matchre SNEAKING ^You melt|^You blend|^Eh\?|^You slip|^Roundtime|You look around
2546 send hide
2547 matchwait
2548UNHIDE:
2549 pause 0.1
2550 matchre UNHIDE ^\.\.\.wait\s+\d+\s+sec(?:onds|s)?\.?
2551 matchre UNHIDE ^Sorry\,
2552 matchre RETURN ^But you are not hidden\!
2553 matchre RETURN ^You come out of hiding\.
2554 send UNHIDE
2555 matchwait
2556
2557ARMOR.CHECK:
2558return
2559 pause .1
2560 matchre REMOVE.AND.STOW.1 (leathers|glove|handguards|thorakes|helm|shirt|coat|hood|jerkin|collar|balaclava|longcoat|sleeves|sallet|aventail|greaves|vambraces|shield|buckler|\btarge\b|coif|cowl|gauntlet|half plate|lorica|breastplate|hauberk|field plate|tasset|ring mail|mask|pants)
2561 matchre RETURN You have nothing of that sort|You are wearing nothing of that sort|You aren't wearing anything like that
2562 put inv armor
2563 matchwait 5
2564 goto ARMOR.WARN
2565
2566REMOVE.AND.STOW.1:
2567 var armor $0
2568REMOVE.ARMOR.1:
2569 pause 0.5
2570 var LAST REMOVE.ARMOR.1
2571 matchre REMOVE.ARMOR.1 ^\.\.\.wait\s+\d+\s+sec(?:onds|s)?\.?|^Sorry\,
2572 matchre STOW.ARMOR.1 ^You remove|^You loosen the straps securing|^You take|^You slide
2573 matchre STOW.ARMOR.1 ^You sling|^You work your way out of|^You pull
2574 put remove %armor
2575 matchwait
2576
2577STOW.ARMOR.1:
2578 pause 0.5
2579 var LAST STOW.ARMOR.1
2580 matchre STOW.ARMOR.1 ^\.\.\.wait|^Sorry, you may only type
2581 match ARMOR.CHECK You put your
2582 matchre STOW.ARMOR.2 any more room in|closed|no matter how you arrange
2583 put stow my %armor
2584 matchwait
2585STOW.ARMOR.2:
2586 var LAST STOW.ARMOR.2
2587 matchre STOW.ARMOR.2 ^\.\.\.wait|^Sorry, you may only type
2588 match OPEN.SAFE But that's closed
2589 match ARMOR.CHECK You put your
2590 matchre NO.MORE.STOWING any more room in|closed|no matter how you arrange
2591 put put %armor in my %SAFE.CONTAINER
2592 matchwait
2593
2594NO.MORE.STOWING:
2595 #% ** No more room for stowing; gonna just go for it **
2596 put wear %armor
2597 RETURN
2598
2599OPEN.SAFE:
2600 put open my %SAFE.CONTAINER
2601 pause .5
2602 goto STOW.ARMOR.2
2603
2604ARMOR.WARN:
2605#%
2606#% *************************************************************
2607#% ** WARNING: Script could not find all your armor
2608#% ** Remove any remaining armor and type "GO" to continue
2609#% *************************************************************
2610#%
2611matchre RETURN GO|go
2612matchwait
2613
2614COOKIE.BREAK:
2615 put khri stop
2616 send khri start sagacity
2617 pause .2
2618 if ($concentration > 65) then goto COOKIE.BREAK.DONE
2619 #%
2620 #% *** WAITING FOR CONCENTRATION TO RECOVER.........
2621 #%
2622 pause 45
2623 if ($concentration < 65) then goto COOKIE.BREAK
2624COOKIE.BREAK.DONE:
2625 put #script abort origami
2626 pause 0.5
2627 if "$righthandnoun" == "$origami" then put exhale $righthandnoun
2628 pause 0.2
2629 if "$righthand" != "Empty" then put stow right
2630 pause 0.2
2631 if "$lefthand" != "Empty" then put stow left
2632 pause .5
2633 put stop hum
2634 goto COOKIE
2635
2636COOKIE:
2637 if ("%guild" != "Thief") then RETURN
2638 gosub COOKIE.START %khri1
2639 gosub COOKIE.START %khri2
2640 return
2641COOKIE.START:
2642 put sit
2643 var khri $0
2644 matchre COOKIE.RETURN Focusing|You're already using|With intense focus|^Roundtime
2645 matchre COOKIE.BREAK You strain, but cannot focus|You have not recovered from|Your mind is already focused
2646 send khri start %khri
2647 matchwait
2648COOKIE.RETURN:
2649 pause 0.1
2650 put stand
2651 pause 0.1
2652 return
2653
2654
2655######################################################################################
2656
2657SKILLCHECK:
2658put skill thievery
2659#%
2660#% **** Checking Your Skills.............
2661#%
2662pause
2663if $Thievery.Ranks < 20 then goto NOOB
2664if $Thievery.Ranks >= 20 && $Thievery.Ranks < 40 then goto CLASS1
2665if $Thievery.Ranks >= 40 && $Thievery.Ranks < 60 then goto CLASS2
2666if $Thievery.Ranks >= 60 && $Thievery.Ranks < 100 then goto CLASS3
2667if $Thievery.Ranks >= 100 && $Thievery.Ranks < 150 then goto CLASS4
2668if $Thievery.Ranks >= 150 && $Thievery.Ranks < 200 then goto CLASS5
2669if $Thievery.Ranks >= 200 && $Thievery.Ranks < 250 then goto CLASS6
2670if $Thievery.Ranks >= 250 && $Thievery.Ranks < 300 then goto CLASS7
2671if $Thievery.Ranks >= 300 && $Thievery.Ranks < 400 then goto CLASS8
2672if $Thievery.Ranks >= 400 && $Thievery.Ranks < 600 then goto CLASS9
2673if $Thievery.Ranks >= 600 && $Thievery.Ranks < 700 then goto CLASS10
2674if $Thievery.Ranks >= 700 && $Thievery.Ranks < 800 then goto CLASS11
2675if $Thievery.Ranks >= 800 && $Thievery.Ranks < 900 then goto CLASS12
2676if $Thievery.Ranks >= 900 && $Thievery.Ranks < 1000 then goto CLASS13
2677if $Thievery.Ranks >= 1000 && $Thievery.Ranks < 1200 then goto CLASS14
2678if $Thievery.Ranks >= 1200 then goto CLASS15
2679pause .5
2680pause .5
2681goto SKILLCHECK
2682
2683################################################################
2684
2685GUILD.CHECK:
2686#%
2687#% **** CHECKING GUILD...................
2688#%
2689action var guild $1;put #var guild $1 when Guild: (\S+)
2690action var level $1 when Circle: (\d+)
2691send info;enc
2692waitforre ^\s*Encumbrance\s*\:
2693action remove Guild: (\S+)
2694action remove Circle: (\d+)
2695pause .2
2696#% **** Guild: %guild ****
2697#% **** Circle: %level ****
2698pause .5
2699pause .5
2700if ("%guild" != "Thief") then
2701{
2702var BIN OFF
2703var marking OFF
2704}
2705if ("%guild" = "Thief") then
2706{
2707var marking ON
2708}
2709RETURN
2710
2711###############################################################
2712
2713TIME.CHECK:
2714#% **** CHECKING TIME....
2715matchre DAY.TIME dawn|early morning|mid-morning|midday|late morning|noon|early afternoon|mid-afternoon|late afternoon
2716matchre NIGHT.TIME early evening|mid-evening|late evening|evening|midnight|night|almost dawn|sunset|dusk|approaching sunrise|you can't tell
2717put time
2718matchwait 5
2719goto NIGHT.TIME
2720
2721DAY.TIME:
2722put #var TIME DAY
2723var TIME DAY
2724put observe weather
2725pause .5
2726pause .2
2727RETURN
2728
2729NO.TIME:
2730NIGHT.TIME:
2731put #var TIME NIGHT
2732var TIME NIGHT
2733put observe weather
2734pause .5
2735pause .2
2736RETURN
2737
2738
2739#####################################################################
2740## $$$$$$$$$$$$ PROFIT TRACKING / MATH SECTION $$$$$$$$$$$$$$$$$$
2741#####################################################################
2742BANK:
2743 pause 0.1
2744 action (balancecheck) var Plat $1 when (\d+) platinum,?
2745 action (balancecheck) var Gold $1 when (\d+) gold,?
2746 action (balancecheck) var Silver $1 when (\d+) silver,?
2747 action (balancecheck) var Bronze $1 when (\d+) bronze,?
2748 action (balancecheck) var Copper $1 when (\d+) copper
2749 action (balancecheck) off
2750 action (profitparse) var Plat $1 when ^@(\d+)\d\d\d\d$
2751 action (profitparse) var Gold $1 when ^@\d+(\d)\d\d\d$
2752 action (profitparse) var Gold $1 when ^@(\d)\d\d\d$
2753 action (profitparse) var Silver $1 when ^@\d+\d(\d)\d\d$
2754 action (profitparse) var Silver $1 when ^@\d(\d)\d\d$
2755 action (profitparse) var Silver $1 when ^@(\d)\d\d$
2756 action (profitparse) var Bronze $1 when ^@\d+\d\d(\d)\d$
2757 action (profitparse) var Bronze $1 when ^@\d\d(\d)\d$
2758 action (profitparse) var Bronze $1 when ^@\d(\d)\d$
2759 action (profitparse) var Bronze $1 when ^@(\d)\d$
2760 action (profitparse) var Copper $1 when ^@\d+\d\d\d(\d)$
2761 action (profitparse) var Copper $1 when ^@\d\d\d(\d)$
2762 action (profitparse) var Copper $1 when ^@\d\d(\d)$
2763 action (profitparse) var Copper $1 when ^@\d(\d)$
2764 action (profitparse) var Copper $1 when ^@(\d)$
2765 action (profitparse) off
2766 var pre.dep 0
2767 var post.dep 0
2768 var profit 0
2769 gosub BANK.COIN.CLEAR
2770 action (balancecheck) on
2771 send check balance;encumbrance
2772 waitforre ^\s*Encumbrance\s*\:
2773 pause 0.5
2774 action (balancecheck) off
2775 pause 0.1
2776 gosub BANK.COIN.MATH
2777 gosub BANK.PREDEP.MATH
2778 send deposit all
2779 pause 0.5
2780 gosub BANK.COIN.CLEAR
2781 pause 0.1
2782 action (balancecheck) on
2783 send check balance;encumbrance
2784 waitforre ^\s*Encumbrance\s*\:
2785 pause 0.5
2786 action (balancecheck) off
2787 pause 0.1
2788 gosub BANK.COIN.MATH
2789 gosub BANK.POSTDEP.MATH
2790 evalmath profit %post.dep - %pre.dep
2791 math Profit add %profit
2792 pause 0.1
2793 gosub BANK.COIN.CLEAR
2794 action (profitparse) on
2795 pause 0.5
2796 put #parse @%Profit
2797 pause 0.5
2798 action (profitparse) off
2799 pause 0.1
2800 put #statusbar 1 Profit: %Plat Plat, %Gold Gold, %Silver Silver, %Bronze Bronze and %Copper Copper.
2801 put #parse MONEY DONE
2802 pause 0.1
2803 return
2804BANK.COIN.CLEAR:
2805 var Copper 0
2806 var Bronze 0
2807 var Silver 0
2808 var Gold 0
2809 var Plat 0
2810 pause 0.1
2811 return
2812BANK.COIN.MATH:
2813 math Bronze multiply 10
2814 math Silver multiply 100
2815 math Gold multiply 1000
2816 math Plat multiply 10000
2817 pause 0.1
2818 return
2819BANK.PREDEP.MATH:
2820 math pre.dep add %Copper
2821 math pre.dep add %Bronze
2822 math pre.dep add %Silver
2823 math pre.dep add %Gold
2824 math pre.dep add %Plat
2825 pause 0.1
2826 return
2827BANK.POSTDEP.MATH:
2828 math post.dep add %Copper
2829 math post.dep add %Bronze
2830 math post.dep add %Silver
2831 math post.dep add %Gold
2832 math post.dep add %Plat
2833 pause 0.1
2834 return
2835
2836###############################################
2837# JAILED / DEBT PAYING ROUTINE #
2838# Robust as a motherfucker.
2839###############################################
2840JAIL.CHECK:
2841action instant goto PLEAD when ^The eyes of the court are upon you|PLEAD INNOCENT or PLEAD GUILTY|How do you plead\?
2842put #parse TAKING CARE OF BUSINESS
2843put #script pause %MAIN.SCRIPT
2844if "$zoneid" = "1" then goto CROSSING.JAIL
2845if "$zoneid" = "30" then goto HAVEN.JAIL
2846if "$zoneid" = "42" then goto THEREN.JAIL
2847if "$zoneid" = "61" then goto LETH.JAIL
2848if "$zoneid" = "116" then goto HIB.JAIL
2849if "$zoneid" = "67" then goto SHARD.JAIL
2850goto JAILED
2851
2852#matchre JAIL.SHARD The Great Tower, Chamber of Justice|Banners representing every Elothean house
2853#matchre JAIL.CROSS Jail Cell|Guard House, Jail Cell
2854#matchre JAIL.CROSS2 Guard House, Office|Chamber of Justice
2855#matchre JAIL.LETH Gallows Tree, Cell
2856#matchre JAIL.LETH2 Gallows Tree, Dungeon
2857#matchre JAIL.HAVEN Town Jail, The Cell|Jackwater
2858#matchre JAIL.HAVEN2 Town Jail, Judgement Chamber
2859#matchre JAIL.THEREN Theren Keep, Cell
2860#matchre JAIL.THEREN2 Theren Keep, Chapel|Theren Keep, Dungeon
2861#matchre JAIL.HIB Justice Office, Cell|A thick-barred iron door closes off the rear of the cavern
2862#matchre JAIL.HIB2 Justice Office, Judge's Chambers|Justice Office, Front Desk|A squat grey marble dais sits in the center of one end
2863#matchre PLEAD ^The eyes of the court are upon you|PLEAD INNOCENT or PLEAD GUILTY|Your silence shall be taken|Shouldn't you be worrying about something else at the moment
2864#put look
2865#matchwait
2866
2867THEREN.JAIL:
2868JAIL.THEREN:
2869var CURRENT.CITY Theren
2870#% Theren JAIL
2871put #parse Theren JAIL
2872goto JAILED
2873
2874HAVEN.JAIL:
2875JAIL.HAVEN:
2876var CURRENT.CITY Riverhaven
2877#% RIVERHAVEN JAIL
2878put #parse RIVERHAVEN JAIL
2879goto JAILED
2880
2881LETH.JAIL:
2882JAIL.LETH:
2883var CURRENT.CITY Leth
2884#% LETH JAIL
2885put #parse LETH JAIL
2886goto JAILED
2887
2888CROSSING.JAIL:
2889CROSS.JAIL:
2890JAIL.CROSS:
2891var CURRENT.CITY Crossing
2892#% CROSSING JAIL
2893put #parse CROSS JAIL
2894goto JAILED
2895
2896HIB.JAIL:
2897JAIL.HIB:
2898var CURRENT.CITY Hib
2899#% HIB JAIL
2900put #parse HIB JAIL
2901goto JAILED
2902
2903SHARD.JAIL:
2904JAIL.SHARD:
2905var CURRENT.CITY Shard
2906#% SHARD JAIL
2907put #parse SHARD JAIL
2908goto JAILED
2909
2910
2911JAILED:
2912 #% *** YOU'VE BEEN JAILED! ***
2913 #% *** WAITING FOR SENTENCE! ***
2914 put ##% >log Red **** ARRESTED IN %CURRENT.CITY!! *****
2915 put #beep
2916 matchre PLEAD ^The eyes of the court are upon you|PLEAD INNOCENT or PLEAD GUILTY|Your silence shall be taken
2917 matchwait 220
2918 goto JAILED
2919
2920
2921PLEAD:
2922action remove ^The eyes of the court are upon you|PLEAD INNOCENT or PLEAD GUILTY|How do you plead\?
2923 put plead innocent
2924 pause
2925 pause .5
2926
2927GET.SACK:
2928GET_SACK:
2929 pause
2930 match SACK sack
2931 match DEBT You glance down at your empty hands
2932 put glance
2933 matchwait
2934
2935DEBT:
2936 gosub STAND
2937 #%
2938 #% **** Did not have enough money to pay the fine ****
2939 #%
2940 # Walking to the bank to get moneys
2941 if "$zoneid" = "42" then goto THEREN.JAIL.GET.FINE
2942 gosub clear
2943 pause .1
2944TO.TELLER:
2945 gosub move teller
2946 if "$zoneid" = "67" then goto FINECHECK.DOKORAS
2947 if "$zoneid" = "116" then goto FINECHECK.DOKORAS
2948 if "$zoneid" = "61" then goto FINE.CHECK.KRONARS
2949 if "$zoneid" = "1" then goto FINE.CHECK.KRONARS
2950 if "$zoneid" = "30" then goto FINECHECK.LIRUMS
2951 if "$zoneid" = "34a" then goto FINECHECK.LIRUMS
2952 if "$zoneid" = "42" then goto FINECHECK.LIRUMS
2953 pause
2954 pause
2955 #%
2956 #% *** UKNOWN JAIL LOCATION!!
2957 #% *** CRITICAL ERROR!
2958 #%
2959 put ##% >Log Red **CRITCAL ERROR ALERT!!!! UNKOWN JAIL LOCATION: Zone- $zoneid Room- $roomid
2960 pause
2961FINECHECK:
2962FINE.CHECK.KRONARS:
2963 matchre SET_FINE \((\d+) copper Kronars\)$
2964 match NO_FINE Wealth:
2965 put wealth
2966 matchwait
2967FINECHECK.LIRUMS:
2968 matchre SET_FINE_LIRUM \((\d+) copper Lirums\)$
2969 match NO_FINE Wealth:
2970 put wealth
2971 matchwait
2972FINECHECK.DOKORAS:
2973 matchre SET_FINE_DOKORAS \((\d+) copper Dokoras\)$
2974 match NO_FINE Wealth:
2975 put wealth
2976 matchwait
2977SET_FINE_LIRUM:
2978 pause 0.1
2979 var fine $1
2980 var currency lirum
2981 if %fine > 250000 then goto BIGGER_FINE
2982 if %fine > 100000 then goto BIG_FINE
2983 put withdraw %fine copper lirum
2984 goto PAY_DEBT
2985SET_FINE_DOKORAS:
2986 pause 0.1
2987 var fine $1
2988 var currency dokora
2989 if %fine > 250000 then goto BIGGER_FINE
2990 if %fine > 100000 then goto BIG_FINE
2991 put withdraw %fine copper dokora
2992 goto PAY_DEBT
2993SET_FINE:
2994 pause 0.1
2995 var fine $1
2996 var currency kronar
2997 if %fine > 250000 then goto BIGGER_FINE
2998 if %fine > 100000 then goto BIG_FINE
2999 put withdraw %fine copper kronar
3000 goto PAY_DEBT
3001BIG_FINE:
3002 put with 25 plat
3003 pause 1
3004 goto PAY_DEBT
3005
3006BIGGER_FINE:
3007 if %fine >= 1200000 then
3008 {
3009 put with 200 plat
3010 goto PAY_DEBT
3011 }
3012 if %fine >= 900000 then
3013 {
3014 put with 120 plat
3015 goto PAY_DEBT
3016 }
3017 if %fine >= 500000 then
3018 {
3019 put with 90 plat
3020 goto PAY_DEBT
3021 }
3022 if %fine >= 450000 then
3023 {
3024 put with 50 plat
3025 goto PAY_DEBT
3026 }
3027 if %fine >= 400000 then
3028 {
3029 put with 45 plat
3030 goto PAY_DEBT
3031 }
3032 if %fine >= 350000 then
3033 {
3034 put with 40 plat
3035 goto PAY_DEBT
3036 }
3037 if %fine >= 250000 then
3038 {
3039 put with 35 plat
3040 goto PAY_DEBT
3041 }
3042 goto PAY_DEBT
3043
3044NO_FINE:
3045 #%
3046 #% *** You have no fine
3047 #%
3048 goto RETURN_TO_JAIL
3049PAY_DEBT:
3050 # Walking to pay off the debt
3051 gosub move debt
3052 put pay %fine
3053 pause
3054 gosub move teller
3055 put dep all
3056 pause .5
3057RETURN_TO_JAIL:
3058 #%
3059 #% **** Heading back to jail now ****
3060 #%
3061 if "$zoneid" = "42" then goto THEREN.KEEP.JAIL
3062 if "$zoneid" = "67" then goto SHARD.JAIL.RETURN
3063 if "$zoneid" = "116" then goto HIB.JAIL.RETURN
3064 # Walking to the Guard House
3065 gosub move Guard
3066 goto CLAN
3067
3068HIB.JAIL.RETURN:
3069 gosub move 200
3070 goto CLAN
3071 SHARD.JAIL.RETURN:
3072 gosub move sentin
3073 goto CLAN
3074
3075CLAN:
3076 if ("%CLANITEM" = "YES") then goto CLAN_ITEM
3077 else goto THE_SACK
3078CLAN_ITEM_PAUSE:
3079 pause 8
3080CLAN_ITEM:
3081 if ("%CLANITEM" = "NO") then goto THE_SACK
3082 put remove %CLAN.ITEM.NAME
3083 pause
3084 goto THE_SACK
3085THE_SACK:
3086 pause
3087 matchre THE_SACK ^\.\.\.wait|^Sorry, you may only|What were you|I could not|Please rephrase
3088 matchre SACK_PRE ^You reach for your sack and retrieve the equipment
3089 matchre CLAN_ITEM_PAUSE ^You'll need to not be wearing anything
3090 matchre DEBT paid off your debt to society
3091 put get $charactername sack
3092 matchwait
3093 goto GET_SACK
3094
3095SACK_PRE:
3096 if ("%CLANITEM" = "YES") then put wear %CLAN.ITEM.NAME
3097 if ("%CLANITEM" = "YES") then put rub %CLAN.ITEM.NAME
3098 pause 0.5
3099 put open my small sack
3100 pause .2
3101SACK:
3102 pause 0.5
3103 matchre KHUJ khuj|quarterstaff|quarter staff|halberd
3104 match OPEN_SACK That is closed.
3105 matchre GET_SACK_ITEM (\S+)(\.)
3106 matchre NO_MORE_ITEMS ^There is nothing in there|^I could not find
3107 put look in my small sack
3108 matchwait
3109KHUJ:
3110 put get khuj from my sack
3111 put wear khuj
3112 pause 0.5
3113 put get halb from my sack
3114 pause 0.5
3115 put wear halb
3116 pause 0.5
3117 put get staff from my sack
3118 pause 0.5
3119 put wear staff
3120 pause 0.5
3121 goto SACK
3122OPEN_SACK:
3123 put wear sphere
3124 pause .5
3125 put open my sack
3126 pause
3127 goto SACK
3128GET_SACK_ITEM:
3129 pause
3130 if $1 = there then goto NO_MORE_ITEMS
3131 put get $1 from my sack
3132 pause
3133 if (("$1" = "backpack")||("$1" = "cauldron")) then
3134 {
3135 pause 0.5
3136 } else
3137 {
3138 put wear my $1;stow my $1
3139 }
3140 pause 0.5
3141 goto SACK
3142NO_MORE_ITEMS:
3143 put drop sack
3144 pause
3145 #%
3146 #% **** Returning to what you were doing ****
3147 #%
3148 if contains("$lefthand" "$righthand" , "%large.items") then gosub EMPTY.HANDS
3149 pause
3150
3151CHECKLOC:
3152 if "$zoneid" = "67" then goto SHARDJAIL
3153 if "$zoneid" = "116" then goto HIBJAIL
3154 if "$zoneid" = "61" then goto LETHJAIL
3155 if "$zoneid" = "1" then goto CROSSJAIL
3156 if "$zoneid" = "30" then goto HAVENJAIL
3157 if "$zoneid" = "42" then goto THEREN.JAIL.LEAVE
3158CROSSJAIL:
3159 gosub move 42
3160 put #script resume %MAIN.SCRIPT
3161 put #parse TAKING CARE OF BUSINESS
3162 pause 2
3163 goto END
3164LETHJAIL:
3165 gosub move portal
3166 put #script resume %MAIN.SCRIPT
3167 pause
3168 pause 0.5
3169 put #parse TAKING CARE OF BUSINESS
3170 pause 2
3171 goto END
3172HAVENJAIL:
3173 gosub move town
3174 put #script resume %MAIN.SCRIPT
3175 put #parse TAKING CARE OF BUSINESS
3176 pause 2
3177 goto END
3178SHARDJAIL:
3179 gosub move 57
3180 put #script resume %MAIN.SCRIPT
3181 put #parse TAKING CARE OF BUSINESS
3182 pause
3183 goto END
3184HIBJAIL:
3185 gosub move 75
3186 put #script resume %MAIN.SCRIPT
3187 put #parse TAKING CARE OF BUSINESS
3188 pause 2
3189 goto END
3190
3191THEREN.JAIL.LEAVE:
3192 save THEREN.JAIL.END
3193 goto THEREN.KEEP.ESCAPE
3194THEREN.JAIL.GET.FINE:
3195 save TO.TELLER
3196 goto THEREN.KEEP.ESCAPE
3197THEREN.KEEP.ESCAPE:
3198 gosub move 69
3199 send jump moat
3200 pause 10
3201THEREN.STUNNED.WAIT:
3202 pause 10
3203 if $stunned = 1 then goto THEREN.STUNNED.WAIT
3204 pause 0.5
3205 gosub STAND
3206 pause 0.5
3207 goto THEREN.MOAT.LEAVE
3208THEREN.MOAT.LEAVE:
3209 var location THEREN.MOAT.LEAVE
3210 gosub walk s
3211 pause
3212 goto %s
3213
3214THEREN.KEEP.JAIL:
3215 var location THEREN.KEEP.JAIL
3216 gosub move moat
3217 gosub move 146
3218 gosub move dungeon
3219 gosub STAND
3220 goto CLAN_ITEM
3221
3222THEREN.JAIL.END:
3223 gosub move portal
3224 pause 2
3225 goto END
3226
3227END:
3228 put #script resume %MAIN.SCRIPT
3229 put #script abort jail
3230 put #parse FREE FROM JAIL
3231 put ##% >Log SkyBlue Recovered from jail via stealing script.
3232 put ##% >Log SkyBlue Continuing script from last checkpoint..
3233 #%
3234 #% *** FREE FROM JAIL!
3235 pause 0.5
3236 pause
3237 goto %LAST
3238
3239FREE.CROSSING:
3240 goto %LAST
3241FREE.LETH:
3242 goto GO.LETH.PAWN
3243FREE.HAVEN:
3244FREE.THEREN:
3245 goto %LAST
3246 goto GO.PAWN.STUFF.HAVEN
3247
3248
3249
3250##########################################################################################################################################
3251##########################################################################################################################################
3252# LOCATION CHECKING LOGIC
3253##########################################################################################################################################
3254##########################################################################################################################################
3255LOCATION.CHECK:
3256pause 0.1
3257if "$zoneid" == "116" then goto HIB.LOCATION
3258if "$zoneid" == "67" then goto SHARD.LOCATION
3259if "$zoneid" = "1" then goto CROSSING.LOCATION
3260if "$zoneid" = "34a" then goto ROSSMAN.LOCATION
3261if "$zoneid" = "30" then goto HAVEN.LOCATION
3262if "$zoneid" = "42" then goto THEREN.LOCATION
3263if "$zoneid" = "61" then goto LETH.LOCATION
3264if "$zoneid" = "7" then goto ARTHE.LOCATION
3265matchre JAIL.CHECK /jail|heavily barred door|Holding Cell|Guardhouse|Great Tower, Cell|Gallows Tree, Cell|The Great Tower|Banners representing every Elothean house
3266matchre JAIL.CHECK Gallows Tree|Dungeon|Town Jail|Guard House|Judgement Chamber|Jail Cell|Theren Keep, Dungeon|Chamber of Justice
3267put look
3268pause
3269pause
3270ERROR.UNKNOWN:
3271#%
3272#% **** ERROR: UNKNOWN LOCATION!
3273#% **** YOU MUST START SCRIPT FROM ONE OF THE FOLLOWING CITIES:
3274#% **** CROSSINGS / ARTHE DALE
3275#% **** SHARD / HIB / LETH DERIEL
3276#% **** THEREN / ROSSMAN'S / RIVERHAVEN
3277#%
3278#% *** MOVE TO VALID CITY AND RESTART SCRIPT
3279pause
3280put #parse DONE STEALING
3281put #parse STEALING DONE
3282exit
3283
3284
3285SHARD.LOCATION:
3286var CITYCODE SHARD
3287RETURN
3288ROSSMAN.LOCATION:
3289var CITYCODE ROSSMAN
3290RETURN
3291CROSSING.LOCATION:
3292gosub move 42
3293var CITYCODE CROSSING
3294RETURN
3295HAVEN.LOCATION:
3296var CITYCODE RIVERHAVEN
3297RETURN
3298LETH.LOCATION:
3299var CITYCODE LETH
3300RETURN
3301HIB.LOCATION:
3302var CITYCODE HIB
3303RETURN
3304THEREN.LOCATION:
3305var CITYCODE THEREN
3306RETURN
3307ARTHE.LOCATION:
3308var CITYCODE CROSSING
3309gosub move 346
3310RETURN
3311
3312##########################
3313# MOVEMENT ENGINE
3314##########################
3315 goto move.end
3316move.retry:
3317 math move.retry add 1
3318 if %move.retry > 3 then goto move.fail
3319 #% ***
3320 #% *** Retrying move to $1 $2 in %move.retry second(s).
3321 #% ***
3322 pause %move.retry
3323 goto move.goto
3324move:
3325 var move.skip 0
3326 var move.retry 0
3327 var move.fail 0
3328 var move.room $0
3329move.goto:
3330 matchre move.return ^YOU HAVE ARRIVED
3331 matchre move.retreat ^You are engaged to .+ melee range\!|^You try to move, but you're engaged\.|You are engaged to .+ at pole weapon range\!|^While in combat\?|You'll have better luck if you first retreat\.|^You can't do that while engaged\!
3332 matchre move.skip ^SHOP CLOSED
3333 matchre move.retry ^MOVE FAILED
3334 matchre move.fail ^DESTINATION NOT FOUND
3335 put #goto %move.room
3336 matchwait
3337move.fail:
3338 var move.fail 1
3339 goto move.return
3340move.skip:
3341 var move.skip 1
3342move.retreat:
3343 put ret
3344 put ret
3345 pause .1
3346 goto move.goto
3347move.return:
3348 pause 0.1
3349 pause 0.1
3350 return
3351
3352
3353########################
3354#OLD AUTOMOVE
3355automove:
3356var toroom $1
3357if "$roomid" = "0" then gosub moveRandomDirection
3358automovecont:
3359pause .2
3360matchre automove.return YOU HAVE ARRIVED|SHOP CLOSED
3361matchre automovecont YOU HAVE FAILED|MOVE FAILED
3362put #goto %toroom
3363matchwait
3364
3365automove.return:
3366pause 0.1
3367RETURN
3368######################
3369
3370
3371walk:
3372 var alsohere no
3373 var People.Room empty
3374 var critter no
3375 var todo $0
3376 var move.direction $0
3377move1:
3378 var location moving
3379 moving:
3380 matchre stand.then.move ^You must be standing to do that\.|^You can't do that while lying down\.|^Stand up first\.|You can't do that while kneeling\.
3381 matchre pause.then.move %retry.command.triggers|You are too tired|All this climbing back and forth is getting a bit tiresome|^You work against the current
3382 matchre retreat.from.melee.then.move ^You are engaged to .+ melee range\!|^You try to move, but you're engaged\.|While in combat
3383 matchre retreat.from.pole.then.move ^You are engaged to .+ at pole weapon range\!|^While in combat\?|You'll have better luck if you first retreat\.
3384 matchre Dig.then.move ^You struggle forward
3385 matchre Dig.then.move ^Like a blind, lame duck, you wallow in the mud
3386 matchre Dig.then.move ^The mud holds you tightly
3387 matchre Dig.then.move ^You find yourself stuck in the mud
3388 matchre stow.then.move ^Free up your hands first
3389 matchre walk.return ^Obvious|It's pitch dark and you can't see a thing
3390 matchre move.error ^You can't go there\.|^You can't swim in that direction\.
3391 put %move.direction
3392 GOTO retry
3393 stand.then.move:
3394 gosub stand
3395 goto moving
3396 pause.then.move:
3397 pause .2
3398 goto moving
3399 retreat.from.melee.then.move:
3400 put retreat
3401 retreat.from.pole.then.move:
3402 gosub stand
3403 put retreat
3404 goto moving
3405 move.error:
3406 #% * Bad move direction, will try next command in 1 second. *
3407 put .alert
3408 pause
3409 return
3410 walk.return:
3411 pause 0.1
3412 return
3413 Dig.then.move:
3414 pause .1
3415 put dig %move.direction
3416 pause .5
3417 pause .5
3418 goto moving
3419 stow.then.move:
3420 gosub stowing
3421 goto moving
3422moveRandomDirection:
3423 var location moveRandomDirection
3424 gosub walk look
3425 if $north then
3426 {
3427 gosub walk north
3428 put #parse MOVED
3429 return
3430 }
3431 if $northeast then
3432 {
3433 gosub walk northeast
3434 put #parse MOVED
3435 return
3436 }
3437 if $east then
3438 {
3439 gosub walk east
3440 put #parse MOVED
3441 return
3442 }
3443 if $southeast then
3444 {
3445 gosub walk southeast
3446 put #parse MOVED
3447 return
3448 }
3449 if $south then
3450 {
3451 gosub walk south
3452 put #parse MOVED
3453 return
3454 }
3455 if $southwest then
3456 {
3457 gosub walk southwest
3458 put #parse MOVED
3459 return
3460 }
3461 if $west then
3462 {
3463 gosub walk west
3464 put #parse MOVED
3465 return
3466 }
3467 if $northwest then
3468 {
3469 gosub walk northwest
3470 put #parse MOVED
3471 return
3472 }
3473 if $out then
3474 {
3475 gosub walk out
3476 put #parse MOVED
3477 return
3478 }
3479 if $up then
3480 {
3481 gosub walk up
3482 put #parse MOVED
3483 return
3484 }
3485 if $down then
3486 {
3487 gosub walk down
3488 put #parse MOVED
3489 return
3490 }
3491 #% * NO DIRECTION FOUND! *
3492 put .alert
3493 put #parse NO MOVE
3494 return
3495
3496####################################
3497# GOSUBS
3498####################################
3499
3500###########################################################################
3501#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#
3502#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#
3503#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#
3504#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#
3505
3506armor.remove:
3507if ("%armor11" != "NONE") then
3508 {
3509 var armor.item %armor11
3510 gosub arm.rem
3511 }
3512if ("%armor22" != "NONE") then
3513 {
3514 var armor.item %armor22
3515 gosub arm.rem
3516 }
3517if ("%armor33" != "NONE") then
3518 {
3519 var armor.item %armor33
3520 gosub arm.rem
3521 }
3522if ("%armor44" != "NONE") then
3523 {
3524 var armor.item %armor44
3525 gosub arm.rem
3526 }
3527if ("%armor55" != "NONE") then
3528 {
3529 var armor.item %armor55
3530 gosub arm.rem
3531 }
3532if ("%armor66" != "NONE") then
3533 {
3534 var armor.item %armor66
3535 gosub arm.rem
3536 }
3537if ("%armor77" != "NONE") then
3538 {
3539 var armor.item %armor77
3540 gosub arm.rem
3541 }
3542#%
3543#% ARMOR REMOVE DONE.
3544#%
3545GOTO TOP2
3546
3547arm.rem:
3548 send REMOVE MY %armor.item
3549 waitforre ^You work|^You remove|^You pull|^You take|^You loosen|^You sling|^You slide
3550 goto stow.armor1
3551
3552stow.armor1:
3553 send STOW MY %armor.item IN MY %armor.container
3554 matchre return ^You put|^You stow|^You place|^Stow what\?
3555 matchre stow.armor2 ^There is no
3556 matchwait
3557
3558stow.armor2:
3559 send STOW my %armor.item IN MY %armor.container2
3560 matchre return ^You put|^You stow|^You place
3561 matchre stow.armor3 ^There is no
3562 matchwait
3563
3564stow.armor3:
3565 #%
3566 #%
3567 #% NO MORE ROOM IN YOUR PRIMARY 2 CONTAINERS! STOW THIS %armor.item YOURSELF!!!
3568 #%
3569 #%
3570 matchre armor.remove ^You put|^You stow|^You place
3571 matchwait 6
3572 goto stow.armor3
3573
3574all.done:
3575send OPEN MY %armor.container
3576 waitforre ^You open|^That is already
3577send OPEN MY %armor.container2
3578 waitforre ^You open|^That is already
3579send OPEN MY %armor.container3
3580 waitforre ^You open|^That is already
3581
3582if ("%armor11" != "NONE") then
3583 {
3584 var armor.item %armor11
3585 gosub armor.wear
3586 }
3587if ("%armor22" != "NONE") then
3588 {
3589 var armor.item %armor22
3590 gosub armor.wear
3591 }
3592if ("%armor33" != "NONE") then
3593 {
3594 var armor.item %armor33
3595 gosub armor.wear
3596 }
3597if ("%armor44" != "NONE") then
3598 {
3599 var armor.item %armor44
3600 gosub armor.wear
3601 }
3602if ("%armor55" != "NONE") then
3603 {
3604 var armor.item %armor55
3605 gosub armor.wear
3606 }
3607if ("%armor66" != "NONE") then
3608 {
3609 var armor.item %armor66
3610 gosub armor.wear
3611 }
3612if ("%armor77" != "NONE") then
3613 {
3614 var armor.item %armor77
3615 gosub armor.wear
3616 }
3617if ("%back.hide" = "YES") then send PUSH MY %backharness
3618if ("%chest.hide" = "YES") then send PUSH MY %chestharness
3619#%
3620#% ARMOR WEAR DONE
3621#%
3622EXIT
3623
3624armor.wear:
3625 send GET MY %armor.item
3626 waitforre ^You get|^You pick up|^I could not
3627 send WEAR MY %armor.item
3628 waitforre ^You work|^You place|^You slide|^You sling|^You put|^You slip|^You hang|^You strap|^You easily|^You attach|^What were you|^I could not
3629 return
3630
3631###########################################################################
3632#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#
3633#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#
3634#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#*#
3635###########################################################################
3636
3637
3638stowAmmo:
3639if matchre("$righthand","(partisan|shield|light crossbow|buckler|lumpy bundle|halberd|mistwood longbow|gloomwood khuj|halberd)") then gosub wear my $1
3640if matchre("$lefthand","(partisan|shield|light crossbow|buckler|lumpy bundle|halberd|mistwood longbow|gloomwood khuj|halberd)") then gosub wear my $1
3641if matchre("$roomobjs","(basilisk head arrow|cane arrow|bone-tipped arrow|stone-tipped arrow|serrated-bodkin arrow|razor-edged arrow)") then gosub stowit $1
3642if contains("$roomobjs","(repeating crossbow|bloodwood dako'gi crossbow|forester's crossbow|assassin's crossbow") then gosub stowit $1
3643if matchre("$roomobjs","(elongated stones|granite stone)") then gosub stowit stone
3644if matchre("$roomobjs","(river rock|river rocks)") then gosub stowit rock
3645if matchre("$roomobjs","(leafhead bolt|barbed bolt)") then gosub stowit bolt
3646if contains("$roomobjs","throwing blade") then gosub stowblade
3647if contains("$roomobjs","sleek quadrello") then gosub stowit quadrello
3648if contains("$roomobjs","ironwood shield") then gosub stowit shield
3649if contains("$roomobjs","hand claws") then gosub stowit hand claw
3650if contains("$roomobjs","T'Kashi mirror flamberge") then gosub stowit mirror flamberge
3651if contains("$roomobjs","T'Kashi mirror flail") then gosub stowit mirror flail
3652if contains("$roomobjs","mirror blade") then gosub stowit mirror blade
3653if contains("$roomobjs","mirror knife") then gosub stowit mirror knife
3654if contains("$roomobjs","razor-sharp damascus steel sabre") then gosub stowit sabre
3655if contains("$roomobjs","glaes and kertig-alloy katana capped with an ornate dragonfire amber pommel") then gosub stowit katana
3656if !matchre("$roomobjs","(sabre|scimitar|flail|kneecapper|hammer|bone club|javelin|tago|staff sling|bludgeon|short bow|telo|flamberge|flail|nightstick|khuj|iltesh|ngalio|hirdu bow|halberd|mirror blade|katana|morning star|war club|shadowy-black sling|staff sling|mattock|leathers|balaclava|helmet|helm|gauntlets|mail gloves|sniper's crossbow|light crossbow|shield|targe|great helm|throwing club|bastard sword|jambiya|katar|throwing blade|composite bow|short bow)") then return
3657gosub stowit $1
3658goto stowAmmo
3659
3660STOWING:
3661var location STOWING
3662if "$righthandnoun" = "rope" then put coil my rope
3663if "$righthand" = "bundle" || "$lefthand" = "bundle" then put wear bund;drop bun
3664if matchre("$righthandnoun","(crossbow|bow|short bow)") then gosub unload
3665if matchre("$righthand","(partisan|shield|buckler|crossbow|lumpy bundle|halberd|staff|longbow|khuj)") then gosub wear my $1
3666if matchre("$lefthand","(partisan|shield|buckler|crossbow|lumpy bundle|halberd|staff|longbow|khuj)") then gosub wear my $1
3667if matchre("$lefthand","(longbow|khuj)") then gosub stow my $1 in my %SHEATH
3668if "$righthand" != "Empty" then gosub STOW right
3669if "$lefthand" != "Empty" then gosub STOW left
3670RETURN
3671
3672STOWBLADE:
3673if contains("$roomobjs","throwing blade") then gosub stow throwing blade
3674pause .1
3675pause .1
3676if contains("$roomobjs","throwing blade") then goto stowblade
3677pause .1
3678RETURN
3679
3680STOWIT:
3681var location stow1
3682var todo $0
3683stow1:
3684if matchre("$righthand","longbow") then goto stow4
3685matchre stow2 any more room|no matter how you arrange|^That's too heavy|too thick|too long|too wide|not designed to carry
3686matchre return ^Wear what\?|^Stow what\?
3687matchre return ^You put your|^You easily|^You strap
3688matchre return ^You stop as you realize
3689matchre return ^But that is already in your inventory\.
3690matchre return ^That can't be picked up
3691matchre location.unload ^You should unload the
3692matchre location.unload ^You need to unload the
3693put stow %todo
3694put stow %todo
3695GOTO retry
3696stow2:
3697pause 0.3
3698pause .1
3699var location stow2
3700matchre return ^Wear what\?|^Stow what\?
3701matchre return ^You put your|^You easily|^You strap
3702matchre return ^But that is already in your inventory\.
3703matchre stow3 any more room|no matter how you arrange|^That's too heavy|too thick|too long|too wide|not designed to carry
3704matchre location.unload ^You should unload the
3705matchre location.unload ^You need to unload the
3706put stow %todo in my %PAWN.CONTAINER
3707GOTO retry
3708stow3:
3709pause 0.3
3710pause .1
3711var location stow3
3712if "$lefthandnoun" = "bundle" then put drop bun
3713if "$righthandnoun" = "bundle" then put drop bun
3714matchre return ^Wear what\?|^Stow what\?
3715matchre return ^You put your|^You easily|^You strap
3716matchre return ^But that is already in your inventory\.
3717matchre stow4 any more room|no matter how you arrange|^That's too heavy|too thick|too long|too wide|not designed to carry
3718matchre location.unload ^You should unload the
3719matchre location.unload ^You need to unload the
3720put stow %todo in my %BIN.CONTAINER
3721put stow %todo in my %BIN.CONTAINER
3722GOTO retry
3723stow4:
3724pause 0.5
3725pause .1
3726var location stow4
3727if "$lefthandnoun" = "bundle" then put drop bun
3728if "$righthandnoun" = "bundle" then put drop bun
3729matchre return ^Wear what\?|^Stow what\?
3730matchre return ^You put your|^You easily|^You strap
3731matchre return ^But that is already in your inventory\.
3732matchre STOW.DROP any more room|no matter how you arrange|^That's too heavy|too thick|too long|too wide
3733matchre location.unload ^You should unload the
3734matchre location.unload ^You need to unload the
3735put stow %todo in my %PAWN.CONTAINER
3736put stow %todo in my %THIRD.CONTAINER
3737GOTO retry
3738
3739STOW.DROP:
3740put empty left
3741put empty right
3742pause .5
3743pause RETURN
3744
3745
3746REM.WEAR:
3747put rem bund
3748put drop bund
3749pause 0.1
3750goto wear1
3751wear:
3752var location wear1
3753var todo $0
3754wear1:
3755if "$lefthandnoun" = "bundle" then put drop bun
3756if "$righthandnoun" = "bundle" then put drop bun
3757matchre return ^You sling
3758matchre return ^You attach
3759matchre return ^You put
3760matchre return ^You strap
3761matchre return ^You work your way into
3762matchre return ^You slide your left arm through
3763matchre return ^You hang
3764matchre return ^You slip
3765matchre return ^You drape
3766matchre return ^You slide
3767matchre return ^You can't
3768matchre return ^You are already wearing that\.
3769matchre return ^Wear what\?
3770matchre return ^The contours of the
3771matchre return ^You can't wear any more items like that\.
3772matchre location.unload1 ^You should unload the
3773matchre location.unload1 ^You need to unload the
3774matchre return ^You drop
3775matchre return ^What|^Remove|^Your
3776put wear my %todo
3777goto retry
3778
3779
3780retry:
3781matchre location ^\.\.\.wait
3782matchre location ^Sorry, you may
3783matchre location ^Sorry, system is slow
3784matchre location ^You don't seem to be able to move to do that
3785matchre location.p ^It's all a blur
3786matchre location.p ^You're unconscious\!
3787matchre location.p ^You are still stunned
3788matchre location.p There is no need for violence here\.
3789matchre location.p ^You can't do that while entangled in a web
3790matchre location.p ^You struggle against the shadowy webs to no avail\.
3791matchre location.p ^You attempt that, but end up getting caught in an invisible box\.
3792matchre location1 ^You should stop playing before you do that\.
3793matchre location1 ^You are a bit too busy performing to do that\.
3794matchre location1 ^You are concentrating too much upon your performance to do that\.
3795matchwait
3796
3797location.unload:
3798gosub unload
3799var location stow1
3800gosub stow1
3801goto %location
3802
3803location.unload1:
3804gosub unload
3805var location wear1
3806gosub wear1
3807goto %location
3808
3809location1:
3810gosub stop.humming1
3811goto %location
3812
3813location.p:
3814pause
3815
3816location:
3817pause .3
3818goto %location
3819
3820return.p:
3821pause .1
3822
3823unload:
3824var location unload
3825matchre return ^You unload the
3826matchre return ^You remain concealed by your surroundings, convinced that your unloading
3827matchre return ^Roundtime:
3828matchre return ^But your
3829matchre return ^You don't have a
3830matchre return ^You can't unload such a weapon\.
3831matchre return ^Your
3832put unload
3833GOTO retry
3834
3835
3836
3837#########################################################################################
3838# PROGRESSIVE ITEM VARIABLE SECTION
3839#
3840# Please report any bugs, or items updates to skultamaphon at gmail.com
3841# If an item is too hard or stops teaching too early please let me know!
3842###########################################################################################
3843
3844###########################
3845# SKILLS 20-39
3846###########################
3847CLASS1:
3848## THEREN
3849var skillrange 20-39
3850var T.Tarsha canons
3851var T.Tarsha.Q 1
3852var T.Rose <nothing>
3853var T.Rose.Q 1
3854var T.Music <nothing>
3855var T.Music.Q 1
3856var T.Hats <nothing>
3857var T.Hats.Q 1
3858var T.Arm <nothing>
3859var T.Arms.Q 1
3860var T.Gift <nothing>
3861var T.Gift.Q 1
3862var T.Sweet cake
3863var T.Music.Q 1
3864var T.Cupcake cupcake
3865var T.Gen charcoal
3866var T.Krrish <nothing>
3867var T.Lense <nothing>
3868var T.Cleric block
3869var T.Men <nothing>
3870var T.Women <nothing>
3871var T.Cloth <nothing>
3872var T.Armory <nothing>
3873var T.Forge copper slug
3874## HAVEN
3875var skillrange 20-39
3876var RH.Herb water
3877var RH.Iron <nothing>
3878var RH.Naph <nothing>
3879 var RH.Naph.Loc on cart
3880var RH.Flow black orchid
3881var RH.Seli <nothing>
3882var RH.Arms <nothing>
3883var RH.Gen purse
3884var RH.Cloth <nothing>
3885var RH.Artif <nothing>
3886var RH.Joy chocolate
3887var RH.Smoke <nothing>
3888var RH.Weap <nothing>
3889var RH.Bard pick
3890var RH.Bard2 <nothing>
3891var RH.Cleric grey-brown feather
3892var RH.Cleric2 <nothing>
3893var RH.Lock ordinary lockpick
3894var RH.Tog <nothing>
3895var RH.Tog2 <nothing>
3896var RH.Mirg <nothing>
3897## ARTHE DALE
3898var AD.Feta biscuit
3899var AD.Thread <nothing>
3900var AD.Fash <nothing>
3901var AD.Odds <nothing>
3902var AD.Bard <nothing>
3903var AD.Map <nothing>
3904var AD.Arm <nothing>
3905var AD.Smoke <nothing>
3906var AD.Tart.E <nothing>
3907var AD.Tart.C <nothing>
3908var AD.Tart.M <nothing>
3909var AD.Tart.L <nothing>
3910var AD.Tart.F <nothing>
3911var KA.Grek cheese
3912## CROSSINGS
3913var skillrange 20-39
3914var C.Alch water
3915var C.Artif <nothing>
3916var C.Bath reed
3917 var C.Bath.Num
3918 var C.Bath.Loc
3919var C.Card <nothing>
3920var C.Gen bark
3921var C.Weap sling
3922var C.Arm gloves
3923var C.Music pick
3924var C.Music2 <nothing>
3925var C.Lock slim lockpick
3926var C.Empath <nothing>
3927 var C.Empath.Alt <nothing>
3928var C.Empath2 garland
3929var C.Empath3 card
3930 var C.Empath3.Loc
3931 var C.Empath3.Alt <nothing>
3932var C.Cler chamomile
3933var C.Haber <nothing>
3934var C.Script <nothing>
3935var C.Tann <nothing>
3936 var C.Tann.Loc
3937var C.Jewel hairpin
3938var C.Stitch <nothing>
3939var C.Cobb <nothing>
3940var C.Herb <nothing>
3941var C.Flow rose
3942## LETH
3943var L.Skin <nothing>
3944var L.Bow flights
3945var L.Orig <nothing>
3946 var L.Orig.num
3947var L.Weap <nothing>
3948var L.Wick <nothing>
3949var L.Bard <nothing>
3950var L.Bard2 <nothing>
3951var L.Cloth <nothing>
3952var L.Wood <nothing>
3953var L.Gen <nothing>
3954 var L.Gen.Alt <nothing>
3955var L.Perf <nothing>
3956## SHARD
3957var skillrange 20-39
3958var S.Gen charcoal
3959var S.Weap <nothing>
3960var S.Cleric chamomile
3961var S.Stitch gloves
3962var S.Alch water
3963var S.Herb <nothing>
3964var S.Artif <nothing>
3965var S.Music pick
3966var S.Armor leather gloves
3967var S.Reed <nothing>
3968 var S.Reed.num
3969var S.Bow flights
3970var S.Lock <nothing>
3971var S.Coin <nothing>
3972 var S.Coin.Loc
3973var S.Frill <nothing>
3974var S.Herald <nothing>
3975 var S.Herald.Loc
3976var S.Gift <nothing>
3977 var S.Gift.Loc
3978var S.Toy <nothing>
3979 var S.Toy.Loc
3980var S.Memory <nothing>
3981var S.Token <nothing>
3982var S.Museum <nothing>
3983var S.Barber razor
3984var S.Tanner <nothing>
3985var S.Surv <nothing>
3986 var S.Surv.Loc
3987 var S.Surv.Alt <nothing>
3988var S.Surv2 chicken flights
3989 var S.Surv2.Loc
3990 var S.Surv2.Alt hawk flights
3991# HIB AND RAVEN'S POINT
3992var SC.Weap <nothing>
3993var H.Shield <nothing>
3994var H.Jewel <nothing>
3995var H.Tog <nothing>
3996var H.Herb <nothing>
3997var H.Sund incense
3998var H.Lamp charcoal
3999var H.Music <nothing>
4000var H.Alch <nothing>
4001var H.Forge <nothing>
4002 var H.Forge.Loc on tab
4003var H.WM zinc bar
4004var H.WM.Num
4005 var H.WM.Loc on tab
4006var R.Gen flights
4007var R.Tobac <nothing>
4008pause 0.1
4009GOSUB ITEM.COUNT0
4010RETURN
4011
4012##################################
4013# SKILLS 40-59
4014##################################
4015CLASS2:
4016## THEREN
4017var skillrange 40-59
4018var T.Tarsha canons
4019var T.Rose socks
4020var T.Music cloth
4021var T.Hats nightcap
4022var T.Arm <nothing>
4023var T.Gift <nothing>
4024var T.Sweet cake
4025var T.Cupcake cupcake
4026var T.Gen charcoal
4027var T.Krrish <nothing>
4028var T.Lense <nothing>
4029var T.Cleric incense
4030var T.Men <nothing>
4031var T.Women <nothing>
4032var T.Cloth <nothing>
4033var T.Armory <nothing>
4034var T.Forge copper slug
4035## HAVEN
4036var skillrange 40-59
4037var RH.Herb mixing stick
4038var RH.Iron <nothing>
4039var RH.Naph <nothing>
4040 var RH.Naph.Loc on cart
4041var RH.Flow black orchid
4042var RH.Seli <nothing>
4043var RH.Arms dart
4044var RH.Gen flint
4045var RH.Cloth gown
4046var RH.Artif <nothing>
4047var RH.Joy <nothing>
4048var RH.Smoke pouch
4049var RH.Weap <nothing>
4050var RH.Bard pick
4051var RH.Bard2 hairpin
4052var RH.Cleric incense
4053var RH.Cleric2 <nothing>
4054var RH.Lock ordinary lockpick
4055var RH.Tog <nothing>
4056var RH.Tog2 <nothing>
4057var RH.Mirg <nothing>
4058# ARTHE DALE
4059var skillrange 40-59
4060var AD.Feta yogurt
4061var AD.Thread pouch
4062var AD.Fash <nothing>
4063var AD.Odds <nothing>
4064var AD.Bard <nothing>
4065var AD.Map <nothing>
4066var AD.Arm butcher's knife
4067var AD.Smoke <nothing>
4068var AD.Tart.E <nothing>
4069var AD.Tart.C <nothing>
4070var AD.Tart.M <nothing>
4071var AD.Tart.L <nothing>
4072var AD.Tart.F <nothing>
4073var KA.Grek cheese
4074# CROSSINGS
4075var C.Alch water
4076var C.Artif <nothing>
4077var C.Bath soap
4078 var C.Bath.Num
4079 var C.Bath.Loc in basin
4080var C.Card <nothing>
4081var C.Gen purse
4082var C.Weap sling
4083var C.Arm leather gloves
4084var C.Music pick
4085var C.Music2 <nothing>
4086var C.Lock slim lockpick
4087var C.Empath <nothing>
4088 var C.Empath.Alt <nothing>
4089var C.Empath2 garland
4090var C.Empath3 card
4091 var C.Empath3.Loc on hook
4092 var C.Empath3.Alt
4093var C.Cler chalice
4094var C.Haber hood
4095var C.Script <nothing>
4096var C.Tann <nothing>
4097 var C.Tann.Loc
4098var C.Jewel hairpin
4099var C.Stitch beret
4100var C.Cobb <nothing>
4101var C.Herb <nothing>
4102var C.Flow rose
4103# LETH DERIEL
4104var L.Skin <nothing>
4105var L.Bow arrowhead
4106var L.Orig <nothing>
4107 var L.Orig.num
4108var L.Weap <nothing>
4109var L.Wick <nothing>
4110var L.Bard <nothing>
4111var L.Bard2 cloth
4112var L.Cloth <nothing>
4113var L.Wood <nothing>
4114var L.Gen <nothing>
4115 var L.Gen.Alt <nothing>
4116var L.Perf <nothing>
4117# SHARD
4118var skillrange 40-59
4119var S.Gen hairbrush
4120var S.Weap <nothing>
4121var S.Cleric sirese flower
4122var S.Stitch gloves
4123var S.Alch mixing stick
4124var S.Herb <nothing>
4125var S.Artif <nothing>
4126var S.Music rag
4127var S.Armor leather gloves
4128var S.Reed <nothing>
4129 var S.Reed.num
4130var S.Bow glue
4131var S.Lock iron keyblank
4132var S.Coin <nothing>
4133 var S.Coin.Loc
4134var S.Frill gloves
4135var S.Herald <nothing>
4136 var S.Herald.Loc
4137var S.Gift <nothing>
4138 var S.Gift.Loc
4139var S.Toy whistle
4140 var S.Toy.Loc
4141var S.Memory <nothing>
4142var S.Token <nothing>
4143var S.Museum <nothing>
4144var S.Barber oil
4145var S.Tanner <nothing>
4146var S.Surv oil
4147 var S.Surv.Loc
4148 var S.Surv.Alt <nothing>
4149var S.Surv2 glue
4150 var S.Surv2.Loc
4151 var S.Surv2.Alt hawk flights
4152# HIB AND RAVEN'S POINT
4153var SC.Weap <nothing>
4154var H.Shield <nothing>
4155var H.Jewel <nothing>
4156var H.Tog toothpicks
4157var H.Herb <nothing>
4158var H.Sund incense
4159var H.Lamp torch
4160var H.Music cloth
4161var H.Alch mixing stick
4162var H.Forge copper slug
4163 var H.Forge.Loc on tab
4164var H.WM copper slug
4165var H.WM.Num
4166 var H.WM.Loc on tab
4167var R.Gen flights
4168var R.Tobac pine pipe
4169pause 0.1
4170GOSUB ITEM.COUNT1
4171RETURN
4172
4173##################################
4174# SKILLS 60-99
4175##################################
4176CLASS3:
4177## THEREN
4178var skillrange 60-99
4179var T.Tarsha canons
4180var T.Rose socks
4181var T.Music cloth
4182var T.Hats nightcap
4183var T.Arm <nothing>
4184var T.Gift <nothing>
4185var T.Sweet cake
4186var T.Cupcake cupcake
4187var T.Gen carving knife
4188var T.Krrish <nothing>
4189var T.Lense <nothing>
4190var T.Cleric incense
4191var T.Men <nothing>
4192var T.Women <nothing>
4193var T.Cloth <nothing>
4194var T.Armory <nothing>
4195var T.Forge copper slug
4196## HAVEN
4197 var skillrange 60-99
4198var RH.Herb oil
4199var RH.Iron <nothing>
4200var RH.Naph <nothing>
4201 var RH.Naph.Loc on cart
4202var RH.Flow black orchid
4203var RH.Seli claw gloves
4204var RH.Arms bolts
4205var RH.Gen bark
4206var RH.Cloth sash
4207var RH.Artif <nothing>
4208var RH.Joy troll
4209var RH.Smoke sungrown cigar
4210var RH.Weap <nothing>
4211var RH.Bard drum stick
4212var RH.Bard2 hairpin
4213var RH.Cleric candle
4214var RH.Cleric2 <nothing>
4215var RH.Lock stout lockpick
4216var RH.Tog <nothing>
4217var RH.Tog2 <nothing>
4218var RH.Mirg <nothing>
4219# ARTHE DALE
4220var skillrange 60-99
4221var AD.Feta herb cheese
4222var AD.Thread needle
4223var AD.Fash snood
4224var AD.Odds <nothing>
4225var AD.Bard rag
4226var AD.Map <nothing>
4227var AD.Arm hood
4228var AD.Smoke sungrown cigar
4229var AD.Tart.E tart
4230var AD.Tart.C tart
4231var AD.Tart.M tart
4232var AD.Tart.L <nothing>
4233var AD.Tart.F tart
4234var KA.Grek belt
4235# CROSSINGS
4236var C.Alch pestle
4237var C.Artif <nothing>
4238var C.Bath soap
4239 var C.Bath.Num
4240 var C.Bath.Loc in basin
4241var C.Card <nothing>
4242var C.Gen flint
4243var C.Weap dagger
4244var C.Arm leather aventail
4245var C.Music rag
4246var C.Music2 <nothing>
4247var C.Lock stout lockpick
4248var C.Empath scalpel
4249 var C.Empath.Alt <nothing>
4250var C.Empath2 garland
4251var C.Empath3 card
4252 var C.Empath3.Loc on hook
4253 var C.Empath3.Alt <nothing>
4254var C.Cler wine
4255var C.Haber skullcap
4256var C.Script <nothing>
4257var C.Tann thread
4258 var C.Tann.Loc
4259var C.Jewel anklet
4260var C.Stitch cloche
4261var C.Cobb moccasins
4262var C.Herb <nothing>
4263var C.Flow rose
4264# LETH DERIEL
4265var L.Skin <nothing>
4266var L.Bow arrowhead
4267var L.Orig white paper
4268 var L.Orig.num
4269var L.Weap <nothing>
4270var L.Wick <nothing>
4271var L.Bard recorder
4272var L.Bard2 cloth
4273var L.Cloth <nothing>
4274var L.Wood <nothing>
4275var L.Gen <nothing>
4276 var L.Gen.Alt <nothing>
4277var L.Perf <nothing>
4278# SHARD
4279var skillrange 60-99
4280var S.Gen unguent
4281var S.Weap <nothing>
4282var S.Cleric incense
4283var S.Stitch hood
4284var S.Alch pestle
4285var S.Herb <nothing>
4286var S.Artif <nothing>
4287var S.Music cloth
4288var S.Armor collar
4289var S.Reed <nothing>
4290 var S.Reed.num
4291var S.Bow shears
4292var S.Lock iron keyblank
4293var S.Coin <nothing>
4294 var S.Coin.Loc
4295var S.Frill straw hat
4296var S.Herald <nothing>
4297 var S.Herald.Loc
4298var S.Gift <nothing>
4299 var S.Gift.Loc
4300var S.Toy whistle
4301 var S.Toy.Loc
4302var S.Memory <nothing>
4303var S.Token <nothing>
4304var S.Museum <nothing>
4305var S.Barber oil
4306var S.Tanner thread
4307var S.Surv wood pestle
4308 var S.Surv.Alt stone pestle
4309 var S.Surv.Loc
4310var S.Surv2 falcon flights
4311 var S.Surv2.Alt wood shaper
4312 var S.Surv2.Loc
4313# HIB AND RAVEN'S POINT
4314var SC.Weap <nothing>
4315var H.Shield <nothing>
4316var H.Jewel <nothing>
4317var H.Tog white soap
4318var H.Herb <nothing>
4319var H.Sund bone comb
4320var H.Lamp lamp oil
4321var H.Music cloth
4322var H.Alch stone pestle
4323var H.Forge copper slug
4324 var H.Forge.Loc on tab
4325var H.WM copper slug
4326var H.WM.Num
4327 var H.WM.Loc on tab
4328var R.Gen flights
4329var R.Tobac pipe
4330pause 0.1
4331GOSUB ITEM.COUNT1
4332RETURN
4333
4334##################################
4335# SKILLS 100-149
4336##################################
4337CLASS4:
4338## THEREN
4339var skillrange 100-149
4340var T.Tarsha canons
4341var T.Rose kilt
4342var T.Music cloth
4343var T.Hats nightcap
4344var T.Arm <nothing>
4345var T.Gift <nothing>
4346var T.Sweet cake
4347var T.Cupcake cupcake
4348var T.Gen carving knife
4349var T.Krrish <nothing>
4350var T.Lense <nothing>
4351var T.Cleric pestle
4352var T.Men <nothing>
4353var T.Women <nothing>
4354var T.Cloth <nothing>
4355var T.Armory <nothing>
4356var T.Forge copper slug
4357## HAVEN
4358 var skillrange 100-149
4359var RH.Herb pestle
4360var RH.Iron <nothing>
4361var RH.Naph <nothing>
4362 var RH.Naph.Loc on cart
4363var RH.Flow black orchid
4364var RH.Seli claw gloves
4365var RH.Arms stiletto
4366var RH.Gen spade
4367var RH.Cloth gloves
4368var RH.Artif <nothing>
4369var RH.Joy troll
4370var RH.Smoke apple pipe
4371var RH.Weap <nothing>
4372var RH.Bard linen cloth
4373var RH.Bard2 earrings
4374var RH.Cleric violets
4375var RH.Cleric2 <nothing>
4376var RH.Lock stout lockpick
4377var RH.Tog <nothing>
4378var RH.Tog2 <nothing>
4379var RH.Mirg <nothing>
4380# ARTHE DALE
4381var skillrange 100-149
4382var AD.Feta herb cheese
4383var AD.Thread bobbin
4384var AD.Fash vest
4385var AD.Odds fan
4386var AD.Bard instrument skin
4387var AD.Map <nothing>
4388var AD.Arm sling
4389var AD.Smoke telgi cigar
4390var AD.Tart.E tart
4391var AD.Tart.C tart
4392var AD.Tart.M tart
4393var AD.Tart.L tart
4394var AD.Tart.F tart
4395var KA.Grek boots
4396# CROSSINGS
4397var skillrange 100-149
4398var C.Alch large jar
4399var C.Artif <nothing>
4400var C.Bath towel
4401 var C.Bath.Num
4402 var C.Bath.Loc on stand
4403var C.Card <nothing>
4404var C.Gen razor
4405var C.Weap gauntlet
4406var C.Arm reinforced greaves
4407var C.Music ocarina
4408var C.Music2 <nothing>
4409var C.Lock stout lockpick
4410var C.Empath <nothing>
4411 var C.Empath.Alt <nothing>
4412var C.Empath2 garland
4413var C.Empath3 card
4414 var C.Empath3.Loc on hook
4415 var C.Empath3.Alt <nothing>
4416var C.Cler vial
4417var C.Haber vest
4418var C.Script <nothing>
4419var C.Tann bodkin
4420 var C.Tann.Loc
4421var C.Jewel clasp
4422var C.Stitch muff
4423var C.Cobb tights
4424var C.Herb jadice flower
4425var C.Flow wreath
4426# LETH DERIEL
4427var L.Skin buckskin pelt
4428var L.Bow bolts
4429var L.Orig silver paper
4430 var L.Orig.num
4431var L.Weap <nothing>
4432var L.Wick wicker quiver
4433var L.Bard ocarina
4434var L.Bard2 cloth
4435var L.Cloth moufles
4436var L.Wood <nothing>
4437var L.Gen dice
4438 var L.Gen.Alt <nothing>
4439var L.Perf <nothing>
4440# SHARD
4441var skillrange 100-149
4442var S.Gen razor
4443var S.Weap <nothing>
4444var S.Cleric vial
4445var S.Stitch shawl
4446var S.Alch pestle
4447var S.Herb riolur leaf
4448var S.Artif <nothing>
4449var S.Music fife
4450var S.Armor legguards
4451var S.Reed <nothing>
4452 var S.Reed.num
4453var S.Bow long arrows
4454var S.Lock bronze keyblank
4455var S.Coin <nothing>
4456 var S.Coin.Loc
4457var S.Frill fan
4458var S.Herald <nothing>
4459 var S.Herald.Loc
4460var S.Gift <nothing>
4461 var S.Gift.Loc
4462var S.Toy whistle
4463 var S.Toy.Loc
4464var S.Memory <nothing>
4465var S.Token <nothing>
4466var S.Museum <nothing>
4467var S.Barber oil
4468var S.Tanner bodkin
4469var S.Surv stone pestle
4470 var S.Surv.Alt wood pestle
4471 var S.Surv.Loc
4472var S.Surv2 steel shaper
4473 var S.Surv2.Alt wood shaper
4474 var S.Surv2.Loc
4475# HIB AND RAVEN'S POINT
4476var SC.Weap <nothing>
4477var H.Shield <nothing>
4478var H.Jewel <nothing>
4479var H.Tog white soap
4480var H.Herb <nothing>
4481var H.Sund bone comb
4482var H.Lamp lamp oil
4483var H.Music cloth
4484var H.Alch stone pestle
4485var H.Forge copper slug
4486 var H.Forge.Loc on tab
4487var H.WM copper slug
4488 var H.WM.Num
4489 var H.WM.Loc on tab
4490var R.Gen flights
4491var R.Tobac pipe
4492GOSUB ITEM.COUNT2
4493RETURN
4494
4495
4496##################################
4497# SKILLS 150-199
4498##################################
4499CLASS5:
4500## THEREN
4501var skillrange 150-199
4502var T.Tarsha canons
4503var T.Rose shirt
4504var T.Music four strings
4505var T.Hats sailor hat
4506var T.Arm <nothing>
4507var T.Gift blue shirt
4508var T.Sweet cake
4509var T.Cupcake cupcake
4510var T.Gen carving knife
4511var T.Krrish <nothing>
4512var T.Lense <nothing>
4513var T.Cleric pestle
4514var T.Men trousers
4515var T.Women <nothing>
4516var T.Cloth suspenders
4517var T.Armory dagger
4518var T.Forge copper slug
4519## HAVEN
4520var skillrange 150-199
4521var RH.Herb jar
4522var RH.Iron <nothing>
4523var RH.Naph naphtha
4524 var RH.Naph.Loc on cart
4525var RH.Flow silk orchid
4526var RH.Seli legwraps
4527var RH.Arms kris
4528var RH.Gen dagger sheath
4529var RH.Cloth blouse
4530var RH.Artif simple talisman
4531var RH.Joy kitten
4532var RH.Smoke lanival pipe
4533var RH.Weap club
4534var RH.Bard blouse
4535var RH.Bard2 earrings
4536var RH.Cleric herbs
4537var RH.Cleric2 <nothing>
4538var RH.Lock slim lockpick
4539var RH.Tog beaded slippers
4540var RH.Tog2 <nothing>
4541var RH.Mirg <nothing>
4542# ARTHE DALE
4543var skillrange 150-199
4544var AD.Feta aniblues cheese
4545var AD.Thread bobbin
4546var AD.Fash cape
4547var AD.Odds fan
4548var AD.Bard bodhran skin
4549var AD.Map pipe
4550var AD.Arm short sword
4551var AD.Smoke cigarillo
4552var AD.Tart.E tart
4553var AD.Tart.C tart
4554var AD.Tart.M tart
4555var AD.Tart.L tart
4556var AD.Tart.F tart
4557var KA.Grek charm
4558# CROSSINGS
4559var skillrange 150-199
4560var C.Alch dracon crystals
4561var C.Artif talisman
4562var C.Bath bathrobe
4563 var C.Bath.Num
4564 var C.Bath.Loc
4565var C.Card case
4566var C.Gen embossed quiver
4567var C.Weap cutlass
4568var C.Arm mail gloves
4569var C.Music lyre
4570var C.Music2 maple guiro
4571var C.Lock <nothing>
4572var C.Empath scalpel
4573 var C.Empath.Alt <nothing>
4574var C.Empath2 garland
4575var C.Empath3 button
4576 var C.Empath3.Loc on case
4577 var C.Empath3.Alt <nothing>
4578var C.Cler coffer
4579var C.Haber shirt
4580var C.Script satchel
4581 var C.Script.Num second
4582var C.Tann scraper
4583 var C.Tann.Loc
4584var C.Jewel engagement ring
4585var C.Stitch cloak
4586var C.Cobb jack boots
4587var C.Herb riolur leaf
4588var C.Flow wreath
4589# LETH DERIEL
4590var L.Skin deer skin
4591var L.Bow long arrows
4592var L.Orig case
4593 var L.Orig.num fourth
4594var L.Weap <nothing>
4595 var L.Weap.Loc in catalog
4596var L.Wick wicker quiver
4597var L.Bard flute
4598var L.Bard2 four strings
4599var L.Cloth tunic
4600var L.Wood log
4601var L.Gen dice
4602 var L.Gen.Alt <nothing>
4603var L.Perf <nothing>
4604# SHARD
4605var skillrange 150-199
4606var S.Gen clippers
4607var S.Weap targe
4608var S.Cleric armband
4609var S.Stitch blouse
4610var S.Alch tukai stones
4611var S.Herb riolur leaf
4612var S.Artif simple talisman
4613var S.Music bow
4614var S.Armor mail gauntlets
4615var S.Reed <nothing>
4616 var S.Reed.num
4617var S.Bow shears
4618var S.Lock bronze keyblank
4619var S.Coin <nothing>
4620 var S.Coin.Loc
4621var S.Frill lace fan
4622var S.Herald target shield
4623 var S.Herald.Loc
4624var S.Gift boggle doll
4625 var S.Gift.Loc in black basket
4626var S.Toy beard
4627 var S.Toy.Loc
4628var S.Memory <nothing>
4629var S.Token <nothing>
4630var S.Museum <nothing>
4631var S.Barber oil
4632var S.Tanner scraper
4633var S.Surv stone pestle
4634 var S.Surv.Alt wood pestle
4635 var S.Surv.Loc
4636var S.Surv2 blued shaper
4637 var S.Surv2.Alt steel shaper
4638 var S.Surv2.Loc
4639# HIB AND RAVEN'S POINT
4640var SC.Weap <nothing>
4641var H.Shield <nothing>
4642var H.Jewel <nothing>
4643var H.Tog white soap
4644var H.Herb <nothing>
4645var H.Sund bone comb
4646var H.Lamp lamp oil
4647var H.Music cloth
4648var H.Alch stone pestle
4649var H.Forge copper slug
4650 var H.Forge.Loc on tab
4651var H.WM copper slug
4652var H.WM.Num
4653 var H.WM.Loc on tab
4654var R.Gen flights
4655var R.Tobac pipe
4656GOSUB ITEM.COUNT2
4657RETURN
4658
4659
4660##################################
4661# SKILLS 200-249
4662##################################
4663CLASS6:
4664## THEREN
4665var skillrange 200-249
4666var T.Tarsha greques
4667var T.Rose shirt
4668var T.Music four strings
4669var T.Hats sailor hat
4670var T.Arm <nothing>
4671var T.Gift blue shirt
4672var T.Sweet cake
4673var T.Cupcake cupcake
4674var T.Gen carving knife
4675var T.Krrish <nothing>
4676var T.Lense <nothing>
4677var T.Cleric pestle
4678var T.Men trousers
4679var T.Women <nothing>
4680var T.Cloth suspenders
4681var T.Armory dagger
4682var T.Forge copper slug
4683## HAVEN
4684var skillrange 200-249
4685var RH.Herb jadice flower
4686var RH.Iron <nothing>
4687var RH.Naph naphtha
4688 var RH.Naph.Loc on cart
4689var RH.Flow silk orchid
4690var RH.Seli hood
4691var RH.Arms rapier
4692var RH.Gen scabbard
4693var RH.Cloth skirt
4694var RH.Artif simple talisman
4695var RH.Joy bunny
4696var RH.Smoke olvio pipe
4697var RH.Weap club
4698var RH.Bard alpargatas
4699var RH.Bard2 wristlet
4700var RH.Cleric chalice
4701var RH.Cleric2 black bottle
4702var RH.Lock slim lockpick
4703var RH.Tog ivory shirt
4704var RH.Tog2 <nothing>
4705var RH.Mirg anklet
4706# ARTHE DALE
4707var skillrange 200-249
4708var AD.Feta butter cheese
4709var AD.Thread pattern
4710var AD.Fash trousers
4711var AD.Odds earring
4712var AD.Bard itharr's
4713var AD.Map pipe
4714var AD.Arm wooden shield
4715var AD.Smoke cigarillo
4716var AD.Tart.E tart
4717var AD.Tart.C tart
4718var AD.Tart.M tart
4719var AD.Tart.L tart
4720var AD.Tart.F tart
4721var KA.Grek charm
4722# CROSSINGS
4723var C.Alch jar
4724var C.Artif talisman
4725var C.Bath bathrobe
4726 var C.Bath.Num
4727 var C.Bath.Loc on counter
4728var C.Card case
4729var C.Gen backpack
4730var C.Weap rapier
4731var C.Arm chain aventail
4732var C.Music bodhran skin
4733var C.Music2 guiro
4734var C.Lock stout lockpick
4735var C.Empath scalpel
4736 var C.Empath.Alt <nothing>
4737var C.Empath2 garland
4738var C.Empath3 oak stylus
4739 var C.Empath3.Loc in box
4740 var C.Empath3.Alt <nothing>
4741var C.Cler coffer
4742var C.Haber trousers
4743var C.Script satchel
4744 var C.Script.Num second
4745var C.Tann shears
4746 var C.Tann.Loc
4747var C.Jewel coral hairpin
4748var C.Stitch blouse
4749var C.Cobb thigh boots
4750var C.Herb riolur leaf
4751var C.Flow corsage
4752# LETH DERIEL
4753var L.Skin sluagh hide
4754var L.Bow long arrows
4755var L.Orig case
4756 var L.Orig.num
4757var L.Weap <nothing>
4758 var L.Weap.Loc in catalog
4759var L.Wick mesh sack
4760var L.Bard woodwind case
4761var L.Bard2 four strings
4762var L.Cloth doublet
4763var L.Wood applewood log
4764var L.Gen dice
4765 var L.Gen.Alt <nothing>
4766var L.Perf panther perfume
4767# SHARD
4768var skillrange 200-249
4769var S.Gen short sword
4770var S.Weap targe
4771var S.Cleric armband
4772var S.Stitch cloak
4773var S.Alch seol weed
4774var S.Herb genich stem
4775var S.Artif simple talisman
4776var S.Music four strings
4777var S.Armor choker
4778var S.Reed thigh bag
4779 var S.Reed.num second
4780var S.Bow shears
4781var S.Lock wrist sheath
4782var S.Coin coin case
4783 var S.Coin.Loc
4784var S.Frill sandals
4785var S.Herald ordinary shield
4786 var S.Herald.Loc
4787var S.Gift boggle doll
4788 var S.Gift.Loc in black basket
4789var S.Toy wig
4790 var S.Toy.Loc
4791var S.Memory pin
4792var S.Token <nothing>
4793var S.Museum black slippers
4794var S.Barber oil
4795var S.Tanner shears
4796var S.Surv stone pestle
4797 var S.Surv.Alt wood pestle
4798 var S.Surv.Loc
4799var S.Surv2 stone-tipped arrow
4800 var S.Surv2.Alt steel shaper
4801 var S.Surv2.Loc
4802# HIB AND RAVEN'S POINT
4803var SC.Weap <nothing>
4804var H.Shield <nothing>
4805var H.Jewel <nothing>
4806var H.Tog towel
4807var H.Herb yelith root
4808var H.Sund bone comb
4809var H.Lamp lamp oil
4810var H.Music scroll
4811var H.Alch stone pestle
4812var H.Forge copper slug
4813 var H.Forge.Loc on tab
4814var H.WM copper slug
4815var H.WM.Num
4816 var H.WM.Loc on tab
4817var R.Gen flights
4818var R.Tobac pipe
4819GOSUB ITEM.COUNT2
4820RETURN
4821
4822##################################
4823# SKILLS 250-299
4824##################################
4825CLASS7:
4826## THEREN
4827var skillrange 250-299
4828var T.Tarsha greques
4829var T.Rose shirt
4830var T.Music four strings
4831var T.Hats sailor hat
4832var T.Arm <nothing>
4833var T.Gift blue shirt
4834var T.Sweet cake
4835var T.Cupcake cupcake
4836var T.Gen reed torch
4837var T.Krrish <nothing>
4838var T.Lense <nothing>
4839var T.Cleric pestle
4840var T.Men trousers
4841var T.Women <nothing>
4842var T.Cloth suspenders
4843var T.Armory dagger
4844var T.Forge copper slug
4845## HAVEN
4846var skillrange 250-299
4847var RH.Herb riolur leaf
4848var RH.Iron bronze gauntlets
4849var RH.Naph naphtha
4850 var RH.Naph.Loc on cart
4851var RH.Flow wreath
4852var RH.Seli bronze gauntlets
4853var RH.Arms composite bow
4854var RH.Gen shears
4855var RH.Cloth houpelande
4856var RH.Artif cambrinth ring
4857var RH.Joy bunny
4858var RH.Smoke riverhaven tobacco
4859var RH.Weap thorny mace
4860var RH.Bard refill
4861var RH.Bard2 necklace
4862var RH.Cleric chalice
4863var RH.Cleric2 black bottle
4864var RH.Lock slim lockpick
4865var RH.Tog ivory shirt
4866var RH.Tog2 <nothing>
4867var RH.Mirg anklet
4868# ARTHE DALE
4869var skillrange 250-299
4870var AD.Feta kirm cheese
4871var AD.Thread pattern
4872var AD.Fash trousers
4873var AD.Odds earring
4874var AD.Bard silverlock
4875var AD.Map pipe
4876var AD.Arm vest
4877var AD.Smoke spiced tobacco
4878var AD.Tart.E tart
4879var AD.Tart.C tart
4880var AD.Tart.M tart
4881var AD.Tart.L tart
4882var AD.Tart.F tart
4883var KA.Grek shirt
4884# CROSSINGS
4885var C.Alch tincture jar
4886var C.Artif talisman
4887var C.Bath bathrobe
4888 var C.Bath.Num
4889 var C.Bath.Loc on counter
4890var C.Card case
4891var C.Gen backpack
4892var C.Weap war club
4893var C.Arm scale aventail
4894var C.Music refill
4895var C.Music2 guiro
4896var C.Lock lockpick ring
4897var C.Empath slippers
4898 var C.Empath.Alt <nothing>
4899var C.Empath2 mortar
4900var C.Empath3 oak stylus
4901 var C.Empath3.Loc in box
4902 var C.Empath3.Alt <nothing>
4903var C.Cler chasuble
4904var C.Haber doublet
4905var C.Script satchel
4906 var C.Script.Num second
4907var C.Tann pattern
4908 var C.Tann.Loc
4909var C.Jewel bloodstone hairpin
4910var C.Stitch leggings
4911var C.Cobb hip boots
4912var C.Herb ithor potion
4913var C.Flow corsage
4914# LETH DERIEL
4915var L.Skin cougar pelt
4916var L.Bow leather quiver
4917var L.Orig case
4918 var L.Orig.num
4919var L.Weap <nothing>
4920 var L.Weap.Loc in catalog
4921var L.Wick mesh sack
4922var L.Bard mirliton
4923var L.Bard2 refill
4924var L.Cloth jerkin
4925var L.Wood hazelwood log
4926var L.Gen dice
4927 var L.Gen.Alt <nothing>
4928var L.Perf panther perfume
4929# SHARD
4930var skillrange 250-299
4931var S.Gen chain helm
4932var S.Weap stiletto
4933var S.Cleric oil
4934var S.Stitch tunic
4935var S.Alch seolarn weed
4936var S.Herb hisan salve
4937var S.Artif elbaite runestone
4938var S.Music refill
4939var S.Lock wrist sheath
4940var S.Armor mesh handguards
4941var S.Coin coin case
4942 var S.Coin.Loc
4943var S.Frill doll
4944var S.Herald medium buckler
4945 var S.Herald.Loc
4946var S.Gift badge
4947 var S.Gift.Loc on stand
4948var S.Toy book
4949 var S.Toy.Loc
4950var S.Reed thigh bag
4951 var S.Reed.num second
4952var S.Memory pin
4953var S.Token <nothing>
4954var S.Museum black slippers
4955var S.Barber oil
4956var S.Bow barbed arrows
4957var S.Tanner pattern
4958var S.Surv marble pestle
4959 var S.Surv.Alt stone pestle
4960 var S.Surv.Loc
4961var S.Surv2 stone-tipped arrow
4962 var S.Surv2.Alt steel shaper
4963 var S.Surv2.Loc
4964# HIB AND RAVEN'S POINT
4965var SC.Weap <nothing>
4966var H.Shield <nothing>
4967var H.Jewel <nothing>
4968var H.Tog slippers
4969var H.Herb nemoih root
4970var H.Sund clippers
4971var H.Lamp serpent lamp
4972var H.Music drum skin
4973var H.Alch stone mortar
4974var H.Forge copper slug
4975 var H.Forge.Loc on tab
4976var H.WM copper slug
4977var H.WM.Num
4978 var H.WM.Loc on tab
4979var R.Gen stone mortar
4980var R.Tobac tobacco
4981GOSUB ITEM.COUNT2
4982RETURN
4983
4984##################################
4985# SKILLS 300-399
4986##################################
4987CLASS8:
4988## THEREN
4989var skillrange 300-399
4990var T.Tarsha greques
4991var T.Rose <nothing>
4992var T.Music <nothing>
4993var T.Hats sailor hat
4994var T.Arm <nothing>
4995var T.Gift blue shirt
4996var T.Sweet cake
4997var T.Cupcake cupcake
4998var T.Gen reed torch
4999var T.Krrish bones
5000var T.Lense bone ring
5001var T.Cleric pestle
5002var T.Men trousers
5003var T.Women <nothing>
5004var T.Cloth suspenders
5005var T.Armory dagger
5006var T.Forge copper slug
5007## HAVEN
5008var skillrange 300-399
5009var RH.Herb ithor potion
5010var RH.Iron chain greaves
5011var RH.Naph naphtha
5012 var RH.Naph.Loc on cart
5013var RH.Flow silk orchid
5014var RH.Seli aventail
5015var RH.Arms sword
5016var RH.Gen stove
5017var RH.Cloth dress
5018var RH.Artif cambrinth ring
5019var RH.Joy bunny
5020var RH.Smoke baron tobacco
5021var RH.Weap goat-head mace
5022var RH.Bard mandolin
5023var RH.Bard2 amulet
5024var RH.Cleric pomander
5025var RH.Cleric2 wood shaper
5026var RH.Lock lockpick ring
5027var RH.Tog linen shirt
5028var RH.Tog2 <nothing>
5029var RH.Mirg toe-bells
5030# ARTHE DALE
5031var skillrange 300-399
5032var AD.Feta anlibues cheese
5033var AD.Thread pattern
5034var AD.Fash frock
5035var AD.Odds doll
5036var AD.Bard peri'el's
5037var AD.Map map
5038var AD.Arm cuirass
5039var AD.Smoke whiskey cigar
5040var AD.Tart.E tart
5041var AD.Tart.C tart
5042var AD.Tart.M tart
5043var AD.Tart.L tart
5044var AD.Tart.F tart
5045var KA.Grek barrel
5046# CROSSINGS
5047var C.Alch tincture jar
5048var C.Artif talisman
5049var C.Bath bath towel
5050 var C.Bath.Num
5051 var C.Bath.Loc on rack
5052var C.Card case
5053var C.Gen stove
5054var C.Weap longsword
5055var C.Arm chain helm
5056var C.Music mandolin
5057var C.Music2 cherry flute
5058var C.Lock lockpick ring
5059var C.Empath slippers
5060 var C.Empath.Alt scalpel
5061var C.Empath2 mortar
5062var C.Empath3 bronze medallion
5063 var C.Empath3.Loc in basket
5064 var C.Empath3.Alt button
5065var C.Cler habit
5066var C.Haber tabard
5067var C.Script satchel
5068 var C.Script.Num third
5069var C.Tann pattern
5070 var C.Tann.Loc
5071var C.Jewel bloodstone hairpin
5072var C.Stitch dress
5073var C.Cobb hip boots
5074var C.Herb ithor potion
5075var C.Flow boutonniere
5076# LETH DERIEL
5077var L.Skin reaver pelt
5078var L.Bow short bow
5079var L.Orig origami case
5080 var L.Orig.num fifth
5081var L.Weap wolf-tail shield
5082var L.Wick mesh sack
5083var L.Bard keyed flute
5084var L.Bard2 twelve strings
5085var L.Cloth mantle
5086var L.Wood ironwood log
5087var L.Gen quiver
5088 var L.Gen.Alt <nothing>
5089var L.Perf woodsmoke cologne
5090# SHARD
5091var skillrange 300-399
5092var S.Gen backtube
5093var S.Weap stiletto
5094var S.Cleric bell
5095var S.Stitch coat
5096var S.Alch cauldron
5097var S.Herb <nothing>
5098var S.Artif elbaite runestone
5099var S.Music gilded mandolin
5100var S.Lock ivory lockpick
5101var S.Armor helmet
5102var S.Coin coin case
5103 var S.Coin.Loc
5104var S.Frill doll
5105var S.Herald medium buckler
5106 var S.Herald.Loc
5107var S.Gift dagger
5108 var S.Gift.Loc on table
5109var S.Toy black book
5110 var S.Toy.Loc
5111var S.Reed thigh bag
5112 var S.Reed.num
5113var S.Memory pin
5114var S.Token <nothing>
5115var S.Museum black slippers
5116var S.Barber horn-handled razor
5117var S.Bow longbow
5118var S.Tanner pattern
5119var S.Surv stone mortar
5120 var S.Surv.Alt stone pestle
5121 var S.Surv.Loc
5122var S.Surv2 razor knife
5123 var S.Surv2.Alt steel shaper
5124 var S.Surv2.Loc
5125# HIB AND RAVEN'S POINT
5126var SC.Weap <nothing>
5127var H.Shield ordinary shield
5128var H.Jewel earrings
5129var H.Tog shirt
5130var H.Herb nemoih root
5131var H.Sund lamp
5132var H.Lamp serpent lamp
5133var H.Music horn
5134var H.Alch granite mortar
5135var H.Forge shaft
5136 var H.Forge.Loc on tab
5137var H.WM copper shaft
5138var H.WM.Num
5139 var H.WM.Loc on tab
5140var R.Gen stone mortar
5141var R.Tobac tobacco
5142GOSUB ITEM.COUNT3
5143RETURN
5144
5145##################################
5146# SKILLS 400-599
5147##################################
5148CLASS9:
5149## THEREN
5150var skillrange 400-599
5151var T.Tarsha greques
5152var T.Rose shirt
5153var T.Music harp case
5154var T.Hats sailor hat
5155var T.Arm leather sheath
5156var T.Gift blue shirt
5157var T.Sweet cake
5158var T.Cupcake cupcake
5159var T.Gen backsheath
5160var T.Krrish bone
5161var T.Lense <nothing>
5162var T.Cleric mobar blood
5163var T.Men trousers
5164var T.Women <nothing>
5165var T.Cloth suspenders
5166var T.Armory dagger
5167var T.Forge hilt
5168## HAVEN
5169var skillrange 400-599
5170var RH.Herb ithor potion
5171var RH.Iron steel greaves
5172var RH.Naph naphtha
5173 var RH.Naph.Loc on cart
5174var RH.Flow velvet rose
5175var RH.Seli aventail
5176var RH.Arms sword
5177var RH.Gen stove
5178var RH.Cloth gown
5179var RH.Artif cambrinth ring
5180var RH.Joy troll
5181var RH.Smoke baron tobacco
5182var RH.Weap goat-head mace
5183var RH.Bard mandolin
5184var RH.Bard2 amulet
5185var RH.Cleric pomander
5186var RH.Cleric2 wood shaper
5187var RH.Lock slim lockpick
5188var RH.Tog linen shirt
5189var RH.Tog2 <nothing>
5190var RH.Mirg toe-bells
5191# ARTHE DALE
5192var skillrange 400-599
5193var AD.Smoke whiskey cigar
5194var AD.Thread pattern
5195var AD.Fash overall
5196var AD.Odds monocle
5197var AD.Bard peri'el's song
5198var AD.Map map
5199var AD.Arm shell shield
5200var AD.Feta biscuit
5201var AD.Tart.E tart
5202var AD.Tart.C tart
5203var AD.Tart.M tart
5204var AD.Tart.L tart
5205var AD.Tart.F tart
5206var KA.Grek barrel
5207# CROSSINGS
5208var C.Alch stove
5209var C.Arm jerkin
5210var C.Artif jar
5211var C.Bath towel
5212 var C.Bath.Num second
5213 var C.Bath.Loc on rack
5214var C.Card case
5215var C.Gen portable stove
5216var C.Weap mace
5217var C.Music repair kit
5218var C.Music2 guiro
5219var C.Lock lockpick ring
5220var C.Empath leather boots
5221 var C.Empath.Alt broadsword
5222var C.Empath2 silver chart
5223var C.Empath3 journal
5224 var C.Empath3.Loc in box
5225 var C.Empath3.Alt stylus
5226var C.Cler silver bell
5227var C.Cler2 burlap sack
5228var C.Haber tail coat
5229var C.Script satchel
5230 var C.Script.Num third
5231var C.Tann potion
5232 var C.Tann.Loc in catalog
5233var C.Jewel diamond engagement ring
5234var C.Stitch long coat
5235var C.Cobb hip boots
5236var C.Herb ithor potion
5237var C.Flow boutonniere
5238# LETH DERIEL
5239var L.Skin blood wolf pelt
5240var L.Bow short bow
5241var L.Orig origami case
5242 var L.Orig.num fifth
5243var L.Weap wolf-tail shield
5244var L.Wick willow backpack
5245var L.Bard silverwood mirliton
5246var L.Bard2 satchel
5247var L.Cloth silk jaque
5248var L.Wood apple
5249var L.Gen mesh backpack
5250 var L.Gen.Alt ankle sheath
5251var L.Perf venom oil
5252# SHARD
5253var skillrange 400-599
5254var S.Gen backtube
5255var S.Weap oben
5256var S.Cleric mobar blood
5257var S.Stitch gown
5258var S.Alch stove
5259var S.Herb ithor potion
5260var S.Artif belradi potion
5261var S.Music gittern
5262var S.Armor chain handguards
5263var S.Reed skirt
5264 var S.Reed.num
5265var S.Museum black slippers
5266var S.Bow barbed arrows
5267var S.Lock signet ring
5268var S.Coin coin case
5269 var S.Coin.Loc on table
5270var S.Frill doll
5271var S.Herald ordinary shield
5272 var S.Herald.Loc on rack
5273var S.Gift earring
5274 var S.Gift.Loc
5275var S.Toy marionette
5276 var S.Toy.Loc on lion
5277var S.Memory wrap
5278var S.Token token
5279var S.Barber razor
5280var S.Tanner potion
5281var S.Surv poncho
5282 var S.Surv.Loc
5283 var S.Surv.Alt steel dagger
5284var S.Surv2 razor-tipped arrows
5285 var S.Surv2.Loc
5286 var S.Surv2.Alt broad-barbed arrows
5287# HIB AND RAVEN'S POINT
5288var SC.Weap adze
5289var H.Shield medium shield
5290var H.Jewel necklace
5291var H.Tog robe
5292var H.Herb lujeakave elixir
5293var H.Sund broadsword
5294var H.Lamp dragon lamp
5295var H.Music bagpipe
5296var H.Alch bucket
5297var H.Forge zinc bar
5298 var H.Forge.Loc on tab
5299var H.WM zinc bar
5300var H.WM.Num
5301 var H.WM.Loc on tab
5302var R.Gen hammer
5303var R.Tobac tobacco pouch
5304GOSUB ITEM.COUNT3
5305RETURN
5306
5307##################################
5308# SKILLS 600-699
5309##################################
5310CLASS10:
5311## THEREN
5312var skillrange 600-699
5313var T.Tarsha coat
5314var T.Rose shirt
5315var T.Music harp
5316var T.Hats sailor hat
5317var T.Arm leather sheath
5318var T.Gift blue shirt
5319var T.Sweet cake
5320var T.Cupcake cupcake
5321var T.Gen backsheath
5322var T.Krrish bones
5323var T.Lense bone ring
5324var T.Cleric mobar blood
5325var T.Men trousers
5326var T.Women dark veil
5327var T.Cloth suspenders
5328var T.Armory dagger
5329var T.Forge hilt
5330## HAVEN
5331var skillrange 600-699
5332var RH.Herb ithor potion
5333var RH.Iron chain helm
5334var RH.Naph naphtha
5335 var RH.Naph.Loc on cart
5336var RH.Flow velvet rose
5337var RH.Seli skull helm
5338var RH.Arms longsword
5339var RH.Gen stove
5340var RH.Cloth gown
5341var RH.Artif potion
5342var RH.Joy troll
5343var RH.Smoke baron tobacco
5344var RH.Weap goat-head mace
5345var RH.Bard silk trews
5346var RH.Bard2 spirit earrings
5347var RH.Cleric pomander
5348var RH.Cleric2 pendant
5349var RH.Lock slim lockpick
5350var RH.Tog linen shirt
5351var RH.Tog2 <nothing>
5352var RH.Mirg toe-bells
5353# ARTHE DALE
5354var skillrange 600-699
5355var AD.Smoke whiskey cigar
5356var AD.Thread thief pattern
5357var AD.Fash overall
5358var AD.Odds scarf
5359var AD.Bard peri'el's song
5360var AD.Map map
5361var AD.Arm ring mail
5362var AD.Feta biscuit
5363var AD.Tart.E tart
5364var AD.Tart.C tart
5365var AD.Tart.M tart
5366var AD.Tart.L tart
5367var AD.Tart.F tart
5368var KA.Grek barrel
5369# CROSSINGS
5370var C.Alch bucket
5371var C.Arm ring mail
5372var C.Artif urn
5373var C.Bath towel
5374 var C.Bath.Num second
5375 var C.Bath.Loc on rack
5376var C.Card case
5377var C.Gen portable stove
5378var C.Weap heavy crossbow
5379var C.Music case of silver
5380var C.Music2 tapani
5381var C.Lock lockpick ring
5382var C.Empath leather boots
5383 var C.Empath.Alt targe
5384var C.Empath2 silver chart
5385var C.Empath3 journal
5386 var C.Empath3.Loc in box
5387 var C.Empath3.Alt stylus
5388var C.Cler silver bell
5389var C.Cler2 armband
5390var C.Haber tail coat
5391var C.Script satchel
5392var C.Tann potion
5393 var C.Tann.Loc in catalog
5394var C.Jewel diamond wedding ring
5395var C.Stitch long coat
5396var C.Cobb hip boots
5397var C.Herb ithor potion
5398var C.Flow velvet rose
5399# LETH DERIEL
5400var L.Skin blood wolf pelt
5401var L.Bow heavy crossbow
5402var L.Orig origami case
5403 var L.Orig.num fifth
5404var L.Weap hide shield
5405var L.Wick willow backpack
5406var L.Bard silverwood mirliton
5407var L.Bard2 songbook
5408var L.Cloth silk jaque
5409var L.Wood caravan
5410var L.Gen mesh backpack
5411 var L.Gen.Alt ankle sheath
5412var L.Perf venom oil
5413# SHARD
5414var skillrange 600-699
5415var S.Gen backtube
5416var S.Weap oben
5417var S.Cleric mobar blood
5418var S.Stitch gown
5419var S.Alch stove
5420var S.Herb ithor potion
5421var S.Artif belradi potion
5422var S.Music gittern
5423var S.Armor chain handguards
5424var S.Reed skirt
5425 var S.Reed.num
5426var S.Museum black slippers
5427var S.Bow barbed arrows
5428var S.Lock signet ring
5429var S.Coin coin case
5430 var S.Coin.Loc on table
5431var S.Frill doll
5432var S.Herald ordinary shield
5433 var S.Herald.Loc on rack
5434var S.Gift earring
5435 var S.Gift.Loc
5436var S.Toy marionette
5437 var S.Toy.Loc on lion
5438var S.Memory wrap
5439var S.Token token
5440var S.Barber razor
5441var S.Tanner potion
5442var S.Surv poncho
5443 var S.Surv.Loc
5444 var S.Surv.Alt steel dagger
5445var S.Surv2 razor-tipped arrows
5446 var S.Surv2.Loc
5447 var S.Surv2.Alt broad-barbed arrows
5448# HIB AND RAVEN'S POINT
5449var SC.Weap adze
5450var H.Shield medium shield
5451var H.Jewel necklace
5452var H.Tog robe
5453var H.Herb lujeakave elixir
5454var H.Sund broadsword
5455var H.Lamp dragon lamp
5456var H.Music bagpipe
5457var H.Alch bucket
5458var H.Forge zinc bar
5459 var H.Forge.Loc on tab
5460var H.WM zinc bar
5461var H.WM.Num
5462 var H.WM.Loc on tab
5463var R.Gen hammer
5464var R.Tobac tobacco pouch
5465GOSUB ITEM.COUNT4
5466RETURN
5467
5468##################################
5469# SKILLS 700-799
5470##################################
5471CLASS11:
5472# THEREN
5473var skillrange 700-799
5474var T.Tarsha brocade bilaud
5475var T.Rose woolen cloak
5476var T.Music harp
5477var T.Hats head-dress
5478var T.Arm leather sheath
5479var T.Gift pyramid
5480var T.Sweet cake
5481var T.Cupcake cupcake
5482var T.Gen towel
5483var T.Krrish bones
5484var T.Lense bone ring
5485var T.Cleric mobar blood
5486var T.Men shirt
5487var T.Women dark veil
5488var T.Cloth purse
5489var T.Armory scabbard
5490var T.Forge hilt
5491# HAVEN
5492var skillrange 700-799
5493var RH.Herb ithor potion
5494var RH.Iron chain helm
5495var RH.Naph naphtha
5496 var RH.Naph.Loc on cart
5497var RH.Flow velvet rose
5498var RH.Seli skull helm
5499var RH.Arms longsword
5500var RH.Gen stove
5501var RH.Cloth gown
5502var RH.Artif potion
5503var RH.Joy troll
5504var RH.Smoke baron tobacco
5505var RH.Weap goat-head mace
5506var RH.Bard silk trews
5507var RH.Bard2 spirit earrings
5508var RH.Cleric pomander
5509var RH.Cleric2 pendant
5510var RH.Lock slim lockpick
5511var RH.Tog linen shirt
5512var RH.Tog2 <nothing>
5513var RH.Mirg toe-bells
5514# ARTHE DALE
5515var skillrange 700-799
5516var AD.Smoke whiskey cigar
5517var AD.Thread thief pattern
5518var AD.Fash overall
5519var AD.Odds scarf
5520var AD.Bard peri'el's song
5521var AD.Map map
5522var AD.Arm ring mail
5523var AD.Feta biscuit
5524var AD.Tart.E tart
5525var AD.Tart.C tart
5526var AD.Tart.M tart
5527var AD.Tart.L tart
5528var AD.Tart.F tart
5529var KA.Grek barrel
5530# CROSSINGS
5531var C.Alch bucket
5532var C.Arm ring mail
5533var C.Artif urn
5534var C.Bath towel
5535 var C.Bath.Num second
5536 var C.Bath.Loc on rack
5537var C.Card case
5538var C.Gen portable stove
5539var C.Weap heavy crossbow
5540var C.Music case of silver
5541var C.Music2 tapani
5542var C.Lock lockpick ring
5543var C.Empath leather boots
5544 var C.Empath.Alt targe
5545var C.Empath2 silver chart
5546var C.Empath3 journal
5547 var C.Empath3.Loc
5548 var C.Empath3.Alt stylus
5549var C.Cler silver bell
5550var C.Cler2 armband
5551var C.Haber tail coat
5552var C.Script satchel
5553var C.Tann potion
5554 var C.Tann.Loc in catalog
5555var C.Jewel diamond wedding ring
5556var C.Stitch long coat
5557var C.Cobb hip boots
5558var C.Herb ithor potion
5559var C.Flow velvet rose
5560# LETH DERIEL
5561var L.Skin blood wolf pelt
5562var L.Bow heavy crossbow
5563 var L.Orig.num fifth
5564var L.Orig case
5565var L.Weap hide shield
5566var L.Wick willow backpack
5567var L.Bard silverwood mirliton
5568var L.Bard2 songbook
5569var L.Cloth silk jaque
5570var L.Wood caravan
5571var L.Gen mesh backpack
5572 var L.Gen.Alt ankle sheath
5573var L.Perf venom oil
5574# SHARD
5575var skillrange 700-799
5576var S.Gen leather armor
5577var S.Weap short bow
5578var S.Cleric mobar blood
5579var S.Stitch gown
5580var S.Alch bucket
5581var S.Herb ithor potion
5582var S.Artif celestite runestone
5583var S.Music case
5584var S.Armor chain balaclava
5585var S.Reed skirt
5586 var S.Reed.num
5587var S.Museum earring
5588var S.Bow short bow
5589var S.Lock diamondique lockpick
5590var S.Coin coin case
5591 var S.Coin.Loc on table
5592var S.Frill doll
5593var S.Herald oval shield
5594 var S.Herald.Loc on rack
5595var S.Gift museum globe
5596 var S.Gift.Loc
5597var S.Toy marionette
5598 var S.Toy.Loc on lion
5599var S.Memory wrap
5600var S.Token token
5601var S.Barber razor
5602var S.Tanner pelt potion
5603var S.Surv cap
5604 var S.Surv.Loc
5605 var S.Surv.Alt cowl
5606var S.Surv2 chunenguti
5607 var S.Surv2.Loc on stand
5608 var S.Surv2.Alt longbow
5609# HIB AND RAVEN'S POINT
5610var SC.Weap adze
5611var H.Shield medium shield
5612var H.Jewel necklace
5613var H.Tog robe
5614var H.Herb lujeakave elixir
5615var H.Sund broadsword
5616var H.Lamp dragon lamp
5617var H.Music bagpipe
5618var H.Alch bucket
5619var H.Forge zinc bar
5620 var H.Forge.Loc on tab
5621var H.WM zinc bar
5622var H.WN.Num
5623 var H.WM.Loc on tab
5624var R.Gen hammer
5625var R.Tobac tobacco pouch
5626GOSUB ITEM.COUNT4
5627RETURN
5628
5629##################################
5630# SKILLS 800-899
5631##################################
5632CLASS12:
5633# THEREN
5634var skillrange 800-899
5635var T.Tarsha brocade bilaud
5636var T.Rose woolen cloak
5637var T.Music bagpipes
5638var T.Hats head-dress
5639var T.Arm chain handguards
5640var T.Gift pyramid
5641var T.Gen towel
5642var T.Sweet cake
5643var T.Cupcake cupcake
5644var T.Krrish bowl
5645var T.Lense telescope
5646var T.Cleric mobar blood
5647var T.Men shirt
5648var T.Women dark veil
5649var T.Cloth cane
5650var T.Armory longsword
5651var T.Forge hilt
5652# HAVEN
5653var skillrange 800-899
5654var RH.Herb ithor potion
5655var RH.Iron chain shirt
5656var RH.Naph naphtha
5657 var RH.Naph.Loc on cart
5658var RH.Flow velvet rose
5659var RH.Seli sheepskin robe
5660var RH.Arms spear
5661var RH.Gen portable stove
5662var RH.Cloth gown
5663var RH.Artif cambrinth orb
5664var RH.Joy troll
5665var RH.Smoke barons choice
5666var RH.Weap mattock
5667var RH.Bard mantle
5668var RH.Bard2 spirit tailband
5669var RH.Cleric pomander
5670var RH.Cleric2 cambrinth ring
5671var RH.Tog slippers
5672var RH.Tog2 slippers
5673var RH.Mirg chain anklet
5674var RH.Lock slim lockpick
5675# ARTHE DALE
5676var skillrange 800-899
5677var AD.Smoke whiskey cigar
5678var AD.Thread thief pattern
5679var AD.Fash overall
5680var AD.Odds scarf
5681var AD.Bard peri'el's song
5682var AD.Map map
5683var AD.Arm ring mail
5684var AD.Feta biscuit
5685var AD.Tart.E tart
5686var AD.Tart.C tart
5687var AD.Tart.M tart
5688var AD.Tart.L tart
5689var AD.Tart.F tart
5690var KA.Grek barrel
5691# CROSSINGS
5692var skillrange 800-899
5693var C.Alch bucket
5694var C.Arm ring mail
5695var C.Artif urn
5696var C.Bath towel
5697 var C.Bath.Num second
5698 var C.Bath.Loc on rack
5699var C.Card case
5700var C.Gen portable stove
5701var C.Weap heavy crossbow
5702var C.Music case of silver
5703var C.Music2 tapani
5704var C.Lock lockpick ring
5705var C.Empath silk shirt
5706 var C.Empath.Alt broadsword
5707var C.Empath2 silver chart
5708var C.Empath3 cebi root
5709 var C.Empath3.Loc
5710 var C.Empath3.Alt stylus
5711var C.Cler silver bell
5712var C.Cler2 armband
5713var C.Haber tail coat
5714var C.Script satchel
5715var C.Tann potion
5716 var C.Tann.Loc in catalog
5717var C.Jewel diamond wedding ring
5718var C.Stitch long coat
5719var C.Cobb hip boots
5720var C.Herb ithor potion
5721var C.Flow velvet rose
5722# LETH DERIEL
5723var skillrange 800-899
5724var L.Skin blood wolf pelt
5725var L.Bow heavy crossbow
5726 var L.Orig.num fifth
5727var L.Orig case
5728var L.Weap takouba
5729var L.Wick willow backpack
5730var L.Bard silverwood mirliton
5731var L.Bard2 hat
5732var L.Cloth silk jaque
5733var L.Wood caravan
5734var L.Gen mesh backpack
5735 var L.Gen.Alt ankle sheath
5736var L.Perf venom oil
5737# SHARD
5738var skillrange 800-899
5739var S.Gen leather armor
5740var S.Weap marauder blade
5741var S.Cleric mobar blood
5742var S.Stitch gown
5743var S.Alch bucket
5744var S.Herb ithor potion
5745var S.Artif celestite runestone
5746var S.Music case
5747var S.Armor great helm
5748var S.Reed skirt
5749 var S.Reed.num
5750var S.Museum earrings
5751var S.Bow silverwillow crossbow
5752var S.Lock diamondique lockpick
5753var S.Coin coin case
5754 var S.Coin.Loc on table
5755var S.Frill doll
5756var S.Herald oval shield
5757 var S.Herald.Loc on rack
5758var S.Gift museum globe
5759 var S.Gift.Loc
5760var S.Toy marionette
5761 var S.Toy.Loc on lion
5762var S.Memory wrap
5763var S.Token token
5764var S.Barber razor
5765var S.Tanner pelt potion
5766var S.Surv cap
5767 var S.Surv.Loc
5768 var S.Surv.Alt cowl
5769var S.Surv2 chunenguti
5770 var S.Surv2.Loc on stand
5771 var S.Surv2.Alt longbow
5772# HIB AND RAVEN'S POINT
5773var SC.Weap adze
5774var H.Shield medium shield
5775var H.Jewel necklace
5776var H.Tog robe
5777var H.Herb lujeakave elixir
5778var H.Sund broadsword
5779var H.Lamp dragon lamp
5780var H.Music bagpipe
5781var H.Alch bucket
5782var H.Forge zinc bar
5783 var H.Forge.Loc on tab
5784var H.WM zinc bar
5785var H.WN.Num
5786 var H.WM.Loc on tab
5787var R.Gen hammer
5788var R.Tobac tobacco pouch
5789GOSUB ITEM.COUNT5
5790RETURN
5791
5792
5793##################################
5794# SKILLS 900-999
5795##################################
5796CLASS13:
5797# THEREN
5798var skillrange 900-999
5799var T.Tarsha brocade bilaud
5800var T.Rose woolen cloak
5801var T.Music bagpipes
5802var T.Hats head-dress
5803var T.Arm chain handguards
5804var T.Gift pyramid
5805var T.Gen towel
5806var T.Sweet cake
5807var T.Cupcake cupcake
5808var T.Krrish bowl
5809var T.Lense telescope
5810var T.Cleric mobar blood
5811var T.Men vest
5812var T.Women dark veil
5813var T.Cloth cane
5814var T.Armory pick
5815var T.Forge hilt
5816# HAVEN
5817var skillrange 900-999
5818var RH.Herb ithor potion
5819var RH.Iron chain shirt
5820var RH.Naph naphtha
5821 var RH.Naph.Loc on cart
5822var RH.Flow velvet rose
5823var RH.Seli sheepskin robe
5824var RH.Arms flamberge
5825var RH.Gen portable stove
5826var RH.Cloth gown
5827var RH.Artif cambrinth orb
5828var RH.Joy troll
5829var RH.Smoke barons choice
5830var RH.Weap mattock
5831var RH.Bard mantle
5832var RH.Bard2 spirit tailband
5833var RH.Cleric pomander
5834var RH.Cleric2 cambrinth ring
5835var RH.Tog tunic
5836var RH.Tog2 thumb ring
5837var RH.Mirg chainmail belt
5838var RH.Lock slim lockpick
5839# ARTHE DALE
5840var skillrange 900-999
5841var AD.Smoke whiskey cigar
5842var AD.Thread thief pattern
5843var AD.Fash overall
5844var AD.Odds scarf
5845var AD.Bard peri'el's song
5846var AD.Map map
5847var AD.Arm ring mail
5848var AD.Feta biscuit
5849var AD.Tart.E tart
5850var AD.Tart.C tart
5851var AD.Tart.M tart
5852var AD.Tart.L tart
5853var AD.Tart.F tart
5854var KA.Grek barrel
5855# CROSSINGS
5856var C.Alch bucket
5857var C.Arm ring mail
5858var C.Artif urn
5859var C.Bath towel
5860 var C.Bath.Num second
5861 var C.Bath.Loc on rack
5862var C.Card case
5863var C.Gen portable stove
5864var C.Weap heavy crossbow
5865var C.Music case of silver
5866var C.Music2 tapani
5867var C.Lock lockpick ring
5868var C.Empath silk shirt
5869 var C.Empath.Alt broadsword
5870var C.Empath2 rock chart
5871var C.Empath3 eternity band
5872 var C.Empath3.Loc
5873 var C.Empath3.Alt stylus
5874var C.Cler silver bell
5875var C.Cler2 armband
5876var C.Haber tail coat
5877var C.Script satchel
5878var C.Tann potion
5879 var C.Tann.Loc in catalog
5880var C.Jewel diamond wedding ring
5881var C.Stitch long coat
5882var C.Cobb hip boots
5883var C.Herb ithor potion
5884var C.Flow velvet rose
5885# LETH DERIEL
5886var skillrange 900-999
5887var L.Skin blood wolf pelt
5888var L.Bow heavy crossbow
5889var L.Orig origami case
5890 var L.Orig.num fifth
5891var L.Weap takouba
5892var L.Wick willow backpack
5893var L.Bard silverwood mirliton
5894var L.Bard2 hat
5895var L.Cloth silk jaque
5896var L.Wood caravan
5897var L.Gen mesh backpack
5898 var L.Gen.Alt ankle sheath
5899var L.Perf venom oil
5900# SHARD
5901var skillrange 900-999
5902var S.Gen leather armor
5903var S.Weap marauder blade
5904var S.Cleric mobar blood
5905var S.Stitch gown
5906var S.Alch bucket
5907var S.Herb ithor potion
5908var S.Artif celestite runestone
5909var S.Music case
5910var S.Armor great helm
5911var S.Reed skirt
5912 var S.Reed.num
5913var S.Museum earrings
5914var S.Bow silverwillow crossbow
5915var S.Lock diamondique lockpick
5916var S.Coin coin case
5917 var S.Coin.Loc on table
5918var S.Frill doll
5919var S.Herald oval shield
5920 var S.Herald.Loc on rack
5921var S.Gift museum globe
5922 var S.Gift.Loc
5923var S.Toy marionette
5924 var S.Toy.Loc on lion
5925var S.Memory wrap
5926var S.Token token
5927var S.Barber razor
5928var S.Tanner pelt potion
5929var S.Surv mining cap
5930 var S.Surv.Loc
5931 var S.Surv.Alt mining helm
5932var S.Surv2 chunenguti
5933 var S.Surv2.Loc on stand
5934 var S.Surv2.Alt longbow
5935# HIB AND RAVEN'S POINT
5936var SC.Weap adze
5937var H.Shield medium shield
5938var H.Jewel necklace
5939var H.Tog robe
5940var H.Herb lujeakave elixir
5941var H.Sund broadsword
5942var H.Lamp dragon lamp
5943var H.Music bagpipe
5944var H.Alch bucket
5945var H.Forge zinc bar
5946 var H.Forge.Loc on tab
5947var H.WM zinc bar
5948var H.WN.Num
5949 var H.WM.Loc on tab
5950var R.Gen hammer
5951var R.Tobac tobacco pouch
5952GOSUB ITEM.COUNT5
5953RETURN
5954
5955##################################
5956# SKILLS 1000-1200
5957##################################
5958CLASS14:
5959CLASS15:
5960CLASS16:
5961var skillrange 1000-1200+
5962var T.Tarsha brocade bilaud
5963var T.Rose woolen cloak
5964var T.Music bagpipe
5965var T.Hats head-dress
5966var T.Arm chain handguards
5967var T.Gift pyramid
5968var T.Gen towel
5969var T.Sweet cake
5970var T.Cupcake cupcake
5971var T.Krrish bowl
5972var T.Lense telescope
5973var T.Cleric mobar blood
5974var T.Men tunic
5975var T.Women dark veil
5976var T.Cloth cane
5977var T.Armory longsword
5978var T.Forge hilt
5979var skillrange 1000-1200
5980var RH.Herb ithor potion
5981var RH.Iron chain shirt
5982var RH.Naph naphtha
5983 var RH.Naph.Loc on cart
5984var RH.Flow velvet rose
5985var RH.Seli sheepskin robe
5986var RH.Arms spear
5987var RH.Gen portable stove
5988var RH.Cloth gown
5989var RH.Artif cambrinth orb
5990var RH.Joy troll
5991var RH.Smoke barons choice
5992var RH.Weap war mattock
5993var RH.Bard silk mantle
5994var RH.Bard2 knot tailband
5995var RH.Cleric pomander
5996var RH.Cleric2 cambrinth ring
5997var RH.Tog slippers
5998var RH.Tog2 slippers
5999var RH.Mirg hip chain
6000var RH.Lock slim lockpick
6001# ARTHE DALE
6002var skillrange 850-1000
6003var AD.Smoke whiskey cigar
6004var AD.Thread thief pattern
6005var AD.Fash overall
6006var AD.Odds scarf
6007var AD.Bard peri'el's song
6008var AD.Map map
6009var AD.Arm ring mail
6010var AD.Feta biscuit
6011var AD.Tart.E tart
6012var AD.Tart.C tart
6013var AD.Tart.M tart
6014var AD.Tart.L tart
6015var AD.Tart.F tart
6016var KA.Grek barrel
6017# CROSSINGS
6018var C.Alch bucket
6019var C.Arm ring mail
6020var C.Artif urn
6021var C.Bath towel
6022 var C.Bath.Num second
6023 var C.Bath.Loc on rack
6024var C.Card case
6025var C.Gen portable stove
6026var C.Weap heavy crossbow
6027var C.Music case of silver
6028var C.Music2 tapani
6029var C.Lock lockpick ring
6030var C.Empath silk shirt
6031 var C.Empath.Alt broadsword
6032var C.Empath2 silver chart
6033var C.Empath3 cebi root
6034 var C.Empath3.Loc
6035 var C.Empath3.Alt stylus
6036var C.Cler silver bell
6037var C.Cler2 armband
6038var C.Haber tail coat
6039var C.Script satchel
6040var C.Tann potion
6041 var C.Tann.Loc in catalog
6042var C.Jewel diamond wedding ring
6043var C.Stitch long coat
6044var C.Cobb hip boots
6045var C.Herb ithor potion
6046var C.Flow velvet rose
6047# LETH DERIEL
6048var L.Skin blood wolf pelt
6049var L.Bow heavy crossbow
6050 var L.Orig.num fifth
6051var L.Orig case
6052var L.Weap takouba
6053var L.Wick willow backpack
6054var L.Bard silverwood mirliton
6055var L.Bard2 felt hat
6056var L.Cloth silk jaque
6057var L.Wood caravan
6058var L.Gen mesh backpack
6059 var L.Gen.Alt ankle sheath
6060var L.Perf venom oil
6061# SHARD
6062var skillrange 1000-1200
6063var S.Gen leather armor
6064var S.Weap marauder blade
6065var S.Cleric mobar blood
6066var S.Stitch gown
6067var S.Alch bucket
6068var S.Herb ithor potion
6069var S.Artif celestite runestone
6070var S.Music case
6071var S.Armor great helm
6072var S.Reed skirt
6073 var S.Reed.num
6074var S.Museum earring
6075var S.Bow silverwillow crossbow
6076var S.Lock diamondique lockpick
6077var S.Coin coin case
6078 var S.Coin.Loc on table
6079var S.Frill doll
6080var S.Herald oval shield
6081 var S.Herald.Loc on rack
6082var S.Gift museum globe
6083 var S.Gift.Loc
6084var S.Toy marionette
6085 var S.Toy.Loc on lion
6086var S.Memory wrap
6087var S.Token token
6088var S.Barber razor
6089var S.Tanner potion
6090var S.Surv cap
6091 var S.Surv.Loc
6092 var S.Surv.Alt cowl
6093var S.Surv2 chunenguti
6094 var S.Surv2.Loc on stand
6095 var S.Surv2.Alt longbow
6096# HIB AND RAVEN'S POINT
6097var SC.Weap adze
6098var H.Shield medium shield
6099var H.Jewel necklace
6100var H.Tog robe
6101var H.Herb lujeakave elixir
6102var H.Sund broadsword
6103var H.Lamp dragon lamp
6104var H.Music bagpipe
6105var H.Alch bucket
6106var H.Forge zinc bar
6107 var H.Forge.Loc on tab
6108var H.WM zinc bar
6109var H.WN.Num
6110 var H.WM.Loc on tab
6111var R.Gen hammer
6112var R.Tobac tobacco pouch
6113GOSUB ITEM.COUNT5
6114RETURN
6115
6116###############################################
6117# ITEM QUANTITY
6118###############################################
6119
6120########################
6121# 20-49
6122########################
6123ITEM.COUNT0:
6124var T.TarshaQuant 1
6125var T.RoseQuant 1
6126var T.MusicQuant 1
6127var T.HatsQuant 1
6128var T.ArmQuant 1
6129var T.GiftQuant 1
6130var T.SweetQuant 1
6131var T.CupcakeQuant 1
6132var T.GenQuant 1
6133var T.KrrishQuant 1
6134var T.LenseQuant 1
6135var T.ClericQuant 1
6136var T.MenQuant 1
6137var T.WomenQuant 1
6138var T.ClothQuant 1
6139var T.ArmoryQuant 1
6140var T.ForgeQuant 1
6141
6142var RH.HerbQuant 1
6143var RH.IronQuant 1
6144var RH.NaphQuant 1
6145var RH.FlowQuant 1
6146var RH.SeliQuant 1
6147var RH.ArmsQuant 1
6148var RH.GenQuant 1
6149var RH.ClothQuant 1
6150var RH.ArtifQuant 1
6151var RH.JoyQuant 1
6152var RH.SmokeQuant 1
6153var RH.WeapQuant 1
6154var RH.BardQuant 1
6155var RH.Bard2Quant 1
6156var RH.ClericQuant 1
6157var RH.Cleric2Quant 1
6158var RH.LockQuant 1
6159var RH.TogQuant 1
6160var RH.Tog2Quant 1
6161var RH.MirgQuant 1
6162
6163var AD.FetaQuant 1
6164var AD.ThreadQuant 1
6165var AD.FashQuant 1
6166var AD.OddsQuant 1
6167var AD.BardQuant 1
6168var AD.MapQuant 1
6169var AD.ArmQuant 1
6170var AD.SmokeQuant 1
6171var AD.Tart.EQuant 1
6172var AD.Tart.CQuant 1
6173var AD.Tart.MQuant 1
6174var AD.Tart.LQuant 1
6175var AD.Tart.FQuant 1
6176var KA.GrekQuant 1
6177
6178var C.AlchQuant 2
6179var C.ArtifQuant 1
6180var C.BathQuant 1
6181var C.CardQuant 1
6182var C.GenQuant 1
6183var C.WeapQuant 1
6184var C.ArmQuant 1
6185var C.MusicQuant 1
6186var C.Music2Quant 1
6187var C.LockQuant 1
6188var C.EmpathQuant 1
6189var C.Empath2Quant 1
6190var C.Empath3Quant 1
6191var C.ClerQuant 1
6192var C.HaberQuant 1
6193var C.ScriptQuant 1
6194var C.TannQuant 1
6195var C.JewelQuant 1
6196var C.StitchQuant 1
6197var C.CobbQuant 1
6198var C.HerbQuant 1
6199var C.FlowQuant 1
6200
6201var L.SkinQuant 1
6202var L.BowQuant 1
6203var L.OrigQuant 1
6204var L.WeapQuant 1
6205var L.WickQuant 1
6206var L.BardQuant 1
6207var L.Bard2Quant 1
6208var L.ClothQuant 1
6209var L.WoodQuant 1
6210var L.GenQuant 1
6211var L.PerfQuant 1
6212
6213var S.GenQuant 1
6214var S.WeapQuant 1
6215var S.ClericQuant 1
6216var S.StitchQuant 1
6217var S.AlchQuant 1
6218var S.HerbQuant 1
6219var S.ArtifQuant 1
6220var S.MusicQuant 1
6221var S.ArmorQuant 1
6222var S.ReedQuant 1
6223var S.MuseumQuant 1
6224var S.BowQuant 1
6225var S.LockQuant 1
6226var S.CoinQuant 1
6227var S.Frill Quant 1
6228var S.HeraldQuant 1
6229var S.GiftQuant 1
6230var S.ToyQuant 1
6231var S.MemoryQuant 1
6232var S.TokenQuant 1
6233var S.BarberQuant 1
6234var S.TannerQuant 1
6235var S.SurvQuant 1
6236var S.Surv2Quant 1
6237
6238var SC.WeapQuant 1
6239var H.ShieldQuant 1
6240var H.JewelQuant 1
6241var H.TogQuant 1
6242var H.HerbQuant 1
6243var H.SundQuant 1
6244var H.LampQuant 1
6245var H.MusicQuant 1
6246var H.AlchQuant 1
6247var H.ForgeQuant 1
6248var H.WM Quant 1
6249var H.GenQuant 1
6250var H.TobacQuant 1
6251RETURN
6252########################
6253# 50-99
6254########################
6255ITEM.COUNT1:
6256var T.TarshaQuant 1
6257var T.RoseQuant 1
6258var T.MusicQuant 1
6259var T.HatsQuant 1
6260var T.ArmQuant 1
6261var T.GiftQuant 1
6262var T.SweetQuant 2
6263var T.CupcakeQuant 2
6264var T.GenQuant 2
6265var T.KrrishQuant 1
6266var T.LenseQuant 1
6267var T.ClericQuant 1
6268var T.MenQuant 1
6269var T.WomenQuant 1
6270var T.ClothQuant 1
6271var T.ArmoryQuant 1
6272var T.ForgeQuant 1
6273
6274var RH.HerbQuant 1
6275var RH.IronQuant 1
6276var RH.NaphQuant 1
6277var RH.FlowQuant 1
6278var RH.SeliQuant 1
6279var RH.ArmsQuant 1
6280var RH.GenQuant 2
6281var RH.ClothQuant 2
6282var RH.ArtifQuant 1
6283var RH.JoyQuant 2
6284var RH.SmokeQuant 2
6285var RH.WeapQuant 1
6286var RH.BardQuant 1
6287var RH.Bard2Quant 1
6288var RH.ClericQuant 1
6289var RH.Cleric2Quant 1
6290var RH.LockQuant 1
6291var RH.TogQuant 1
6292var RH.Tog2Quant 1
6293var RH.MirgQuant 1
6294
6295var AD.FetaQuant 1
6296var AD.ThreadQuant 1
6297var AD.FashQuant 2
6298var AD.OddsQuant 2
6299var AD.BardQuant 1
6300var AD.MapQuant 1
6301var AD.ArmQuant 1
6302var AD.SmokeQuant 2
6303var AD.Tart.EQuant 1
6304var AD.Tart.CQuant 2
6305var AD.Tart.MQuant 2
6306var AD.Tart.LQuant 2
6307var AD.Tart.FQuant 1
6308var KA.GrekQuant 1
6309
6310var C.AlchQuant 2
6311var C.ArtifQuant 2
6312var C.BathQuant 2
6313var C.CardQuant 2
6314var C.GenQuant 2
6315var C.WeapQuant 2
6316var C.ArmQuant 2
6317var C.MusicQuant 2
6318var C.Music2Quant 1
6319var C.LockQuant 2
6320var C.EmpathQuant 1
6321var C.Empath2Quant 1
6322var C.Empath3Quant 1
6323var C.ClerQuant 2
6324var C.HaberQuant 2
6325var C.ScriptQuant 2
6326var C.TannQuant 2
6327var C.JewelQuant 2
6328var C.StitchQuant 2
6329var C.CobbQuant 2
6330var C.HerbQuant 2
6331var C.FlowQuant 2
6332
6333var L.SkinQuant 2
6334var L.BowQuant 2
6335var L.OrigQuant 2
6336var L.WeapQuant 2
6337var L.WickQuant 2
6338var L.BardQuant 2
6339var L.Bard2Quant 2
6340var L.ClothQuant 2
6341var L.WoodQuant 2
6342var L.GenQuant 2
6343var L.PerfQuant 2
6344
6345var S.GenQuant 2
6346var S.WeapQuant 2
6347var S.ClericQuant 2
6348var S.StitchQuant 2
6349var S.AlchQuant 2
6350var S.HerbQuant 2
6351var S.ArtifQuant 2
6352var S.MusicQuant 2
6353var S.ArmorQuant 2
6354var S.ReedQuant 2
6355var S.MuseumQuant 2
6356var S.BowQuant 2
6357var S.LockQuant 2
6358var S.CoinQuant 2
6359var S.Frill Quant 2
6360var S.HeraldQuant 2
6361var S.GiftQuant 2
6362var S.ToyQuant 2
6363var S.MemoryQuant 2
6364var S.TokenQuant 2
6365var S.BarberQuant 2
6366var S.TannerQuant 2
6367var S.SurvQuant 2
6368var S.Surv2Quant 2
6369
6370var SC.WeapQuant 2
6371var H.ShieldQuant 2
6372var H.JewelQuant 2
6373var H.TogQuant 2
6374var H.HerbQuant 2
6375var H.SundQuant 2
6376var H.LampQuant 2
6377var H.MusicQuant 2
6378var H.AlchQuant 2
6379var H.ForgeQuant 2
6380var H.WM Quant 2
6381var H.GenQuant 2
6382var H.TobacQuant 2
6383RETURN
6384########################
6385# 100-299
6386########################
6387ITEM.COUNT2:
6388var T.TarshaQuant 1
6389var T.RoseQuant 1
6390var T.MusicQuant 1
6391var T.HatsQuant 1
6392var T.ArmQuant 1
6393var T.GiftQuant 1
6394var T.SweetQuant 2
6395var T.CupcakeQuant 2
6396var T.GenQuant 2
6397var T.KrrishQuant 1
6398var T.LenseQuant 1
6399var T.ClericQuant 1
6400var T.MenQuant 1
6401var T.WomenQuant 1
6402var T.ClothQuant 1
6403var T.ArmoryQuant 1
6404var T.ForgeQuant 1
6405
6406var RH.HerbQuant 2
6407var RH.IronQuant 2
6408var RH.NaphQuant 2
6409var RH.FlowQuant 2
6410var RH.SeliQuant 2
6411var RH.ArmsQuant 1
6412var RH.GenQuant 2
6413var RH.ClothQuant 2
6414var RH.ArtifQuant 1
6415var RH.JoyQuant 2
6416var RH.SmokeQuant 2
6417var RH.WeapQuant 2
6418var RH.BardQuant 2
6419var RH.Bard2Quant 1
6420var RH.ClericQuant 2
6421var RH.Cleric2Quant 1
6422var RH.LockQuant 2
6423var RH.TogQuant 2
6424var RH.Tog2Quant 1
6425var RH.MirgQuant 1
6426
6427var AD.FetaQuant 2
6428var AD.ThreadQuant 1
6429var AD.FashQuant 1
6430var AD.OddsQuant 1
6431var AD.BardQuant 2
6432var AD.MapQuant 1
6433var AD.ArmQuant 2
6434var AD.SmokeQuant 2
6435var AD.Tart.EQuant 2
6436var AD.Tart.CQuant 3
6437var AD.Tart.MQuant 3
6438var AD.Tart.LQuant 2
6439var AD.Tart.FQuant 3
6440var KA.GrekQuant 1
6441
6442var C.AlchQuant 2
6443var C.ArtifQuant 2
6444var C.BathQuant 2
6445var C.CardQuant 1
6446var C.GenQuant 2
6447var C.WeapQuant 2
6448var C.ArmQuant 2
6449var C.MusicQuant 2
6450var C.Music2Quant 1
6451var C.LockQuant 2
6452var C.EmpathQuant 1
6453var C.Empath2Quant 1
6454var C.Empath3Quant 1
6455var C.ClerQuant 2
6456var C.HaberQuant 2
6457var C.ScriptQuant 2
6458var C.TannQuant 2
6459var C.JewelQuant 2
6460var C.StitchQuant 2
6461var C.CobbQuant 2
6462var C.HerbQuant 2
6463var C.FlowQuant 2
6464
6465var L.SkinQuant 2
6466var L.BowQuant 2
6467var L.OrigQuant 1
6468var L.WeapQuant 1
6469var L.WickQuant 2
6470var L.BardQuant 2
6471var L.Bard2Quant 1
6472var L.ClothQuant 2
6473var L.WoodQuant 1
6474var L.GenQuant 1
6475var L.PerfQuant 2
6476
6477var S.GenQuant 2
6478var S.WeapQuant 2
6479var S.ClericQuant 2
6480var S.StitchQuant 2
6481var S.AlchQuant 2
6482var S.HerbQuant 2
6483var S.ArtifQuant 2
6484var S.MusicQuant 2
6485var S.ArmorQuant 2
6486var S.ReedQuant 1
6487var S.MuseumQuant 1
6488var S.BowQuant 1
6489var S.LockQuant 2
6490var S.CoinQuant 1
6491var S.Frill Quant 1
6492var S.HeraldQuant 1
6493var S.GiftQuant 1
6494var S.ToyQuant 1
6495var S.MemoryQuant 2
6496var S.TokenQuant 2
6497var S.BarberQuant 1
6498var S.TannerQuant 2
6499var S.SurvQuant 1
6500var S.Surv2Quant 1
6501
6502var SC.WeapQuant 2
6503var H.ShieldQuant 2
6504var H.JewelQuant 2
6505var H.TogQuant 2
6506var H.HerbQuant 2
6507var H.SundQuant 2
6508var H.LampQuant 2
6509var H.MusicQuant 2
6510var H.AlchQuant 2
6511var H.ForgeQuant 2
6512var H.WM Quant 2
6513var H.GenQuant 2
6514var H.TobacQuant 2
6515RETURN
6516########################
6517# 300-599
6518########################
6519ITEM.COUNT3:
6520var T.TarshaQuant 1
6521var T.RoseQuant 1
6522var T.MusicQuant 1
6523var T.HatsQuant 1
6524var T.ArmQuant 1
6525var T.GiftQuant 1
6526var T.SweetQuant 2
6527var T.CupcakeQuant 2
6528var T.GenQuant 2
6529var T.KrrishQuant 1
6530var T.LenseQuant 1
6531var T.ClericQuant 1
6532var T.MenQuant 1
6533var T.WomenQuant 1
6534var T.ClothQuant 1
6535var T.ArmoryQuant 1
6536var T.ForgeQuant 1
6537
6538var RH.HerbQuant 2
6539var RH.IronQuant 2
6540var RH.NaphQuant 2
6541var RH.FlowQuant 2
6542var RH.SeliQuant 2
6543var RH.ArmsQuant 1
6544var RH.GenQuant 2
6545var RH.ClothQuant 2
6546var RH.ArtifQuant 1
6547var RH.JoyQuant 2
6548var RH.SmokeQuant 2
6549var RH.WeapQuant 2
6550var RH.BardQuant 2
6551var RH.Bard2Quant 1
6552var RH.ClericQuant 2
6553var RH.Cleric2Quant 1
6554var RH.LockQuant 2
6555var RH.TogQuant 2
6556var RH.Tog2Quant 1
6557var RH.MirgQuant 1
6558
6559var AD.FetaQuant 2
6560var AD.ThreadQuant 1
6561var AD.FashQuant 2
6562var AD.OddsQuant 2
6563var AD.BardQuant 2
6564var AD.MapQuant 2
6565var AD.ArmQuant 2
6566var AD.SmokeQuant 2
6567var AD.Tart.EQuant 2
6568var AD.Tart.CQuant 3
6569var AD.Tart.MQuant 3
6570var AD.Tart.LQuant 2
6571var AD.Tart.FQuant 3
6572var KA.GrekQuant 1
6573
6574var C.AlchQuant 2
6575var C.ArtifQuant 2
6576var C.BathQuant 2
6577var C.CardQuant 2
6578var C.GenQuant 2
6579var C.WeapQuant 2
6580var C.ArmQuant 2
6581var C.MusicQuant 2
6582var C.Music2Quant 1
6583var C.LockQuant 2
6584var C.EmpathQuant 1
6585var C.Empath2Quant 1
6586var C.Empath3Quant 1
6587var C.ClerQuant 2
6588var C.HaberQuant 2
6589var C.ScriptQuant 2
6590var C.TannQuant 2
6591var C.JewelQuant 2
6592var C.StitchQuant 2
6593var C.CobbQuant 2
6594var C.HerbQuant 2
6595var C.FlowQuant 2
6596
6597var L.SkinQuant 2
6598var L.BowQuant 2
6599var L.OrigQuant 2
6600var L.WeapQuant 2
6601var L.WickQuant 2
6602var L.BardQuant 2
6603var L.Bard2Quant 1
6604var L.ClothQuant 2
6605var L.WoodQuant 1
6606var L.GenQuant 1
6607var L.PerfQuant 2
6608
6609var S.GenQuant 2
6610var S.WeapQuant 2
6611var S.ClericQuant 2
6612var S.StitchQuant 2
6613var S.AlchQuant 2
6614var S.HerbQuant 2
6615var S.ArtifQuant 2
6616var S.MusicQuant 2
6617var S.ArmorQuant 2
6618var S.ReedQuant 1
6619var S.MuseumQuant 1
6620var S.BowQuant 1
6621var S.LockQuant 2
6622var S.CoinQuant 1
6623var S.Frill Quant 1
6624var S.HeraldQuant 1
6625var S.GiftQuant 1
6626var S.ToyQuant 1
6627var S.MemoryQuant 2
6628var S.TokenQuant 2
6629var S.BarberQuant 1
6630var S.TannerQuant 2
6631var S.SurvQuant 1
6632var S.Surv2Quant 1
6633
6634var SC.WeapQuant 2
6635var H.ShieldQuant 2
6636var H.JewelQuant 2
6637var H.TogQuant 2
6638var H.HerbQuant 2
6639var H.SundQuant 2
6640var H.LampQuant 2
6641var H.MusicQuant 2
6642var H.AlchQuant 2
6643var H.ForgeQuant 2
6644var H.WM Quant 2
6645var H.GenQuant 2
6646var H.TobacQuant 2
6647RETURN
6648########################
6649# 600-799
6650########################
6651ITEM.COUNT4:
6652var T.TarshaQuant 1
6653var T.RoseQuant 1
6654var T.MusicQuant 1
6655var T.HatsQuant 1
6656var T.ArmQuant 1
6657var T.GiftQuant 1
6658var T.SweetQuant 2
6659var T.CupcakeQuant 2
6660var T.GenQuant 2
6661var T.KrrishQuant 1
6662var T.LenseQuant 1
6663var T.ClericQuant 1
6664var T.MenQuant 1
6665var T.WomenQuant 1
6666var T.ClothQuant 1
6667var T.ArmoryQuant 1
6668var T.ForgeQuant 1
6669
6670var RH.HerbQuant 2
6671var RH.IronQuant 2
6672var RH.NaphQuant 2
6673var RH.FlowQuant 2
6674var RH.SeliQuant 2
6675var RH.ArmsQuant 1
6676var RH.GenQuant 2
6677var RH.ClothQuant 2
6678var RH.ArtifQuant 1
6679var RH.JoyQuant 2
6680var RH.SmokeQuant 2
6681var RH.WeapQuant 2
6682var RH.BardQuant 2
6683var RH.Bard2Quant 1
6684var RH.ClericQuant 2
6685var RH.Cleric2Quant 1
6686var RH.LockQuant 2
6687var RH.TogQuant 2
6688var RH.Tog2Quant 1
6689var RH.MirgQuant 1
6690
6691var AD.FetaQuant 2
6692var AD.ThreadQuant 1
6693var AD.FashQuant 2
6694var AD.OddsQuant 2
6695var AD.BardQuant 2
6696var AD.MapQuant 2
6697var AD.ArmQuant 2
6698var AD.SmokeQuant 2
6699var AD.Tart.EQuant 2
6700var AD.Tart.CQuant 3
6701var AD.Tart.MQuant 3
6702var AD.Tart.LQuant 2
6703var AD.Tart.FQuant 3
6704var KA.GrekQuant 1
6705
6706var C.AlchQuant 2
6707var C.ArtifQuant 2
6708var C.BathQuant 2
6709var C.CardQuant 2
6710var C.GenQuant 2
6711var C.WeapQuant 2
6712var C.ArmQuant 2
6713var C.MusicQuant 2
6714var C.Music2Quant 1
6715var C.LockQuant 2
6716var C.EmpathQuant 1
6717var C.Empath2Quant 1
6718var C.Empath3Quant 1
6719var C.ClerQuant 2
6720var C.HaberQuant 2
6721var C.ScriptQuant 2
6722var C.TannQuant 2
6723var C.JewelQuant 2
6724var C.StitchQuant 2
6725var C.CobbQuant 2
6726var C.HerbQuant 2
6727var C.FlowQuant 2
6728
6729var L.SkinQuant 2
6730var L.BowQuant 2
6731var L.OrigQuant 2
6732var L.WeapQuant 2
6733var L.WickQuant 2
6734var L.BardQuant 2
6735var L.Bard2Quant 1
6736var L.ClothQuant 2
6737var L.WoodQuant 1
6738var L.GenQuant 1
6739var L.PerfQuant 2
6740
6741var S.GenQuant 2
6742var S.WeapQuant 2
6743var S.ClericQuant 2
6744var S.StitchQuant 2
6745var S.AlchQuant 2
6746var S.HerbQuant 2
6747var S.ArtifQuant 2
6748var S.MusicQuant 2
6749var S.ArmorQuant 2
6750var S.ReedQuant 1
6751var S.MuseumQuant 1
6752var S.BowQuant 1
6753var S.LockQuant 2
6754var S.CoinQuant 1
6755var S.Frill Quant 1
6756var S.HeraldQuant 1
6757var S.GiftQuant 1
6758var S.ToyQuant 1
6759var S.MemoryQuant 2
6760var S.TokenQuant 2
6761var S.BarberQuant 1
6762var S.TannerQuant 2
6763var S.SurvQuant 1
6764var S.Surv2Quant 1
6765
6766var SC.WeapQuant 2
6767var H.ShieldQuant 2
6768var H.JewelQuant 2
6769var H.TogQuant 2
6770var H.HerbQuant 2
6771var H.SundQuant 2
6772var H.LampQuant 2
6773var H.MusicQuant 2
6774var H.AlchQuant 2
6775var H.ForgeQuant 2
6776var H.WM Quant 2
6777var H.GenQuant 2
6778var H.TobacQuant 2
6779RETURN
6780########################
6781# 800-1400
6782########################
6783ITEM.COUNT5:
6784var T.TarshaQuant 1
6785var T.RoseQuant 1
6786var T.MusicQuant 2
6787var T.HatsQuant 2
6788var T.ArmQuant 1
6789var T.GiftQuant 2
6790var T.SweetQuant 2
6791var T.CupcakeQuant 2
6792var T.GenQuant 2
6793var T.KrrishQuant 2
6794var T.LenseQuant 2
6795var T.ClericQuant 1
6796var T.MenQuant 1
6797var T.WomenQuant 1
6798var T.ClothQuant 1
6799var T.ArmoryQuant 1
6800var T.ForgeQuant 1
6801
6802var RH.HerbQuant 2
6803var RH.IronQuant 2
6804var RH.NaphQuant 2
6805var RH.FlowQuant 2
6806var RH.SeliQuant 2
6807var RH.ArmsQuant 1
6808var RH.GenQuant 2
6809var RH.ClothQuant 2
6810var RH.ArtifQuant 1
6811var RH.JoyQuant 2
6812var RH.SmokeQuant 2
6813var RH.WeapQuant 2
6814var RH.BardQuant 2
6815var RH.Bard2Quant 1
6816var RH.ClericQuant 2
6817var RH.Cleric2Quant 1
6818var RH.LockQuant 2
6819var RH.TogQuant 2
6820var RH.Tog2Quant 1
6821var RH.MirgQuant 1
6822
6823var AD.FetaQuant 2
6824var AD.ThreadQuant 1
6825var AD.FashQuant 2
6826var AD.OddsQuant 2
6827var AD.BardQuant 2
6828var AD.MapQuant 2
6829var AD.ArmQuant 2
6830var AD.SmokeQuant 2
6831var AD.Tart.EQuant 2
6832var AD.Tart.CQuant 3
6833var AD.Tart.MQuant 3
6834var AD.Tart.LQuant 2
6835var AD.Tart.FQuant 3
6836var KA.GrekQuant 1
6837
6838var C.AlchQuant 2
6839var C.ArtifQuant 2
6840var C.BathQuant 2
6841var C.CardQuant 2
6842var C.GenQuant 2
6843var C.WeapQuant 2
6844var C.ArmQuant 2
6845var C.MusicQuant 2
6846var C.Music2Quant 1
6847var C.LockQuant 2
6848var C.EmpathQuant 1
6849var C.Empath2Quant 1
6850var C.Empath3Quant 1
6851var C.ClerQuant 2
6852var C.HaberQuant 2
6853var C.ScriptQuant 2
6854var C.TannQuant 2
6855var C.JewelQuant 2
6856var C.StitchQuant 2
6857var C.CobbQuant 2
6858var C.HerbQuant 2
6859var C.FlowQuant 2
6860
6861var L.SkinQuant 2
6862var L.BowQuant 2
6863var L.OrigQuant 2
6864var L.WeapQuant 2
6865var L.WickQuant 2
6866var L.BardQuant 2
6867var L.Bard2Quant 1
6868var L.ClothQuant 2
6869var L.WoodQuant 1
6870var L.GenQuant 1
6871var L.PerfQuant 2
6872
6873var S.GenQuant 2
6874var S.WeapQuant 2
6875var S.ClericQuant 2
6876var S.StitchQuant 2
6877var S.AlchQuant 2
6878var S.HerbQuant 2
6879var S.ArtifQuant 2
6880var S.MusicQuant 2
6881var S.ArmorQuant 2
6882var S.ReedQuant 1
6883var S.MuseumQuant 1
6884var S.BowQuant 1
6885var S.LockQuant 2
6886var S.CoinQuant 1
6887var S.Frill Quant 1
6888var S.HeraldQuant 1
6889var S.GiftQuant 1
6890var S.ToyQuant 1
6891var S.MemoryQuant 2
6892var S.TokenQuant 2
6893var S.BarberQuant 1
6894var S.TannerQuant 2
6895var S.SurvQuant 1
6896var S.Surv2Quant 1
6897
6898var SC.WeapQuant 2
6899var H.ShieldQuant 2
6900var H.JewelQuant 2
6901var H.TogQuant 2
6902var H.HerbQuant 2
6903var H.SundQuant 2
6904var H.LampQuant 2
6905var H.MusicQuant 2
6906var H.AlchQuant 2
6907var H.ForgeQuant 2
6908var H.WM Quant 2
6909var H.GenQuant 2
6910var H.TobacQuant 2
6911RETURN
6912
6913##############################
6914# WARNINGS
6915##############################
6916
6917THEREN.NOSTEAL:
6918#% **** Sorry! Theren is just a little too rough for noobs.
6919#% **** Come back when you have a little more Thievery skill (50-60)
6920#% **** It is recommended to start in either Crossings, Riverhaven, or Shard as a beginner.
6921#%
6922pause 2
6923gosub move portal
6924put .travel haven
6925waitforre YOU HAVE ARRIVED
6926goto HAVEN.STEAL
6927put #PARSE DONE STEALING
6928exit
6929
6930TOO.MANY.FINES:
6931#%
6932#% ****************************** WARNING !!!! ************************************
6933#% **** YOU HAVE TOO MANY OUTSTANDING FINES TO STEAL FROM THIS PROVINCE!
6934#% **** YOU MUST GO SURRENDER TO A TOWN GUARD AND GO TO JAIL TO RESET YOUR 'HEAT'!
6935#% ********************************************************************************
6936pause 2
6937#% **** NOTE: IF YOU RACK UP TOO MANY STEALING CHARGES IN A SHORT TIME IT MAKES IT HARDER TO STEAL FROM THAT CITY!
6938#% **** IF YOU ARE GETTING CAUGHT TOO OFTEN IN ONE CITY - TRY STEALING FROM A DIFFERENT PROVINCE FOR A FEW DAYS
6939#% **** SO YOUR "HEAT" RESETS IN THAT CITY (~AFTER~ YOU GO TO JAIL). OR JUST LAY LOW FOR A COUPLE DAYS
6940#% **** YOU MAY NEED TO LOWER THE DIFFICULTY OF ITEMS YOU ARE STEALING OR STEAL LESS FREQUENTLY
6941#% **** IF YOU DO NOT SURRENDER OR GO TO JAIL FOR YOUR OUTSTANDING FINES - YOUR HEAT WILL NOT RESET IN THIS PROVINCE!
6942#%
6943#% *** EMAIL me your thievery ranks and log of your items you are getting caught on
6944#% *** skultamaphon@gmail.com
6945#%
6946put ##% >Log Red **** TOO MANY FINES IN %CITYCODE
6947pause 5
6948goto all.done
6949put #PARSE DONE STEALING
6950goto armor.wear
6951exit
6952
6953NOOB:
6954#%
6955#% ***********************************************************************************
6956#% * You are too Noob! Hit the beggar or get some classes untill you get 20 ranks..
6957#% ***********************************************************************************
6958#%
6959put #parse DONE STEALING
6960exit
6961
6962HELP:
6963#% *** Usage is .steal <Label you want to go to> <starting city (CROSSING/HAVEN)> <type anything in 3 to SKIP beginning bag check>
6964exit