Forum » Programiranje » prosim za pomoc loop zanke
prosim za pomoc loop zanke
Silk ::
Pozdravljeni
prvo da povem da sem cisto svez v programiranju
proble: jaz sem rdeca pika poskeniram box (x1,y1,x2,y2) v primeru da najdem rumeno piko kliknem na njo to mij e uspelo narediti.
v primeru ko pa ni rumene pike notr moram kliknil prvo na kordinate kjer je modra pika in ko se prispem na kordinate ponovno zacnem skenirat ali je rumena pika notri v pri meru da je klioknem na njo v primeru da ni pa naslednic kliknem na zeleno piko in tako dalje dokler ni v boxu rumene pike
men pa ta zanka tudi ce je v boxu rumena pika hoce tako kar kliknit na plavo in pol spet in ne vem kako se lotit in to je moja koda
lp
HotKeySet("{f1}","myExit")
$i=0
$color = 0x1FFC90E
$x1 = 1159
$y1 = 170
$x2 = 1894
$y2 = 910
While(1)
$Found = PixelSearch ($x1, $y1, $x2, $y2, $color, 5)
if not @error Then
ML($Found[0],$Found[1])
Sleep(10000)
ML(1872,842)
Sleep(220000)
ML(974,863)
Sleep(5000)
ML(991,834)
Sleep(10000)
$scan = True
Else
MR(1386,974)
Sleep(2500)
$Found = PixelSearch ($x1, $y1, $x2, $y2, $color, 5)
if not @error Then
ML($Found[0],$Found[1])
Sleep(10000)
ML(1872,842)
Sleep(220000)
ML(974,863)
Sleep(5000)
ML(991,834)
Sleep(10000)
EndIf
EndIf
WEnd
Func MR($x,$y)
MouseMove($x, $y,1)
MouseDown("right")
sleep(250)
MouseUp("right")
EndFunc
Func ML($x,$y)
MouseMove($x, $y,1)
MouseDown("left")
sleep(50)
MouseUp("left")
EndFunc
Func myExit()
Exit
EndFunc
prvo da povem da sem cisto svez v programiranju
proble: jaz sem rdeca pika poskeniram box (x1,y1,x2,y2) v primeru da najdem rumeno piko kliknem na njo to mij e uspelo narediti.
v primeru ko pa ni rumene pike notr moram kliknil prvo na kordinate kjer je modra pika in ko se prispem na kordinate ponovno zacnem skenirat ali je rumena pika notri v pri meru da je klioknem na njo v primeru da ni pa naslednic kliknem na zeleno piko in tako dalje dokler ni v boxu rumene pike
men pa ta zanka tudi ce je v boxu rumena pika hoce tako kar kliknit na plavo in pol spet in ne vem kako se lotit in to je moja koda
lp
HotKeySet("{f1}","myExit")
$i=0
$color = 0x1FFC90E
$x1 = 1159
$y1 = 170
$x2 = 1894
$y2 = 910
While(1)
$Found = PixelSearch ($x1, $y1, $x2, $y2, $color, 5)
if not @error Then
ML($Found[0],$Found[1])
Sleep(10000)
ML(1872,842)
Sleep(220000)
ML(974,863)
Sleep(5000)
ML(991,834)
Sleep(10000)
$scan = True
Else
MR(1386,974)
Sleep(2500)
$Found = PixelSearch ($x1, $y1, $x2, $y2, $color, 5)
if not @error Then
ML($Found[0],$Found[1])
Sleep(10000)
ML(1872,842)
Sleep(220000)
ML(974,863)
Sleep(5000)
ML(991,834)
Sleep(10000)
EndIf
EndIf
WEnd
Func MR($x,$y)
MouseMove($x, $y,1)
MouseDown("right")
sleep(250)
MouseUp("right")
EndFunc
Func ML($x,$y)
MouseMove($x, $y,1)
MouseDown("left")
sleep(50)
MouseUp("left")
EndFunc
Func myExit()
Exit
EndFunc
Vredno ogleda ...
Tema | Ogledi | Zadnje sporočilo | |
---|---|---|---|
Tema | Ogledi | Zadnje sporočilo | |
» | Oracle PL/SQL pomočOddelek: Programiranje | 1586 (1025) | MrStein |
» | [c#] ukaz radirkaOddelek: Programiranje | 1112 (905) | japol |
» | [c#] picturebox, slika na slikoOddelek: Programiranje | 1085 (895) | japol |
» | [c#] Risanje z miškoOddelek: Programiranje | 1429 (1110) | japol |
» | GrafikaOddelek: Programiranje | 1696 (1048) | aaaaa93 |