Advertisement
FlyFar

LeKrunk.ahk

Mar 2nd, 2023
3,464
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. #NoEnv    
  2. SendMode Input  
  3. SetWorkingDir %A_ScriptDir%  
  4. #SingleInstance, Force
  5. FirX := (A_ScreenWidth - A_ScreenWidth + 200)
  6. FirY := (A_ScreenHeight - A_ScreenHeight + 200)
  7.  
  8. MidX := A_ScreenWidth / 2
  9. MidY := A_ScreenHeight / 2
  10.  
  11. ;OPTIMIZATIONS START
  12. #MaxHotkeysPerInterval 99000000
  13. #HotkeyInterval 99000000
  14. #KeyHistory 0
  15. ListLines Off
  16. Process, Priority, , A
  17. SetBatchLines, -1
  18. SetKeyDelay, -1, -1
  19. SetMouseDelay, -1
  20. SetDefaultMouseSpeed, 0
  21. SetWinDelay, -1
  22. SetControlDelay, -1
  23. ;OPTIMIZATIONS END
  24.  
  25. CoordMode, Mouse, Screen
  26. CoordMode, Pixel, Screen
  27. MidX := A_ScreenWidth / 2
  28. MidY := A_ScreenHeight / 2
  29. ;Triggerbot = 0
  30. ;Sense = 3
  31.  
  32. aim := 0x5D56EB
  33.  
  34. ;GUI===============================
  35. Gui, Show, x%FirX% y%FirY% w100 h100, Runtime Broker
  36. Gui, -Caption
  37. Gui, Add, Text, x2 y2 gLeDrag, LeKrunk
  38. Gui, Add, Text, x-1 y10, ----------------------------------------------------------------------------
  39. Gui, Add, Checkbox, x2 y20 vAimSet gAimbot, Aimbot
  40. Gui, Add, Checkbox, x2 y35 gFovBox vFov, Fov Box (1080p)
  41. Gui, Add, Checkbox, x2 y50 vTriggerbot, Triggerbot
  42. Gui, Add, Text, x2 y65, Aim Smooth:
  43. Gui, Add, Text, x65 y65 vSen w100, 3
  44. Gui, Add, Slider, x-3 y80 w105 vSense gOui ToolTip Thick8 Range1-10 NoTicks, 3
  45. Gui, Add, Button, x2 y100 w100 gCreds, CREDITS
  46.  
  47. MyColor = EEAA99  
  48. Gui OSD:+LastFound +AlwaysOnTop -Caption +ToolWindow  
  49. Gui, OSD:Color, %MyColor%
  50. Gui, OSD:Font, s26  
  51. Gui, OSD:Add, Text, vMyText cLime, Krunker Aimbot Activated
  52. Gui, OSD:Add, Text, vMyTexty cRed, https://shoppy.gg/@CheetosFTW/groups/4GxiKea for better version
  53. WinSet, TransColor, %MyColor% 155
  54. Gui, OSD:Show, x0 y0 NoActivate
  55. return
  56.  
  57. Aimbot:
  58. Gui, Submit, NoHide
  59. ~RButton::
  60. {
  61.     While GetKeyState("RButton"){
  62. PixelSearch, TargetX, TargetY, 840, 420, 1080, 660, aim, 7, Fast
  63. If ErrorLevel = 0
  64.     Gui, Submit, NoHide
  65.     if (AimSet == 1)
  66. {
  67. TargetX := TargetX + 42
  68. TargetY := TargetY + 30
  69. MoveX := ((TargetX - MidX) / Sense)
  70. MoveY := ((TargetY - MidY) / Sense)
  71. MouseMove, MoveX, %MoveY%,, R
  72. if (TriggerBot = 1)
  73. {
  74. Click, down
  75. }
  76. }
  77. else
  78. Gui, Submit, NoHide
  79. if (Triggerbot = 1)
  80. Click, up
  81. }
  82. }
  83. return
  84.  
  85. ~RButton up::
  86. {
  87. Gui, Submit, NoHide
  88. if (Triggerbot = 1)
  89. Click, up
  90. }
  91. return
  92.  
  93. Creds:
  94. Msgbox, 0, LeKrunk, Made By: HackerHansen And Leplix! `nThis Is Our Free Version `nMake Sure To Check Out Paid! `nMore Features + Better
  95.  
  96.  
  97. Oui:
  98. Gui, Submit, NoHide
  99. GuiControl,,Sen, %Sense%
  100. return
  101.  
  102.  
  103. LeDrag:
  104. PostMessage, 0xA1, 2,,, A
  105. return
  106.  
  107. FovBox:
  108. Gui, Submit, NoHide
  109. if (Fov == 1) {
  110. CreateBox("01FF01")
  111. Box(840, 420, 240, 240, 1, 0)
  112. }
  113. else if (Fov == 0) {
  114.     RemoveBox()
  115. }
  116. return
  117.  
  118.  
  119.  
  120.  
  121.  
  122.  
  123. return
  124.  
  125. `::exitapp
  126.  
  127. ; BOX FUNCTIONS, NOT WRITTEN BY ME. https://autohotkey.com/board/topic/54443-box-ie-draw-simple-gui-based-boxes-on-screen/
  128.  
  129. CreateBox(Color)
  130. {
  131.     Gui 81:color, %Color%
  132.     Gui 81:+ToolWindow -SysMenu -Caption +AlwaysOnTop
  133.     Gui 82:color, %Color%
  134.     Gui 82:+ToolWindow -SysMenu -Caption +AlwaysOnTop
  135.     Gui 83:color, %Color%
  136.     Gui 83:+ToolWindow -SysMenu -Caption +AlwaysOnTop
  137.     Gui 84:color, %Color%
  138.     Gui 84:+ToolWindow -SysMenu -Caption +AlwaysOnTop
  139. }
  140.  
  141. Box(XCor, YCor, Width, Height, Thickness, Offset)
  142. {
  143.     If InStr(Offset, "In")
  144.     {
  145.         StringTrimLeft, offset, offset, 2
  146.         If not Offset
  147.             Offset = 0
  148.         Side = -1
  149.     } Else {
  150.         StringTrimLeft, offset, offset, 3
  151.         If not Offset
  152.             Offset = 0
  153.         Side = 1
  154.     }
  155.     x := XCor - (Side + 1) / 2 * Thickness - Side * Offset
  156.     y := YCor - (Side + 1) / 2 * Thickness - Side * Offset
  157.     h := Height + Side * Thickness + Side * Offset * 2
  158.     w := Thickness
  159.     Gui 81:Show, x%x% y%y% w%w% h%h% NA
  160.     x += Thickness
  161.     w := Width + Side * Thickness + Side * Offset * 2
  162.     h := Thickness
  163.     Gui 82:Show, x%x% y%y% w%w% h%h% NA
  164.     x := x + w - Thickness
  165.     y += Thickness
  166.     h := Height + Side * Thickness + Side * Offset * 2
  167.     w := Thickness
  168.     Gui 83:Show, x%x% y%y% w%w% h%h% NA
  169.     x := XCor - (Side + 1) / 2 * Thickness - Side * Offset
  170.     y += h - Thickness
  171.     w := Width + Side * Thickness + Side * Offset * 2
  172.     h := Thickness
  173.     Gui 84:Show, x%x% y%y% w%w% h%h% NA
  174. }
  175.  
  176. RemoveBox()
  177. {
  178.     Gui 81:destroy
  179.     Gui 82:destroy
  180.     Gui 83:destroy
  181.     Gui 84:destroy
  182. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement