@error not set?

[pixartist]

WinWaitActive("Diablo II")
$pos = WinGetPos ( "Diablo II" )
HotKeySet("n","dograb")
Func dograb()
    $low = 400
    $iPos = PixelSearch($pos[0],$pos[1],$pos[0]+800,$pos[1]+$low,0x948064)
    $search = 1
    if @error Then
        $search = 0
    EndIf
    while $search == 1
        $lowerC = PixelGetColor ( $iPos[0] , $iPos[1]+1 )
        $lowerC = Hex($lowerC, 6)
        if $lowerC == 0x948064  Then
            MouseClick("left",$iPos[0],$iPos[1],1,0)
            $search = 0
        Else
            $low = $iPos[1]-1
            $iPos = PixelSearch($pos[0],$pos[1],$pos[0]+800,$pos[1]+$low,0x948064)
            MsgBox(0,"",$low)
            if @error Then
                $search = 0
            EndIf
        EndIf
    WEnd
    
EndFunc
while 1
    Sleep(100)
WEnd

How can that EVER give me a

C:\Dokumente und Einstellungen\FFS\Desktop\AU3scripts\mylil.au3 (13) : ==> Subscript used with non-Array variable.:

$lowerC = PixelGetColor ( $iPos[0], $iPos[1]+1 )

$lowerC = PixelGetColor ( $iPos^ ERROR

[greenmachine]

You get that error when you try to use a subscript with non-array variable, just like the error says. It has nothing to do with @error being set.

Edited February 4, 2006 by greenmachine

[pixartist]

You get that error when you try to use a subscript with non-array variable, just like the error says. It has nothing to do with @error being set.

getPixelColor is using iPos[] which is set with $iPos = PixelSearch(...)

if PixelSearch should Fail, @error will be set and though getPixelColor can not be run anymore, look at the code please...

[greenmachine]

Here we go, try this.

WinWaitActive("Diablo II")
$pos = WinGetPos ( "Diablo II" )
HotKeySet("n","dograb")
Func dograb()
    $low = 400
    $iPos = PixelSearch($pos[0],$pos[1],$pos[0]+800,$pos[1]+$low,0x948064)
    if @error then
        $search = 0
    else
        $search = 1
    endif
    while $search == 1
        $lowerC = PixelGetColor ( $iPos[0] , $iPos[1]+1 )
        $lowerC = Hex($lowerC, 6)
        if $lowerC == 0x948064  Then
            MouseClick("left",$iPos[0],$iPos[1],1,0)
            $search = 0
        Else
            $low = $iPos[1]-1
            $iPos = PixelSearch($pos[0],$pos[1],$pos[0]+800,$pos[1]+$low,0x948064)
            MsgBox(0,"",$low)
            if @error Then
                $search = 0
            EndIf
        EndIf
    WEnd
    
EndFunc
while 1
    Sleep(100)
WEnd

[GaryFrost]

getPixelColor is using iPos[] which is set with $iPos = PixelSearch(...)

if PixelSearch should Fail, @error will be set and though getPixelColor can not be run anymore, look at the code please...

MsgBox clears @error

[greenmachine]

MsgBox clears @error

That too.

The location of the @error matters. That should be the only thing you need to fix.