if $charactername = CHARACTERNAME then
{
	#First number is prep mana, second number is charge mana, third number is harness mana
	var mana 4|1|0
	var cambrinth ring
}

if $charactername = Orend then
{
	var mana 2|1|0
	var cambrinth ring
}




loop:
if $mana < 25 then goto Wait
send prep heal %mana(0)
waitforre trace a careful sigil|You raise your arms skyward|mutter a foul-sounding phrase to yourself|trace a curving sigil|mutter blasphemies to yourself|mutter incoherently to yourself while preparing|wailing of lost souls accompanies|blue frost crackles up your arms|Your heart skips a beat|newfound fluidity of your mind|orange flames blaze between your fingertips|You clench your hands|You hold out your arms to either side as|You whisper the final word of your spell so that none may notice your effort|You clap|You speak|With rigid movements|You close yours eyes|With tense movements|You let your concentration|You make a holy gesture|You close your eyes|You trace a hasty sigil in the air|is now set at|You begin chanting|You recite|You trace an angular sigil|You trace a geometric sigil|With meditative movements|you begin to chant|You release an accompaniment|You begin to chant
gosub Cambrinth
gosub Harness
waitfor You feel fully prepared
send cast
matchre loop The external|The internal|too mentally fatigued|backfires|backfire
match end completely healed
matchwait

Wait:
pause 30
goto loop

end:
exit

Harness:
if %mana(2) = 0 then return
if "%mana(2)" = "" then return
send harness %mana(2)
waitforre Roundtime|You strain|You are in no condition to do that
return

Cambrinth:
if %cambrinth = none then return
if %mana(1) = 0 then return
if "%mana(1)" = "" then return
send charge my %cambrinth %mana(1)
waitforre Roundtime|You strain|You are in no condition to do that
send invoke my %cambrinth spell
waitforre Roundtime|are in no condition
return