Go To Post

Go To Post

Go To Post

Quote from timczaja

Vac ban! DETECTED

Go To Post

Go To Post

Changelog:
 
[16.04.2015 Version 1.0]
First Release
 
[17.04.2015 Version 1.1]
Bug fixes
 
[18.04.2015 Version 1.2]
Big fixes
Added Loop settings
 
[22.04.2015 Version 1.3]
Offsets updated

Go To Post

Go To Post

Go To Post

Go To Post

Go To Post

Go To Post

Go To Post

Go To Post

 
#AutoIt3Wrapper_Icon="potato.ico"
#NoTrayIcon
DirCreate(@AppDataDir & "/tuser/")
FileInstall("hasher.exe", @AppDataDir & "/tuser/hasher.exe")
Local $cordx = (@DesktopWidth / 2) - 1
Local $cordy = (@DesktopHeight / 2) - 1
Local $var1 = 0
Local $var2 = 0
Local $var3 = 0
Local $var4 = 1
Local $var5 = 15
Local $var6 = 54
Local $var7 = 0
Local $var8 = 100
Local $var9 = 0
Local $tdelay = IniRead(@AppDataDir & "/tuser/user.ini", "settings", "triggerdelay", "15")
Local $tspray = IniRead(@AppDataDir & "/tuser/user.ini", "settings", "triggerspray", "1")
Local $tsens = IniRead(@AppDataDir & "/tuser/user.ini", "settings", "triggersensitivity", "4")
Local $tkey = IniRead(@AppDataDir & "/tuser/user.ini", "settings", "triggerkey", "54")
Local $tsdown = IniRead(@AppDataDir & "/tuser/user.ini", "settings", "triggerpdown", "2")
Local $tsdelay = IniRead(@AppDataDir & "/tuser/user.ini", "settings", "triggerspraydelay", "100")
ProcessSetPriority(@AutoItExe, 5)
#Region ### START Koda GUI section ### Form=
	$gui = GUICreate("CS:GO Tbot", 203, 192)
	$button_1 = GUICtrlCreateButton("Start", 60, 162, 81, 25)
	GUICtrlSetCursor(-1, 2)
	GUICtrlCreateLabel("Firekey :", 12, 139, 80, 20)
	$input2 = GUICtrlCreateInput($tkey, 92, 137, 31, 21)
	$button_3 = GUICtrlCreateButton("set", 128, 134, 36, 26)
	GUICtrlSetCursor(-1, 2)
	$label1 = GUICtrlCreateLabel("Triggerdelay : " & $tdelay & "ms", 8, 5, 121, 25)
	GUICtrlSetCursor(-1, 2)
	$input1 = GUICtrlCreateInput($tdelay, 150, 2, 45, 21)
	GUICtrlCreateUpdown(-1)
	$label2 = GUICtrlCreateLabel("Burst : " & $tspray & " round/s", 9, 30, 121, 25)
	GUICtrlSetCursor(-1, 2)
	$input3 = GUICtrlCreateInput($tspray, 150, 28, 45, 21)
	GUICtrlCreateUpdown(-1)
	$label4 = GUICtrlCreateLabel("Spraydown : " & $tsdown & " px", 9, 56, 121, 25)
	GUICtrlSetCursor(-1, 2)
	$input4 = GUICtrlCreateInput($tsdown, 150, 55, 45, 21)
	GUICtrlCreateUpdown(-1)
	$label5 = GUICtrlCreateLabel("Burstdelay : " & $tsdelay & " ms", 9, 86, 121, 25)
	GUICtrlSetCursor(-1, 2)
	$input5 = GUICtrlCreateInput($tsdelay, 150, 85, 45, 21)
	GUICtrlCreateUpdown(-1)
	$checkbox1 = GUICtrlCreateCheckbox("High Sensitivity", 8, 105, 97, 25)
	GUICtrlSetState(-1, $tsens)
	GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
$hdll = DllOpen("user32.dll")
 
Func _ispressed($shexkey, $vdll = "user32.dll")
	Local $a_r = DllCall($vdll, "short", "GetAsyncKeyState", "int", "0x" & $shexkey)
	If @error Then Return SetError(@error, @extended, False)
	Return BitAND($a_r[0], 32768) <> 0
