Advertisement
Guest User

Untitled

a guest
Mar 19th, 2018
77
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 5.89 KB | None | 0 0
  1. MacroStarted = false;
  2. BossStarted = false;
  3. Started_33 = false;
  4. Started_17 = false;
  5.  
  6. function OnEvent (event, arg)
  7.  
  8. --########################################################################################################
  9. --Macros an und ausschalten
  10. --########################################################################################################
  11.  
  12. -- Standard 1.54 Macro starten und ausschalten
  13. if (event == "G_PRESSED" and arg == 1) then
  14. if not (MacroStarted) then
  15.  
  16. if (MacroStarted or BossStarted or Started_33 or Started_17) then -- Falls schon Macro gestartet abbrechen und Signal an AHK das abgebrochen wurde
  17. AbortMacro();
  18. MacroStarted = false;
  19. BossStarted = false;
  20. Started_17 = false;
  21. Started_33 = false;
  22. PressKey("F16");
  23. ReleaseKey ("F16");
  24. end
  25. PlayMacro("1.54");
  26. MacroStarted = true;
  27. PressKey("F15");
  28. ReleaseKey ("F15");
  29. else
  30. AbortMacro();
  31. MacroStarted = false;
  32. PressKey("F15");
  33. ReleaseKey ("F15");
  34. end
  35. end
  36.  
  37.  
  38. -- BossMacro an und ausschalten
  39. if (event == "G_PRESSED" and arg == 6) then -- BossMacro an und ausschalten
  40. if not (BossStarted) then
  41. if(MacroStarted or BossStarted or Started_33 or Started_17) then -- Falls schon Macro gestartet abbrechen und Signal an AHK das abgebrochen wurde
  42. AbortMacro();
  43. MacroStarted = false;
  44. BossStarted = false;
  45. Started_17 = false;
  46. Started_33 = false;
  47. PressKey("F15");
  48. ReleaseKey ("F15");
  49. end
  50. PlayMacro("Boos");
  51. BossStarted = true;
  52. PressKey("F16");
  53. ReleaseKey ("F16");
  54. else
  55. AbortMacro();
  56. BossStarted = false;
  57. PressKey("F15");
  58. ReleaseKey ("F15");
  59. end
  60. end
  61.  
  62. -- 17_7_2 an und ausschalten
  63. if (event == "G_PRESSED" and arg == 7) then -- 17_7_2 an und ausschalten
  64. if not (Started_17) then
  65. if(MacroStarted or BossStarted or Started_33 or Started_17) then -- Falls schon Macro gestartet abbrechen und Signal an AHK das abgebrochen wurde
  66. AbortMacro();
  67. MacroStarted = false;
  68. BossStarted = false;
  69. Started_17 = false;
  70. Started_33 = false;
  71. PressKey("F15");
  72. ReleaseKey ("F15");
  73. end
  74. PlayMacro("17_7_2");
  75. Started_17 = true;
  76. PressKey("F17");
  77. ReleaseKey ("F17");
  78. else
  79. AbortMacro();
  80. Started_17 = false;
  81. PressKey("F15");
  82. ReleaseKey ("F15");
  83. end
  84. end
  85.  
  86. -- 33_11_3 an und ausschalten
  87. if (event == "G_PRESSED" and arg == 8) then -- 17_7_2 an und ausschalten
  88. if not (Started_33) then
  89. if(MacroStarted or BossStarted or Started_33 or Started_17) then -- Falls schon Macro gestartet abbrechen und Signal an AHK das abgebrochen wurde
  90. AbortMacro();
  91. MacroStarted = false;
  92. BossStarted = false;
  93. Started_17 = false;
  94. Started_33 = false;
  95. PressKey("F15");
  96. ReleaseKey ("F15");
  97. end
  98. PlayMacro("33_11_3");
  99. Started_33 = true;
  100. PressKey("F18");
  101. ReleaseKey ("F18");
  102. else
  103. AbortMacro();
  104. Started_33 = false;
  105. PressKey("F15");
  106. ReleaseKey ("F15");
  107. end
  108. end
  109.  
  110.  
  111. --########################################################################################################
  112. --Paragonswitch
  113. --########################################################################################################
  114.  
  115. --Switch in Vita
  116. if (event == "G_PRESSED" and arg == 3) then
  117. -- Get the current mouse cursor position
  118. x, y = GetMousePosition();
  119. local i = 0;
  120.  
  121. -- Paragon Öffnen
  122. PressKey ("p");
  123. ReleaseKey ("p");
  124. Sleep(10);
  125.  
  126. -- Reset
  127. MoveMouseTo (32887, 44459); -- Reset
  128. PressAndReleaseMouseButton (1);
  129. Sleep(100);
  130.  
  131. -- Bewegungsgeschwindigkeit
  132. MoveMouseTo (43508, 31462);
  133. Sleep(50);
  134. PressKey ("lCtrl");
  135. PressAndReleaseMouseButton (1);
  136. Sleep(2);
  137. ReleaseKey ("lCtrl");
  138. Sleep(105);
  139.  
  140. --Vita
  141. MoveMouseTo (43405, 25631);
  142. PressKey ("lCtrl");
  143. for i = 0,35,1 do -- mit der Zahl 25 Experimentieren, je mehr Paragon desto höher die Zahl
  144. PressAndReleaseMouseButton (1);
  145. Sleep(2);
  146. i = i + 1;
  147. end
  148. ReleaseKey ("lCtrl");
  149. Sleep(100);
  150.  
  151. --Bestätigen
  152. MoveMouseTo (28106, 49379);
  153. PressAndReleaseMouseButton (1);
  154. Sleep(100);
  155.  
  156. --Maus wieder zurück wo sie am Anfang war
  157. MoveMouseTo (x,y);
  158.  
  159. --Für AHK
  160. PressKey("F13");
  161. ReleaseKey ("F13");
  162.  
  163. end
  164.  
  165. --Switch in Int
  166. if (event == "G_PRESSED" and arg == 4) then -- G9 Funktionstaste
  167. -- Get the current mouse cursor position
  168. x, y = GetMousePosition();
  169. local i = 0;
  170.  
  171. --Paragon öffnen
  172. PressKey ("p");
  173. ReleaseKey ("p");
  174. Sleep(10);
  175.  
  176. --Reset
  177. MoveMouseTo (32887, 44459);
  178. PressAndReleaseMouseButton (1);
  179. Sleep(100);
  180.  
  181. --Ressource
  182. MoveMouseTo (43508, 36989);
  183. Sleep(50);
  184. PressKey ("lCtrl");
  185. PressAndReleaseMouseButton (1);
  186. Sleep(5);
  187. ReleaseKey ("lCtrl");
  188. Sleep(100);
  189.  
  190. --Mainstat
  191. MoveMouseTo (43474, 20286);
  192. PressKey ("lCtrl");
  193. for i = 0,25,1 do -- mit der Zahl 25 Experimentieren, je mehr Paragon desto höher die Zahl
  194. PressAndReleaseMouseButton (1);
  195. Sleep(2);
  196. i = i + 1;
  197. end
  198. ReleaseKey ("lCtrl");
  199. Sleep(100);
  200.  
  201. --Bestätigen
  202. MoveMouseTo (28106, 49379); -- OK
  203. PressAndReleaseMouseButton (1);
  204. Sleep(100);
  205.  
  206. --Maus wieder zurück
  207. MoveMouseTo (x,y);
  208.  
  209. --Für AHK
  210. PressKey("F14");
  211. ReleaseKey ("F14");
  212.  
  213. end
  214. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement