INC($num,1)// наращиваем номер строки
IF($num > TFCOUNT("11.txt"))
LOGWRITE("строки закончились")
BEEP(800,200)
HALT
END_IF
$str = TFREAD("11.txt", $num) // в цикле, читаем строки из файла
STRSEPARATE($str, " ", $arr)// разбираем строку в массив по разделителям ENTER ?
FOR($a=0,$a<ARRSIZE($arr))// в цикле читаем массив, копируем в буфер и вставляем
WAITMS(300)
LOGWRITE ("окно вставки")
DBLCLICK($r_st_x,$r_st_y)
WAITMS(300)
TOCLIP($arr[$a])
WAITMS(50)
KEYDOWN (#CTRL)
WAITMS (50)
KEYDOWN (#V)
WAITMS (50)
KEYUP (#V)
KEYUP (#CTRL)
WAITMS(300)
END_CYC
UNDEFINE($arr) // удаляем массив
LOGWRITE ("Нажимаем кнопку ")
LCLICK($hide_x,$hide_y)
WAIT(3)
GETSCREEN
IF_PIXEL_IN($green_x1,$green_y1,$green_x2,$green_y2, $green_color)
LOGWRITE ("вылезла зеленая надпись ")
WAITMS(300)
INC($count,1)
IF($count = 10) // 10 повторов скрипта
HALT // стоп
END_IF
$num=0 //начать чтение файла с начала
ELSE
WAITMS(300)
GETSCREEN
IF_PIXEL_IN($green_x1,$green_y1,$green_x2,$green_y2, $green_color1)
LOGWRITE ("вылезла красная надпись")
WAITMS(300)
END_IF
END_IF