The text below is selected, press Ctrl+C to copy to your clipboard. (⌘+C on Mac) No line numbers will be copied.
Guest
Uosteamvet2pet
By Guest on 14th March 2019 10:47:15 AM | Syntax: TEXT | Views: 5



New paste | Download | Show/Hide line no. | Copy text to clipboard
  1. if not listexists 'petlist'
  2.   createlist 'petlist'
  3.   //add an entry for each pet you hunt with:
  4.   @pushlist 'petlist' 0x176ca2 // rare white horse
  5.   @pushlist 'petlist' 0x1572d2 // meta
  6.   @pushlist 'petlist' 0x2627 // white wyrm
  7. endif
  8. //Removes pets if mounted, stabled or you get too far away
  9. if findalias 'Pet1' and not @findobject 'Pet1'
  10.   unsetalias 'Pet1'
  11. endif
  12. if findalias 'Pet2' and not @findobject 'Pet2'
  13.   unsetalias 'Pet2'
  14. endif
  15. //makes sure the pets never equal each other
  16. if findalias 'Pet1' and findalias 'Pet2'
  17.   if serial 'Pet1' == serial 'Pet2'
  18.     unsetalias 'Pet2'
  19.   endif
  20. endif
  21. //Searches for your pets when you don't have 2 active
  22. if not @findobject 'Pet1' or not @findobject 'Pet2'
  23.   for 0 to 'petlist'
  24.     if @findobject petlist[] 'any' 'ground' 0 30
  25.       if not @findobject 'Pet1'
  26.         setalias 'Pet1' petlist[]
  27.       elseif not @findobject 'Pet2' and serial 'Pet1' != 'petlist[]'
  28.         setalias 'Pet2' petlist[]
  29.       endif
  30.     endif
  31.   endfor
  32. endif
  33. // sets backup bandie timer just in case
  34. if not timerexists 'bandie'
  35.   settimer 'bandie' 10000
  36. endif
  37. // provoke protection if target cursor exists
  38. if not targetexists
  39.   //Starts healing your pets
  40.   if @injournal 'finish applying' 'system' or timer 'bandie' >= 10000
  41.     if @findobject 'Pet1' and @findobject 'Pet2'
  42.       if hits 'Pet1' < 90 or hits 'Pet2' < 90
  43.         if diffhits 'Pet1' > diffhits 'Pet2' and @inrange 'Pet1' 1
  44.           usetype 0xe21 'any' 'backpack'
  45.           waitfortarget 3500
  46.           target! 'Pet1'
  47.           settimer 'bandie' 0
  48.         elseif @inrange 'Pet2' 1 and hits 'Pet2' < 90
  49.           usetype 0xe21 'any' 'backpack'
  50.           waitfortarget 3500
  51.           target! 'Pet2'
  52.           settimer 'bandie' 0
  53.         endif
  54.         clearjournal
  55.         pause 1000
  56.       endif
  57.     elseif @findobject 'Pet1' or @findobject 'Pet2'
  58.       if hits 'found' < 90 and @inrange 'found' 1
  59.         usetype 0xe21 'any' 'backpack'
  60.         waitfortarget 3500
  61.         target! 'found'
  62.         settimer 'bandie' 0
  63.         clearjournal
  64.         pause 1000
  65.       endif
  66.     endif
  67.   endif
  68. endif
  69. if @injournal 'too far away' 'system'
  70.   @clearjournal
  71. elseif @injournal 'stay close enough' 'system'
  72.   @clearjournal
  73. endif



  • Recent Pastes