Ученик 10 класса Сутурин Сергей пишет о том, что он внимательно просмотрел статьи в ZX-РЕВЮ-93 "Методы Билла Гильберта" (Михайленко B.C., Турович А.К., стр. 64) и "Стилизованные шрифты" (раздел "Маленькие хитрости", стр. 46). И вот что он в связи с этим придумал.

© Сутурин Сергей, г. Находка, 1994. Знакогенератор стилизованного шрифта.

Подумав, я решил, что в больших серьезных программах (например, в играх) такой способ создания оригинального символьного набора вряд ли пригодится, так как новый символьный набор всё равно занимает положенные ему 768 байтов. Поэтому, подумав, я решил, что лучше сделать специальный знакогенератор для печати стилизованными шрифтами (Листинг_1).

Перед входом в эту процедуру, как и в случае использования RST #10, подпрограммой #1601 должен быть открыт соответствующий канал для печати. Код печатаемого символа также, как и для RST #10 должен находиться в аккумуляторе. Далее по адресу ADRESS происходит формирование нового стилизованного символа из заданного символа символьного набора ПЗУ. Переносятся и преобразуются 8 байт. Таким образом, не происходит предварительный перенос и модификация всех 96 печатных символов, а каждый символ формируется непосредственно в момент печати - генерируется символьный набор из одного единственного символа.

Далее происходит переключение CHARS на этот новый "односимвольный" символьный набор. Значение CHARS на 256 байт меньше значенияADRESS, благодаря этому сформированный символ можно распечатать, задав код для печати равный 32.Печатается всегда "пробел" (код 32), но образ его каждый раз определяется содержимым восьми байтов ADRESS, благодаря этому и происходит печать.

LD C,A ;

RLA ; Процедура формирования

OR C ; одного стилизованного

LD (DE),A ; символа по адресу ADRESS.

INC HL ;

INC DE ;

DJNZ GENER ;

RET ;

GENER LD A,(HL) ; Второй вариант процедуры.

LD (DE),A ;

INC HL ;

INC DE ;

DJNZ GENER ;

LD DE,ADRESS+4 ;

LD B,4 ;

L1 LD A, (DE) ;

LD C,A ;

RLA ;

OR C ;

LD (DE),A ;

INC DE ;

DJNZ L1 ;

RET ;

GENER LD B,5 ; Третий вариант процедуры.

L1 LD A, (HL) ;

LD C,A ;

RLA ;

OR C ;

LD (DE),A ;

INC HL ;

INC DE ;

DJNZ L1 ;

INC DE ;

INC HL ;

INC DE ;

LD A,(HL) ;

LD C,A ;

RLA ;

OR C ;

LD C,A ;

SRL A ;

OR C ;

LD (DE),A ;

RET ;

GENER LD A,(HL) ; Четвертый вариант процедуры.

SRL A ;

LD (DE),A ;

INC HL ;

INC DE ;

DJNZ GENER ;

LD DE,ADRESS ;

LD B,8 ;

L1 LD A, (DE) ;

LD C,A ;

RLA ;

RLA ;

OR C ;

LD (DE),A ;

INC DE ;

DJNZ L1 ;

RET ;

GENER LD B,4 ; Пятый вариант процедуры.

L1 LD A, (HL) ;

LD (DE),A ;

INC HL ;

INC DE ;

DJNZ L1 ;

LD B,4 ;

L2 LD A, (HL) ;

RLA ;

LD (DE),A ;

INC DE ;

INC HL ;

DJNZ L2 ;

RET ;

Печатать можно и управляющие коды и псевдографику и токены, но в этих случаях печать производится символами символьного набора ПЗУ - программа переходит непосредственно на RST #10 (см. строки 20 и 30 и метку EXIT).

Для примера приведено несколько вариантов процедуры GENER. Подставляя разные процедуры, Вы получите разные варианты стилизованных шрифтов.

Листинг процедуры, приведенной выше, является скорее академическим, так как показывает суть метода. Для практического же использования процедуру удобно подключить к Дополнительным каналам. О том, как это можно сделать, мы подробно рассказывали в нашей книге "Прикладная графика".

Следует отметить, что поскольку в этой процедуре формирование символа происходит в момент печати, то она будет работать несколько медленнее, чем печать при помощи просто RST #10 символами заранее приготовленного символьного набора. Возможно, разница в скорости станет заметной при распечатке сильно насыщенного информацией экрана, хотя полагаем, что замедление не будет столь значительным.

© Кривцов A.H. (New Star), 1994.

Сначала - о двух программах в кодах. Первая - выводит на экран картинку, предварительно помещенную в память, причем делает это очень впечатляюще: из левого верхнего угла экрана появляется радужная полоса, которая перемещается к правому нижнему углу экрана, оставляя после себя на экране готовую картинку.

Вот листинг этой программы, набранный в ассемблере ZEUS (правда следует сказать, что мы добавили сюда процедуру очистки экрана - строки по 120 включительно - прим. ИФК).

-16384

Файл - картинка (длиной 6912 байт) должен быть предварительно загружен в буфер, расположенный с адреса 40200. После запуска этой программы экран очищается, BORDER, PAPER и INK становятся черного цвета. В этот момент на экран перебрасывается содержимое дисплейного файла (картинка без атрибутов, 6144 байт). Далее начинает работать основная часть программы, манипулируя с атрибутами. Происходит формирование радужной полосы, а после её прохода атрибуты остаются такими, как в исходном файле-картинке.

Следующая программа позволяет гасить экран аналогично тому, как он прорисовывался первой программой: радужная полоса, проходя по диагонали экрана, гасит его (опять же, манипулируя атрибутами).

Эти две программы удобно скомпоновать в единый блок с двумя точками входа: для прорисовки экрана и его гашения.

Вот листинг второй программы. Она начинается с адреса 40123 (123 байта занимает первая программа).

00010 ORG 40123

00020 ENT

00030 LD E,248

00040 CLS CALL CLS1

00050 HALT

Чтобы изменить цвет фона, остающийся после очистки экрана, измените число в строке 190. Если число меньше 45, то в строке 50 надо поставить команду LD L,(HL) а в строке 80 число увеличить настолько, насколько было уменьшено число в строке 190. Это число не должно превышать 71.

В строке 250 хранится число строк, а в строке 320 - число столбцов, которые подлежат очистке, считая от левого верхнего угла экрана. Если же надо очистить окно в заданном месте экрана, то надо изменить число в строке 380.

Для тех, кто пока что не работает с ассемблером, приводим (на следующей странице) шестнадцатеричный дамп объединенного кодового блока "радужных" эффектов. Что с ним делать, надеемся, объяснять уже не надо.

После набора сохраните блок кодов командой: SAVE "scr" CODE 40000,198.

Далее наберите несложную Бейсик-программку, демонстрирующую "радужные" эффекты (автостарт с 10 строки):

1 GO TO 40

10 CLEAR 3 9999

2 0 LOAD "scr" CODE

30 LOAD "screen" CODE 40200

4 0 RANDOMIZE USR 4 0000: PAUSE 0: RANDOMIZE USR 4 012 3: PAUSE 0

В 30 строке для демонстрации эффектов загружается любой файл-экран. После окончания загрузки нажмите любую клавишу, картинка плавно появится на экране. При следующем нажатии - плавно погаснет.

Гасить экран можно и по-другому. Вот как это делается в игре "TERMINATOR-2". Гашение происходит опять же благодаря манипуляции с атрибутами.

Среди многих аналогичных процедур, испытанных в редакции, эта выглядит привлекательно тем, что при сравнительно небольшой длине обладает повышенными качественными характеристиками: гашение экрана происходит плавно (8 ступеней), а скорость процесса можно регулировать в широчайших пределах, изменяя значение параметра в строке 20. Кроме того, программа релоцируема, её можно без переделок загружать в любой адрес и стартовать с адреса загрузки.

