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

Данный скрипт запускает блокнот 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 // Останавливаем скрипт

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

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

  • 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 // Останавливаем скрипт

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

  • TFREAD – Чтение строки из файла
  • TFWRITE – Запись строки в файл
  • TFCOUNT – Количество строк в файле
  • TFDELETE – Удаление строки из файла
  • WHILE – Цикл
  • STRPOS – Нахождение строки
  • STRCUT2 – Обрезание строки
  • INC – Увеличение значения переменной
Понравилась статья? Поделиться с друзьями:
CLICKERMANN

Комментарии:

Добавить комментарий

* Нажимая на кнопку "Отправить комментарий" Вы соглашаетесь с политикой конфиденциальности.