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
put prep hw
put charge circlet 10
pause 1
pause 1
put focus circlet
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 prep hs
put charge circlet 10
pause 1
pause 1
put focus circlet
pause 1
pause 1
waitfor You feel fully prepared to cast your spell.
match heal_scars but it is ineffective.
match recover but it cannot heal what is not injured.
match recover 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: