SHARE
TWEET

Untitled

a guest Jul 12th, 2019 64 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. // Toggle war mode
  2. //
  3. warmode 'on'
  4. warmode 'off'
  5. //
  6. // Create temporary list
  7. //
  8. @removelist 'enemies'
  9. @createlist 'enemies'
  10. //
  11. // Scan for targets
  12. //
  13. for 0 to 20
  14.   @getenemy 'murderer' 'enemy' 'criminal' 'gray' 'next'
  15.   @pushlist! 'enemies' 'enemy'
  16. endfor
  17. //
  18. // Create a distances list, seeding from 1
  19. //
  20. @removelist 'distances'
  21. @createlist 'distances'
  22. pushlist 'distances' 1
  23. pushlist 'distances' 2
  24. pushlist 'distances' 3
  25. pushlist 'distances' 4
  26. pushlist 'distances' 5
  27. pushlist 'distances' 6
  28. pushlist 'distances' 7
  29. pushlist 'distances' 8
  30. pushlist 'distances' 9
  31. pushlist 'distances' 10
  32. pushlist 'distances' 11
  33. pushlist 'distances' 12
  34. pushlist 'distances' 13
  35. pushlist 'distances' 14
  36. pushlist 'distances' 15
  37. //
  38. // Sort by distance
  39. //
  40. @unsetalias 'enemy'
  41. for 0 to 'distances'
  42.   if not @findobject 'enemy'
  43.     for 0 to 'enemies'
  44.       if @inrange enemies[] distances[] and not dead enemies[]
  45.         setalias 'enemy' enemies[]
  46.         break
  47.       endif
  48.     endfor
  49.   else
  50.     break
  51.   endif
  52. endfor
  53. //[]
  54. // Drop target on enemy
  55. //
  56. if @findobject 'enemy' and targetexists
  57.   target! 'enemy'
  58. endif
  59. //
  60. // run dress macro
  61. //
  62. //dress 'default'
  63. //while dressing
  64. //endwhile
  65. //
  66. // attack or message
  67. //
  68. if @findobject 'enemy' and @inrange 'enemy' 5
  69.   headmsg "*Attacking Close*" 22
  70.   attack! 'enemy'
  71.   target! 'enemy'
  72.   if findtype '0xe81' 'any' 'backpack'
  73.     useobject 'found'
  74.     waitfortarget 5000
  75.     target! 'last'
  76.   endif
  77.   pause 500
  78. elseif @findobject 'enemy' and @inrange 'enemy' 15
  79.   headmsg "*Attacking Far*" 22
  80.   attack! 'enemy'
  81.   target! 'enemy'
  82.   if findtype '0xe81' 'any' 'backpack'
  83.     useobject 'found'
  84.     waitfortarget 5000
  85.     target! 'last'
  86.   endif
  87.   pause 500
  88. else
  89.   headmsg "No targets" 44
  90. endif
  91. warmode 'on'
  92. warmode 'off'
  93. playmacro 'PetHeal'
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
 
Top