Подмогните со скриптом Опции

[Бешеный]

По возможности помогите пожалуйста, надо расставить все по местам )

Можешь начинать читать с центра я там жирным шрифтом пометил

set %image[1] remont
set %image[2] start
set %image[3] passiv
set %image[4] avtosborbox
set $path "C:\bot\pet\"

set %imag[1] 111
set %imag[2] bos
set $pata "C:\bot\"
set #size size(%imag)


set $pat "C:\bot\"
set %ima[1] vrag1
set %ima[2] vrag2
set %ima[3] vrag3
set #siz size(%ima)

set findoffsety - 79
set #ownerHandle findwindow (???????? - Mozilla Firefox)
set #tmp getwindow (#ownerHandle child)
set #childHandle getwindow (#tmp )
set #startX 0
set #startY 0
set #endX desktopwidth
set #endY desktopheight

:start

set #size size(%image) //Старт
for #x 1 #size 1
set #y findimage (#startX #startY #endX #endY ($path%image[#x].bmp) %arr #ownerHandle)
if #y > 0 //если картинка найденa
left %arr[1 1] %arr[1 2]
wait 1000
end_if
end_for // КОНЕЦ
set #r findimage (#startX #startY #endX #endY (C:\bot\minikarta2.bmp) %arr #ownerHandle )
if #r > 0
set #x %arr [1 1] - 4 + random (178)
set #y %arr [1 2] + 45 + random(102)
left #x #y
wait 300 // ждем 300мл сек
end_if

// До этих сторк все четко
Суть такова он кликнул minikarta2.bmp кораблик полетел появляется картинка d
надо что бы пока находилась картинка d искались изображения
set %imag[1] 111
set %imag[2] bos
Если нашлась хоть 1-на он кликал на нее далее если кликнул искались
цвета

2696200,3217424,1579156,7039322,2171749,1589743 если нашлись кликал
нашлась хоть 1-на клик на нее
КОНЕЦ

set %ima[1] vrag1
set %ima[2] vrag2
set %ima[3] vrag3
если нашлись выполняем left 79, 27 пока они не исчезнут


set #t findimage (#startX #startY #endX #endY (C:\bot\d.bmp) %arr #ownerHandle )
while #t > 0
set #t findimage (#startX #startY #endX #endY (C:\bot\d.bmp) %arr #ownerHandle )


set #y findimage (#startX #startY #endX #endY ($pata%imag[1].bmp) %arr #ownerHandle)
set #u findimage (#startX #startY #endX #endY ($pata%imag[2].bmp) %arr #ownerHandle)
if #y > 0 or #u > 0

left %arr[1 1] %arr[1 2]

goto atack
end_if
end_while

:atack
set #f 1
while #f > 0
set #f 0 // флаг, что пока картинка не найдена

set #y findcolor (309, 189 995, 519 (2696200,3217424,1579156,7039322,2171749,1589743) %arr #ownerHandle)
if #y > 0
set #f 1 // флаг, что картинка найдена
left %arr[1 1] %arr[1 2]
wait 300
send 1
wait 400


break

end_if
end_if

end_while

set #z 1
while #z > 0
set #z 0 // флаг, что пока картинка не найдена
for #c 1 #size 1
set #u findimage (#startX #startY #endX #endY ($pat%ima[#c].bmp) %arr #ownerHandle)
if #u > 0
set #z 1 // флаг, что картинка найдена
set #m findimage (#startX #startY #endX #endY (C:\bot\minikarta.bmp) %arr #ownerHandle)
if #m > 0
set #x %arr [1 1] + 9
set #y %arr [1 2] + 57
left #x #y
wait 7000

break
end_if
end_if
end_for
end_while



goto start

[cirus]

Неужели так трудно нажать Скрипт, Форматировать.
Расставить по местам очень просто, если понять как использовать Gosub.

[Бешеный]

Неужели так трудно нажать Скрипт, Форматировать.
Расставить по местам очень просто, если понять как использовать Gosub.

(IMG:style_emoticons/default/ohmy.gif) gosub, что-то новенькое (IMG:style_emoticons/default/biggrin.gif), попробуем