Can I Use And Keyword

[OdinsPath 0]

; Script Start - Add your code below here

; A test function
$cButton = GUICtrlCreateButton("", 1, 1, 1, 1)
; Show the error returned
ConsoleWrite("The error value returned was: " & @error & @CRLF)
; But if we try to access it again
ConsoleWrite("The error value now is: " & @error & @CRLF)
; Because it was reset by the first ConsoleWrite

Global $WinPos = WinGetPos("Derp")

; if element 0(xPos) equals 1297 and element 1 (xPos) equals 784
If $WinPos[0] == 1297 And $WinPos[1] == 784 Then
    ;Variable Color takes color from Xpox 834 and XPos 774
    $color = PixelGetColor(751, 750)
    ; While color is equal to color code
    While $color == (0x171B1E)
        ;send the key 3
        Send("3")
        ;Sleep 13,000 millisec
        Sleep(13000)
        ; if conditon false end loop
    WEnd
EndIf

Howdy Neighbors,

 

This code seems to error out on me, I am unsure why is it because I am trying to use the AND keyword ? 

 

NOTE: I had to indent using the space key so I know it looks a little dodge

Edited June 16, 2013 by Melba23

[Melba23 3,314]

OdinsPath,

When you post code please use Code tags - see here how to do it. Then you get a scrolling box and syntax colouring as you can see above now I have added the tags.

As to the code, the syntax is correct - what do you mean by "error out on me"? What actually happens?

M23

P.S. And you only need "==" when comparing strings with case sensitivity - use "=" for numeric values.

[OdinsPath 0]

OdinsPath,

When you post code please use Code tags - see here how to do it. Then you get a scrolling box and syntax colouring as you can see above now I have added the tags.

As to the code, the syntax is correct - what do you mean by "error out on me"? What actually happens?

M23

P.S. And you only need "==" when comparing strings with case sensitivity - use "=" for numeric values.

 A yes!!, sorry its getting late I ment to use the

Tags . 

Yes that wasn't a very good explanation was it lol, I had to use some console write commands to figure out what was going on. In a nutshell I needed to use WinPos[2] and WinPos[3] slices. 

as for the "==" thing yerrrrrrr i'm coming from python so its kinda a force of habbit lol.

Edited June 16, 2013 by OdinsPath

[Chimaera 143]

The error i get when i run your code is

 : ==> Subscript used with non-Array variable.:
if $WinPos[0] == 1297 and $WinPos[1] == 784 Then
if $WinPos^ ERROR

Have you made sure $WinPos contains data?

[guinness 1,513]

Are you sure WinGetPost returns an array? Use UBound to check e.g.

#include <Constants.au3>

Local $aWinPos = WinGetPos('Derp')
If UBound($aWinPos) Then
    MsgBox($MB_SYSTEMMODAL, 'It''s an array with items.')
Else
    MsgBox($MB_SYSTEMMODAL, 'It''s NOT an array with items.')
EndIf

Edited June 16, 2013 by guinness

[OdinsPath 0]

I ended up with this more or less, Interestingly the output of $color was not in color code (Well what I determined color code to be) but something like 2040358.

$WinPos = WinGetPos("Derp")
ConsoleWrite ($WinPos[2] & " " & $WinPos[3])


; if element 0(xPos) equals 1200 and element 1 (xPos) equals 782
while $WinPos[2] >= 1297 and $WinPos[3] >= 784
   
   ;Variable Color takes color from Xpox 834 and XPos 774
   $color = PixelGetColor(751, 750)
   ConsoleWrite (" " & $color )
   
 ; While color is equal to color code
 while $color == 2040358


;send the key
send("3")


;Sleep 13,000 millisec
Sleep (13000)




 ; if conditon false end loop
 WEnd


sleep(2000)
WEnd

Edited June 16, 2013 by OdinsPath

[BrewManNH 1,301]

That number translates to 0x1F2226 in Hex, so it might be the same if that was what you're looking for.