Marmic PM (script)

counter set 2
setvariable perc perc
setvariable avenger avenger

start:
put get my camb moonflower


avenger_look:
match avenger_yes pure white alfar avenger
match summon Obvious exits:
match summon Obvious paths:
put look
matchwait
avenger_yes:
match main_loop A pure white alfar avenger whispers,
match avenger_notmine The alfar avenger shies away from you,
match summon What were you referring to?
put poke %avenger
matchwait
avenger_notmine:
setvariable avenger other avenger
goto avenger_yes
avenger_reset:
setvariable avenger avenger
goto avenger_look

summon:
setvariable avenger avenger
put prep gs
waitfor You feel fully prepared to cast your spell.
put cast avenger
waitfor With a warrior's calm,
put ask aven about quiet
pause 1
goto avenger_yes



exp_check:
match end mind lock
match recover%c EXP HELP
put exp skill primary
matchwait
goto loop

recover3:
match perc You reach out with your senses
match perc_heal You close your eyes, drawing
put %perc
matchwait
perc:
setvariable perc perc heal
pause 1
pause 1
counter set 0
goto recover
perc_heal:
setvariable perc perc
pause 1
pause 1
counter set 0
goto recover
recover:
recover1:
recover2:
match avenger_look You have a complete attunement
match recover_wait You are receiving full
put harn
matchwait

recover_wait:
waitfor You feel fully attuned to the mana streams again.
goto avenger_look
main_loop:
gol_loop:
gol_arm_Charge_f:
match gol_arm_Charge_S Roundtime:
match gol_arm_Charge_f Try though you may,
put charge my moon 11
matchwait
gol_arm_Charge_S:
pause 1
pause 1
put prep gol 10
gol_arm_focus_f:
match gol_arm_focus_S Roundtime:
match gol_arm_focus_f Try though you may,
put focus my moon
matchwait
gol_arm_focus_S:
pause 1
pause 1


setvariable numavenger appavenger_1
goto app_avenger
appavenger_1:
pause 5
put cast

match end mind lock
#match gol_recover EXP HELP
match tranquility_loop EXP HELP
put exp skill primary
matchwait
#gol_recover:
#waitfor You feel fully attuned to the mana streams again.
#goto tranquility_loop
gol_charge_f:
pause 1
pause 1


setvariable numavenger appavenger_2
goto app_avenger
appavenger_2:

put cast
put prep ease
waitfor gathering energy for the Ease Burden spell.
put focus my orb
pause 1
pause 1
put cast
pause 1
pause 1
goto tranquility_loop
tranquility_loop:
tranquility_arm_Charge_f:
match tranquility_arm_Charge_S Roundtime:
match tranquility_arm_Charge_f Try though you may,
put charge my moon 11
matchwait
tranquility_arm_Charge_S:
pause 1
pause 1
put prep tranq 14
tranquility_arm_focus_f:
match tranquility_arm_focus_S Roundtime:
match tranquility_arm_focus_f Try though you may,
put focus my moon
matchwait
tranquility_arm_focus_S:
pause 1
pause 1


setvariable numavenger appavenger_3
goto app_avenger
appavenger_3:
pause 5

put cast
counter add 1
goto exp_check
tranquility_charge_f:
pause 1
pause 1

setvariable numavenger appavenger_4
goto app_avenger
appavenger_4:

put cast
put prep ease
waitfor gathering energy for the Ease Burden spell.
put focus my orb
pause 1
pause 1
put cast
pause 1
pause 1
counter add 1
goto exp_check
end:
put stow my camb moon

exit


app_avenger:
match app_success [Roundtime:
match app_success_f Appraise what?  Type APPRAISE HELP for more information.
match other_avenger All things considered, probably best not to do that.
put app %avenger
matchwait
other_avenger:
setvariable avenger other avenger
goto app_avenger

app_success_f:
setvariable avenger avenger
app_success:
pause 1
pause 1
goto %numavenger