Tend Wounds (script)

Tend Wounds (script)
Category	utility,Survival
Front-end	Genie
Author	Isharon

This script attempts to tend wounds that are not tended. From there, my wound-tending trigger takes over.

Changelog

3/5/2016

• Added additional version

9/15/2015

• Added additional versions

1/29/2012

• Fixed bug that prevented "massive stream" bleeders from being tended.

03/21/2011

• The script automatically terminates if you are too injured to tend your wounds.

Trigger

#trigger {^The bandages binding your (.*) (soak|come)} {#send tend my $1} {tend}

Aliases

#alias {tab} {tend my abdomen}
#alias {tb} {tend my back}
#alias {tch} {tend my chest}
#alias {tendoff} {#class tend off}
#alias {tendon} {#class tend on}
#alias {thd} {tend my head}
#alias {tla} {tend my left arm}
#alias {tle} {tend my left eye}
#alias {tlh} {tend my left hand}
#alias {tll} {tend my left leg}
#alias {tn} {tend my neck}
#alias {tra} {tend my right arm}
#alias {tre} {tend my right eye}
#alias {trh} {tend my right hand}
#alias {trl} {tend my right leg}
#alias {tt} {tend my tail}
#alias {uab} {unwrap my abdomen}
#alias {ub} {unwrap my back}
#alias {uch} {unwrap my chest}
#alias {uh} {unwrap my head}
#alias {ula} {unwrap my left arm}
#alias {ule} {unwrap my left eye}
#alias {ulh} {unwrap my left hand}
#alias {ull} {unwrap my left leg}
#alias {un} {unwrap my neck}
#alias {ura} {unwrap my right arm}
#alias {ure} {unwrap my right eye}
#alias {urh} {unwrap my right hand}
#alias {url} {unwrap my right leg}
#alias {ut} {unwrap my tail}

Tending Scripts

Your Untended Wounds

put #class tend on
action goto end when ^Your .+ too injured|^You have no significant injuries

send stop play
waitforre ^You stop playing your song|^In the name of love|^But you're not performing anything
send stop climb
waitforre ^You stop practicing your climbing skills|^You weren't practicing your climbing skills anyway

ACTION setvar head 1 WHEN ^\s+head       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive stream|uncontrollable|unbelievable|beyond measure|death awaits)$
ACTION setvar neck 1 WHEN ^\s+neck       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive stream|uncontrollable|unbelievable|beyond measure|death awaits)$
ACTION setvar chest 1 WHEN ^\s+chest       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive stream|uncontrollable|unbelievable|beyond measure|death awaits)$
ACTION setvar abdomen 1 WHEN ^\s+abdomen       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive stream|uncontrollable|unbelievable|beyond measure|death awaits)$
ACTION setvar back 1 WHEN ^\s+back       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive stream|uncontrollable|unbelievable|beyond measure|death awaits)$
ACTION setvar tail 1 WHEN ^\s+tail       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive stream|uncontrollable|unbelievable|beyond measure|death awaits)$
ACTION setvar rightarm 1 WHEN ^\s+right arm       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive stream|uncontrollable|unbelievable|beyond measure|death awaits)$
ACTION setvar leftarm 1 WHEN ^\s+left arm       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive stream|uncontrollable|unbelievable|beyond measure|death awaits)$
ACTION setvar righthand 1 WHEN ^\s+right hand       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive stream|uncontrollable|unbelievable|beyond measure|death awaits)$
ACTION setvar lefthand 1 WHEN ^\s+left hand       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive stream|uncontrollable|unbelievable|beyond measure|death awaits)$
ACTION setvar rightleg 1 WHEN ^\s+right leg       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive stream|uncontrollable|unbelievable|beyond measure|death awaits)$
ACTION setvar leftleg 1 WHEN ^\s+left leg       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive stream|uncontrollable|unbelievable|beyond measure|death awaits)$
ACTION setvar righteye 1 WHEN ^\s+right eye       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive stream|uncontrollable|unbelievable|beyond measure|death awaits)$
ACTION setvar lefteye 1 WHEN ^\s+left eye       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive stream|uncontrollable|unbelievable|beyond measure|death awaits)$
put health
waitforre ^Bleeding$

