Marmic Healing (script)

diagnose:
pause 1
match head head
match chest chest
match abdomen abdomen
match back back
match neck neck
match leftarm left arm
match rightarm right arm
match lefthand left hand
match righthand right hand
match leftleg left leg
match rightleg right leg
match lefteye left eye
match righteye right eye
match end You have no significant injuries.
put health
matchwait
head:
save "head"
goto main_healing
chest:
save "chest"
goto main_healing
abdomen:
save "abdomen"
goto main_healing
back:
save "back"
goto main_healing
neck:
save "neck"
goto main_healing
leftarm:
save "left arm"
goto main_healing
rightarm:
save "right arm"
goto main_healing
lefthand:
save "left hand"
goto main_healing
righthand:
save "right hand"
goto main_healing
leftleg:
save "left leg"
goto main_healing
rightleg:
save "right leg"
goto main_healing
lefteye:
save "left eye"
goto main_healing
righteye:
save "right eye"
goto main_healing
main_healing:
echo ****************************
echo ******* HEAL ROUTINE *******
echo ****************************
echo
heal_wounds:
pause 1
match hw_go You close your eyes and breathe
match hw_recover no You have to strain to harness
put prep hw
matchwait
hw_recover:
put rel
waitfor You feel fully attuned to the mana streams again.
goto heal_wounds
hw_go:
put charge wri 10
pause 1
pause 1
put focus wri
pause 1
pause 1
waitfor You feel fully prepared to cast your spell.
match heal_wounds but it is ineffective.
match heal_scars but it cannot heal what is not injured.
match heal_scars completely healed.
put cast %s reverse
matchwait
heal_scars:
pause 1
put hs_go You close your eyes and breathe
put hs_recover no You have to strain to harness
put prep hs
matchwait
hS_recover:
put rel
waitfor You feel fully attuned to the mana streams again.
goto heal_scars
hs_go:
put charge wri 10
pause 1
pause 1
put focus wri
pause 1
pause 1
waitfor You feel fully prepared to cast your spell.
match heal_scars but it is ineffective.
match diagnose but it cannot heal what is not injured.
match diagnose completely healed.
put cast %s reverse
matchwait


recover:
echo ***********************
echo ******* RECOVER *******
echo ***********************
waitfor You feel fully attuned to the mana streams again.
goto diagnose

end: