All pastes #980103 Raw Edit

Mine

public text v1 · immutable
·published 2008-04-10 20:05 UTC
rendered paste body
#thief dance and bow - dobeks v .99 by RepopularizeQualude

timer start
setvariable lastcombat jab
setvariable exp 1
setvariable wieldbriq false
setvariable range none
setvariable arrowsout false
setvariable hiding false
setvariable speed false
setvariable stanceattack true
setvariable dstat evasion
setvariable humming false
setvariable evas_ml false
setvariable parry_ml false
setvariable cooldown 181

ACTION setvariable humming true when You are already performing something.
ACTION setvariable humming true when You begin to hum
ACTION setvariable humming false when You finish humming
ACTION setvariable humming false when You stop playing your song.

ACTION put hide when discovers your hiding place

ACTION setvariable hiding false when discovers your hiding place
ACTION setvariable hiding false when You come out of hiding.
ACTION setvariable hiding true when You melt

ACTION goto ccforceadvance when The dobek moruryn begins to stir.
ACTION goto ccforceadvance when The dobek moruryn stands back up.
ACTION goto ccforceadvance when The dobek moruryn climbs to its feet.
action goto ccforceadvance when The dobek moruryn leaps to its feet.

ACTION setvariable range melee when at melee range.
ACTION setvariable range melee when closes to melee range
ACTION setvariable range melee when you close to melee
ACTION setvariable range pole when You retreat back to pole range.
ACTION setvariable range missile when You retreat from combat
ACTION setvariable range melee when You are already at melee with a dobek moruryn.

ACTION setvariable arrowsout true when You snipe

ACTION goto skinandsearch when A bristle-backed peccary flops in a porky heap, squealing one last time before passing into oblivion.
ACTION goto skinandsearch when The dobek moruryn slumps into a heap.
ACTION goto skinandsearch when The dobek moruryn trembles violently before finally collapsing.


ACTION setvariable eorp evasion when You are currently using 100% of your evasion skill.
ACTION setvariable eorp parry when You are currently using 100% of your weapon parry skill.
ACTION setvariable eorp parry when Parry  :  100%
ACTION setvariable eorp evasion when Evade  :  100%

ACTION setvariable stanceattack true when You are attacking with 100% of your offensive skill.
ACTION setvariable stanceattack false when You are attacking with 40% of your offensive skill.
ACTION setvariable stanceattack false when Attack :  50%
ACTION setvariable stanceattack false when Attack :  40%
ACTION setvariable stanceattack false when You are attacking with 40% of your offensive skill.
ACTION setvariable stanceattack true when Attack :  100%
Action setvariable stanceattack true when You are now set to use your attack
action setvariable stanceattack false when You are now set to use your evasion

ACTION setvariable wieldbriq true when You're already holding an etched steel
ACTION setvariable wieldbriq true when You draw out your briquet from the traveler's backpack.
ACTION setvariable wieldbriq true when You glance down to see an etched steel briquet in your right hand and nothing in your left hand.
action setvariable wieldbriq false when You sheathe the briquet in your traveler's backpack.
ACTION setvariable wieldbriq true when You draw out your briquet from the greatsword sheath.
ACTION setvariable wieldbriq false when You sheathe the briquet in your greatsword sheath.
ACTION setvariable wieldbriq false when You sheathe the briquet in your weapons harness.
ACTION setvariable wieldbriq true when You draw out your briquet from the weapons harness.

ACTION setvariable speed false when Your augmented reaction times slow as one of your mental pillars supporting it ceases.
ACTION put khri stop when Your augmented reaction times slow as one of your mental pillars supporting it ceases.
ACTION setvariable speed true when You feel preternaturally quick, which will vanish when any pillar supporting it does.
ACTION setvariable speed false when You are not currently under the influence of any meditations.
ACTION setvariable speed false when You feel mentally fatigued as your heightened paranoia ceases to enhance your knowledge of nearby escape routes.
ACTION setvariable speed true when Your mind focused in all the proper patterns, you feel your body adjust to the new speed, further augmenting your reactions.