if %head = 1 then gosub tend head
if %neck = 1 then gosub tend neck
if %chest = 1 then gosub tend chest
if %abdomen = 1 then gosub tend abdomen
if %back = 1 then gosub tend back
if %tail = 1 then gosub tend tail
if %rightarm = 1 then gosub tend right arm
if %leftarm = 1 then gosub tend left arm
if %righthand = 1 then gosub tend right hand
if %lefthand = 1 then gosub tend left hand
if %rightleg = 1 then gosub tend right leg
if %leftleg = 1 then gosub tend left leg
if %righteye = 1 then gosub tend right eye
if %lefteye = 1 then gosub tend left eye
goto end

tend:
send tend my $0
matchre return ^You work|^That area|^Look again

return:
pause
return

end:
put #parse SCRIPT DONE
exit

Your Partially Tended Wounds

put #class tend off
action goto end when ^Your .+ too injured|^You have no significant injuries

ACTION setvar head 1 WHEN ^\s+head       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive stream|uncontrollable|unbelievable|beyond measure|death awaits)
ACTION setvar neck 1 WHEN ^\s+neck       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive stream|uncontrollable|unbelievable|beyond measure|death awaits)
ACTION setvar chest 1 WHEN ^\s+chest       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive stream|uncontrollable|unbelievable|beyond measure|death awaits)
ACTION setvar abdomen 1 WHEN ^\s+abdomen       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive stream|uncontrollable|unbelievable|beyond measure|death awaits)
ACTION setvar back 1 WHEN ^\s+back       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive stream|uncontrollable|unbelievable|beyond measure|death awaits)
ACTION setvar tail 1 WHEN ^\s+tail       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive stream|uncontrollable|unbelievable|beyond measure|death awaits)
ACTION setvar rightarm 1 WHEN ^\s+right arm       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive stream|uncontrollable|unbelievable|beyond measure|death awaits)
ACTION setvar leftarm 1 WHEN ^\s+left arm       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive stream|uncontrollable|unbelievable|beyond measure|death awaits)
ACTION setvar righthand 1 WHEN ^\s+right hand       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive stream|uncontrollable|unbelievable|beyond measure|death awaits)
ACTION setvar lefthand 1 WHEN ^\s+left hand       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive stream|uncontrollable|unbelievable|beyond measure|death awaits)
ACTION setvar rightleg 1 WHEN ^\s+right leg       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive stream|uncontrollable|unbelievable|beyond measure|death awaits)
ACTION setvar leftleg 1 WHEN ^\s+left leg       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive stream|uncontrollable|unbelievable|beyond measure|death awaits)
ACTION setvar righteye 1 WHEN ^\s+right eye       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive stream|uncontrollable|unbelievable|beyond measure|death awaits)
ACTION setvar lefteye 1 WHEN ^\s+left eye       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive stream|uncontrollable|unbelievable|beyond measure|death awaits)
put health
waitforre ^Bleeding$

if %head = 1 then gosub tend head
if %neck = 1 then gosub tend neck
if %chest = 1 then gosub tend chest
if %abdomen = 1 then gosub tend abdomen
if %back = 1 then gosub tend back
if %tail = 1 then gosub tend tail
if %rightarm = 1 then gosub tend right arm
if %leftarm = 1 then gosub tend left arm
if %righthand = 1 then gosub tend right hand
if %lefthand = 1 then gosub tend left hand
if %rightleg = 1 then gosub tend right leg
if %leftleg = 1 then gosub tend left leg
if %righteye = 1 then gosub tend right eye
if %lefteye = 1 then gosub tend left eye
goto end

tend:
var bodypart $0
send unwrap my %bodypart
wait
pause .5
send tend my %bodypart
matchre return ^You work|^That area|^Look again

return:
pause
return

end:
put #class tend on
put #parse SCRIPT DONE
exit

Tend Others' Wounds

put #class tend on
var patient %1
action goto end when ^Your .+ too injured

send stop play
waitforre ^You stop playing your song|^In the name of love|^But you're not performing anything
send stop climb
waitforre ^You stop practicing your climbing skills|^You weren't practicing your climbing skills anyway

