commune.check:
evalmath timeSinceLastCommune $gametime - $LastCommune
evalmath timeSinceLastPray $gametime - $LastPray
if %timeSinceLastPray > 900 then gosub pray
if %timeSinceLastCommune < 1260 then return
#if $Theurgy > 30 then return
goto commune

Pray:
put Pray Meraud
pause 0.5
pause 0.5
put #var LastPray $gametime
return

commune:
pause 0.5
match Eluned Meraud
put commune sense
matchwait 2
goto Meraud

Eluned:
pause 0.5
gosub FORAGE dirt
put commune eluned
pause 0.5
pause 0.5
pause 0.5
put #var LastCommune $gametime
goto devotion
match Meraud.Check Tamsine
put commune sense
matchwait 2


Tamsine:
pause 120
put sprinkle $watercontainer on rishlu
pause 0.5
pause 0.5
put commune
pause 0.5
pause 0.5
put fill $watercontainer with water
pause 0.5
pause 0.5
put #var LastCommune $gametime
Meraud.Check:
match Devotion Meraud
put commune sense
matchwait 2

Meraud:
match meraud.cont You tap
match Eluned I could not find
put tap inc
matchwait

meraud.cont:
gosub GET $watercontainer from my back
pause 0.5
put sprinkle $watercontainer on $charactername
pause 0.5
GOSUB stow my $watercontainer
pause 0.5
gosub light
put wave incense at rishlu
pause 0.5
put commune meraud
pause 0.5
pause 0.5
pause 0.5
put #var LastCommune $gametime
if needwater = 1 then gosub getwater
goto devotion

light:
gosub get incense
pause 0.5
gosub put drop incense
pause 0.5
gosub get flint
pause 0.5
gosub get scimitar
pause 0.5
put light incense with flint
pause 0.5
pause 0.5
gosub stow right
gosub stow left
pause 0.5
gosub get incense
pause 0.5
return

mat:
pause 0.5
gosub get my mat
pause 0.5
put unroll my mat
pause 0.5
put kneel
pause 0.5
put wave incense
pause 0.5
put snuff incense
pause 0.5
put stow incense
pause 0.5
put kiss mat
pause 0.5
pause 0.5
put stand
pause 0.5
return

prayclean:
put pray truffenyi
pause 0.5
pause 0.5
gosub get chalice
pause 0.5
put clean pin with holy water
pause 0.5
pause 0.5
gosub stow chalice
return

dance:
put dance
pause 0.5
pause 0.5
put dance
pause 0.5
pause 0.5
match stand Maybe you should stand up
match dance conclusion, but
match return conclusion at last,
match return conclusion flawlessly,
put dance
matchwait 11
return

stand:
put stand
pause 0.5
goto dance

get.mat:
pause 0.5
put roll mat
pause 0.5
put put my mat in my bag

recite:
put recite Phelim, give me strength for my righteous vengeance.\; Chadatru, guide my sword to swing in justice.\; verild, give me the power to conquer my enemies.\; Truffenyi, let me not lose sight of compassion and mercy\; Else, I will become like those I despise.\; Urrem'tier, receive into your fetid grasp these wicked souls\; May the Tamsine's realms never know their evil ways again;
pause 0.5
return

badge:
put rem pilgrim badge
pause
put pray pilgrim badge
pause 0.5
pause 0.5
put wear my pilgrim badge
pause 0.5
gosub STOW right
gosub STOW left
return