ПРИЛОЖЕНИЕ 4. ИСПОЛЬЗОВАНИЕ ТЕКСТОВ,
ПОЛУЧЕННЫХ В ДРУГИХ РЕДАКТОРАХ
Любой текстовый файл из любой программы может быть загружен в данный
редактор, если он содержится в формате кодов на ленте или в формате данных на
микродрайве, но при этом не будет работать изображение на экрене и выдача его на
принтер до тех пор, пока не будут введены управляющие байты, маскирующие концы
строк текста и концы абзаца. Это байты 14 - "ПС" и байт 13 "конец абзаца". Если
программа, которую вы предполагаете использовать, предварительно не размечена
таким образом, то ее надо отмаркировать. Для этой цели прилагается программа
TLW64BASIC. Лучше всего ее применять до загрузки редактора, так как она при
выполнении маркировки очищает память компьютера. Затем производится запись
переработанного текста на ленту и последующая его загрузка в редактор.
Программа TLW64BASIC используется следующим образом:
1. Очистите память (RANDOMIZE USR 0) и загрузите TLW64BASIC. Она загрузит
75 байт TLW64CODE и опустит RAMTOP компьютера до 29999, что текстовый файл
начнется с 30000.
2. Теперь вы можете присвоить файлу имя и загружать ваш текст в компьютер с
магнитофона или микродрайва.
3. Программа запросит от вас размер этого файла. Если вы не знаете, то программа
может сама вам сообщить его, а также "стандартную" длину строки данного текста
(обычно 32 или 64)
4. Сейчас вы должны решить, будете ли вы во всех строках ставить маркер "конец
строки" или " конец абзаца". Сама программа слишком мала, чтобы решить этот
вопрос в каждой строке конкретно. Обычно применяют "конец строки", если заранее
не известно, что текст состоит из отдельных, не связанных предложений и ему не
потребуется делать команду "REFORM". Введите "Y" для "конца абзаца" или просто
ENTER для "конца строки".
5. Когда все выполнено правильно, программа сообщит вам новую длину файла и
предложит записать текст на ленту для последующей загрузки в TLW.
ПРИЛОЖЕНИЕ 5. ПОЛЕЗНЫЕ СОВЕТЫ
Если вам надо, чтобы текст начиеался с 1 -ой колонки, тем не менее установите
поля пусть небольшим, но положительным числом, например 5. Это позволит вам
потом по команде сдвига текста влево расширить интервалы между словами и вставить
пропущенный символ или два, так как у вас всегда будет запас в 5 пробелов. Если
необходимо большее пространство, то установите величину правого поля достаточно
большую, затем выравняйте текст по правому полю, в результате чего создадутся
пробелы, затем сдвигом текста влево/вправо подготовте место для вставки, вставьте
то, что надо, восстановите поля и выполните команду REFORM для ликвидации
беспорядка. Конечно вставку можно сделать и с помощью команды INSERT, но если
вы ее уже используете, то данный подход окажется очень полезным.
Если при разбивке экрана 60 или 80 знаков в строке включены видеомаркеры, то
иногда бывает трудно разобрать на экране символы, если они идут за операторами
управления печатью, вставленными в текст. Временно отключите маркеры, затем
после прохождения курсора по этому участку текста вновь включите.
Если вы хотите приостановить принтер для смены бумаги и т.п., вы можете сделать
это где угодно установкой оператора управления печатью с обращением к
бейсиковской строке, например:
9200 INPUT "PAUSING! ENTER CONTINUES"; Z$; GO TO 9999
Если вы имеете текстовый файл очень ценного материала, а при попытке записать
его на микродрайв прошло сообщение SPACE!, то это значит, что место для создания
соответствующего 525-байтного канала недостаточно, т.к. редактор защищает себя от
потенциального затирания. Чтобы освободить место, спуститесь в бейсик и очистите
все переменные, например: RUN 30000 и попытайтесь еще раз. Другой способ -
переместить курсор в начало текстового файла и выполнить INSERT, чтобы спрятать
его целиком, пересмотреть вверх ненамного значение RAMTOP подачей более
высокого значения CLEAR, чем было до этого, затем вернитесь в редактор и наберите
первый символ "спрятанного" текстового файла, а затем верните файл на прежнее
место. Первый способ предпочтительнее, но с помощью второго можно выйти из более
серьезных неприятностей.
ДОПОЛНЕНИЕ КО 2-ОЙ ВЕРСИИ ПРОГРАММЫ TLW
Вторая версия редактора включает в себя ряд дополнений, расширяющих
возможности его применения. Так, в частности, реализована возможность
эксплуатации программы в дисковых системах опус, кемпстон, гордон, а также в
картриджной системе WAFA. Подробности приведены ниже. Изучать их следует
совместно с основным описанием.
1. страница сводки команд
Все 60 команд могут быть вызваны на экран набором режим Е "Н", там же
изображаются комбинации клавиш, необходимых для выполнения этих команд. Эту
страницу можно выдать на принтер, используя для этой цели программу TLW2.DATA,
которая входит в прилагаемую кассету.
2. цвета экрана
Ранее существовавшие команды для изменения цвета бордюра и хэдера заменены
одной, вызываемой режиме CAPS SHIFT "В", с помощью которой обеспечивается
доступ к установке цвета страницы, символов (для увеличения их яркости прибавьте
64), бордюра и хэдера.
3. красная строка
Команда TAB была несколько расширена и теперь за ней следует оператор INSET
и число от 0 до 8. Набранный текст хранится в файле обычным путем, но если проходит
команда REFORM то первая строка каждого абзаца сдвигается вправо на величину
INSET.
4. трансляция символов, выдываемых
на экран или принтер
»
Сделано дополнение, позволяющее отдельно осуществлять трансляцию восьми
символов между экраном и текстом, а также между принтером и текстом.
Обычно при нажатии данной клавиши на клавиатуре всегда один и тот же символ
появляется на экране, но до восьми символов могут быть пересмотрены так, что,
например, при нажатии "#" на экране изобразится "&" и т.п. но это не влияет на
результат, который пойдет на принтер.
До восьми значений байтов символов могут быть пересмотрены для выдачи на
печать.
Обе эти трансляции выполняются с помощью TLW2.DATA, которая не входит в
основную программу из соображений экономии памяти, но легко сливается с ней
оператором MERGE. Проведенная трансляция записывается на ленту с кодовой
частью программы и загружается всякий раз, когда необходимо.
5. ВЫБОР ПАУЗЫ МЕЖДУ ПЕЧАТЬЮ
КОПИЙ НА ПРИНТЕРЕ
Теперь вы можете печатать до 254 копий без необходимости нажимать ENTER
после каждой копии. Это выполняется путем переключения паузы на OFF в хэдере.
(В подпрограмме подготовки печати введите "R").
6. НАДСТРАНИЧНЫЕ И ПОДСТРАНИЧНЫЕ ЗАПИСИ, НУМЕРАЦИЯ
СТРАНИЦ ВО ВРЕМЯ ПЕЧАТИ
Для управления принтером во время печати используются специальные
операторы. В их число входят операторы "ВК" и "ПС". Обычно первый из них
установлен как 13, а второй - 10. В новой версии редактора вы можете вводить их с
помощью операторов управления печатью "вставить стринг" и "GO ТО 9000" и т.п.
так, например, если А$ или какой-либо другой стринг, которым вы пользуетесь, задан
как CHR$ 13, а строка 9000 (или другая) - LPRINT CIIR$ 10 с последующим возвратом
в редактор через строку 9999, то результат будет тот же самый. 116 зато теперь вы
можете прерывать выдачу текста на принтер в конце каждой строки, организовав один
или два счетных цикла для организации печати из бейсика заранее заготовленных
данных, а параметр цикла использовать, например, при подсчете номера страницы.
7. ОБЪЕДИНЕНИЕ ФАЙЛОВ ВО
ВРЕМЯ ПЕЧАТИ
Системные переменные редактора, обозначающие начальный и конечный адреса
1 файла могут пересматриваться из бейсика. Так вы можете обьедипять большое
количество файлов и последовательно выдавать их на печать целиком или частично.
Первый файл, подлежащий печати, должен содержать оператор "GO ТО 9900".
Этот файл будет печататься нормально, пока не встретится оператор,после чего
управление будет передано избранной строке бейсика.
В этой строке должна быть, например, такая запись:
9900 LET A-USR 64978: LOAD *"М";1 ;"NEWI ILE"CODE AiRANDOMJZE USR
65010: GO TO 9999
Первый оператор полностью очищает пространство текстового файла,второй
осуществляет загрузку второго файла в программу, начиная с адреса, установленного
А. Третий устанавливает системные переменные редактора, отвечающие за начало и
конец печати. И, наконец, возврат в кодовую часть редактора. Теперь новый файл
будет напечатан так, как это необходимо. Он тоже может содержать определенный
оператор управления печатью для вызова последующего файла и т.д.
8. ДРУГИЕ СИСТЕМЫ ХРАНЕНИЯ ФАЙЛОВ
Новая версия редактора легко перенастраивается на работу в дисковых системах.
Прилагаемая кассета содержит отдельно кодовые блоки дисковых систем опус,
кемпстон, гордон, бета и для картриджной системы WAFA.
После того, как вы введете редактор в ваш компьютер, войдите в бейсик и загрузите
оттуда соответствующий блок для вашей системы. Заметьте, что кроме этого в каждом
случае вы должны добавить или переделать несколько строк в бейсике. В частности,
четырехтысячные строки должны быть точно такими, как приведенные ниже:
Кемпстон KDOS - "KDOS2CODET
40 CLEAR 26500:GO SUB 100: PRINT #4: LOAD "TLW2CODE": GO TO 1000
70 PRINT #4: SAVE "AUTO" LINE 40
80 PRINT #4: SAVE "TLW2" CODE 50000,15535
4000 REM LDOS LINES
4010 PRINT #4: SAVE и 1234567890" CODE 0,0: PRINT 1: PRINT USR 8
4020 PRINT #4: CAT: PRINT USR 8
Замечание: PEEK 50067 в 50113 должны быть по 72, а не по 69. Если не верно, то
введите правильное значение посредством РОКЕ.
Бета - "BETA2CODEГ
40 CLEAR 26500: GO SUB 100:RANDOMIZE USR 15363: REM: LOAD "TLW2"
CODE
45 GOTO 1000
70 RANDOMIZE USR 15363: REM: SAVE "BOOT" LINE 40
80 RANDOMIZE USR 15363: REM: SAVE "TLW2" CODE 50000,15535
4000 REM BETA LINES
4010 RANDOMIZE USR 15363:REM: SAVE"A; 12345678" CODE 12345,12345
4020 PRINT USR 8
Onyc - "OPUS2CODET
2020 IF I$-"Y" OR I$-"y" THEN OPEN #3;"B": LPRINT
(для порта принтера), а затем уберите (DELETE) строки 2025,
2030, 2040, 2050)
4000 REM OPUS LINES
4010 SAVE ♦"M";l;" 1234567890" CODE 0,0: PRINT USR 8
4020 CAT 1: PRINT USR 8
Гордон - "GRDN2CODE"
40 CLEAR 26500: GO SUB 100: LOAD Dl"TLW2"CODE: GOTO 1000
70 SAVE D1 "TLW2B" LINE 40
80 SAVE Dl"TLW2"CODE 50000,15535
4000 REM GORDON LINES
4010 Dl" 1234567890" CODE 0,0: PRINT USR 8
4020 CAT 1: PRINT USR 8
WAFA - " WAFA2CODET
Сначала, без подключения WAFA-драйва, загрузите редактор с кассеты и
измените адрес CLEAR в строке 30 с 26500 на 28500. Перепишите программу на ленту.
Отключите питание. Подключите WAFA. Загрузите новую программу, затем:
40 CLEAR 28500: GO SUB 100: LOAD#"TLW2",50000: GOTO 1000
70 SAVE #"TLW2B" LINE 40
80 SAVE #"TLW2",50000,15535
2020 IF I$-"Y" OR I$-"y" THEN FORMAT#"R";2400;OPEN#B$,
"R": LPRINT (для RS232)
2020 IF I$-"Y" OR I$-"y" THEN OPEN #*"C": LPRINT (для центроникса)
в обоих случаях уберите (DELETE) строки 2025, 2030, 2040, 2050
4000 REM WAFA LINES
4010 SAVE #"А: 1234567890",0,0: PRINT USR 8
4020 CLS: CAT *"A: PRINT USR 8
Замечание: когда вы работаете с программой TLW64BASIC, вам надо убрать все
бейсиковские команды, связанные с лентой/диском, чтобы задействовать
дополнительные 2к системных переменных WAFA.
Интерфейс кемпстон "S"
После полной загрузки редактора наберите следующие прямые команды:
РОКЕ 64954,245: РОКЕ 64955,1 затем замените строку 2000 на:
2000 PAUSE 50
и уберите все остальные двухтысячные строки. Затем установите префикс РСТ,
"ВК", "ПС" так, как это необходимо для вашего принтера.
Интерфейс-1, nopmRS232
После полной загрузки редактора наберите следующие прямые команды:
РОКЕ 64954,207: РОКЕ 64955,30: РОКЕ 64956,201
измените строку 2000 на:
2000 PAUSE 50: FORMAT "В"; 19200: LPRINT
остальные двухтысячные строки уберите.
После того, как вы выполнили все предписания и смогли задействовать вашу
дисковую или иную систему, запишите программу на ленту вместе с внесенными в
нее изменениями, для этого используйте команду RUN 70.
ПРИКЛАДНАЯ ПРОГРАММА "TLW2.DATA"
Эта программа включает в себя раздел для печати сводки команд - RUN 7000, а
также сводку операторов управления печатью РСТ - RUN 7100 и имеет подпрограмму,
позволяющую вам выполнить трансляцию символов для экрана и для печати - RUN
7400. Эта программа может быть слита с программой с помощью команды MERGE.
Предварительно надо выполнить CLEAR 35000.
УСТРАНЕНИЕ МАРКЕРА КОНЦА СТРОКИ И ПР.
Функция DELETE была несколько расширена. Теперь, когда курсор находится на
строке нулевой длины, т.е. состоящей только из маркера "конец строки", то действие
команды DELETE приводит к полному изьятию строки.
Длина строки в новой версии была увеличена до 148 символов. Изменение можно
внести изменением РОКЕ в строке 2050. Заметьте, что такая длина строки не для всех
интерфейсов доступна и может быть ими понижена, если вы зададите значение выше
128.
Префикс операторов управления принтером выдается на сводке в качестве
оператора 0.
В отличие от первой версии программы сводка операторов РСТ переделана так,
чтобы соответствовать интерфейсу кемпстон-е вместо ZX LPRINT III. Если у вас
интерфейс ZX LPRINT III, то вам надо вернуть назад значения первых байтов в
соответствии с данным руководством. Если вы хотите отдельно записать файл
операторов РСТ, то обратите внимание на то, что начальный адрес был изменен, см.
список системных переменных.
Внимание!
Во время работы принтера, когда по оператору управления печатью призводится
обращение к бейсик-строке, может быть ситуация, ъ которой оператор INPUT
работает неправильно. Для преотвращения этого, войдите в бейсик и оттуда
поменяйте значение в ячейке 58282 на 0. Больше ни на что в программе это не
повлияет.
Измененная сводка системных переменных
