Bhop and Autostrafe source Autoit

 
Global $aus = 1
Global $autostrafe = 1
func bhop()
_memorywrite($baseaddr + $jumpoffset, $Open, 4)
 
 
dim $pos[2] = [@DesktopWidth/2, @DesktopHeight/2]
While 1
if Not _IsPressed(20) Then
if $aus = 0 Then
_memorywrite($baseaddr + $leftoffset, $Open, 0)
_memorywrite($baseaddr + $rightoffset, $Open, 0)
$aus = 1
EndIf
whiles()
EndIf
if $autostrafe = 0 Then
$flags = _MemoryRead($playerbaseREAD + $flagsoffset, $Open)
if $flags = 257 Then
_memorywrite($baseaddr + $jumpoffset, $Open, 5)
sleep(5)
_memorywrite($baseaddr + $jumpoffset, $Open, 4)
 
_memorywrite($baseaddr + $jumpoffset, $Open, 5)
sleep(5)
_memorywrite($baseaddr + $jumpoffset, $Open, 4)
EndIf
Else
 
$pos2 = MouseGetPos()
$flags = _MemoryRead($playerbase + $flagsoffset, $Open)
if $flags = 257 Then
_memorywrite($baseaddr + $jumpoffset, $Open, 5)
sleep(5)
_memorywrite($baseaddr + $jumpoffset, $Open, 4)
 
_memorywrite($baseaddr + $jumpoffset, $Open, 5)
sleep(5)
_memorywrite($baseaddr + $jumpoffset, $Open, 4)
EndIf
$aus = 0
if $pos[0]  < $pos2[0] then
_memorywrite($baseaddr + $leftoffset, $Open, 0)
_memorywrite($baseaddr + $rightoffset, $Open, 1)
EndIf
if $pos[0] > $pos2[0] then
_memorywrite($baseaddr + $leftoffset, $Open, 1)
_memorywrite($baseaddr + $rightoffset, $Open, 0)
EndIf
EndIf
WEnd
 
Endfunc