Всем добрый вечер! Написал скрипт, он, зараза, не работает =( Т.к. я как автор, и не могу трезво оценить свою работу (во избежание- не пью, совсем 
) хочу попросить тех кто может это сделать посмотреть, где я навалял =)
Что после Run следует писать путь к файлу я знаю, он там есть, просто в данном случае он не имеет значения =) Тем более что думаю те кто разбираются и так отлично определят для чего сей скрипт, а кто не разбирается тому и не надо =)
Кроме того буду благодарен любой критике по оптимизации кода!
За умные ответы заранее спасибо =)
) хочу попросить тех кто может это сделать посмотреть, где я навалял =)
Код:
Run()
Sleep(5000)
MouseClick("primary", 504, 474)
Sleep (10000)
MouseClick("primary", 201, 377)
Send('{ENTER}')
Sleep (5000)
MouseClick("primary", 418, 126)
Sleep(2000)
Send('{F7}')
Sleep(2000)
Send('{F11}')
Dim $x, $y, $x15, $y15, $coord
While 1
While PixelGetColor(796, 382) <> 0xF8DEA4
$coord = PixelSearch ( 130, 140, 880, 730, 0x5B0D0A)
If Not @error Then
$x = $coord[0]
$y = $coord[1]
Sleep(100)
EndIf
$x15 = $x-15
$y15 = $y-15
If PixelGetColor($x15, $y15) <> (0x5D1102 or 0x411701 or 0x860200 or 0xC04B00 or 0xE07C00 or 0xF69F00 or 0xFFB900 or 0xFFEE00 or 0xFFD900 or 0xDBC800 or 0xB69800 or 0xB68700 or 0xB68000 or 0x906500 or 0x906B00 or 0x907200 or 0x907700 or 0x908000 or 0x7E6F00 or 0x3A2700 or 0x3A3400) Then
MouseClick("primary", $x, $y)
Sleep(100)
MouseClick("primary", $x, $y)
EndIf
Sleep(10000)
If PixelGetColor(600, 450) = 0xFFEFC0 Then
MouseClick("primary", 513, 496)
EndIf
If PixelGetColor(482, 392) = 0x760000 Then
MouseClick("primary", 505, 455)
EndIf
Sleep(50000)
$1 = "Random(1000, 10000)"
Sleep($1)
WEnd
$Stop="Random(90000, 120000)"
Sleep($Stop)
MouseClick("primary", 359, 31)
$4="Random(3000, 15000)"
Sleep($4)
MouseClick("primary", 678, 340)
$5="Random(6000, 10000)"
Sleep($5)
MouseClick("primary", 511, 513)
$6="Random(4000, 8000)"
Sleep($6)
MouseClick("primary", 796, 238)
$7="Random(2, 3)"
If $7=2 Then
MouseClick("primary", 798, 259)
EndIf
If $7=3 Then
MouseClick("primary", 797, 302)
EndIf
WEndЧто после Run следует писать путь к файлу я знаю, он там есть, просто в данном случае он не имеет значения =) Тем более что думаю те кто разбираются и так отлично определят для чего сей скрипт, а кто не разбирается тому и не надо =)
Кроме того буду благодарен любой критике по оптимизации кода!
За умные ответы заранее спасибо =)
