get coordinates and color of mouse

[freyaharts]

getting coords is working fine but getting the color gives me error

expandcollapse popup

HotKeySet ("{esc}", "_Exit")

#include <Misc.au3>

$Coords = AskUser()
call ("Start")


Func AskUser()
    MsgBox(0, "User Input", "Please click mouse your screen" & @CRLF & "Press OK, and then move your mouse there and click")
    Do
        Sleep(50)
    Until _IsPressed(01)
    $Coords = MouseGetPos()
Local $Color = PixelGetColor($coords[0], $coords[1])
    
    MsgBox(0, "info", "Your coords and color have been stored for later use")
    Return $Coords
EndFunc 




Func Start()
While 1

if pixelgetcolor($coords[0],$coords[1]) = $Color  then
   sleep (200)
   ;run whole script

Else
   sleep (100)
   endif

wend
EndFunc



Func _Exit()
Exit
EndFunc

 

 

Edited July 29, 2017 by freyaharts

[Jos]

1 hour ago, freyaharts said:

please help me

With what exactly? Is anything not working?

Jos

[freyaharts]

when i run it .. it doesnt seem set the value and my whole script loop didnt work

[Jos]

Which value? It really would help to be much more specific.
You have an msgbox() in there ...  what is shown?
When I run it it works fine after fixing the syntax error in this line:

if pixelgetcolor ($Coords[0,  $Coords[1]) = 0x012549 then

It is missing a ] after the 0.

Jos

[freyaharts]

sorry my objective is unclear .. heres what im trying to do

a message box will pop out and ask the user to click the mouse and set the pixelgetcolor and then run the loop

 

expandcollapse popup

HotKeySet ("{home}", "SetBlueCoords")
HotKeySet ("{END}", "_Exit")

While 1
Sleep(200)
WEnd




func SetBlueCoords()

   MsgBox(0, "User Input", "Please click the screen on blue pixel bar" & @CRLF & "Press OK, and then move your mouse there and click")
    Do
      Sleep(50)
    Until _IsPressed(01)
    $Blue= MouseGetPos()

   $blueHex = & Hex($blueHex, 6))

call ("start")
EndFunc  



func start()

while 1

if pixelgetcolor ($blue[0], $[blue[1]) <> $blueHex  then

;run the whole script

endif

wend

endfunc



Func _Exit()
Exit
EndFunc

 

[Jos]

Understood...  but it is still unclear what the issue is with the script. So what is your question or what isn't working?
Also define what program/process you are trying to automate so we understand.

Jos

[freyaharts]

its for data entry job ... the user will click the position of progress bar on how many percent they wish before doing another task for copying anoter file.. 

 

when i run it i got this error message

 

$blueHex = & Hex($blueHex, 6))

$blueHex = & Hex($^ ERROR

Error: varriable used without being declared.

 

im kinda new to this automation.. i hope you help me 

 

[Jos]

You get that error because you have nowhere define that variable $BlueHex. 
So simply add it with its appropriate value at the top of the script.

Jos

[freyaharts]

thank you so much, im kinda new to this. can you make an example how to achieve that?

[Jos]

1 minute ago, freyaharts said:

can you make an example how to achieve that?

No ...  read again what I type and try to understand and play with that. 
You creted the posted script su I can only assume you created it and as such should understand it.

Jos

[freyaharts]

hi im kinda new to this i want to get color and coordinates stored the data and use it for whole loop script

coordinates works pecfectly however color doesnt seem work 

 

any ideas?

 

 

expandcollapse popup

HotKeySet ("{esc}", "_Exit")

#include <Misc.au3>

$Coords = AskUser()
call ("Start")


Func AskUser()
    MsgBox(0, "User Input", "Please click mouse your screen" & @CRLF & "Press OK, and then move your mouse there and click")
    Do
        Sleep(50)
    Until _IsPressed(01)
    $Coords = MouseGetPos()
Local $Color = PixelGetColor($coords[0], $coords[1])
    
    MsgBox(0, "info", "Your coords and color have been stored for later use")
    Return $Coords
EndFunc 




Func Start()
While 1

if pixelgetcolor($coords[0],$coords[1]) = $Color  then
   sleep (200)
   ;run whole script

Else
   sleep (100)
   endif

wend
EndFunc



Func _Exit()
Exit
EndFunc

 

[freyaharts]

6 minutes ago, Jos said:

No ...  read again what I type and try to understand and play with that. 
You creted the posted script su I can only assume you created it and as such should understand it.

Jos

its been actually a week still trying to figure it out  on my own.... i tried to slam my head on desk but still didnt get the idea .. im so hopeless  

[Melba23]

freyaharts,

Stick to just the one thread please - merged.

M23

[Jos]

So again, where in your script have you defined the variable $BlueHex ?  (Shouldn't be a real hard question..right?)

Jos

[freyaharts]

1 hour ago, Jos said:

So again, where in your script have you defined the variable $BlueHex ?  (Shouldn't be a real hard question..right?)

Jos

i merge my topic and remove the $bluehex.. please take a look in the top 

[freyaharts]

im getting variable didnt declared error

when  already declared the variable?

 

[Melba23]

       0  freyaharts,

That variable is declared as Local to the AskUser function and so is invisible to the Start function.

The Variables - using Global, Local, Static and ByRef tutorial in the Wiki might be a useful read to help you understand more about scoping variables.

M23

 

[freyaharts]

ok i tried to remove the local ,global,  but still get variable used without being declared

Local $Color = PixelGetColor($coords[0], $coords[1])

[Melba23]

freyaharts,

Declare the variable as Global at the top of the script and then it can be seen by both functions - as long as you do not redeclare it as Local inside one of them.

M23

[freyaharts]

i put global to the top before all the functions but now i get error.. it asks for $coords varrible?

 

Global $Color = PixelGetColor($coords[0], $coords[1])