shaman help in HoH

 #include move.inc 
#event exp "You gain party experience!!"
#event exp "Your spell fizzles!"
#event fade "Your Blood of Saryrn spell has worn off."
#event exp "Your spell is interrupted."
#event regen "#*#regen#*#"
Sub Main
/declare breath int outer 0
/declare mytankid int outer ${Target.ID}
/declare petattackpct int outer 70
/declare petattacking int outer 0
/declare nocast int outer 0
/declare medmana int outer 0
/declare regen int outer 0
:loop
/doevents
/if (${FindItemCount[Summoned: Globe of Water]}<=9) {
/varset regen 0
/if (${Me.Sitting}) /stand
/cast 8
/delay 8s
/autoinventory
}
/if (${FindItemCount[Summoned: Black Bread]}<=9) {
/if (${Me.Sitting}) /stand
/cast 7
/delay 8s
/autoinventory
}
/if (${Me.PctMana}<=20) {
/if (${Me.Standing}) {
/if (!${Target.NearestSpawn[npc radius 50].ID}) /sit
/varset medmana 1
}
}
/call castingsub
/delay 1s
/goto :loop
/return
 
sub castingsub
/if (!${Target.NearestSpawn[npc radius 50].ID}) {
/if (${Me.PctMana}>=40) /varset medmana 0
/if (${medmana}==1) /varset nocast 1
/if (!${Target.ID}) /assist subblime
/if (${Target.ID}) {
/if (${Target.PctHPs}<=70) /if (${Target.PctHPs}>=15) /if (${Target.Type.Equal[NPC]}) {
/if (${nocast}==0) {
/call movetoloc 1384.63 1391.83
/delay 1s
/cast 5
/delay 10s
/delay 5
/if (${breath}==0) {
/cast 4
/varset breath 1
/delay 7s
/delay 5
}
/call movetoloc 1396.52 1511.56
/varset nocast 1
/face fast nolook
}
}
}
}
/return
sub event_fade
/varset nocast 0
/varset breath 0
/return
 
sub event_exp
/varset nocast 0
/varset breath 0
/return
 
sub event_regen
/if (${regen}==1) /return
/if (${Me.Sitting}) /stand
/delay 2s
/target ladyhavvk
/cast 3
/delay 9s
/squelch /target clear
/varset regen 1
/return