tendstart:
gosub tend head
gosub tend neck
gosub tend chest
gosub tend abdomen
gosub tend back
gosub tend tail
gosub tend right arm
gosub tend left arm
gosub tend right hand
gosub tend left hand
gosub tend right leg
gosub tend left leg
gosub tend right eye
gosub tend left eye
goto wait

tend:
send tend %1 $0
waitforre ^You work|^That area|^Look again|^%1 will have to sit down for you to work on (him|her)\.$
matchre return ^You work|^That area|^Look again|^%1 will have to sit down for you to work on (him|her)\.$

return:
return

wait:
action goto tendstart when ^The bandages binding %patient's (.+) (soak|come)
waitforre ^blood as it begins bleeding again\.$
pause

end:
exit

Prompt Others to Tend You

action var fullprep yes when ^You feel fully prepared to cast your spell
put #class tend off

vhcheck:
if $health < 60 then
{
gosub vh
}

start:
action setvariable part $1;goto tend when ^The bandages binding your (.*) (soak|come)
waitforre you begin bleeding again\.$

tend:
put whisper %1 Tend my %part.
waitforre ^You whisper|^Whisper what
goto start

vh:
evalmath HARNESS round($half.vh / 2)
put prep VH
pause 2
send charge $cambrinth %HARNESS
wait
pause
send charge $cambrinth %HARNESS
wait
pause
send invoke my $cambrinth
wait
pause .5
if %fullprep = no then waiteval %fullprep = yes
send cast
pause .5
return

end:
put #class tend on

Unwrap and Re-Tend

put #class tend off
send sit
waitforre ^You sit (down|up)|^You are already sitting
ACTION setvar head 1 WHEN ^\s+head       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive|uncontrollable|unbelievable|beyond measure|death awaits)?\(tended\)$
ACTION setvar neck 1 WHEN ^\s+neck       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive|uncontrollable|unbelievable|beyond measure|death awaits)?\(tended\)$
ACTION setvar chest 1 WHEN ^\s+chest       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive|uncontrollable|unbelievable|beyond measure|death awaits)?\(tended\)$
ACTION setvar abdomen 1 WHEN ^\s+abdomen       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive|uncontrollable|unbelievable|beyond measure|death awaits)?\(tended\)$
ACTION setvar back 1 WHEN ^\s+back       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive|uncontrollable|unbelievable|beyond measure|death awaits)?\(tended\)$
ACTION setvar tail 1 WHEN ^\s+tail       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive|uncontrollable|unbelievable|beyond measure|death awaits)?\(tended\)$
ACTION setvar rightarm 1 WHEN ^\s+right arm       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive|uncontrollable|unbelievable|beyond measure|death awaits)?\(tended\)$
ACTION setvar leftarm 1 WHEN ^\s+left arm       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive|uncontrollable|unbelievable|beyond measure|death awaits)?\(tended\)$
ACTION setvar righthand 1 WHEN ^\s+right hand       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive|uncontrollable|unbelievable|beyond measure|death awaits)?\(tended\)$
ACTION setvar lefthand 1 WHEN ^\s+left hand       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive|uncontrollable|unbelievable|beyond measure|death awaits)?\(tended\)$
ACTION setvar rightleg 1 WHEN ^\s+right leg       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive|uncontrollable|unbelievable|beyond measure|death awaits)?\(tended\)$
ACTION setvar leftleg 1 WHEN ^\s+left leg       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive|uncontrollable|unbelievable|beyond measure|death awaits)?\(tended\)$
ACTION setvar righteye 1 WHEN ^\s+right eye       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive|uncontrollable|unbelievable|beyond measure|death awaits)?\(tended\)$
ACTION setvar lefteye 1 WHEN ^\s+left eye       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive|uncontrollable|unbelievable|beyond measure|death awaits)?\(tended\)$
put health
waitforre ^-----------------------------------------$

if %head = 1 then gosub unwrap head
if %neck = 1 then gosub unwrap neck
if %chest = 1 then gosub unwrap chest
if %abdomen = 1 then gosub unwrap abdomen
if %back = 1 then gosub unwrap back
if %tail = 1 then gosub unwrap tail
if %rightarm = 1 then gosub unwrap right arm
if %leftarm = 1 then gosub unwrap left arm
if %righthand = 1 then gosub unwrap right hand
if %lefthand = 1 then gosub unwrap left hand
if %rightleg = 1 then gosub unwrap right leg
if %leftleg = 1 then gosub unwrap left leg
if %righteye = 1 then gosub unwrap right eye
if %lefteye = 1 then gosub unwrap left eye
goto end

unwrap:
send unwrap my $0
matchre return ^You unwrap your bandages|^That area is not tended

return:
pause
return

end:
put health
waitforre ^You have
send .tend
exit

Unwrap (for Others to Tend)

put #class tend off
send sit
waitforre ^You sit (down|up)|^You are already sitting

ACTION setvar head 1 WHEN ^\s+head       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive|uncontrollable|unbelievable|beyond measure|death awaits)?\(tended\)$
ACTION setvar neck 1 WHEN ^\s+neck       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive|uncontrollable|unbelievable|beyond measure|death awaits)?\(tended\)$
ACTION setvar chest 1 WHEN ^\s+chest       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive|uncontrollable|unbelievable|beyond measure|death awaits)?\(tended\)$
ACTION setvar abdomen 1 WHEN ^\s+abdomen       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive|uncontrollable|unbelievable|beyond measure|death awaits)?\(tended\)$
ACTION setvar back 1 WHEN ^\s+back       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive|uncontrollable|unbelievable|beyond measure|death awaits)?\(tended\)$
ACTION setvar tail 1 WHEN ^\s+tail       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive|uncontrollable|unbelievable|beyond measure|death awaits)?\(tended\)$
ACTION setvar rightarm 1 WHEN ^\s+right arm       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive|uncontrollable|unbelievable|beyond measure|death awaits)?\(tended\)$
ACTION setvar leftarm 1 WHEN ^\s+left arm       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive|uncontrollable|unbelievable|beyond measure|death awaits)?\(tended\)$
ACTION setvar righthand 1 WHEN ^\s+right hand       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive|uncontrollable|unbelievable|beyond measure|death awaits)?\(tended\)$
ACTION setvar lefthand 1 WHEN ^\s+left hand       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive|uncontrollable|unbelievable|beyond measure|death awaits)?\(tended\)$
ACTION setvar rightleg 1 WHEN ^\s+right leg       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive|uncontrollable|unbelievable|beyond measure|death awaits)?\(tended\)$
ACTION setvar leftleg 1 WHEN ^\s+left leg       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive|uncontrollable|unbelievable|beyond measure|death awaits)?\(tended\)$
ACTION setvar righteye 1 WHEN ^\s+right eye       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive|uncontrollable|unbelievable|beyond measure|death awaits)?\(tended\)$
ACTION setvar lefteye 1 WHEN ^\s+left eye       (clotted|slight|light|moderate|bad|very bad|heavy|very heavy|severe|very severe|profuse|very profuse|gushing|massive|uncontrollable|unbelievable|beyond measure|death awaits)?\(tended\)$
put health
waitforre ^-----------------------------------------$

if %head = 1 then gosub unwrap head
if %neck = 1 then gosub unwrap neck
if %chest = 1 then gosub unwrap chest
if %abdomen = 1 then gosub unwrap abdomen
if %back = 1 then gosub unwrap back
if %tail = 1 then gosub unwrap tail
if %rightarm = 1 then gosub unwrap right arm
if %leftarm = 1 then gosub unwrap left arm
if %righthand = 1 then gosub unwrap right hand
if %lefthand = 1 then gosub unwrap left hand
if %rightleg = 1 then gosub unwrap right leg
if %leftleg = 1 then gosub unwrap left leg
if %righteye = 1 then gosub unwrap right eye
if %lefteye = 1 then gosub unwrap left eye
goto end

unwrap:
var bodypart $0
matchre return ^That area is not tended|^That area is not bleeding
send unwrap my %bodypart
wait
pause
matchre return ^That area is not tended|^That area is not bleeding
send tend my %bodypart
wait
pause
return

return:
pause
return

end:
put health
waitforre ^You have
send sit
waitforre ^You sit (down|up)|^You are already sitting
send .tend
exit