[Мышь, клавиатура] выполнить случайный выбор из предложенных вариантов

[Safron9999]

подскажите пожалуйста как сделать так, чтобы при соблюдении условия выполнялся случайный выбор из предложенных вариантов?

If "0x" & Hex(PixelGetColor(1087, 359),6) = 0x690000 Then
	   MouseClick("left",1087,359,1)
или
           MouseClick("left",1087,359,1)

заранее спасибо!

 

[Arei]

If "0x" & Hex(PixelGetColor(1087, 359),6) = 0x690000 Then
       MouseClick("left",1087,359,1)
else
           MouseClick("left",1087,359,1)
endif

так?

 

[kaster]

If "0x" & Hex(PixelGetColor(1087, 359),6) = 0x690000 Then
    Call('Mouse' & Random(1, 2, 1))
EndIf

Func Mouse1()
    MouseClick("left",1087,359,1)
End

Func Mouse2()
    MouseClick("left",1087,359,1)
EndFunc

 

[jilexandr]

If "0x" & Hex(PixelGetColor(1087, 359),6) = 0x690000 Then
$rand = Random(1,2,1)
		If $rand = 1 Then
		MouseClick("left",1087,359,1)
		Else
		MouseClick("left",1087,359,1)
endif
endif

так будет? :laugh:

 

[madmasles]

Safron9999,

$iColor = 10000

For $i = 1 To 10
	If $iColor Then
		_RandomClick()
	EndIf
Next

Func _RandomClick($i_Min = 0, $i_Max = 4)
	Local $iRandom, $i_X = 1087, $i_Y = 359
	If $i_Min < -4 Then $i_Min = 0
	If $i_Max > 4 Then $i_Max = 4
	If $i_Min >= $i_Max Then
		$i_Min = 0
		$i_Max = 4
	EndIf
	$iRandom = Random($i_Min, $i_Max, 1)
	If Mod($iRandom, 2) Then
		$i_X += $iRandom
		$i_Y -= $iRandom
	Else
		$i_X -= $iRandom
		$i_Y += $iRandom
	EndIf
	MsgBox(64, 'Info', 'iRandom = ' & $iRandom & @LF & 'X = ' & $i_X & @LF & 'Y = ' & $i_Y)
	;MouseClick('left', $i_X, $i_Y, 1)
EndFunc   ;==>_RandomClick

 

[Safron9999]

всем огромное спасибо. решение предложенное Kaster работает как часы ))