Tend Wounds (script): Difference between revisions
Jump to navigation
Jump to search
(Created page with 'This script attempts to tend wounds that are not tended. From there, my wound-tending trigger takes over. ==Trigger== <pre>#trigger {^The bandages binding your (.*) (soak|come)…') |
No edit summary |
||
| (15 intermediate revisions by 2 users not shown) | |||
| Line 1: | Line 1: | ||
{{Script |
|||
|cat=utility, Survival |
|||
|fe=Genie |
|||
|auth=[[User:Isharon|Isharon]] |
|||
}} |
|||
This script attempts to tend wounds that are not tended. From there, my wound-tending trigger takes over. |
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== |
||
<pre>#trigger {^The bandages binding your (.*) (soak|come)} {#send tend my $1}</pre> |
<pre>#trigger {^The bandages binding your (.*) (soak|come|become)} {#send tend my $1} {tend}</pre> |
||
==Aliases== |
==Aliases== |
||
<pre> |
|||
#alias {tab} {tend my abdomen} |
|||
#alias {tb} {tend my back} |
#alias {tb} {tend my back} |
||
#alias {tch} {tend my chest} |
#alias {tch} {tend my chest} |
||
#alias { |
#alias {tendoff} {#class tend off} |
||
#alias {tendon} {#class tend on} |
|||
#alias {thd} {tend my head} |
|||
#alias {tla} {tend my left arm} |
#alias {tla} {tend my left arm} |
||
#alias {tle} {tend my left eye} |
#alias {tle} {tend my left eye} |
||
| Line 37: | Line 56: | ||
#alias {ut} {unwrap my tail}</pre> |
#alias {ut} {unwrap my tail}</pre> |
||
== |
==Tending Scripts== |
||
===Your Untended Wounds=== |
|||
<pre>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)$ |
|||
<pre>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 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 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)$ |
||
| Line 75: | Line 104: | ||
send tend my $0 |
send tend my $0 |
||
matchre return ^You work|^That area|^Look again |
matchre return ^You work|^That area|^Look again |
||
matchre end ^Your .+ too injured |
|||
return: |
return: |
||
| Line 82: | Line 110: | ||
end: |
end: |
||
put #parse SCRIPT DONE |
|||
exit</pre> |
exit</pre> |
||
===Your Partially Tended Wounds=== |
|||
[[Category:Scripts]] |
|||
<pre>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 |
|||
tendstart: |
|||
ACTION setvar head 1 WHEN ^\s+head |
|||
ACTION setvar neck 1 WHEN ^\s+neck |
|||
ACTION setvar chest 1 WHEN ^\s+chest |
|||
ACTION setvar abdomen 1 WHEN ^\s+abdomen |
|||
ACTION setvar back 1 WHEN ^\s+back |
|||
ACTION setvar tail 1 WHEN ^\s+tail |
|||
ACTION setvar rightarm 1 WHEN ^\s+right arm |
|||
ACTION setvar leftarm 1 WHEN ^\s+left arm |
|||
ACTION setvar righthand 1 WHEN ^\s+right hand |
|||
ACTION setvar lefthand 1 WHEN ^\s+left hand |
|||
ACTION setvar rightleg 1 WHEN ^\s+right leg |
|||
ACTION setvar leftleg 1 WHEN ^\s+left leg |
|||
ACTION setvar righteye 1 WHEN ^\s+right eye |
|||
ACTION setvar lefteye 1 WHEN ^\s+left eye |
|||
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 |
|||
pause 120 |
|||
goto tendstart |
|||
tend: |
|||
send tend my $0 |
|||
matchre return ^You work|^That area|^Look again |
|||
return: |
|||
pause |
|||
return |
|||
end: |
|||
put #parse SCRIPT DONE |
|||
exit</pre> |
|||
===Prompt Others to Tend You=== |
|||
<pre>#debuglevel 10 |
|||
put #class tend off |
|||
action var fullprep yes when ^You feel fully prepared to cast your spell |
|||
put #class tend off |
|||
put demeanor neutral |
|||
waitforre ^You decide to take things as they come |
|||
put demeanor clear S'Kra Mur |
|||
waitforre ^You no longer regard |
|||
put avoid touch |
|||
waitforre ^You're now allowing attempts to touch you |
|||
if $prone = 0 then |
|||
{ |
|||
send lie |
|||
waitforre ^You lie down|^You are already lying down |
|||
} |
|||
vhcheck: |
|||
if $health < 60 then |
|||
{ |
|||
gosub vh |
|||
} |
|||
start: |
|||
action setvariable part $1;goto tend when ^The bandages binding your (.*) (soak|come|become) |
|||
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 $cambrinth |
|||
wait |
|||
pause .25 |
|||
if %fullprep = no then waiteval %fullprep = yes |
|||
send cast |
|||
pause .5 |
|||
return |
|||
end: |
|||
put #class tend on</pre> |
|||
===Unwrap and Re-Tend=== |
|||
<pre>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</pre> |
|||
===Unwrap (for Others to Tend)=== |
|||
<pre>#debuglevel 10 |
|||
put #class tend off |
|||
action var fullprep yes when ^You feel fully prepared to cast your spell |
|||
put #class tend off |
|||
put demeanor neutral |
|||
waitforre ^You decide to take things as they come |
|||
put demeanor clear S'Kra Mur |
|||
waitforre ^You no longer regard |
|||
put avoid touch |
|||
waitforre ^You're now allowing attempts to touch you |
|||
if $prone = 0 then |
|||
{ |
|||
send lie |
|||
waitforre ^You lie down|^You are already lying down |
|||
} |
|||
vhcheck: |
|||
if $health < 60 then |
|||
{ |
|||
gosub vh |
|||
} |
|||
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: |
|||
pause 1 |
|||
send unwrap my $0 |
|||
matchre return ^You unwrap your bandages|^That area is not tended |
|||
return: |
|||
wait |
|||
pause |
|||
return |
|||
end: |
|||
put #class tend on |
|||
send stand |
|||
waitforre ^You stand back up|^You are already standing |
|||
put health |
|||
waitforre ^You have |
|||
send .tend |
|||
exit</pre> |
|||
Latest revision as of 21:10, 20 August 2020
| 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|become)} {#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 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 tendstart: ACTION setvar head 1 WHEN ^\s+head ACTION setvar neck 1 WHEN ^\s+neck ACTION setvar chest 1 WHEN ^\s+chest ACTION setvar abdomen 1 WHEN ^\s+abdomen ACTION setvar back 1 WHEN ^\s+back ACTION setvar tail 1 WHEN ^\s+tail ACTION setvar rightarm 1 WHEN ^\s+right arm ACTION setvar leftarm 1 WHEN ^\s+left arm ACTION setvar righthand 1 WHEN ^\s+right hand ACTION setvar lefthand 1 WHEN ^\s+left hand ACTION setvar rightleg 1 WHEN ^\s+right leg ACTION setvar leftleg 1 WHEN ^\s+left leg ACTION setvar righteye 1 WHEN ^\s+right eye ACTION setvar lefteye 1 WHEN ^\s+left eye 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 pause 120 goto tendstart tend: send tend my $0 matchre return ^You work|^That area|^Look again return: pause return end: put #parse SCRIPT DONE exit
Prompt Others to Tend You
#debuglevel 10
put #class tend off
action var fullprep yes when ^You feel fully prepared to cast your spell
put #class tend off
put demeanor neutral
waitforre ^You decide to take things as they come
put demeanor clear S'Kra Mur
waitforre ^You no longer regard
put avoid touch
waitforre ^You're now allowing attempts to touch you
if $prone = 0 then
{
send lie
waitforre ^You lie down|^You are already lying down
}
vhcheck:
if $health < 60 then
{
gosub vh
}
start:
action setvariable part $1;goto tend when ^The bandages binding your (.*) (soak|come|become)
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 $cambrinth
wait
pause .25
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: 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
Unwrap (for Others to Tend)
#debuglevel 10
put #class tend off
action var fullprep yes when ^You feel fully prepared to cast your spell
put #class tend off
put demeanor neutral
waitforre ^You decide to take things as they come
put demeanor clear S'Kra Mur
waitforre ^You no longer regard
put avoid touch
waitforre ^You're now allowing attempts to touch you
if $prone = 0 then
{
send lie
waitforre ^You lie down|^You are already lying down
}
vhcheck:
if $health < 60 then
{
gosub vh
}
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:
pause 1
send unwrap my $0
matchre return ^You unwrap your bandages|^That area is not tended
return:
wait
pause
return
end:
put #class tend on
send stand
waitforre ^You stand back up|^You are already standing
put health
waitforre ^You have
send .tend
exit