Запуск текстового блокнота и печать в нем текста

Данный скрипт запускает блокнот notepad и 3 раза записывает в него строку «abcdef».

#name "Запись в блокнот"//Имя нашего скрипта

EXECUTE("notepad.exe") / /Запускаем программу notepad.exe. Команда EXECUTE делает то же, что и окно "Выполнить" в Виндовс (Win+R).
WNDSTATE(WNDFIND("Блокнот"), 1) // Разворачиваем окно, в заголовке которого есть строка "Блокнот". Число 1 - означает развернуть, 0 - свернуть.
WAITMS(500) // Ожидаем 500 мс для запуска блокнота

FOR($i, $i < 3) // Начало цикла. 3 означает количество повторений
KEYSTRING("abcdef.", 20) // Вводим текст. 20 означает задержку в 20 мс между вводом каждой буквы
KEYPRESS(#ENTER) // Нажимаем Enter для перевода строки. #ENTER - код клавиши Enter
END_CYC // Конец цикла
HALT // Останавливаем скрипт

При этом для ввода латиницы вас должна быть включена английская раскладка в окне кликермана и в окне блокнота.

Скачать Clickermann

Используемые команды:

EXECUTE — Выполнение программ
WNDSTATE — Сворачивание/разворачивание окна
WNDFIND — Нахождение окна по заголовку
WAITMS — Остановка скрипта на заданное кол-во миллисекунд
KEYSTRING — Печать текста
KEYPRESS — Нажатие клавиш
FOR — Цикл
HALT — Остановка программы

Противоположная задача — считывание строк из текстового файла file.txt.

// считывание 10 строк из файла file.txt
$count = 0
while($count < 10)
inc($count)
KEYSTRING (TFRead("file.txt", $count), 20) 
WAITMS(50)
KEYPRESS(#ENTER)
WAITMS (500)
end_cyc
HALT</pre>

Функция TFRead(«file.txt», $count) означает чтение строки $count из файла file.txt

KEYSTRING просто печатает текст на экране

KEYPRESS(#ENTER) — нажатие клавиши Enter после ввода строки.

Еще 1 пример работы с текстовым файлом.

Скрипт удаляет из файла строчные комментарии.

 
// Инициализируем переменные
$filename = "test.txt" //Имя файла
$i = 1 //Индекс строки
 
WHILE( $i < TFCOUNT($filename) + 1 ) // Выполняем, пока не кончатся строки
	$string = TFREAD($filename, $i) // Читаем строку $i из файла
	$pos = STRPOS($string, "//") // Ищем в строке "//"
 
	IF($pos ! 0) // Если "//" в строке есть
		TFDELETE($filename, $i) // Удаляем эту строку
		IF($pos ! 1) // Если до "//" есть еще текст
			TFWRITE($filename, STRCUT2($string, 1, $pos - 1), $i) // То пишем его в файл, на ту же строку, которую удалили.
		END_IF
	ELSE
		INC($i, 1) // Если комментариев в строке нету, переходим к другой строке
	END_IF
END_CYC
 
HALT // Останавливаем скрипт

Используемые команды: