Guest User

Untitled

a guest
Jun 24th, 2018
82
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.86 KB | None | 0 0
  1. initevents
  2. ignoreitem #charid
  3.  
  4. nexttame:
  5. ; Target next
  6. event macro 26 0
  7. wait 1s
  8. ; Use skill animal taming
  9. event macro 13 35
  10. target 5s
  11. ; Last target
  12. event macro 22 0
  13. wait 5s
  14. goto scanjournal
  15.  
  16. scanjournal:
  17. if #scnt > 30
  18. Goto pretame
  19. scanjournal
  20. ; To see if you gained
  21. if skill in #journal
  22. goto pretame
  23. ; To see if taming sucessful
  24. if Succesfully in #journal
  25. goto pretame
  26. ; To see if taming failed
  27. if failed in #journal
  28. goto retame
  29. ; To see if you can't tame the animal
  30. if chance in #journal
  31. goto nexttame
  32. ; To see if the animal is in a proper range and in LOS
  33. if see in #journal
  34. goto nexttame
  35. if own in #journal
  36. goto pretame
  37. goto scanjournal
  38.  
  39. pretame:
  40. ; Release the animal
  41. msg all release$
  42. set #scnt 0
  43. goto nexttame
  44.  
  45. retame:
  46. ; Use skill animal Taming
  47. event macro 13 35
  48. target 5s
  49. ; Last target
  50. event macro 22 0
  51. wait 5s
  52. goto scanjournal
Add Comment
Please, Sign In to add comment