autoit bot making

04/21/2014 22:56 marawanhany87#1

hi guys :)

as you see I am new

I wanted some help in making a bot it goes like this

what I wrote

the bot while circle around the points I have given

the mouse will click in the points I have given which while make the char move

and when the pixel detector (probably when you read pixel thing while think I am pro , no I took it from another post :D) detects something the bot will stop moving and click on the detected object until the character takes the object and then continue boting

and when I press esc it closes

proplems

when I press esc nothing happen

when it detects some thing it click on it the char go get it and then the bot doesn't continue

the script

:

Quote:

Local $nar = 1
; Script Start - Add your code below here
If _IsPressed ("1B") Then
$nar = 0
EndIf

$coor = PixelSearch( 170, 0, 1200, 720, 0xCA6AF1, 5, 1 )
If @error = 1 then
while $nar=1
MouseClick("right")
MouseMove ( 650 , 100)
MouseClick("left")
sleep (500)
MouseClick("right")

MouseClick("right")
MouseMove ( 650 , 50)
MouseClick("left")
sleep (500)
MouseClick("right")

MouseClick("right")
MouseMove ( 850 , 300)
MouseClick ("left")
sleep (500)
MouseClick("right")

MouseClick("right")
MouseMove ( 850 , 200)
MouseClick ("left")
sleep (500)
MouseClick("right")

MouseClick("right")
MouseMove ( 1050 , 400)
MouseClick ("left")
sleep (500)
MouseClick("right")

MouseClick("right")
MouseMove ( 1050 , 300)
MouseClick ("left")
sleep (500)

MouseClick("right")
MouseMove ( 850 , 500)
MouseClick ("left")
sleep (500)
MouseClick("right")

MouseClick("right")
MouseMove ( 850 , 600)
MouseClick ("left")
sleep (500)
MouseClick("right")

MouseClick("right")
MouseMove ( 650 , 600)
MouseClick ("left")
sleep (500)
MouseClick("right")

MouseClick("right")
MouseMove ( 650 , 600)
MouseClick ("left")
sleep (500)

MouseClick("right")
MouseMove ( 450 , 500)
MouseClick ("left")
sleep (500)
MouseClick("right")

MouseClick("right")
MouseMove ( 450 , 600)
MouseClick ("left")
sleep (500)
MouseClick("right")

MouseClick("right")
MouseMove ( 250 , 300)
MouseClick ("left")
sleep (500)
MouseClick("right")

MouseClick("right")
MouseMove ( 250 , 400)
MouseClick ("left")
sleep (500)
MouseClick("right")

MouseClick("right")
MouseMove ( 450 , 200)
MouseClick ("left")
sleep (500)
MouseClick("right")

MouseClick("right")
MouseMove ( 450 , 300)
MouseClick ("left")
sleep (500)
MouseClick("right")
WEnd

Elseif @error = 0 Then
$nar = 0
MouseClick( "left" ,$coor[0] , $coor [1] , 3)
sleep (2000)
$coor = PixelSearch( 170, 0, 1200, 720, 0xCA6AF1, 5, 1 )

ElseIf _IsPressed ("1B") <--- poor try
sleep (9999999999)
EndIf

mouse click left to move

mouse click right to attack

the last else if is a idiot try I added

please any one help me with it and fast :confused:

thanks

04/21/2014 23:23 Paraly#2

Your at the wrong section
Try this..

PHP Code:


			
HotKeySet("{ESC}","_ExitByEscape")

while 1
$coor = PixelSearch( 170, 0, 1200, 720, 0xCA6AF1, 5, 1 )
If @error = 1 then
while 1
MouseClick("right")
MouseMove ( 650 , 100)
MouseClick("left")
sleep (500)
MouseClick("right")

MouseClick("right")
MouseMove ( 650 , 50)
MouseClick("left")
sleep (500)
MouseClick("right")

MouseClick("right")
MouseMove ( 850 , 300)
MouseClick ("left")
sleep (500)
MouseClick("right")

MouseClick("right")
MouseMove ( 850 , 200)
MouseClick ("left")
sleep (500)
MouseClick("right")

MouseClick("right")
MouseMove ( 1050 , 400)
MouseClick ("left")
sleep (500)
MouseClick("right")

MouseClick("right")
MouseMove ( 1050 , 300)
MouseClick ("left")
sleep (500)

MouseClick("right")
MouseMove ( 850 , 500)
MouseClick ("left")
sleep (500)
MouseClick("right")

MouseClick("right")
MouseMove ( 850 , 600)
MouseClick ("left")
sleep (500)
MouseClick("right")

MouseClick("right")
MouseMove ( 650 , 600)
MouseClick ("left")
sleep (500)
MouseClick("right")

MouseClick("right")
MouseMove ( 650 , 600)
MouseClick ("left")
sleep (500)

MouseClick("right")
MouseMove ( 450 , 500)
MouseClick ("left")
sleep (500)
MouseClick("right")

MouseClick("right")
MouseMove ( 450 , 600)
MouseClick ("left")
sleep (500)
MouseClick("right")

MouseClick("right")
MouseMove ( 250 , 300)
MouseClick ("left")
sleep (500)
MouseClick("right")

MouseClick("right")
MouseMove ( 250 , 400)
MouseClick ("left")
sleep (500)
MouseClick("right")

MouseClick("right")
MouseMove ( 450 , 200)
MouseClick ("left")
sleep (500)
MouseClick("right")

MouseClick("right")
MouseMove ( 450 , 300)
MouseClick ("left")
sleep (500)
MouseClick("right")
WEnd

Elseif @error = 0 Then
MouseClick( "left" ,$coor[0] , $coor [1] , 3)
sleep (2000)
$coor = PixelSearch( 170, 0, 1200, 720, 0xCA6AF1, 5, 1 )
EndIf
WEnd

Func _ExitByEscape()
    Local $i = 5
    Do
    ToolTip("Bot will be close in " & $i & " seconds..",@DesktopWidth * 0.5,0)
    Sleep(1000)
    $i -= 1
    Until $i = 0
    Exit
EndFunc

04/22/2014 10:32 Pyrolex#3

#moved

04/22/2014 18:16 marawanhany87#4

Thanks man will try the code and tell you but thanks for th3 fast respond