ACTION setvariable lastcombat lunge when Last Combat Maneuver: Lunge
ACTION setvariable lastcombat parry when Last Combat Maneuver: Jab
ACTION setvariable lastcombat draw when Last Combat Maneuver: Draw
ACTION setvariable lastcombat feint when Last Combat Maneuver: Feint
ACTION setvariable lastcombat thrust when Last Combat Maneuver: Thrust
ACTION setvariable lastcombat parry when Last Combat Maneuver: Parry
ACTION setvariable lastcombat lunge when You lunge
ACTION setvariable lastcombat jab when You jab
ACTION setvariable lastcombat draw when You step backward and then jab
ACTION setvariable lastcombat feint when You feint
ACTION setvariable lastcombat thrust when You thrust
ACTION setvariable lastcombat parry when You move into a position to parry.

ACTION put look when YOU HAVE BEEN IDLE
action put awake when Overall state of mind: clear
action put awake when Overall state of mind: fluid
action put sleep when Overall state of mind: murky
action put sleep when Overall state of mind: very
action put sleep when Overall state of mind: dense
action put sleep when Overall state of mind: thick
action put sleep when Overall state of mind: stagnant
action put sleep when Overall state of mind: frozen

initcheck:
put stance
put khri check 
waitfor you
put glance
waitfor you
pause
put ass
pause
put stance evas


khridowncheck:
put info
match khridowncheck You may only have
match startingkhri Concentration: 230
match startingkhri Concentration: 231
match startingkhri Concentration: 232
if %monstercount > 2 and %speed then goto crowdcontrol
if %monstercount > 0 then goto danceloop
if %monstercount = 0 then goto holdingpatterns2
matchwait

startingkhri:
pause
put retre
match startingkhri ...wait
match startingkhri You stop advancing on a dobek moruryn.
match startingkhri You may only have
match gokhri You are already as far away as you can get!
match startingkhri You retreat back to pole range.
match startingkhri You attempt to retreat
match standup You must stand first.
match gokhri You sneak back out of combat.
match gokhri You retreat from combat.
match gokhri You are already as far away as you can get!
matchwait

gokhri:
put kh start focus
waitfor you
put kh start speed
waitfor you
if %monstercount > 2 and %speed then goto crowdcontrol
if %monstercount > 0 then goto danceloop
if %monstercount = 0 then goto holdingpatterns

standup:
put dance
match standup You may only have
match standup ...wait
match standup You are so unbalanced
match standup You attempt
match startingkhri You leap to
matchwait

getarrows:
if %range = "melee" then goto getarrowsretreat

getarrows2:
if !%arrowsout then goto danceloop
put stow arrow
match getarrows You pick up a
match donearrow Stow what?
match getarrows2 ...wait
match getarrows2 Sorry,
matchwait

donearrow:
setvariable arrowsout false
goto danceloop

getarrowsretreat:
if range = "missile" then goto getarrows2
if range != "missile" then put retreat
match getarrowsretreat you
match getarrowsretreat You stop advancing on a dobek moruryn.
match getarrowsretreat ...wait
match getarrows retreat Sorry,
matchwait

Danceloop:
if %monstercount > 2 and %speed then gosub crowdcontrol
if %monstercount > 1 and !%speed then gosub crowdcontrol
if %monstercount = 0 then goto holdingpatterns
if !%wieldbriq then put wield my briq
if %dstat != %eorp then put stance %dstat
if %range != "melee" then goto advance
if %arrowsout then goto getarrows
goto danceloop_%lastcombat

danceloop_jab:
if %monstercount > 2 and %speed then gosub crowdcontrol
if %monstercount > 1 and !%speed then gosub crowdcontrol
if %monstercount = 0 then goto holdingpatterns
if !%wieldbriq then put wield my briq
if %range != "melee" then goto advance
put exp sk %dstat
match swapstat mind lock
match parry EXP HELP
match danceloop_jab ...wait
match danceloop_jab Sorry,
matchwait

swapstat:
if %cooldown < "180" then goto parry
put exp sk evas
match setevas1 mind lock
match swapstat ...wait
match swapstat Sorry,
match setevas2 EXP HELP
matchwait

setevas1:
setvariable evas_ml true
goto swapstat2

setevas2:
setvariable evas_ml false

swapstat2:
put exp sk parry
match setpar1 mind lock
match swapstat2 ...wait
match swapstat2 Sorry,
match setpar2 EXP HELP
matchwait

