drcsaint.cmd

	kra'hei
      kra'hei reaches towards you and curses you with its last breath


	 setvariable critter1.name Moruryn
     setvariable critter1.death slumps into a heap.
     setvariable critter2.name kra'hei
     setvariable critter2.death kra'hei reaches towards you and curses you with its last breath


Adan'f Warrior - An Adan'f blood warrior screams out,
Adan'f Mage - The mage's skull-tipped staff disappears,
Dobek Moruryn - slumps into a heap.
Geni1 - Getting no response, it collapses to the ground.
Geni2 - explodes into a gaseous cloud.
Young Gryph - collapses into a lifeless mound of fur and feathers.


     setvariable body.part abdomen
     setvariable skinning on
     setvariable stow.boxes on
     setvariable box.limit 12
     setvariable backstab.weapon scim
     setvariable cb.weapon XXXXXXXXX
     setvariable ammo arrow
     setvariable cb.attack snipe
     setvariable shield buckler
     setvariable throw.weapon bola


start:
     counter set 0
     setvariable face.track 0
     setvariable kills0 0
     setvariable kills1 0
     setvariable kills2 0
     setvariable gems 0
     setvariable boxes 0
     setvariable training bs
put get my %shield
put wear my %shield
pause
put get my %backstab.weapon

hide.p:
     pause
hide:
     goto hide-%training

hide-cb:
     goto load

hide-bs:
put hide
     match hide.p type ahead
     match hide.p ...wait
     match hide.d hidden
     match hide.d Roundtime
     match hide.d hiding
     matchwait
hide.d:
     goto stalk

hide-throw:
	 put stow right
	 put stow left
	 pause
	 goto throw.g

hide-throw1:

throw.g.p:
	 pause
throw.g:
	 pause
	 put get %throw.weapon
	 match throw You are already
	 match throw You get a
	 match throw You pick up
	 match throw.n What were you
	 match throw.g.p type ahead
     match throw.g.p ...wait
     matchwait


throw.p:
	 pause
