РУСИФИКАЦИЯ ПРОГРАММ В ЭТОЙ КНИГЕ
Все программы, вошедшие в эту книгу, переведены на русский
язык. Если Ваш "Спектрум" имеет русский регистр, то набор русского
текста не вызовет у Вас трудностей. Но, учитывая тот факт, что
большинство компьютеров у наших пользователей нерусифицированные,
мы использовали в программе загружаемый символьный набор "НС" в ко-
дах КОИ-7 по стандарту ASCII, (он приведен ниже). В этом символьном
наборе заглавным букван соответствуют английские, а строчным
русские буквы. Поэтому достаточно легко совмещаются два вида шрифта
в одной строке, а переключение РУС/ЛАТ производится клавишей CAPS
LOCK.
Формирование символьного набора.
Отходом от стандарта в символьном наборе является то, что сим-
волу с кодом 127 соответствует "Ъ", а символ (С) -"копирайт" (не
соответствующий стандарту ASCII), закреплен за символом "g". Пос-
ледний достаточно редко используется в тексте, и им можно пожертво-
вать, а вот "Ъ" и "копирайт" - встречаются довольно часто, поэтому
желательно их оба сохранить.
Для формирования символьного набора используется программа для
шестнадцатиричного ввода, приведенная в приложении. Если Вы читаете
журнал "ZX-РЕВЮ", то Вы можете для набора дампа воспользоваться
приведенной там программой "Memory Editor" (см. N1 и 3 за 1994 г.).
После того, как работа по вводу этих кодов будет завершена,
запишите полученный символьный набор на магнитную ленту: SAVE "chr"
CODE 64600,768. Он пригодится Ван и для всех других программ.
Подключение русскоязычного символьного
набора перед вводом програнны.
СИМВОЛЬНЫЙ НАБОР "НС" КОИ-7
|
FC58 |
00 |
00 |
00 |
00 |
00 |
00 |
00 |
00 |
: 54 |
|
FC60 |
00 |
18 |
18 |
18 |
18 |
00 |
18 |
00 |
: D4 |
|
FC68 |
00 |
6C |
6 с |
6C |
00 |
00 |
00 |
00 |
:A8 |
|
FC70 |
00 |
6C |
FE |
6C |
6C |
FE |
6C |
00: |
: 18 |
|
FC7 8 |
00 |
18 |
7E |
58 |
7E |
1A |
7E |
18 |
: 90 |
|
FCBO: |
00 |
62 |
64 |
08 |
10 |
26 |
46 |
00: |
:C6 |
|
FC88: |
00 |
30 |
58 |
30 |
7A |
CC |
76 |
00: |
:F8 |
|
FC90: |
00 |
18 |
30 |
00 |
00 |
00 |
00 |
00: |
:D4 |
|
FC98 : |
00 |
ОС |
18 |
18 |
18 |
18 |
ОС |
00: |
: ОС |
|
FCAO: |
00 |
30 |
18 |
18 |
18 |
18 |
30 |
00 : |
:5C |
|
FCA8 |
00 |
00 |
6C |
38 |
FE |
38 |
6C |
00 |
:EA |
|
FCBO |
00 |
00 |
18 |
18 |
7E |
18 |
18 |
00 |
8A |
|
FCB8 : |
00 |
00 |
06 |
00 |
00 |
18 |
18 |
30 |
14 |
|
FCCO: |
00 |
00 |
00 |
00 |
7C |
00 |
00 |
00: |
38 |
|
FCC8 : |
00 |
00 |
00 |
00 |
00 |
18 |
18 |
00 |
:F4 |
|
FCDO: |
00 |
00 |
06 |
ОС |
18 |
30 |
60 |
00 |
86 |
|
FCD8: |
00 |
3C |
66 |
6E |
76 |
66 |
3C |
00 |
:FC |
|
FCEO: |
00 |
18 |
38 |
18 |
18 |
18 |
3C |
00 |
: BO |
|
FCE8: |
00 |
3C |
66 |
06 |
3C- |
60 |
7E |
00: |
:A6 |
|
FCFO: |
00 |
3C |
66 |
ОС |
06 |
66 |
3C |
00 |
: 42 |
|
FCF8: |
00 |
ОС |
1С |
2C |
4C |
7E |
ОС |
00: |
: IE |
|
FDOO: |
00 |
7E |
60 |
7C |
06 |
66 |
3C |
00: |
: FF |
|
FD08 : |
00 |
3C |
60 |
7C |
66 |
66 |
3C |
00: |
: 25 |
|
FD10: |
00 |
7E |
66 |
ОС |
18 |
30 |
30 |
00: |
: 75 |
|
FD18: |
00 |
3C |
66 |
3C |
66 |
66 |
3C |
00: |
:FB |
|
FD20: |
00 |
3C |
66 |
66 |
3E |
06 |
зс |
00: |
:A5 |
|
FD28 |
00 |
00 |
18 |
18 |
00 |
18 |
18 |
00: |
: 85 |
|
FD30: |
00 |
00 |
18 |
18 |
00 |
18 |
18 |
30: |
:BD |
|
FD38 : |
00 |
00 |
ОС |
18 |
30 |
18 |
ОС |
00 |
: AD |
|
FD4 0: |
00 |
00 |
00 |
7C |
00 |
7C |
00 |
00 |
: 35 |
|
FD48: |
00 |
00 |
30 |
18 |
ОС |
18 |
30 |
00 |
: El |
|
FD50: |
00 |
3C |
66 |
ОС |
18 |
00 |
18 |
00 |
:2B |
|
FD58 : |
3C |
42 |
99 |
A1 |
A1 |
99 |
42 |
3C |
:C5 |
|
FD60: |
00 |
3C |
66 |
66 |
7E |
66 |
66 |
00 |
: AF |
|
FD68 : |
00 |
7C |
66 |
7C |
66 |
66 |
7C |
00 |
: OB |
|
FD70: |
00 |
3C |
66 |
60 |
60 |
66 |
3C |
00 |
: 71 |
|
FD78: |
00 |
7 С |
66 |
66 |
66 |
66 |
7C |
00 |
: 05 |
|
FD80 |
00 |
7E |
60 |
7C |
60 |
60 |
7E |
00 |
: 15 |
|
FD88: |
00 |
7E |
60 |
7C |
60 |
60 |
60 |
00 |
: FF |
|
FD90: |
00 |
3C |
66 |
60 |
6E |
66 |
3C |
00 |
:9F |
|
FD98 . |
00 |
66 |
66 |
7E |
66 |
66 |
66 |
00: |
: 11 |
|
FDAO: |
00 |
ЭС |
18 |
18 |
18 |
18 |
3C |
00: |
: 75 |
|
FDA8: |
00 |
OE |
06 |
06 |
66 |
66 |
ЭС |
00 |
:C7 |
|
FDBO: |
00 |
66 |
6C |
78 |
78 |
6C |
66 |
00: |
: 41 |
|
FDB8 |
00 |
60 |
60 |
60 |
60 |
60 |
7E |
00: |
: 13 |
|
FDCO : |
00 |
C6 |
EE |
D6 |
D6 |
C6 |
C6 |
00: |
;A9 |
|
FDC8 : |
00 |
66 |
66 |
76 |
6E |
66 |
66 |
00: |
: 41 |
|
FDDO: |
00 |
3C |
66 |
66 |
66 |
66 |
3C |
00: |
:DD |
|
FDD8: |
00 |
7C |
66 |
66 |
7C |
60 |
60 |
00: |
59 |
|
FDEO: |
00 |
3C |
66 |
66 |
6E |
6E |
3E |
00: |
FF |
|
FDE8 |
00 |
7C |
66 |
66 |
7C |
6C |
66 |
00: |
7B |
|
FDFO: |
00 |
3C |
60 |
3C |
06 |
66 |
3C |
00: |
6D |
|
FDF8: |
00 |
7E |
18 |
18 |
18 |
18 |
18 |
00: |
EB |
|
FEOO: |
00 |
66 |
66 |
66 |
66 |
66 |
3C |
00: |
38 |
|
FE08 |
00 |
66 |
66 |
66 |
66 |
3C |
18 |
00: |
F2 |
|
FEIO: |
00 |
C6 |
C6 |
D6 |
D6 |
FE |
44 |
00: |
88 |
|
FE18: |
00 |
66 |
3C |
18 |
18 |
3C |
66 |
00: |
8A |
|
FE20 |
00 |
66 |
3C |
18 |
18 |
18 |
18 |
00: |
20 |
|
FE28 |
00 |
7C |
ОС |
18 |
30 |
60 |
7C |
00: |
D2 |
|
FE30: |
00 |
IE |
18 |
18 |
18 |
18 |
IE |
00: |
CA |
|
FE38 |
00 |
CO |
60 |
30 |
18 |
ОС |
06 |
00: |
BO |
|
FE40. |
00 |
78 |
18 |
18 |
18 |
18 |
78 |
00: |
8E |
|
FE48 : |
00 |
18 |
3C |
5A |
18 |
18 |
18 |
00 |
: ЗС |
|
FE50: |
00 |
00 |
00 |
00 |
00 |
00 |
00 |
FF |
•4D |
|
FE58: |
00 |
00 |
DC |
F6 |
F6 |
F6 |
DC |
00 |
F0 |
|
FE60: |
00 |
00 |
3C |
66 |
7E |
66 |
66 |
00 |
: 4А |
|
FE68: |
00 |
00 |
7C |
60 |
7C |
66 |
7С |
00 |
: АО |
|
FE70: |
00 |
00 |
6C |
6C |
6C |
6С |
7Е |
06 |
А2 |
|
FE78: |
00 |
00 |
3C |
6C |
6C |
6С |
FE |
С6 |
.ВА |
|
FE80: |
00 |
00 |
7E |
60 |
7 С |
60 |
7Е |
00 |
:В6 |
|
FE88: |
00 |
00 |
7 С |
D6 |
D6 |
7С |
10 |
00 |
: ЗА |
|
FE90 ' |
00 |
00 |
ЗЕ |
30 |
30 |
30 |
30 |
00 |
:8С |
|
FE98 : |
00 |
00 |
66 |
3C |
18 |
ЗС |
66 |
00 |
: F2 |
|
FEAO: |
00 |
00 |
66 |
66 |
6E |
76 |
66 |
00 |
В4 |
|
FEA8. |
00 |
18 |
66 |
66 |
6E |
76 |
66 |
00 |
: D4 |
|
FEBO: |
00 |
00 |
66 |
6C |
78 |
6С |
66 |
00 |
: СА |
|
FEB8: |
00 |
00 |
IE |
36 |
36 |
36 |
66 |
00: |
: DC |
|
FECO: |
00 |
00 |
C6 |
EE |
D6 |
С6 |
С6 |
00. |
,D4 |
|
FEC8: |
00 |
00 |
66 |
66 |
7E |
66 |
66 |
00: |
: DC |
|
FEDO : |
00 |
00 |
3C |
66 |
66 |
66 |
ЗС |
00: |
: 78 |
|
FED8: |
00 |
00 |
7E |
66 |
66 |
66 |
66 |
00 |
ЕС |
|
FEEO: |
00 |
00 |
3E |
66 |
ЗЕ |
36 |
66 |
00 |
5С |
|
FEE8: |
00 |
00 |
7C |
66 |
66 |
7С |
60 |
00: |
: OA |
|
FEFO: |
00 |
00 |
3C |
66 |
60 |
66 |
ЗС |
00: |
92 |
|
FEF8- |
00 |
00 |
7E |
18 |
18 |
18 |
18 |
00 |
:D4 |
|
FFOO: |
00 |
00 |
66 |
66 |
ЗЕ |
06 |
ЗС |
00: |
:4В |
|
FF08: |
00 |
00 |
D6 |
D6 |
7C |
D6 |
D6 |
00: |
DB |
|
FF10: |
00 |
00 |
7C |
66 |
7C |
66 |
7С |
00 |
4F |
|
FF18 |
00 |
00 |
60 |
60 |
7 С |
66 |
7С |
00 |
35 |
|
FF20 : |
00 |
00 |
C6 |
C6 |
F6 |
DE |
F6 |
00 : |
75 |
|
FF28: |
00 |
00 |
3C |
66 |
ОС |
66 |
ЗС |
00. |
77 |
|
FF30: |
00 |
00 |
C6 |
D6 |
D6 |
D6 |
FE |
оо- |
75 |
|
FF38 : |
00 |
00 |
78 |
ОС |
ЗС |
ОС |
78 |
00: |
7В |
|
FF4 0: |
00 |
00 |
C6 |
D6 |
D6 |
D6 |
FF |
03: |
89 |
|
FF48 |
00 |
00 |
66 |
66 |
ЗЕ |
06 |
06 |
00 |
5D |
|
FF50: |
00 |
00 |
70 |
30 |
ЗС |
36 |
ЗС |
00 : |
9D |
Перед тем, как набирать текст Бейсик-программы, можете загру-
зить русский символьный набор:
CLEAR 64599: LOAD "chr"CODE 64600
И переключиться на него после загрузки:
РОКЕ 23606,88 РОКЕ 23607,251
Теперь включен загруженный символьный набор. Попробуйте наби-
рать Бейсик-программу Токены ключевых слов "Спектрума", состоящие
из заглавных латинских букв, будут печататься как обычно Текст,
набираемый при помощи буквенных клавишей при отключенном режиме
CAPS LOCK, будет набираться русскими буквами. Так же он будет выг-
лядеть и на экране. При включении регистра CAPS LOCK, текст будет
набираться латинскими буквами. При этом, правда, придется обходить-
ся только заглавными русскими и латинскими буквами, но зато это
позволит легко совмещать русский и английский текст внутри одного
оператора PRINT Имена переменных для удобства чтения набираются
заглавными латинскими буквами.
Запуск русскоязычного символьного
набора нэ набранное программы.
Во всех программах есть вспомогательные строки, предназначен-
ные для загрузки символьного набора примерно такого вида (эта стро-
ка, как правило, является строкой, с которой происходит автостарт
программы):
2 CLEAR 64599: LOAD "chr"CODE 64600
Кроме того, для переключения символьных наборов существуют
специальные строки - переключатели шрифтов:
8 РОКЕ 23606,88: РОКЕ 23607,251: RETURN
9 РОКЕ 23606,0: РОКЕ 23 607,60: RETURN
Подавая прямые команды GO SUB 6 или GO SUB 9 или вставляя их в
программу, можно переключаться на загруженный символьный набор
(русскоязычный) или опять на символьный набор ПЗУ (стандартный).
санозапнсь набираемой программы на ленту.
Практически в каждой программе существует еще одна вспомога-
тельная строка, которая служит для самозаписи готовой программы на
ленту
5 SAVE "FILENAME" LINE2: STOP
Вы можете несколько изменить ее:
S SAVE "FILENAME" LINE2: SAVE "chr"CODE 6^600,768: STOP
В этом случае при подаче команды "RUN 5" на ленту запишется не
полуфабрикат, который затем надо скомпоновать с символьным набором,
а уже полностью готовый для загрузки блок файлов.
Автоматическая проварка записи.
В строку самоэаписи можете добавить автоматическую проверку:
5 SAVE "FILENAME" LINE2: SAVE "chr"CODE 64600,768:
VERIFY "" : VERIFY ""CODE: STOP
Если Вы работаете с дисководом.
Несколько слов иадо сказать для тех пользователей, которые
имеют БЕТА-ДИСК интерфейс. В целом адаптация программ под диск не
должна вызвать проблем. Как обычно, перед LOAD ставится префикс
RANDOMIZE USR 15619: REM :
Потребуется только несколько изменить строку самоэаписи гото-
вой программы:
5 GO ТО 9990
и ввести дополнительные строки:
9990 RANDOMIZE USR 15619: REM : ERASE "FILENAME"
9992 RANDOMIZE USR 15619: REM : SAVE "FILENAME" LINE 2
9994 LET ERR=USR 15619: REM : VERIFY "FILENAME"
9996 IF ERRO0 THEN PRINT FLASH 1;" ERROR!!! BEEP 1,0
9998 IF ERR=0 THEN PRINT INVERSE 1;" O.K. ": BEEP .1,20
Набор программы следует начинать имеиио с этих строк, а также
со строки загрузки символьного набора и переключателей шрифтов. Это
позволит Вам при перерывах в работе надежно сохранять результаты
своего труда.