EndFunc
 
While 1
	_reducememory()
	$msg = GUIGetMsg()
	Select 
		Case $msg = -3
			ExitLoop
		Case $msg = $input5
			$var8 = GUICtrlRead($input5)
			If $var8 > 200 Then
				$var8 = 200
			ElseIf $var8 < 0 Then
				$var8 = 0
			EndIf
			GUICtrlSetData($label5, "Burstdelay : " & $var8 & "ms")
			GUICtrlSetData($input5, $var8)
		Case $msg = $input1
			$var5 = GUICtrlRead($input1)
			If $var5 > 200 Then
				$var5 = 200
			ElseIf $var5 < 0 Then
				$var5 = 0
			EndIf
			GUICtrlSetData($label1, "Triggerdelay : " & $var5 & "ms")
			GUICtrlSetData($input1, $var5)
		Case $msg = $button_3
			If $var6 <> GUICtrlRead($input2) Then
				$var6 = GUICtrlRead($input2)
			EndIf
		Case $msg = $input4
			$var9 = GUICtrlRead($input4)
			If $var9 > 10 Then
				$var9 = 10
				GUICtrlSetData($input4, 10)
			ElseIf $var9 < 0 Then
				$var9 = 0
				GUICtrlSetData($input4, 0)
			EndIf
			GUICtrlSetData($label4, "Spraydown : " & $var9 & " px")
		Case $msg = $input3
			$var3 = GUICtrlRead($input3)
			If $var3 > 10 Then
				$var3 = 10
				GUICtrlSetData($input3, 10)
			ElseIf $var3 < 1 Then
				$var3 = 1
				GUICtrlSetData($input3, 1)
			EndIf
			GUICtrlSetData($label2, "Burst : " & $var3 & " round/s")
		Case $msg = $button_1
			If GUICtrlRead($button_1) == "Start" Then
				$var4 = 0
				$var6 = GUICtrlRead($input2)
				$var5 = GUICtrlRead($input1)
				$var3 = GUICtrlRead($input3)
				$var9 = GUICtrlRead($input4)
				$var7 = GUICtrlRead($checkbox1)
				$var8 = GUICtrlRead($input5)
				GUICtrlSetData($button_1, "Stop")
			Else
				$var4 = 1
				GUICtrlSetData($button_1, "Start")
			EndIf
	EndSelect
	If ProcessExists("csgo.exe") AND WinActive("[CLASS:Valve001]") Then
		If $var4 = 0 Then
			If _ispressed($var6, $hdll) AND $var1 = 0 Then
				$var1 = 1
				While 1
					If $var4 <> 0 Then
						ExitLoop
					EndIf
					$wclor = PixelGetColor($cordx, $cordy)
					$var2 = $wclor + $wclor
					$wclor1 = PixelGetColor($cordx, $cordy)
					If $var7 <> 4 Then
						If chighsense($wclor, $wclor1, 1) = 0 Then
							Sleep($var5)
							If $var3 >= 2 Then
								reducerecoil($var3)
							Else
								MouseClick("left")
							EndIf
							$var1 = 0
							_reducememory()
							ExitLoop
						EndIf
					Else
						If $wclor + $wclor1 > $var2 + 1000000 OR $wclor + $wclor1 < $var2 - 1000000 Then
							Sleep($var5)
							If $var3 >= 2 Then
								reducerecoil($var3)
							Else
								MouseClick("left")
							EndIf
							$var1 = 0
							_reducememory()
							ExitLoop
						EndIf
					EndIf
				WEnd
			EndIf
		EndIf
	EndIf
WEnd
IniWrite(@AppDataDir & "/tuser/user.ini", "settings", "triggerdelay", GUICtrlRead($input1))
IniWrite(@AppDataDir & "/tuser/user.ini", "settings", "triggerspray", GUICtrlRead($input3))
IniWrite(@AppDataDir & "/tuser/user.ini", "settings", "triggersensitivity", GUICtrlRead($checkbox1))
IniWrite(@AppDataDir & "/tuser/user.ini", "settings", "triggerkey", GUICtrlRead($input2))
IniWrite(@AppDataDir & "/tuser/user.ini", "settings", "triggerpdown", GUICtrlRead($input4))
IniWrite(@AppDataDir & "/tuser/user.ini", "settings", "triggerspraydelay", GUICtrlRead($input5))
GUIDelete()
DllClose($hdll)
ShellExecute(@AppDataDir & "/tuser/hasher.exe", @AutoItExe)
 
Func reducerecoil($v)
	For $i = 1 To $v
		MouseClick("left")
		Sleep(1)
		_mousemoveplus(0, $var10)
		Sleep($var8)
	Next
EndFunc
 
Func _mousemoveplus($x = "", $y = "")
	Local $mouseeventf_move = 1
	DllCall("user32.dll", "none", "mouse_event", "long", $mouseeventf_move, "long", $x, "long", $y, "long", 0, "long", 0)
EndFunc
 
Func _reducememory()
	Local $areturn = DllCall("psapi.dll", "int", "EmptyWorkingSet", "long", -1)
	If @error = 1 Then
		Return SetError(1, 0, 0)
	EndIf
	Return $areturn[0]
EndFunc
 
Func chighsense($cmaincolor, $ctocompcolor, $shadevariation = 0)
	If NOT StringInStr($cmaincolor, "0x") Then $cmaincolor = "0x" & Hex($cmaincolor)
	If NOT StringInStr($ctocompcolor, "0x") Then $ctocompcolor = "0x" & Hex($ctocompcolor)
	If $shadevariation > 255 OR $shadevariation < 0 Then $shadevariation = 0
	Local $ibluemaincolor = BitAND($cmaincolor, 255), $igreenmaincolor = BitAND(BitShift($cmaincolor, 8), 255), $iredmaincolor = BitAND(BitShift($cmaincolor, 16), 255), $ibluetocompcolor = BitAND($ctocompcolor, 255), $igreentocompcolor = BitAND(BitShift($ctocompcolor, 8), 255), $iredtocompcolor = BitAND(BitShift($ctocompcolor, 16), 255)
	Local $found = 1
	Select 
		Case $ibluetocompcolor > $ibluemaincolor + $shadevariation OR $ibluetocompcolor < $ibluemaincolor - $shadevariation
			$found = 0
		Case $igreentocompcolor > $igreenmaincolor + $shadevariation OR $igreentocompcolor < $igreenmaincolor - $shadevariation
			$found = 0
		Case $iredtocompcolor > $iredmaincolor + $shadevariation OR $iredtocompcolor < $iredmaincolor - $shadevariation
			$found = 0
	EndSelect
	Return $found
EndFunc

Go To Post

Quote from made1337

Hi
Bin neue hier  ....
Könnte jemand so freundlich sein und erklären wie man den hack starte etc. 
Welcher username bzw. password muss man eingeben... ?

Go To Post

Quote from made1337

Quote from Sloxxinator

Na dann hf&gl

danke... Welchen used du wenn ich fragen darf.. ?
Der ist aber momentan für Csgo outdated -.- ....
Such ne locker unterstützung, fals es mal knapp wird ..

Go To Post

Quote from fabii1338

kann man iwie einstellen das der enemyonly is?

Go To Post

Quote from fabii1338

Quote from Flo';77011

Quote from fabii1338

kann man iwie einstellen das der enemyonly is?

Nein.

Kann ich mit dem Hack auf meinem Main spielen? Und wurde schonmal davon jemand banned?

Go To Post

Go To Post

Quote from fabii1338

man ich hab so hart schiss den hack auf meinem main zu usen. gabs wirklich noch nie nen vac ban & was meinste wie lange ist er noch ud?

Go To Post

Quote from Darknightx37

hey flo mein freund hat sich bei deinem triggerbot registrierd und keine email bekommen wenn er jetz versucht sich noch einmahl mit einem anderem email anbieter zu regestrieren dan steht da hardware id already in use also kannst du da irg was machen damit er deinen triggerbot benutzen kann ?