throw:
	 put throw
	 match tired [You're bruised, fatigued,
	 match tired [You're bruised, tired,
	 match tired [You're tired,
	 match drain There is nothing else to face!
	 match kill-1 %critter1.death
     match kill-2 %critter2.death
     match throw.g [Roundtime
	 match web You can't do that while entangled in a web.
	 match throw.p type ahead
     match throw.p ...wait
	 matchwait
throw.n:
echo No throwing weapon, going back to backstab.
goto throw-swap

tired.p
pause
tired:
	 put get %throw.weapon
	 match tired.w You get a
	 match tired.w You pick up
	 match throw.n What were you
	 match tired.p type ahead
     match tired.p ...wait
     matchwait
tired.w:
	 pause 10
	 goto exp-check

web:
	 waitfor You finally manage to free yourself from the webbing.
	 goto get

load.p:
     pause
load:
put load
	 match stow.ammo You don't have the proper ammunition
     match load.p type ahead
     match load.p ...wait
     match load.d already load
     match load.d [Roundtime
     matchwait
load.d:
     goto hide-bs

stalk.p:
     pause
stalk:
put stalk
     match stalk.p type ahead
     match stalk.p ...wait
     match stalk.d already stalk
     match stalk.d You move into position to stalk
     match stalk.d Roundtime
     match hide You must be hidden
     match drain There is nothing else
     matchwait
stalk.d:
     pause
put stop stalk

advance.p:
     pause
advance:
put advance
     match adv.1 You begin to stealthily advance
    	match adv.1 You begin to advance
    	match adv.1 You slip through the shadows to quickly advance upon your foe.
     match adv.1 You are already advancing
     match face-next What do you want to advance towards
     match backstab melee
     matchwait
adv.1:
     match appraise You close to pole weapon range
adv.2:
     match backstab You close to melee range
     match stalk You have lost sight of your
     matchwait
appraise:
put appraise %critter1.name quick
     goto adv.2

backstab.p:
     pause
backstab:
     goto backstab-%training
backstab-bs:
put backstab
     match backstab.p type ahead
     match backstab.p ...wait
     match advance It would help if
     match hide You must be hidden
	 match kill-1 %critter1.death
     match kill-2 %critter2.death
     match face-next is flying far too high to hit
     match ambush You can't backstab that
     match ambush You'll need something a little lighter than this
     match ambush The best you could do is political backbiting.
     match hide Roundtime
     match drain There is nothing else
     matchwait

snipe.p:
     pause
backstab-cb:
put %cb.attack
	 match hide-cb How can you snipe if you are not hidden?
     match snipe.p type ahead
     match snipe.p ...wait
     match face-next is flying far too high to hit
	 match kill-1 %critter1.death
     match kill-2 %critter2.death
     match fire be hidden
     match fire is a stealth
     match hide [Roundtime
     match drain There is nothing else
     matchwait

fire.p:
     pause
fire:
put fire
     match fire.p type ahead
     match fire.p ...wait
     match face-next is flying far too high to hit
	 match kill-1 %critter1.death
     match kill-2 %critter2.death
     match hide [Roundtime
     matchwait

ambush.p:
     pause
ambush:
put attack %body.part
     match ambush.p type ahead
     match ambush.p ...wait
     match advance It would help if
     match advance You aren't close enough to attack.
     match hide You must be hidden
	 match kill-1 %critter1.death
     match kill-2 %critter2.death
     match face-next is flying far too high to hit
     match hide [Roundtime
     matchwait
     matchwait

face-next:
     counter set %face.track
     counter add 1
     setvariable face.track %c
     pause
put face next
     goto face-track_%face.track
face-track_0:
face-track_1:
face-track_2:
     goto advance.p
face-track_3:
face-track_4:
face-track_5:
face-track_6:
face-track_7:
face-track_8:
face-track_9:
     setvariable face.track 0
put unhide
     pause
     match advance.p balance
     match advance.p position
     matchwait

kill-1:
     counter set %kills1
     counter add 1
     setvariable kills1 %c
     counter set %kills0
     counter add 1
     setvariable kills0 %c
     setvariable noun %critter1.name
     goto skin
kill-2:
     counter set %kills2
     counter add 1
     setvariable kills2 %c
     counter set %kills0
     counter add 1
     setvariable kills0 %c
     setvariable noun %critter2.name
     goto skin
skin:
     setvariable face.track 0
     goto skin_%skinning
skin_off:
     goto search.p
skin.p:
     pause
skin_on:
put skin %noun
     match skin.p type ahead
     match skin.p ...wait
     match skin.d Roundtime
     match skin.d living
     match skin.d to skin
     match skin.d Skin what?
     match skin.d cannot be skinned
     match skin.d You'll need to have a bladed instrument
     match skin.d You can't skin
     matchwait
skin.d:
     goto bundle

bundle.p:
     pause
bundle:
put bundle
     match bundle.p type ahead
     match bundle.p ...wait
     match bundle.d BUNDLE HELP
     match bundle.d You stuff
     matchwait
bundle.d:
     goto search

search.p:
     pause
search:
put search %noun
     match search.p type ahead
     match search.p ...wait
     match search.d You search
     match search.d You should probably wait
     match search.d You ponder that
     match search.d I could not find what
     matchwait
search.d:
     goto stow-box

stow-box.p:
     pause
stow-box:
     goto stow-box_%stow.boxes
stow-box_off:
     goto stow-gem
stow-box_on:
put stow box
     match stow-box.p type ahead
     match stow-box.p ...wait
     match stow-box.up You put
     match stow-box.d STOW HELP
     matchwait
stow-box.up:
     counter set %box.limit
     counter subtract 1
     setvariable box.limit %c
     counter set %boxes
     counter add 1
     setvariable boxes %c
     goto stow-box_%box.limit
stow-box_1:
stow-box_2:
stow-box_3:
stow-box_4:
stow-box_5:
stow-box_6:
stow-box_7:
stow-box_8:
stow-box_9:
stow-box_10:
stow-box_11:
stow-box_12:
stow-box_13:
stow-box_14:
stow-box_15:
stow-box_16:
stow-box_17:
stow-box_18:
stow-box_19:
stow-box_20:
stow-box_21:
stow-box_22:
stow-box_23:
stow-box_24:
stow-box_25:
stow-box_26:
stow-box_27:
stow-box_28:
stow-box_29:
stow-box_30:
     goto stow-box
stow-box_0:
     setvariable stow.boxes off
stow-box.d:
     goto stow-gem

stow-gem.p:
     pause
stow-gem:
put stow gem
     match stow-gem.p type ahead
     match stow-gem.p ...wait
     match stow-gem.up You put
     match stow-gem.up You open your pouch
     match stow-gem.d STOW HELP
     matchwait
stow-gem.up:
     counter set %gems
     counter add 1
     setvariable gems %c
     goto stow-gem
stow-gem.d:
     goto stow-coin

stow-coin:
put stow coin
     wait
put stow coin
     wait
echo . [ Confirmed Kills : %critter1.name 's %kills1  |  %critter2.name 's %kills2  | Total Kills : %kills0 ]
echo . [ Loot Found : Gems Found : %gems  |  Boxes Found : %boxes ]
	 pause
	put khri start spar
	pause
     goto loot-%training

loot-bs:
     goto exp-check
loot-cb:
     goto stow.ammo
loot-throw:
	 goto exp-check

stow.ammo.p:
     pause
stow.ammo:
put stow %ammo
     match stow.ammo.p type ahead
     match stow.ammo.p ...wait
     match stow.ammo You put
     match stow.ammo.d STOW HELP
     matchwait
stow.ammo.d:
     goto exp-check

drain:
	 put unhide
     match hide %critter1.name
     match hide %critter2.name
     matchwait

exp-check:
     goto exp-%training
exp-bs:
put khri start steady strike %1
put skill backstab
     match bs-swap mind lock
     match bs-swap nearly lock
     match bs-swap rapt
     match hide EXP HELP
     match hide Please rephrase that command.
     matchwait
exp-cb:
put skill cb
     match cb-swap mind lock
     match cb-swap nearly lock
     match hide EXP HELP
     matchwait
exp-throw:
pause
put skill lt
	 match throw-swap focused
	 match throw-swap mind lock
     match throw-swap nearly lock
     match throw.g EXP HELP
     matchwait

bs-swap.p:
	 pause
bs-swap:
put stow my %backstab.weapon
     waitfor You put
put get %throw.weapon
	 match setvar You are already
	 match setvar You get a
	 match setvar You pick up
	 match throw-swap What were you
	 match bs-swap.p type ahead
     match bs-swap.p ...wait
     matchwait
setvar:
     wait
     setvariable training throw
     goto throw.g

cb-swap:
	 put stow %throw
     wait
     goto throw-swap
 	 put remove my %cb.weapon
     waitfor You get
     setvariable training cb
     goto hide

throw-swap:
	 put stow %throw.weapon
     wait
	 put get my %backstab.weapon
     waitfor You get
     setvariable training bs
     goto hide