Hello, I need a bot that can do the following.
Search for pixel
Click on found pixel
Wait ## seconds
Repeat
OR
Search for pixel
Press F# key
Click on found pixel
Wait ## seconds
Repeat
Also it would be useful if I could edit settings (using the gui) such as
pixel code #
## of seconds
F# key enable/disable use
add items/set their pixel code
search for multiple pixels (items) at once
If possible there could be a list of items (instead of pixel codes). So I can pick "item 1" using the gui and it would search for the pixel code corresponding to that item. Thank you for your time.
I have an example script of what I'm looking for but it's not exactly it. I wish I knew how to code but I don't, so I need your help. Thanks again.
WinActivate("Pi")
WinWaitActive("Pi")
Opt("PixelCoordMode", 2);1=absolute, 0=relative, 2=client
Opt("MouseCoordMode", 2);1=absolute, 0=relative, 2=client
;~ Below is some pixel colors to use for certain items.
;~ 0xEBB5D6 item1
;~ 0x844952 item2
;~ 0x295118 item3
;~ 0x538BA7 item4
;~ 0xF7D7BD item5
;~ 0xCE9231 item6
;~ 0x6B3021 item7
;~ 0xDE7573 item8
;~ 0xB56508 item9
;~ 0x393894 item10
;~ 0x5265CE item11
;~ 0x84DF52 item12
;~ 0xF77500 item13
;~ 0x39FBBD item14
$Monsters = 0xDE7573; Pixel color being searched for
$lowhealth = 85; makes character auto sit if health is 40% left
$Shadevar = 0
$Attack = 0
While $Attack = 0
$coord = PixelSearch(1, 1, 780, 580, $Monsters, 1);$Shadevar); Looking for the Pixel "Left,Top,Right,Bottom"
If Not @error Then
;~ MsgBox(0, "Pixel", "monster" & $Shadevar, 6)
;~ MsgBox(0, "Location", "x coords" & $coord[0] & "y coords" & $coord[1],2)
MouseClick("left", $coord[0], $coord[1], 3, 4); clicking the pixel
Sleep(3000);wait 5 seconds before picking up items
;~ Call("PickupDrops")
Send("^a")
sleep(1000)
Call("checkandheal")
$Shadevar = 0
If _IsPressed("23") Then $Attack = 1;if "end" is pressed then this will make $DryMystic=1 so the loop will stop
Else
$Shadevar = $Shadevar + 1;increase allowable shade variation by 1 until shade is found
EndIf
WEnd
MsgBox(0, "Bot Disabled", "You turned off the Bot!");Window name , text in the msgBox saying Bot is off !
Func checkandheal()
$coord = PixelSearch(75, 26, 183, 31, 0x538BA7, 5)
If Not @error Then
;~ MsgBox(0,"location","the x-location of the found pixelis "& $coord[0])
$healthlvl = (($coord[0] - 75) / (183 - 75)) * 100
If $healthlvl < $lowhealth Then
Send("{INS}")
$h = 0
$attack = 1
While $h = 0
Sleep(33000); 30 seconds of heal time.
PixelSearch(75, 26, 183, 31, 0x538BA7)
If @error Then
$h = 1
Send("{INS}")
sleep(1000)
$attack = 0
EndIf
WEnd
EndIf
EndIf
EndFunc;==>checkandheal