Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- //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 'bandages'
- headmsg 'Select bandages'
- promptalias 'bandages'
- endif
- //Feed pets every hour
- if not timerexists 'feed'
- createtimer 'feed'
- endif
- if timer 'feed' > 600000
- settimer 'feed' 0
- feed 'pet1' 'Meat' 'any' 1
- pause 500
- feed 'pet2' 'Meat' 'any' 1
- endif
- //Tell pets to attack each other if they're full HP
- if hits 'pet1' == maxhits 'pet1' and hits 'pet2' == maxhits 'pet2'
- waitforcontext 'pet1' 3 15000
- autotargetobject 'pet2'
- pause 500
- waitforcontext 'pet2' 3 15000
- autotargetobject 'pet1'
- pause 500
- endif
- //Heal the lowest HP pet
- if @findobject 'bandages'
- useobject 'found'
- else //Out of bandages
- msg 'all stay'
- pause 3000
- headmsg 'Select bandages'
- promptalias 'bandages'
- endif
- if diffhits 'pet1' > diffhits 'pet2'
- autotargetobject 'pet1'
- else
- autotargetobject 'pet2'
- endif
- pause 5500
- //Tell pets to stop if either is missing 50%
- if diffhits 'pet1' > 50 or diffhits 'pet2' > 50
- msg 'all stop'
- pause 2000
- msg 'all stay'
- pause 2000
- //Heal them to full
- while hits 'pet1' < maxhits 'pet1'
- useobject 'bandages'
- autotargetobject 'pet1'
- pause 5500
- endwhile
- while hits 'pet2' < maxhits 'pet2'
- useobject 'bandages'
- autotargetobject 'pet2'
- pause 5500
- endwhile
- endif
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement