my pet names are
ultros, ultima, blitz, shadow, intercepter
Code: Select all
@cleartargetqueue
@clearjournal
if dead 'self'
stop
endif
//Setup
if not findalias 'pet1'
headmsg 'Select first pet'
promptalias 'pet1'
endif
if not findalias 'pet2'
headmsg 'Select second pet'
promptalias 'pet2'
endif
if not findalias 'pet3'
headmsg 'Select third pet'
promptalias 'pet3'
endif
if not findalias 'pet4'
headmsg 'Select fourth pet'
promptalias 'pet4'
endif
if not findalias 'pet5'
headmsg 'Select fifth pet'
promptalias 'pet5'
endif
//Heal them to full
//pet 1
if hits 'pet1' == 0
bandage
autotargetobject 'pet1'
pause 7600
endif
if hits 'pet2' == 0
bandage
autotargetobject 'pet2'
pause 7600
endif
if hits 'pet3' == 0
bandage
autotargetobject 'pet3'
pause 7600
endif
if hits 'pet4' == 0
bandage
autotargetobject 'pet4'
pause 7600
endif
if hits 'pet5' == 0
bandage
autotargetobject 'pet5'
pause 7600
endif
if diffhits 'pet1' > '0'
if diffhits 'pet1' > diffhits 'pet2'
if diffhits 'pet1' > diffhits 'pet3'
if diffhits 'pet1' > diffhits 'pet4'
if diffhits 'pet1' > diffhits 'pet5'
if inrange 'pet1' 1
bandage
autotargetobject 'pet1'
pause 5200
endif
endif
endif
endif
endif
endif
@cleartargetqueue
//pet 2
if diffhits 'pet2' > '0'
if diffhits 'pet2' > diffhits 'pet1'
if diffhits 'pet2' > diffhits 'pet3'
if diffhits 'pet2' > diffhits 'pet4'
if diffhits 'pet2' > diffhits 'pet5'
if inrange 'pet2' 1
bandage
autotargetobject 'pet2'
pause 5200
endif
endif
endif
endif
endif
endif
@cleartargetqueue
//pet 3
if not diffhits 'pet3' == '0'
if diffhits 'pet3' > diffhits 'pet1'
if diffhits 'pet3' > diffhits 'pet2'
if diffhits 'pet3' > diffhits 'pet4'
if diffhits 'pet3' > diffhits 'pet5'
if inrange 'pet3' 1
bandage
autotargetobject 'pet3'
pause 5200
endif
endif
endif
endif
endif
endif
@cleartargetqueue
if not diffhits 'pet4' == '0'
if diffhits 'pet4' > diffhits 'pet2'
if diffhits 'pet4' > diffhits 'pet3'
if diffhits 'pet4' > diffhits 'pet1'
if diffhits 'pet4' > diffhits 'pet5'
if inrange 'pet4' 1
bandage
autotargetobject 'pet4'
pause 5200
endif
endif
endif
endif
endif
endif
@cleartargetqueue
if not diffhits 'pet5' == '0'
if diffhits 'pet5' > diffhits 'pet2'
if diffhits 'pet5' > diffhits 'pet3'
if diffhits 'pet5' > diffhits 'pet1'
if diffhits 'pet5' > diffhits 'pet4'
if inrange 'pet5' 1
bandage
autotargetobject 'pet5'
pause 5200
endif
endif
endif
endif
endif
endif
@cleartargetqueue
if not @injournal 'finish' 'system'
pause 1100
replay
else if @injournal 'finish' 'system'
@clearjournal
replay
elseif @injournal 'too far away' 'system'
@clearjournal
replay
elseif @injournal 'stay close enough' 'system'
@clearjournal
replay
endif