Вот шестнадцатеричный дамп этого блока кодов.

После набора сохраните блок кодов: SAVE "cls"CODE 4 0000,49.

Работу программы демонстрирует простая Бейсик-программка (автостарт с 10 строки):

1 GO T0 3 0

10 BORDER 0: PAPER 0: INK 7: C LEAR 3 9999

2 0 LOAD "cls" CODE

30 LOAD "screen" CODE 16384 40 PAUSE 0: RANDOMIZE USR 40000

Следующая программа предназначена для создания стилизованного символьного набора. Например, буква "А" будет выглядеть следующим образом: _

И

Шрифт очень красив, но его эргономические показатели низки, при использовании его для чтения, он слишком навязчив - быстро надоедает. Поэтому советую использовать его в заставках, для вывода названия игры, и т.д., но не больше.

Вот программа для генерации символьного набора.

Готовый символьный набор в этом примере формируется сразу же за кодовым блоком, по адресу 40051. Если Вас по какой-либо причине не устраивает этот адрес, то в строке 50 вместо FONT+1 подставьте нужный адрес.

Дамп блока кодов, формирующего стилизованный символьный набор:

Бейсик-программка, демонстрирующая новый символьный набор (автостарт с 10 строки):

1 GO TO 4 0

10 CLEAR 3 9999

2 0 LOAD "font" CODE

30 RANDOMIZE USR 4 0000

40 RANDOMIZE (40051-256): POKE 23606,PEEK 23670: POKE 23607,PEEK 23671 50 FOR a=32 TO 127: PRINT CHR$ a;" ";: NEXT a 60 POKE 23606,0: POKE 23607,60

И ещё одна программа, предназначенная для владельцев 128К компьютеров, так как в ней используются два экрана. Она выводит картинку после очистки экрана. Вывод происходит следующим образом: сначала экран (вместе с бордюром!) плавно "закрывается", как шторой, сверху вниз, а затем открывается. Эффект похож на "занавес".

Картинка загружается по адресу 24576.

© Дмитрий Барановский, Ростов-Дон, 1994.

Хочу привести одну любопытную процедуру, "вытащенную" из программы "COPY 83M". Результат её работы следующий. При запуске её с адреса 54838 (D636H) происходит очистка экрана, а затем плавная "раздвижка" среднего сегмента экрана (предварительно загруженного в память) от центра к краям. Сегмент для "раздвижки" -кодовый блок длиной 2048 байтов - заранее загружается в память по адресу 55000. Аналогично "раздвижке" работает и процедура "задвижки", стартующая с адреса 54871 (D657H) - изображение плавно сдвигается с краёв экрана к центру и там исчезает.

Мы приводим эту процедуру с непринципиальными изменениями адресов для получения более компактного

блока.

сегмент разворачиваемого экрана. При старте программы с адреса D636H сначала экран очищается, и устанавливаются атрибуты: INK 0; PAPER 6; BRIGHT 1. Затем вызывается подпрограмма "раздвижки" сегмента экрана, расположенная с адреса D67FH. Подпрограмма "сдвижки" сегмента является самостоятельной процедурой, она расположена с адреса D657H.

В процессе работы процедур происходит манипуляция только с дисплейным файлом, атрибуты в процессе не участвуют и остаются такими, какими были заданы в вызывающей программе D636H.

© Виталий Казаков, г. Армавир, 1994. Две несложные процедуры предназначены для прорисовки демонстрационных надписей в программах. Текстовое сообщение длиной не более 32 символов как бы "выстреливается" по одной букве, которые, пробегая вдоль всей строки, затем образуют текст. Предлагаю один вариант этой программы для "выстреливания" букв справа налево и другой вариант - слева направо.

Листинг первого варианта, набранный в ассемблере ZEUS:

ORG 40000 ENT

LD HL,TEXT

LD B,32

LD E,31

PUSH BC

PUSH DE

PUSH BC

LD A,22

RST 16

LD A,01

RST 16

LD A, E

RST 16

LD A,(HL)

RST 16

LD A,32

RST 16

DEC E

POP BC

DJNZ L2

POP DE

INC HL

POP BC

DJNZ L1 RET

DEFM /Demonstrati/ DEFM /on effect / DEFM / /

Листинг второго варианта:

A,01 16 A, E 16

A, (HL) 16 A,8 16 A,8 16

A,32 16 E

BC L2 DE HL BC L1

/ / / Demonstrat/ /ion effect/

А теперь шестнадцатерпчные дампы обоих вариантов программ. Для примера оба они расположены с адреса 40000. Если Вы захотите изменить адреса их расположения, то Вы должны будете изменить адрес, указывающий на текстовое сообщение (ячейки #9С41, #9С42, см. строку 30 в листингах).

TEXT

1. Спектрум в школе - программы, написанные в Бейсике для уроков математики и физики. Они одинаково хорошо работают и на уроке и дома, отличия несущественны.
2. Народный проект - решил написать вам о своей разработке, над которой я работал год назад, когда решал проблему простого дистанционного управления радиоэлектронной аппаратуры. Эта система, хотя она и не лишена недостатков, прошла довольно успешную проверку при установке ее на магнитофон.
3. Секреты TR-DOS - В РЕВЮ-94 № 2 на странице 36 мы приводили письмо Ильи Фомина из С.Петербурга, где он рассказывал о потрековой загрузке блоков кодов. Эта информация не прошла незамеченной нашими читателями.
4. Что бы это значило? - Только улеглись страсти по поводу странностей с оператором DRAW, как новую загадку для любителей головоломок прислал Раскопов М.В. из г. Пермь.
5. Компьютеры которые мы выбираем - Scorpion zs-256.
6. Компьютеры которые мы выбираем - доработки "Дельта-С".
7. Компьютеры которые мы выбираем - доработки "Пентагон-128".
8. Компьютеры которые мы выбираем - расширение памяти "Ленинграда-1" до 128К.
9. Читатель - читателю - Полезные советы.
10. Этюды - Ученик 10 класса Сутурин Сергей пишет о том, что он внимательно просмотрел статьи в ZX-РЕВЮ-93 "Методы Билла Гильберта" (Михайленко B.C., Турович А.К., стр. 64) и "Стилизованные шрифты" (раздел "Маленькие хитрости", стр. 46). И вот что он в связи с этим придумал.
11. Релоцируемость программ - После публикации статьи Александра Гмарь "Memory Editor" нас буквально захлестнула волна писем по поводу устранения недостатка программы - её нерелоцируемости. Два наиболее удачных варианта усовершенствования программы мы приводили в третьем номере журнала за этот год.
12. Разговор начистоту - нам адрес пришло письмо, содержащее солидный критический заряд, в том числе и в наш адрес. Письмо суровое, горькое, но справедливое и очень ценное хотя бы тем, что в нем как в капле воды отразились вопросы, поставленные ещё в десятке других писем.
13. Форум - во всем, что касается iS-DOS, масса противоречий. Мы надеемся, что Вы уже прочитали письмо от наших читателей из г. Северодвинска, посвященное проблемам, связанным с этой системой.
14. Авторам игровых программ - концепции недетерминированных игр.
15. Авторам игровых программ - Змеиный бой. Новое слово.
16. Сделай сам - игра "Минер".
17. Сделай сам - игра "Сапёр".
18. Советы эксперта - описание игры F16 Combat pilot.
19. Советы эксперта - описание игры Arnhem.
20. Авторская программа - Игровые и системные авторские разработки.
21. Наши дистрибьюторы - вы можете приобретать литературу "ИнФоркома" по следующим адресам.