получается но не совсем всё, написал цикл и внес его в подпрограмму, но не соображу как сделать чтоб 20.bmp-23.bmp, к примеру 5 раз повторил свои действия.
SUB(prog1, $x, $y, $image, $w, $a)
GETSCREEN
IF_PICTURE_IN (0,0, $_xmax,$_ymax, $image, -1, 100) // место где появится картинка
FOR($a=0,$a<5)
LCLICK($_return1+$x, $_return2+$y)
WAIT($w)
END_CYC
END_IF
END_SUB
prog1(25,20,"19.bmp",1)
prog1(30,15,"20.bmp",1)
prog1(45,15,"21.bmp",1)
prog1(50,15,"22.bmp",1)
prog1(30,10,"23.bmp",1)
prog1(8,8,"24.bmp",1)
halt