severen1999

TwitchPlaysSpeedrunS

Oct 4th, 2020
1,479
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. ;Opt("SendKeyDelay", 25) ;5 milliseconds
  2. ;Opt("SendKeyDownDelay", 20) ;1 millisecond
  3.  
  4. HotKeySet("+!2", "_exit") ; Shift-Alt-2
  5. HotKeySet("{UP}", "_up") ; `
  6. HotKeySet("8", "_up") ; `
  7. HotKeySet("{DOWN}", "_down") ; `
  8. HotKeySet("2", "_down") ; `
  9. HotKeySet("{LEFT}", "_left")
  10. HotKeySet("4", "_left")
  11. HotKeySet("{RIGHT}", "_right")
  12. HotKeySet("6", "_right")
  13. HotKeySet("9","_upright")
  14. HotKeySet("{NUMPAD9}","_upright")
  15. HotKeySet("3","_downright")
  16. HotKeySet("{NUMPAD3}","_downright")
  17. HotKeySet("1","_downleft")
  18. HotKeySet("{NUMPAD1}","_downleft")
  19. HotKeySet("7","_upleft")
  20. HotKeySet("{NUMPAD7}","_upleft")
  21. Global $slowmodeup = 0
  22. Global $slowmodedown = 0
  23. Global $slowmodeleft = 0
  24. Global $slowmoderight = 0
  25. Global $slowmodeupright = 0
  26. Global $slowmodedownright = 0
  27. Global $slowmodedownleft = 0
  28. Global $slowmodeupleft = 0
  29. Global $commanddelay = 10
  30. While 1 = 1
  31.     Sleep(200)
  32. WEnd
  33.  
  34.  
  35. ;~ {NUMPAD0} - {NUMPAD9}
  36. ;~ Macros: #up(*), #search, #blaze1, #blaze2, #cccc, #heal, #c(*), #right(*), #d(*), #l(*), #back, #stay, #left(*), #atk, #r(*), #save, #down(*), #u(*), #testmacro
  37.  
  38.  
  39.  
  40. Func _upright()
  41.     If $slowmodeupright = 0 Then
  42.         Send("upright")
  43.         Sleep($commanddelay)
  44.         Send("{Enter}")
  45.         Sleep($commanddelay)
  46.         $slowmodeupright = 1
  47.     ElseIf $slowmodeupright = 1 Then
  48.         Send("Upright",0)
  49.         Sleep($commanddelay)
  50.         Send("{Enter}")
  51.         Sleep($commanddelay)
  52.         $slowmodeupright = 0
  53.     EndIf
  54. EndFunc   ;==>_up
  55.  
  56. Func _downright()
  57.     If $slowmodedownright = 0 Then
  58.         Send("downright")
  59.         Sleep($commanddelay)
  60.         Send("{Enter}")
  61.         Sleep($commanddelay)
  62.         $slowmodedownright = 1
  63.     ElseIf $slowmodedownright = 1 Then
  64.         Send("Downright",0)
  65.         Sleep($commanddelay)
  66.         Send("{Enter}")
  67.         Sleep($commanddelay)
  68.         $slowmodedownright = 0
  69.     EndIf
  70. EndFunc   ;==>_u
  71.  
  72. Func _downleft()
  73.     If $slowmodedownleft = 0 Then
  74.         Send("downleft")
  75.         Sleep($commanddelay)
  76.         Send("{Enter}")
  77.         Sleep($commanddelay)
  78.         $slowmodedownleft = 1
  79.     ElseIf $slowmodedownleft = 1 Then
  80.         Send("Downleft",0)
  81.         Sleep($commanddelay)
  82.         Send("{Enter}")
  83.         Sleep($commanddelay)
  84.         $slowmodedownleft = 0
  85.     EndIf
  86. EndFunc   ;==>_up
  87.  
  88. Func _upleft()
  89.     If $slowmodeupleft = 0 Then
  90.         Send("upleft")
  91.         Sleep($commanddelay)
  92.         Send("{Enter}")
  93.         Sleep($commanddelay)
  94.         $slowmodeupleft = 1
  95.     ElseIf $slowmodeupleft = 1 Then
  96.         Send("Upleft",0)
  97.         Sleep($commanddelay)
  98.         Send("{Enter}")
  99.         Sleep($commanddelay)
  100.         $slowmodeupleft = 0
  101.     EndIf
  102. EndFunc   ;==>_up
  103.  
  104.  
  105. Func _up()
  106.  
  107.     If $slowmodeup = 0 Then
  108.         Send("up")
  109.         Sleep($commanddelay)
  110.         Send("{Enter}")
  111.         Sleep($commanddelay)
  112.         $slowmodeup = 1
  113.     ElseIf $slowmodeup = 1 Then
  114.         Send("Up",0)
  115.         Sleep($commanddelay)
  116.         Send("{Enter}")
  117.         Sleep($commanddelay)
  118.         $slowmodeup = 0
  119.     EndIf
  120. EndFunc   ;==>_up
  121. Func _down()
  122.  
  123.     If $slowmodedown = 0 Then
  124.         Send("down",0)
  125.         Sleep($commanddelay)
  126.         Send("{Enter}")
  127.         Sleep($commanddelay)
  128.         $slowmodedown = 1
  129.     ElseIf $slowmodedown = 1 Then
  130.         Send("Down",0)
  131.         Sleep($commanddelay)
  132.         Send("{Enter}")
  133.         Sleep($commanddelay)
  134.         $slowmodedown = 0
  135.     EndIf
  136.  
  137. EndFunc   ;==>_down
  138. Func _left()
  139.  
  140.     If $slowmodeleft = 0 Then
  141.         Send("left",0)
  142.         Sleep($commanddelay)
  143.         Send("{Enter}")
  144.         Sleep($commanddelay)
  145.         $slowmodeleft = 1
  146.     ElseIf $slowmodeleft = 1 Then
  147.         Send("Left",0)
  148.         Sleep($commanddelay)
  149.         Send("{Enter}")
  150.         Sleep($commanddelay)
  151.         $slowmodeleft = 0
  152.     EndIf
  153.  
  154.  
  155. EndFunc   ;==>_left
  156. Func _right()
  157.  
  158.     If $slowmoderight = 0 Then
  159.         Send("right",0)
  160.         Sleep($commanddelay)
  161.         Send("{Enter}")
  162.         Sleep($commanddelay)
  163.         $slowmoderight = 1
  164.     ElseIf $slowmoderight = 1 Then
  165.         Send("Right",0)
  166.         Sleep($commanddelay)
  167.         Send("{Enter}")
  168.         Sleep($commanddelay)
  169.         $slowmoderight = 0
  170.     EndIf
  171.  
  172. EndFunc   ;==>_right
  173. Func _chat()
  174.     MouseClick("left", 1384, 824, 1, 1) ;click in chat while chrome full screen
  175.     Sleep($commanddelay)
  176. EndFunc   ;==>_chat
  177. Func _blank()
  178.     MouseClick("left", 1001, 855, 1, 1)
  179.     Sleep($commanddelay)
  180. EndFunc   ;==>_blank
  181. Func _exit()
  182.     Exit
  183. EndFunc   ;==>_exit
  184.  
  185.  
RAW Paste Data