Имена картинок должны быть в таком виде
Вопрос_1.bmp - Вопрос_25.bmp
Ответ_1.bmp - Ответ_25.bmp
DEFINE($num_count, -1)
IF(($num_count = -1)|($num_count = 25))
$num_count = 0
UNDEFINE($arr_num)
FOR($a=0,$a<25)
ARRPUSH($arr_num, 1)
END_CYC
END_IF
GETSCREEN
FOR($a=1,$a<26)
IF($arr_num[$a-1] ! 0)
IF_PICTURE_IN (0,0, $_xmax,$_ymax, STRCONCAT("Вопрос_", $a, ".bmp"), -1, 100)
IF_PICTURE_IN (0,0, $_xmax,$_ymax, STRCONCAT("Ответ_", $a, ".bmp"), -1, 100)
LCLICK($_return1, $_return2)
$arr_num[$a-1] = 0
INC($num_count,1)
WAITMS(100)
END_IF
END_IF
END_IF
END_CYC
WAIT(1)