Как чё? echo "бла бла бла" | rebol -w program.r
Только у интерпретатора надо подсистему поменять. По умолчанию стоит Windows, а надо Console, чтобы стандартные каналы ввода-вывода нормально работали.
Или поменяй

на

Тогда программа будет брать текст из буфера обмена.
Работает она так: жмёшь Enter, показывается 3 слова на 0,5 с, вводишь эти три слова, жмёшь Enter, программа сравнивает твой ответ с оригиналом и в случае ошибки выводит предупреждение, всё.
Входной текст гоняется по кругу, поэтому окончания процесса ждать не стоит. :)

Да, в общем-то этого и хотел.
Параметры к гую прикручу, может, с разбиением на слова поэкспериментирую, но это уже мелочи.
Думаю, ещё сделать вариант для тренировки скорости узнавания слов глазом, механика для у задачи в целом та же.
Есть ещё затея сделать тренажёр лексики. Гуй, считай, тот же, только логику немного изменить надо.

Ну лан, а то я было подумал, раз у меня основные два момента уже функциональны: вывод текста заданными кусочками и сопоставление набранного текста с исходным, то можно было бы сегодня выложить. К тому же, в незамусоренном наворотами исходном коде VBA желающим легче будет разобраться в алгоритме, при необходимости. Значит ещё поковыряюсь, прикручу что-нибудь из этого:

Помнится мы здесь уже обсуждали данную тему. Тогда я без тренажёра развлекался, интересные впечатлении получаются, значительно ближе к печати из головы, нежели к перепечатке. Для того чтобы это нормально работало, конечно нужен тренажёр, вот только реализация…
На базе воспоминаний об эксперименте, который я ставил сам над собой без программной поддержки, мне бы хотелось не только тренажер, но и удобный измерительный прибор который можно было бы применять в естественных условиях перепечатки. Для этого необходимо реализовать «неожиданно» для испытуемого выключение перепечатываемого текста. Так перепечатываемый по памяти текст будет браться из рабочей памяти, а не из долговременной (что-то вроде печати из головы стихотворений, песен и т. д.). Грубо говоря, перепечатываемый текст какого-то объёма, в определённый (достаточно случайный момент) текст пропадает, но мы можем продолжать вводить текст, сколько понадобится, такого объёма какой успели прочитать наши глаза, и какой удержался в памяти.

P. S. Если кто-то в конечном итоге напишет программу, любопытно будет на неё взглянуть.

Нифига себе ты разошёлся! O_o
Ждём. :)

Сегодня сделал вывод статы, отладил особо проблемные места и намалевал интерфейс. Так что тренажёрчик созрел для презентации. Он представляет собой единственный файл Excel (хранение опций и статистики осуществляется в исполняемом файле). Исходный код макросов данного тренажёра распространяется по принципу свободного ПО.

Визуализацию бы ошибок бы...

Сделаем.

А как размер шрифта увеличить? Можно ли увидеть текст, который был набран?
"Текущий отрывок", "Текущее слово" это зачем? И как вернуться к более ранему просмотренному отрывку?

P.S. у Переборыча супер память :)
P.P.S. ушел тренировать свою память... Тренажер понравился..

Сегодня приду с работы и в 23:00 отвечу на все вопросы.

lins, ты Rebol, небось, до дыр изучил уже.
Вот тебе новая версия мой зубочистки http://pastebin.com/5bBzMAyv
Я складывание панели параметров и выравнивание полей не осилил. :(
Помогай.

lins> ошибка исполнения (9) выдается при попытке открыть файл, видимо, "большего", чем можно размера...
Возможно, что файл "бесконечный" (нет спец. символа окончания файла). Попробуй удалить в тексте завершающие пробелы или последний символ, если в конце файла нет пробелов.

lins> при попытке открытия файла не из текущей директории, вылетает ошибка из-за "недопустимого знака" - "\".
Директория тут роли не играет, недопустимый знак в самом тексте. Если тебя устраивает то, что нужно будет набирать обратные слеши, то добавь его в эту строку:

gosha_bel> "Текущий отрывок", "Текущее слово" это зачем? И как вернуться к более ранему просмотренному отрывку?
lins> Из всей этой грядки настроек: сходу ни одна не ясна. То есть, хоть какое-то описание бы надо...
"Текущие/Следующие отрывок/слово" (ap, aw, np, nw) - это служебные опции для запоминания на каком месте остановился набор, чтобы вернуться к нему при следующем запуске тренажёра (а-ля словарь-книга). Внимание!: счётчики сбрасываются после выбора нового файла.

Однако, при желании можно отмотать вперёд-назад, указывая соответствующие номера предложений (отрывков); а "слово", пожалуй, при перемотке лучше выставлять в 0, чтобы не переборщить.

"Доп. до/после точки (слов) (pw)" - разрешённая добивка до конца предложения ("точки"). Например:

"Длина сопоставления" (ls) - см. lngMaxLen в алгоритме "Нечёткого сравнения строк".
"Порог схожести ошиб. слова" (ps) - процент, возвращаемый вышеуказанным алгоритмом, ниже которого эталонное слово считается неравным набранному.

gosha_bel> Можно ли увидеть текст, который был набран?
Сейчас в стату выводится исходный текст. Можно, конечно, и набранный вывести при желании, но в последствии скорее будет гибридный текст: набранный в сочетании с исходным, либо просто тупо сразу оба. )

gosha_bel> А как размер шрифта увеличить?
lins> Ну, это же не окончательный вариант, надо полагать... Фонты и окошко, конечно, маленькие... Ну, или предполагается, что кому надо - доделает, все ж, перед глазами...
Ага, из редактора VBA (Alt+F11) доступно менять что вздумается. Там есть формочка Memo, где можно выбрать Label1 или TextBox1 и подкрутить у них свойство Font, например.

***
Если что-то плохо объяснил, то завтра в это же время расскажу популярнее, только намекните.

блин у меня макросы выключены... как их включить?

См. "Как включить или отключить макросы в Excel 2003, 2007 и 2010".