setpar1:
setvariable parry_ml true
goto setstat3

setpar2:
setvariable parry_ml false

setstat3:
if %parry_ml and %evas_ml then setvariable dstat evasion
if %parry_ml and %evas_ml then put stance evasion
if %parry_ml and %evas_ml then deletevariable cooldown
if %parry_ml and %evas_ml then timer start cooldown
if !%parry_ml and %evas_ml then setvariable dstat parry
if !%parry_ml and %evas_ml then put stance parry
if %parry_ml and !%evas_ml then setvariable dstat evasion
if %parry_ml and !%evas_ml then put stance evasion
if !%evas_ml and !%parry_ml then setvariable dstat evasion
if !%evas_ml and !%parry_ml then put stance evasion
goto parry

parry:
if %monstercount > 2 and %speed then gosub crowdcontrol
if %monstercount > 1 and !%speed then gosub crowdcontrol
if %monstercount = 0 then goto holdingpatterns
if !%wieldbriq then put wield my briq
if %range != "melee" then goto advance
put parry
match skinandsearch The dobek moruryn slumps into a heap.
match skinandsearch The dobek moruryn trembles violently before finally collapsing.
match danceloop_parry You move into a position
match parry ...wait
matchwait

danceloop_parry:
if %monstercount > 2 and %speed then gosub crowdcontrol
if %monstercount > 1 and !%speed then gosub crowdcontrol
if %monstercount = 0 then goto holdingpatterns
if !%wieldbriq then put wield my briq
if %range != "melee" then goto advance
put feint
match advance You aren't close enough to attack.
match skinandsearch The dobek moruryn slumps into a heap.
match skinandsearch The dobek moruryn trembles violently before finally collapsing.
match danceloop_parry ...wait
match danceloop_parry Sorry,
match danceloop_feint [Roundtime
matchwait

danceloop_lunge:
danceloop_feint:
if %monstercount > 2 and %speed then gosub crowdcontrol
if %monstercount > 1 and !%speed then gosub crowdcontrol
if %monstercount = 0 then goto holdingpatterns
if !%wieldbriq then put wield my briq
if %range != "melee" then goto advance
put mark all mo
match lunge sec.
match skinandsearch The dobek moruryn slumps into a heap.
match skinandsearch The dobek moruryn trembles violently before finally collapsing.
match danceloop_feint ...wait
match danceloop_feint Sorry,
matchwait

lunge:
if %monstercount > 2 and %speed then gosub crowdcontrol
if %monstercount > 1 and !%speed then gosub crowdcontrol
if %monstercount = 0 then goto holdingpatterns
if !%wieldbriq then put wield my briq
if %range != "melee" then goto advance
put draw
match advance You aren't close enough to attack.
match skinandsearch The dobek moruryn slumps into a heap.
match skinandsearch The dobek moruryn trembles violently before finally collapsing.
match lunge ...wait
match lunge Sorry,
match danceloop_draw [Roundtime
matchwait 

danceloop_draw:
if %monstercount > 2 and %speed then goto crowdcontrol
if %monstercount > 1 and !%speed then goto crowdcontrol
if %monstercount = 0 then goto holdingpatterns
if !%wieldbriq then put wield my briq
if %range != "melee" then goto advance
put thrust
match advance You aren't close enough to attack.
match skinandsearch The dobek moruryn slumps into a heap.
match skinandsearch The dobek moruryn trembles violently before finally collapsing.
match danceloop_draw ...wait
match danceloop_draw Sorry,
match danceloop_thrust [Roundtime
matchwait

danceloop_thrust:
if %monstercount > 2 and %speed then gosub crowdcontrol
if %monstercount > 1 and !%speed then gosub crowdcontrol
if %monstercount = 0 then goto holdingpatterns
if !%wieldbriq then put wield my briq
if %range != "melee" then goto advance
put jab
match advance You aren't close enough to attack.
match skinandsearch The dobek moruryn slumps into a heap.
match skinandsearch The dobek moruryn trembles violently before finally collapsing.
match lastcheck [Roundtime
match danceloop_thrust ...wait
match danceloop_thrust Sorry,
matchwait

lastcheck:
if !%speed then goto khridowncheck 
goto danceloop_jab

advance:
put eng mo
match advance ...wait
match 
match advance The dobek moruryn retreats from you.
match danceloop You have lost sight of your target, so you stop advancing.
match danceloop_%lastcombat you spin around to face
match settingrange1 You are already at melee with a dobek moruryn.
match danceloop_%lastcombat melee
match advance Sorry,
matchwait

settingrange1:
if %range != "melee" then setvariable range melee
goto danceloop_%lastcombat

skinandsearch:
if %exp = "1" then setvariable exp 2
if %exp = "2" then setvariable exp 3
if %exp = "3" then setvariable exp 1
put sheath
match sns2 You sheath
match skinandsearch ...wait
matchwait

sns2:
put wield skin knife
match sns3 You draw out you
match sns2 ...wait
match sns2 Sorry,
matchwait

sns3:
put skin
put search mo
match snss It carried nothing of interest.
match snss2 star
matchwait

snss:
put drop sting
put she
waitfor you sheath
if !%wieldbriq then setvariable wieldbriq true
if !%wieldbriq then put wield briq
goto waitingcrumble

snss2:
put drop sting
match snss3 But you aren't holding that.
match snss3 You drop a
match snss2 ...wait
match snss2 Sorry,
matchwait

snss3:
put she
match snss4 you sheath
match snss3 ...wait
match snss3 Sorry,
matchwait

snss4:
put stow ruby
match snss4 You Stow what?
match snss4 ...wait
match snss4 Sorry,
match snss5 you pick up a
matchwait

snss5:
put wield briq
if !%wieldbriq then setvariable wieldbriq true
waitfor you
goto waitingcrumble


waitingcrumble:
waitfor crumbles apart.

if %monstercount > 2 and %speed then goto crowdcontrol
if %monstercount > 1 and !%speed then goto crowdcontrol
if %monstercount = 0 then goto holdingpatterns
goto danceloop

crowdcontrol:
put exp
if %exp = "1" then setvariable killweapon short bow
if %exp = "2" then setvariable killweapon longbow
if %exp = "3" then setvariable killweapon composite bow

crowdhide:
put hide
match clout You melt
match crowdhide ruining your hiding place!
match crowdhide ...wait
match clout Eh?  But you're already hidden!
match crowdhide Sorry,
matchwait

ccadvance:
put eng mo
match ccadvance The dobek moruryn retreats from you.
match ccadvance ...wait
match crowdcontrol melee
match clouting Eh?
match setrange2 you are already at melee
match danceloop You have lost sight
match clout you spin around to face
match ccadvance Sorry,
matchwait

setrange2:
if %range != "melee" then setvariable range melee

clout:
if %range != "melee" then goto ccadvance
if !%stanceattack then put stance attack

clouting:
put ambush clout
match clouting ...wait
match crowdhide You need to be
match shooting They're already impaired, you don't think doing this is going to help further.
match clouting Sorry,
match ccforceadvance You aren't close
match shooting clout its neck with a single precise stroke!
matchwait

ccforceadvance:
put advance
match clouting melee
match ccforceadvance The dobek moruryn retreats from you.
match danceloop You have lost sight of your target, so you stop advancing.
match ccforceadvance ...wait
match ccforceadvance Sorry,
matchwait

shooting:
if %wieldbriq then goto killweaponswitch
if %range = "melee" then put ret
if %range != "melee" then goto shoothiding

shoothiding:
put hide
match shooting2 you melt into
match shooitng2 Eh?  But you're already hidden!
match shoothiding ...wait
match shoothiding notices your attempt to hide
matchwait

shooting2:
if %range = "melee" then put retreat
put load
match getarrows You don't have the proper ammunition
match killweaponswitch What weapon
match shooting2 ...wait
match shooting2 Sorry,
match shooting3 is already loaded
match shooting3 You reach into your
matchwait

shooting3:
if %range = "melee" then put retreat
put aim
match unload I could not find what you were referring to.
match shooting4 You begin to target
match shooting3 ...wait
match shooitng4 You are already targetting that!
match shooting3 Sorry,
matchwait

shooting4:
if %range = "melee" then put retreat
put snipe
if !%arrowsout then setvariable arrowsout true
match skinandsearch The dobek moruryn slumps into a heap.
match skinandsearch The dobek moruryn trembles violently before finally collapsing.
match snipehide The dobek moruryn notices your attempt to remain hidden while firing
match ccforceadvance How can you snipe?
match shooting2 You fire 
match shooting2 [Roundtime
match shooting4 ...wait
match shooting4 Sorry,
matchwait

snipehide:
put hide
match shooting2 You melt
match snipehide ruining your hiding place!
match snipehide ...wait
match snipehide Sorry,
matchwait

killweaponswitch:
if %range = "melee" then put retreat
put she
if %wieldbriq then setvariable wieldbriq false
match kws2 You sheath
match kws2 Sheathe what?
match killweaponswitch ...wait
match killweaponswitch Sorry,
matchwait

kws2:
put wield %killweapon
goto shooting

unload:
put unload
match unload2 You remain concealed by your surroundings
match unload2 You unload
match unload ...wait
match unload Sorry,
match danceloop But your
matchwait

unload2:
put stow l
match unload3 You put
match unload2 ...wait
match unload2 Sorry,
matchwait

unload3:
put she
match danceloop You put
mmatch unload3 ...wait
match unload3 Sorry,
matchwait

holdingpatterns:
if %monstercount = 0 then setvariable range none
if %arrowsout then goto getarrows
if cooldown != 181 then setvariable cooldown 181
if !%speed then goto khridowncheck
holdingpatterns2:
if %t >= 1200 then gosub pattern3a

pattern1a:
put she
waitfor you
if %wieldbriq then setvariable wieldbriq false
put get lobs
match pattern1a ...wait
match pattern1b You get
match pattern1b You are already holding that.
matchwait

pattern1b:
if !%humming then put hum rumba
if %monstercount > 0 then goto packup1
put exp sk percept
match pattern2a mind lock
match pattern2a dazed
match pattern2a  bewildering
match pattern2a bewildered
match pattern1c Time
matchwait

pattern1c: 
if %monstercount > 0 then goto packup1
put juggle my lobs
match pattern1b Roundtime:
match packup1 You cannot juggle in combat.
match pattern1c Sorry,
match pattern1c ...wait
matchwait

packup1:
pause
put stow
put stop hum
goto danceloop

pattern2a:
pause 5
goto pattern1a

pattern3a:
timer clear
timer start
if %monstercount > 0 then goto packup1
put get comp
waitfor you

studycomp:
if %monstercount > 0 then goto packup1
put study my comp
match studycomp ...wait
match studycomp gradually absorbing
match expchecksch With a sudden moment of clarity
match expchecksch in a sudden moment of clarity
match donecomp why do you need to
matchwait

expchecksch:
if %monstercount > 0 then goto packup1
put exp sk first aid
match expchecksch2 mind lock
match turncomp Time
matchwait

expchecksch2:
if %monstercount > 0 then goto packup1
put exp sk schol
match donecomp mind lock
match turncomp Time
matchwait

turncomp:
if %monstercount > 0 then goto packup1
put turn my comp
goto studycomp

donecomp:
if %monstercount > 0 then goto packup1
put turn my comp
put put comp in my sat
if %monstercount > 0 then goto packup1
put exp sk first aid
match holdingpatterns mind lock
match secondcomp Time
matchwait



secondcomp:
if %monstercount > 0 then goto packup1
put get second comp
waitfor you

studycomp2:
if %monstercount > 0 then goto packup1
put study my comp
match studycomp2 ...wait
match studycomp2 gradually absorbing
match expchecksch23 With a sudden moment of clarity
match expchecksch23 in a sudden moment of clarity
match donecomp2 why do you need to
matchwait

expchecksch23:
if %monstercount > 0 then goto packup1
put exp sk first aid
match expchecksch22 mind lock
match turncomp2 Time
matchwait

expchecksch22:
if %monstercount > 0 then goto packup1
put exp sk schol
match donecomp2 mind lock
match turncomp2 Time
matchwait

turncomp2:
if %monstercount > 0 then goto packup1
put turn my comp
goto studycomp2

donecomp2:
if %monstercount > 0 then goto packup1
put turn my comp
put put my comp in my sat
goto holdingpatterns