Advertisement
Guest User

Flask macro by Oslidze

a guest
Sep 24th, 2021
60
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. #Persistent
  2. #include Lib\AutoHotInterception.ahk
  3. SetBatchLines -1
  4.  
  5. global Ptqf := [[1,2,3,4,5],[1,2,3,4,5],[2,1,3,4,5],[2,1,3,4,5],[1,2,4,3,5],[2,1,4,3,5],[2,1,4,3,5],[2,1,4,3,5],[1,2,3,4,5],[2,1,3,4,5],[2,1,3,4,5],[2,1,3,4,5],[1,2,4,3,5],[2,1,4,3,5],[2,1,4,3,5],[2,1,4,3,5]]
  6. global Petych := [[37,58,127,146,34,50,111,124],[37,58,127,146,34,50,111,124],[37,58,127,146,34,50,111,124],[51,67,145,158,37,48,98,114],[51,67,145,158,37,48,98,114],[27,38,130,148,38,51,90,99],[35,46,130,148,38,51,90,99]]
  7.  
  8. global AHI := new AutoHotInterception()
  9. global keyboardId := AHI.GetKeyboardId(айди, айди2)
  10. global mouseID := AHI.GetMouseId(айди3, айди4)
  11. AHI.SubscribeKey(keyboardId, GetKeySC("~"), true, Func("OrcNodeWalkthrough"))
  12. AHI.SubscribeKey(keyboardId, GetKeySC("F6"), true, Func("SentinelReady"))
  13.  
  14. GetNumberOfEvents(min,max){
  15.     Random, r, %min%, %max%
  16.     Sleep %r%
  17.     Return
  18. }
  19.  
  20. OrcNodeWalkthrough(state) {
  21.     if (state = 1)
  22.     {
  23.     random, rr, 1, Ptqf.length()
  24.     random, rp, 1, Petych.length()
  25.  
  26.     mokoArkudal(Ptqf[rr][1])
  27.  
  28.     GetNumberOfEvents(Petych[rp][1],Petych[rp][2])
  29.     mokoArkudal(Ptqf[rr][2])
  30.  
  31.     GetNumberOfEvents(Petych[rp][3],Petych[rp][4])
  32.     mokoArkudal(Ptqf[rr][3])
  33.  
  34.     GetNumberOfEvents(Petych[rp][5],Petych[rp][6])
  35.     mokoArkudal(Ptqf[rr][4])
  36.  
  37.     GetNumberOfEvents(Petych[rp][7],Petych[rp][8])
  38.     mokoArkudal(Ptqf[rr][5])
  39.     }
  40.  
  41.     Return
  42. }
  43.  
  44. mokoArkudal(key) {
  45.     AHI.SendKeyEvent(keyboardId, GetKeySC(key), 1)
  46.     GetNumberOfEvents(26,35)
  47.     AHI.SendKeyEvent(keyboardId, GetKeySC(key), 0)
  48.  
  49.     Return
  50. }
  51.  
  52. SentinelReady(state){
  53.     if (state = 1)
  54.     {
  55.     AHI.SendKeyEvent(keyboardId, GetKeySC("Ctrl"), 1)
  56.     GetNumberOfEvents(45,58)
  57.  
  58.     AHI.SendMouseButtonEvent(mouseId, 0, 1)
  59.     GetNumberOfEvents(12,20)
  60.     AHI.SendMouseButtonEvent(mouseId, 0, 0)
  61.     GetNumberOfEvents(35,48)
  62.  
  63.     AHI.SendKeyEvent(keyboardId, GetKeySC("Ctrl"), 0)
  64.     }
  65.     Return
  66. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement