Advertisement
Guest User

Untitled

a guest
Jan 20th, 2019
55
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.04 KB | None | 0 0
  1. //have 3 containers ready. 1 for slayers, magic staffs, and junk
  2. if not @findalias 'slayerbag'
  3. promptalias 'slayerbag'
  4. endif
  5. if not @findalias 'Magicbag'
  6. promptalias 'Magicbag'
  7. endif
  8. if not @findobject 'Sell Bag'
  9. promptalias 'Sell Bag'
  10. endif
  11. if not hidden 'self' and skill 'hiding' >= '50'
  12. useskill 'hiding'
  13. endif
  14. if listexists 'stafftype'
  15. @clearlist 'stafftype'
  16. else
  17. createlist 'stafftype'
  18. endif
  19. pushlist 'stafftype' 0xe89
  20. if not @findtype '0x1034' 'any' 'backpack' 'any' '2'
  21. headmsg 'Need more tools!'
  22. stop
  23. endif
  24. @usetype '0x1034' 'any' 'backpack' '2'
  25. waitforgump 0x38920abd 15000
  26. replygump 0x38920abd 9
  27. pause 2000
  28. if @injournal 'The world is' 'system'
  29. sysmsg 'Pausing macro for Server Save'
  30. waitforjournal 'World save complete' 25000 'system'
  31. pause 1500
  32. sysmsg 'Resuming macro'
  33. endif
  34. if @injournal 'slayer weapon.' 'system'
  35. // Change ?
  36. @findtype stafftype[0] 0x0 'backpack'
  37. moveitem 'found' 'slayerbag'
  38. ignoreobject 'found'
  39. clearjournal
  40. headmsg 'Slayer crafted!' 33
  41. pause 600
  42. else
  43. if @injournal 'added magical' 'system'
  44. // Change ?
  45. @findtype stafftype[0] 0x0 'backpack'
  46. moveitem 'found' 'Magicbag'
  47. ignoreobject 'found'
  48. clearjournal
  49. headmsg 'Magic staff crafted!' 33
  50. pause 600
  51. else
  52. @findtype '0xe89' 'any' 'backpack' '1' 0
  53. moveitem 'found' 'Sell Bag'
  54. pause 200
  55. @ignoreobject 'found'
  56. endif
  57. endif
  58. while weight >= maxweight
  59. headmsg 'Time to Sell'
  60. sysmsg 'Time to Sell'
  61. messagebox 'Qstaffs done' 'lets go g'
  62. stop
  63. endwhile
  64. if @ingump 'any' 'do not have sufficient'
  65. pause 1000
  66. useobject 'self'
  67. pause 1000
  68. waitforcontext 0x45183 10 15000
  69. pause 1000
  70. if counttype 0x1bdd 'any' 'buggy' >= 500
  71. movetype 0x1bdd '0x45183' 'backpack' 44 74 0 'any' 500 2
  72. else
  73. useobject 'buggy'
  74. messagebox 'done son' 'buggy empty'
  75. stop
  76. pause 1000
  77. endif
  78. if not @findobject 'buggy'
  79. messagebox 'YOOOOOO' 'SELECT MOUNT'
  80. promptalias 'buggy'
  81. endif
  82. useobject 'buggy'
  83. pause 1000
  84. replay
  85. endif
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement