выполнение действия по результату предыдущих проверок

[stormovik]

PixelSearch (920,85,920,85,0x808080) ; проверка выполняемости первого условия
If @error Then MouseClick ("left",800,70) ; если выполнено, то выполняем действие 1

PixelSearch (920,85,920,85,0x808080) 
If @error Then $k=$k+1 ; отмечаем, что действие 1 было выполнено

PixelSearch (920,85,920,85,0x808080) ; проверка выполняемости второго условия
If @error Then MouseClick ("left",800,70) ; если выполнено, то выполняем действие 2

PixelSearch (920,85,920,85,0x808080) 
If @error Then $k=$k+1 ; отмечаем, что действие 2 было выполнено

If $k <> 0 Then MouseClick ("left",275,680) ; если было выполнено действие 1 или 2, то выполняем действие 3

помогите, пожалуйста, оформить код в более грамотном виде. Оно, конечно, и так все работает, но уж больно коряво выглядит.

 

[AZJIO]

$k = 0
For $i = 1 To 2 ; делаем это 2 раза
	PixelSearch(920, 85, 920, 85, 0x808080)
	If @error Then MouseClick("left", 800, 70)

	PixelSearch(920, 85, 920, 85, 0x808080)
	If @error Then $k += 1
Next

If $k Then MouseClick("left", 275, 680)

возможно так

$k = 0
For $i = 1 To 2 ; делаем это 2 раза
	PixelSearch(920, 85, 920, 85, 0x808080)
	If @error Then
		MouseClick("left", 800, 70)
		$k += 1
	EndIf
Next
If $k Then MouseClick("left", 275, 680)