You last visited: Today at 18:30
Advertisement
[Release]Sniper Bot + Source Code[au3]
Discussion on [Release]Sniper Bot + Source Code[au3] within the S4 League Hacks, Bots, Cheats & Exploits forum part of the S4 League category.
02/01/2015, 02:42
#1
elite*gold: 0
Join Date: Jan 2015
Posts: 27
Received Thanks: 1
[Release]Sniper Bot + Source Code[au3]
.-.|-.-
Hi,
How to?
1*Start s4League with Bypass
2*Start "[Sniper]Bot.exe"
3*Have Fun
Note!11?!
*F1 = Start
*F2 = Stop
*F4 = quit
Video
VirusTotal
https://www.virustotal.com/tr/file/8c4d460ef98bed696805d1ee276745631d50a67825a26a5a64 4fc6c5d04abb79/analysis/1422753807/
Source:
Code:
#RequireAdmin
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <NomadMemory.au3>
HotKeySet("{F1}","_pressf1")
HotKeySet("{F2}","_pressf2")
HotKeySet("{F4}","_quitter")
Global $wid = @DesktopWidth / 2, $hei = @DesktopHeight / 2
Global $dl = DllOpen("user32.dll")
Global $o = 0
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("XHRe Sniper[Bot]", 281, 255, 192, 124)
GUISetIcon("D:\333sa.ico", -1)
GUISetBkColor(0xFFFFFF)
$Group1 = GUICtrlCreateGroup("Sniper Bot", 8, 8, 185, 121)
$Button1 = GUICtrlCreateButton("Start Bot!", 16, 24, 171, 25, $BS_FLAT)
$Button2 = GUICtrlCreateButton("Stop Bot!", 16, 55, 171, 25, $BS_FLAT)
GUICtrlSetState(-1, $GUI_DISABLE)
$Input1 = GUICtrlCreateInput("0.10", 16, 96, 169, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_CENTER))
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Label2 = GUICtrlCreateLabel("F1: Start Bot !", 200, 16, 69, 17)
$Label3 = GUICtrlCreateLabel("F2: Stop Bot !", 200, 40, 69, 17)
$Group2 = GUICtrlCreateGroup("Cam Hack", 8, 136, 185, 89)
$Label6 = GUICtrlCreateLabel("Cam", 96, 152, 25, 17)
$Input2 = GUICtrlCreateInput("350", 16, 168, 169, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_CENTER))
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Label7 = GUICtrlCreateLabel("F3: Cam Hack!", 200, 64, 75, 17)
$Label4 = GUICtrlCreateLabel("XHRe", 200, 88, 53, 17)
msgbox(0, "Information", "F1 Start - F2 Stop - F4 quit")
TrayTip("XHRe Bot" , "F1 Start - F2 Stop - F4 quit" , 0)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
case $Button1
GUICtrlSetState($Button1, $gui_disable)
GUICtrlSetState($Button2, $gui_enable)
Global $o = 1
Case $Button2
GUICtrlSetState($Button1, $gui_enable)
GUICtrlSetState($Button2, $gui_disable)
Global $o = 0
Case $Button3
_pressf3()
EndSwitch
If _pressedon() Then
If NOT $o = 1 Then
GUICtrlSetState($Button1, $gui_disable)
GUICtrlSetState($Button2, $gui_enable)
Global $o = 1
EndIf
EndIf
If _pressedoff() Then
If NOT $o = 0 Then
GUICtrlSetState($Button1, $gui_enable)
GUICtrlSetState($Button2, $gui_disable)
Global $o = 0
EndIf
EndIf
If $o = 1 Then
PixelSearch($wid, $hei, 20, 300, 16711680, 10)
If NOT @error AND _pressedleft() Then MouseClick("left")
Sleep(GUICtrlRead($Input1))
EndIf
WEnd
Func _pressedleft()
Local $a_r = DllCall($dl, "short", "GetAsyncKeyState", "int", "0x01")
If @error Then Return SetError(@error, @extended, False)
Return BitAND($a_r[0], 32768) <> 0
EndFunc
Func _pressedon()
Local $a_r = DllCall($dl, "short", "GetAsyncKeyState", "int", "0x7B")
If @error Then Return SetError(@error, @extended, False)
Return BitAND($a_r[0], 32768) <> 0
EndFunc
Func _pressedoff()
Local $a_r = DllCall($dl, "short", "GetAsyncKeyState", "int", "0x7A")
If @error Then Return SetError(@error, @extended, False)
Return BitAND($a_r[0], 32768) <> 0
EndFunc
Func _pressf1()
GUICtrlSetState($Button1, $gui_disable)
GUICtrlSetState($Button2, $gui_enable)
Global $o = 1
EndFunc
Func _pressf2()
GUICtrlSetState($Button1, $gui_enable)
GUICtrlSetState($Button2, $gui_disable)
Global $o = 0
EndFunc
Attached Files
[Sniper]Bot.rar
(419.4 KB, 244 views)
02/01/2015, 02:45
#2
elite*gold: 45
Join Date: Jun 2012
Posts: 3,997
Received Thanks: 2,348
Wtf old video srsly
02/01/2015, 02:45
#3
elite*gold: 0
Join Date: Mar 2014
Posts: 2,790
Received Thanks: 6,654
Old S4League !? oO
02/01/2015, 02:46
#4
elite*gold: 0
Join Date: Jan 2015
Posts: 27
Received Thanks: 1
Quote:
Originally Posted by
#Lucas#
Old S4League !? oO
1.2.2015 Work?
02/01/2015, 02:48
#5
elite*gold: 0
Join Date: Mar 2014
Posts: 2,790
Received Thanks: 6,654
Quote:
Originally Posted by
XHRe
1.2.2015 Work?
02/01/2015, 02:51
#6
elite*gold: 0
Join Date: Jan 2015
Posts: 27
Received Thanks: 1
Quote:
Originally Posted by
#Lucas#
This is video....
02/01/2015, 02:52
#7
elite*gold: 0
Join Date: Aug 2013
Posts: 1,996
Received Thanks: 1,842
Quote:
Originally Posted by
#Lucas#
That is just the video, Used to explain what the bot does. XD
02/01/2015, 02:53
#8
elite*gold: 0
Join Date: Jan 2015
Posts: 27
Received Thanks: 1
Quote:
Originally Posted by
Djordyy
That is just the video, Used to explain what the bot does. XD
Yea, thx!11!!
02/01/2015, 02:58
#9
elite*gold: 0
Join Date: Mar 2014
Posts: 2,790
Received Thanks: 6,654
Quote:
Originally Posted by
XHRe
Yea, thx!11!!
Ok, then
NICE WORK dude
02/01/2015, 03:27
#10
elite*gold: 0
Join Date: Aug 2013
Posts: 1,996
Received Thanks: 1,842
I don't think it works xD
It's not shooting,
And when i aim,
And then press F1 it shoots.
02/01/2015, 03:33
#11
elite*gold: 0
Join Date: Jan 2015
Posts: 27
Received Thanks: 1
Quote:
Originally Posted by
Djordyy
I don't think it works xD
It's not shooting,
And when i aim,
And then press F1 it shoots.
But work!!!
1*Run hack
2*start s4/bypass fififi.
3*PRESS F1
4AND HAVE FUN
02/01/2015, 03:34
#12
elite*gold: 0
Join Date: Aug 2013
Posts: 1,996
Received Thanks: 1,842
Quote:
Originally Posted by
XHRe
xD I did lol, It didnt work
02/01/2015, 03:52
#13
elite*gold: 0
Join Date: Jan 2015
Posts: 27
Received Thanks: 1
Quote:
Originally Posted by
Djordyy
xD I did lol, It didnt work
HaHaHa
02/01/2015, 04:03
#14
elite*gold: 0
Join Date: Jan 2015
Posts: 30
Received Thanks: 10
tHANKS
02/01/2015, 06:30
#15
elite*gold: 0
Join Date: Jul 2014
Posts: 272
Received Thanks: 252
Lol This snipe bot never stopped working. Forum is just filling up with a bunch of useless repetitive threads....
Similar Threads
[RELEASE(SOURCE CODE)]-- KabBOT2 v1 Full Source(vb6)
10/07/2011 - Dekaron Exploits, Hacks, Bots, Tools & Macros - 106 Replies
I've been meaning to post this for awhile but I pretty much forgot about it. I've been getting quite a few requests for it so I decided to finally get around to posting it.
#1. So here you go, Just have or Download Visual Basic 6, you need to update it to VbRuntime 6 Service Pack 6.
#2. Run the file name KabBOT.vbp.
#3. Enjoy.
100% Virus Free VirusTotal.com report.
VirusTotal - Free Online Virus, Malware and URL Scanner
[RELEASE] [OPEN SOURCE] CE 5.5 Pointer to AutoIt Source-Code
02/13/2011 - AutoIt - 6 Replies
Habe heute erst gemerkt, dass es hier eine AutoIt Sektion gibt xD also poste ich mal mein Programm mit rein.
Funktionsweise:
1. in CE Rechtsklick auf den Pointer und auf "Copy" klicken
2. in meinem Programm auf "Code generieren" klicken
3. In euer Scite gehen und einfügen
Hier ist der Source Code vom Programm:
All times are GMT +2. The time now is 18:31 .