[Autoit] Auto Throw Boots

Posts 1–14 of 14 · Page 1 of 1

Hey, I Realized Bot who throw boots when you are A.F.K work good with Phising Bot.

How to use :
Only work with 1920 x 1080 FullScreen Mode.
Work with Mouse.
Pres ESC for Stop.
Press Pause for Pause.
Activate your phising Bot, Run the Throw Boots script and Open your inventory and go Sleep or what you want.

For use the script you can download AutoIt on the WebSite

And Paste the Code Below on a New Au3 Script and run the script

;-------------------------------------------------------------------------------
; Global Settings
;-------------------------------------------------------------------------------

#RequireAdmin
Global $pos[2]
Global $SleepTime = Random(1000, 2000, 1) ; Attente variable de 1 ou 2 secondes

;-------------------------------------------------------------------------------
; Raccourcis claviers
;-------------------------------------------------------------------------------

HotKeySet("{ESC}", "Stop") ; On assigne la fonction Stop (Pour quitter) à la touche 'Echap'.
HotKeySet("{PAUSE}", "TogglePause") ; On assigne la fonction Pause à la touche 'Pause'.

;-------------------------------------------------------------------------------
; Ouvre Trove
;-------------------------------------------------------------------------------

WinActivate("Trove") ; On affiche Trove en premier plan.

;-------------------------------------------------------------------------------
; Repeat Recherche de Botte
;-------------------------------------------------------------------------------

Call("Repeat")

Func Repeat()

While 1 ; On répete la recherche de la botte.
Call("search")
Wend
EndFunc

;-------------------------------------------------------------------------------
; Function de Recherche
;-------------------------------------------------------------------------------

search()

Func search()
$pos = PixelSearch( 1525, 150, 1920, 910, 0x443B28 ) ; On cherche une botte qui a pour couleur 0x443B28 dans la Zone de l'inventaire.
If IsArray($pos) Then ; Si on trouve la couleur ( botte ) alors,
Sleep($SleepTime)
MouseMove ($pos[0], $pos[1], 5) ; On déplace la souris sur la botte.
Sleep($SleepTime)
MouseClickDrag("left", $pos[0], $pos[1], 950, 540, 2) ; On jette la botte au milieu de l'écran.

EndIf
EndFunc

;-------------------------------------------------------------------------------
; Pause
;-------------------------------------------------------------------------------

Func TogglePause()
$g_bPaused = Not $g_bPaused
While $g_bPaused
Sleep(100)
ToolTip('Script is "Paused"', 0, 0)
WEnd
ToolTip("")
EndFunc ;==>TogglePause

;-------------------------------------------------------------------------------
; Quitter
;-------------------------------------------------------------------------------

Func Stop()
Exit 0
EndFunc ;==>Stop

; ~~Heck~~

Or download it here :

bit****/1fTjMdb

Sorry for my english and have a Good Day

You should mention that this only works in 1920x1080 Fullscreen Mode.
And btw - not all people can understand French so you should update
the comments aswell.

Yes Edit I Forgot it only work with 1920 x 1080 FullScreen

And 1 other thing i forgot <.<

You are searching for 1 specific pixel in on the Screen.
Collect 10 Boots and compare this Pixel with the other Boots and
you'll see that sometimes it will look different.

And also for other Computers it might happen that the selected
Color is different aswell.

What i want to say is -> Green is not always Green.

Color of the boots is always the same no ?

Originally Posted by Heck07

Color of the boots is always the same no ?

Not always, i used image recognition and had the problem, that i couldn't find
Boots in another Area because the color changed slightly.

On my screen color is the same everytime in every worlds

Tanks/Merci beaucoup !

How can I run this when it starts up as "Script Paused" then all you have is to stop the script AND pause the script. How in the world can this be activated?

Also I get this when i press "Pause"

http://gyazo.com/55d5b69a9b484b2d7ece27d2e965e878

you just have to run the script, And open your inventory and when you phising a boot the script drop the boot, thats all.

Originally Posted by Jerico555

How can I run this when it starts up as "Script Paused" then all you have is to stop the script AND pause the script. How in the world can this be activated?

Try to write

Code:

Global $g_bPaused= 0;

after this line

Code:

Global $SleepTime = Random(1000, 2000, 1) ; Attente variable de 1 ou 2 secondes

I didn't know much about Autoit, but this should work, logic is always the same in every language :P

English comments

;-------------------------------------------------------------------------------
; Global Settings
;-------------------------------------------------------------------------------

#RequireAdmin
Global $pos[2]
Global $SleepTime = Random(1000, 2000, 1) ; Random sleeptime from 1 up to 2
Global $g_bPaused= 0;

;-------------------------------------------------------------------------------
; HotKey Definitions
;-------------------------------------------------------------------------------

HotKeySet("{ESC}", "Stop") ; Stop the script with "escape" button
HotKeySet("{PAUSE}", "TogglePause") ; Pause the script with "pause" button

;-------------------------------------------------------------------------------
; Wait for active "Trove" Window Name
;-------------------------------------------------------------------------------

WinActivate("Trove") ; Wait for active "Trove" Window Name

;-------------------------------------------------------------------------------
; Function for repeating the search function
;-------------------------------------------------------------------------------

Call("Repeat")

Func Repeat()

While 1 ; Always repeat the search function for the boots
Call("search")
Wend
EndFunc

;-------------------------------------------------------------------------------
; Function to search for the boots
;-------------------------------------------------------------------------------

search()

Func search()
$pos = PixelSearch( 1525, 150, 1920, 910, 0x443B28 ) ; search for color in HEX 0x443B28 in your inventory
If IsArray($pos) Then ; If he founds the boots,
Sleep($SleepTime)
MouseMove ($pos[0], $pos[1], 5) ; Place the mouse over the boots
Sleep($SleepTime)
MouseClickDrag("left", $pos[0], $pos[1], 950, 540, 2) ; Drop the boots

EndIf
EndFunc

;-------------------------------------------------------------------------------
; Pause
;-------------------------------------------------------------------------------

Func TogglePause()
$g_bPaused = Not $g_bPaused
While $g_bPaused
Sleep(100)
ToolTip('Script is "Paused"', 0, 0)
WEnd
ToolTip("")
EndFunc ;==>TogglePause

;-------------------------------------------------------------------------------
; Quitter
;-------------------------------------------------------------------------------

Func Stop()
Exit 0
EndFunc ;==>Stop

; ~~Heck~~

My script is paused and cant do anything. Same error as Jerrico

Bonjour/Bonsoir le script consiste en quoi je n'ai pas compris :/

Salut, Le Script consiste a drop les botes drop lors de la pêche pour évité que ton invetaire sois remplie est que donc la pêche s'arrête donc à utilisé lorsque tu utilise un bot pour péché est que tu n'est pas sur ton pc car il utilise ta souris. Bon Jeux