Advertisement
lyzing

Untitled

Aug 10th, 2019
337
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.42 KB | None | 0 0
  1. _IFMemPtrRead=%PlayerBase,%OffsetData/0x256,BYTE,<255;
  2. #DO=60000;
  3. SendKey=0x4F;
  4. FrameAction=19,XPOS,0;
  5. FrameAction=19,YPOS,0;
  6. Delay=1500;
  7. Mouse=56,92; Options
  8. FrameAction=253,XPOS,0;
  9. FrameAction=253,YPOS,0;
  10. Delay=1500;
  11. Mouse=61,181; Community
  12. Delay=50;
  13. Mouse=61,181; Community
  14. Delay=600;
  15. #EXECUTE=DisableAnything;
  16. Delay=600;
  17. Mouse=391,359; Apply
  18. Delay=15;
  19. Mouse=391,359; Apply
  20. Delay=600;
  21. Mouse=295,359; OK
  22. Delay=600;
  23. _UNTILMemPtrRead=%PlayerBase,%OffsetData/0x256,BYTE,=255;
  24. #ENDIF
  25. _IFFrameVisible=253;
  26. SendKey=0x1B;
  27. Delay=50;
  28. SendKey=0x1B;
  29. Delay=50;
  30. SendKey=0x1B;
  31. Delay=50;
  32. MemPtrWrite=%AddrESChwnd,%OffsetESChwnd,142,BYTE;
  33. #ENDIF
  34.  
  35.  
  36.  
  37. start_DisableAnything;
  38.  
  39. _MemPtrReadVar=%PlayerBase,%OffsetData/0x256,BYTE,Dec;
  40. #EXECUTE=DecToBin;
  41.  
  42. #IF=%Var[Bin128],=0;
  43. Mouse=146,257; Block Mail From Players < lvl 10
  44. Delay=600;
  45. #ENDIF
  46.  
  47. #IF=%Var[Bin64],=0;
  48. Mouse=146,238; Block Whispers From Players < lvl 15
  49. Delay=600;
  50. #ENDIF
  51.  
  52. #IF=%Var[Bin32],=0;
  53. Mouse=145,220; Decline Duel Request
  54. Delay=600;
  55. #ENDIF
  56.  
  57. #IF=%Var[Bin16],=0;
  58. Mouse=146,202; Decline Friend Registration
  59. Delay=600;
  60. #ENDIF
  61.  
  62. #IF=%Var[Bin8],=0;
  63. Mouse=146,184; Decline Legion Invitation
  64. Delay=600;
  65. #ENDIF
  66.  
  67. #IF=%Var[Bin4],=0;
  68. Mouse=150,169; Decline Groupe/Alliance Invitation
  69. Delay=600;
  70. #ENDIF
  71.  
  72. #IF=%Var[Bin2],=0;
  73. Mouse=146,144; Decline Trade
  74. Delay=600;
  75. #ENDIF
  76.  
  77. #IF=%Var[Bin1],=0;
  78. Mouse=145,127; Viewing Details
  79. Delay=600;
  80. #ENDIF
  81.  
  82. end_DisableAnything;
  83.  
  84.  
  85.  
  86. start_DecToBin;
  87.  
  88. _SetVar=Bin128,0;
  89. _SetVar=Bin64,0;
  90. _SetVar=Bin32,0;
  91. _SetVar=Bin16,0;
  92. _SetVar=Bin8,0;
  93. _SetVar=Bin4,0;
  94. _SetVar=Bin2,0;
  95. _SetVar=Bin1,0;
  96.  
  97. #IF=%Var[Dec],>127;
  98. _SetVar=Bin128,1;
  99. _Calc[Dec]=%Var[Dec]-128;
  100. #ENDIF
  101. #IF=%Var[Dec],=0;
  102. #Return
  103. #ENDIF
  104. #IF=%Var[Dec],>63;
  105. _SetVar=Bin64,1;
  106. _Calc[Dec]=%Var[Dec]-64;
  107. #ENDIF
  108. #IF=%Var[Dec],=0;
  109. #Return
  110. #ENDIF
  111. #IF=%Var[Dec],>31;
  112. _SetVar=Bin32,1;
  113. _Calc[Dec]=%Var[Dec]-32;
  114. #ENDIF
  115. #IF=%Var[Dec],=0;
  116. #Return
  117. #ENDIF
  118. #IF=%Var[Dec],>15;
  119. _SetVar=Bin16,1;
  120. _Calc[Dec]=%Var[Dec]-16;
  121. #ENDIF
  122. #IF=%Var[Dec],=0;
  123. #Return
  124. #ENDIF
  125. #IF=%Var[Dec],>7;
  126. _SetVar=Bin8,1;
  127. _Calc[Dec]=%Var[Dec]-8;
  128. #ENDIF
  129. #IF=%Var[Dec],=0;
  130. #Return
  131. #ENDIF
  132. #IF=%Var[Dec],>3;
  133. _SetVar=Bin4,1;
  134. _Calc[Dec]=%Var[Dec]-4;
  135. #ENDIF
  136. #IF=%Var[Dec],=0;
  137. #Return
  138. #ENDIF
  139. #IF=%Var[Dec],>1;
  140. _SetVar=Bin2,1;
  141. _Calc[Dec]=%Var[Dec]-2;
  142. #ENDIF
  143. #IF=%Var[Dec],=0;
  144. #Return
  145. #ENDIF
  146. #IF=%Var[Dec],>0;
  147. _SetVar=Bin1,1;
  148. _Calc[Dec]=%Var[Dec]-1;
  149. #ENDIF
  150.  
  151. end_DecToBin;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement