|
You last visited: Today at 21:45
Advertisement
[DEV] AU3 Glitter Bot
Discussion on [DEV] AU3 Glitter Bot within the Seafight forum part of the Browsergames category.
07/12/2014, 19:07
|
#1
|
elite*gold: 0
Join Date: May 2014
Posts: 17
Received Thanks: 4
|
[PRJ] Au3 SF Bot
This is the First official version of my bot coded with AUTOIT
Features :
- Auto Collect Glitter Box
- Auto Navigate into the Sea
Requirements
- AutoIt3 to compile it
- 
How to :
- Put the number of Click to do ,
- Move to your browser window ( I use Chrome )
- Press F2 and the bot will do all.
- F3 to close it.
It've a lot of bug to fix, and everyday i'll update it 
If you want you can help me to Edit and Upgrade it.
CODE :
HTML Code:
;~ GUI & CODE by : Hiutaky
;~ This code is Open Source and anyone can Edit It a Share It, but please don't remove copyright
;~ Version : 0.1
;~ Features :
;~ - Collect Glitter Box
;~ - Auto-Navigate into the Sea
;~ Coded with : AutoIt v 3
;~ Copyright Hiutaky | Inforge | EPVP
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
HotKeySet("{F2}", "_Start")
HotKeySet("{F3}", "_Stop")
Global $i, $cCoord
$Form1 = GUICreate("AU3 Seafight Bot", 235, 340, 252, 374)
$Edit1 = GUICtrlCreateEdit("", 8, 96, 217, 209)
$Button1 = GUICtrlCreateButton("Start", 72, 64, 83, 25)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
$Input1 = GUICtrlCreateInput("", 8, 32, 217, 21)
$Label1 = GUICtrlCreateLabel("Click to do :", 8, 8, 85, 20)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
$Label2 = GUICtrlCreateLabel("F2 Start", 8, 312, 70, 24)
GUICtrlSetFont(-1, 12, 800, 0, "MS Sans Serif")
$Label3 = GUICtrlCreateLabel("F3 Stop", 160, 312, 68, 24)
GUICtrlSetFont(-1, 12, 800, 0, "MS Sans Serif")
GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
Func _Start()
$todo = GUICtrlRead($Input1)
For $i = 0 To $todo Step +1
Local $aCoord = PixelSearch(22, 92, 1898, 1016, 0x000000)
If Not @error Then
MouseClick("Left", $aCoord[0] - 10, $aCoord[1] - 10)
Sleep(1000)
$b = 1
While $b
$aShip = PixelSearch(22, 92, 1898, 1016, 0xDE0000)
$bCoord = PixelSearch($aShip[0] - 50, $aShip[1] - 50, $aShip[0] + 50, $aShip[1] + 50, 0x000000)
If Not @error Then
Sleep(1000)
$cCoord = PixelSearch($aShip[0] - 50, $aShip[1] - 50, $aShip[0] + 50, $aShip[1] + 50, 0x000000)
MouseClick("Left", $cCoord[0] + 5, $cCoord[1] + 5)
Sleep(1500)
$b = 0
Else
$b = 1
EndIf
WEnd
$String = GUICtrlRead($Edit1) & @CRLF & @HOUR & ":" & @MIN & ":" & @SEC & " - " & "Mouse Move = " & $aCoord[0] + 5 & " - " & $aCoord[1] + 5
GUICtrlSetData($Edit1, $String)
Else
$a = 1
While $a
$RanX = Random(22, 1898, 1)
$RanY = Random(92, 1016, 1)
$_get = Hex(PixelGetColor($RanX, $RanY))
If $_get = "0000253B" Then
MouseClick("Left", $RanX, $RanY)
Sleep(8000)
$a = 0
EndIf
WEnd
EndIf
Next
EndFunc
Func _Stop()
Exit
EndFunc
OLD VERSION:
This version of bot is only a bit of line of source,
I've started this to make a Free Bot.
You need to use Osvaldo Custom Client, then click F5 and the bot start (Y)
It have a lot of bug and the code is a very shit, but if anyone who know autoit edit it, and post the code here, finally we've a Nice Bot (Y)
CODE :
HTML Code:
For $i=0 to 100 step +1
Local $aCoord = PixelSearch(22, 92, 1898, 1016, 0x000000)
If Not @error Then
MouseClick("left", $aCoord[0]+ 10,$aCoord[1]+10)
Sleep(10000)
Else
$ranx = Random( 22,1898,1)
$rany = Random( 92,1016,1)
MouseClick("left", $ranx, $rany )
Sleep(10000)
EndIf
next
This version is for 1920 x 1080 resolution! ( FULL HD )
In future i'll post the other version, or you can edit it by urself.
|
|
|
07/12/2014, 19:08
|
#2
|
elite*gold: 0
Join Date: Jun 2014
Posts: 235
Received Thanks: 49
|
Thank you !
|
|
|
07/12/2014, 19:10
|
#3
|
elite*gold: 0
Join Date: May 2014
Posts: 17
Received Thanks: 4
|
No problem man, it's only the 10% of a complete bot, in the future i'll update it.
Hope you help me (Y)
|
|
|
07/14/2014, 13:29
|
#4
|
elite*gold: 0
Join Date: May 2014
Posts: 17
Received Thanks: 4
|
UP
|
|
|
07/14/2014, 14:32
|
#5
|
elite*gold: 50
Join Date: Oct 2012
Posts: 711
Received Thanks: 83
|
how to run this bot?
|
|
|
07/14/2014, 15:10
|
#6
|
elite*gold: 130
Join Date: Sep 2010
Posts: 262
Received Thanks: 160
|
Hey,
Good begining but in this moment your bot can make only a mouse click and sleep. You are far away to make a full bot but good luck for the next steps
|
|
|
07/14/2014, 16:52
|
#7
|
elite*gold: 0
Join Date: May 2014
Posts: 17
Received Thanks: 4
|
#UPDATED CODE
Features :
- Auto Collect Glitter Box
- Auto Navigate into the Sea
|
|
|
Similar Threads
|
Glitter bot ?
03/28/2014 - Seafight - 4 Replies
Hello
Someone can give me a glitter bot , who works ?
Why explication please , i'm not good with scar , if possible explain in a video :rolleyes:
Thanks
Sorry for my vocabulary
|
glitter bot
01/17/2014 - Seafight - 3 Replies
anyone have or pass me this bot?
PegaBrilho V 2.5 SeaFight - YouTube
|
Glitter bot
12/30/2013 - Seafight - 0 Replies
Polish:
Szukam działającego bota na boniki opierającego się na fiddlerze i scar divi.
English:
Im looking for bot for glitters which i need use fiddler and scar divi.
|
Glitter Bot
12/27/2013 - Seafight - 2 Replies
Hi i search a Glitter Farm Bot.
Hi ich suche einen Glitter Farm Bot. Ich hab zwar schon paar Videos angesehn und auch probiert aber das problem ist: sie funktionieren nicht, oder man braucht ein pw für 20€ oder noch mehr.
|
glitter bot?
01/19/2012 - Browsergames - 9 Replies
hello all somebody try this bot?
seafight bot - YouTube
becouse i want buy , but iam not sure if its fake or not
|
All times are GMT +1. The time now is 21:46.
|
|