ИФК: О своих успехах в освоении ассемблера решил написать Хороших Дмитрий из города Сосенский, Калужской области.

КОРР: Совсем недавно, после прочтения книги "ИНФОРКОМА" о программировании в машинных кодах (КИ1), я начал писать программы на Ассемблере (и что самое интересное -они даже начали работать). Я хочу предложить свою процедуру для заполнения экрана. Такой эффект я видел в игре "CJ in the USA" Я не стал взламывать программу, а решил написать свою процедуру, которая бы воспроизводила такой эффект. Идея алгоритма пришла мне в голову во время просматривания в книге Инфоркома "Элементарная графика" процедуры для закраски части экрана. Там используется конвейерная организация стека, которую я и применил в своей программе.

Процедура занимает всего 188 байт (без буфера). Экран обязательно должен располагаться с адреса 32768. Программе также требуется некоторая область памяти (100 байт в большинстве случаев будет предостаточно), которая определяется в строках 1070 и 1080. STK B F это физическая верхняя граница (конец) стека. В листинге под стек отдана область памяти с 41000 по 41100. Благодаря строкам 760-900 при "доезжании" конвейером до конца отданной ему области памяти, он автоматически копируется в начало, и таким образом использует отданную ему область памяти циклически. Программа может заполнять экран параллельно с любого количества мест. Это определяется заполнением конвейера: нужно занести в STK_BEG, которая является началом буфера, 41000, а в область памяти, начиная с 41000, координаты тех точек, с которых программа должна заполнять экран: сначала X, потом Y.

Например, для трех точек (10,6), (16,16) и (22,6) область памяти с 41000 по 41005 будет содержать значения 10,6,16,16,22,6. В переменной STKEND в таком случае должно быть 41006, т.е. она указывает на адрес на единицу больший, чем конец буфера. Единственным ограничением при использовании процедуры является то, что на экране не может быть знакоместа с атрибутом 0 (т.е. черный цвет на черном фоне). Я не думаю, что это серьезное ограничение, а процедура использует это для распознования тех мест, где она еще не закрасила экран.

Кстати, этот факт может использоваться для усложнения эффекта: например, если между строками 110 и 120 изменить цвет различных частей экрана на отличный от 0, то заполнение не коснется этих частей экрана, а если в каждом знакоместе объединить вывод цветовой и графической информации, то можно будет в один экран "впечатывать" фрагмент любого другого экрана, причем фрагмент произвольной формы. Достаточно только отметить этот участок атрибутом 0. Это может делать, например, процедура PRINT, вызов которой вставляется между строками 530 и 540. В таком случае строки 80-110 не нужны вообще, а строки 30-70 не нужны в том случае, когда пользова-

этюды

те ль сам заполнит нужный уча-

Процедура заполнения экрана: FILL SCREEN

ORG 40000 ENT

LD HL,#5800

LD DE,#5801

LD BC,#2FF

LD (HL),L LDIR

LD HL,#8000

LD DE,#4000

LD ВС, #1800 LDIR

LD HL,(STKJ3EG)

LD D,(HL)

INC HL

LD E,(HL)

INC HL

LD (STK_BEG)

PUSH DE

LD A,E

OR A

JR Z,CONT_1

DEC E

CALL VERIFY

POP DE

PUSH DE

LD A.E

CP 28

JR Z,CONT_2

INC E

CALL VERIFY

POP DE

PUSH DE

LD A.D

OR A

JR Z,CONT_3

DEC D

CALL VERIFY

POP DE

PUSH DE

LD A.D

CP 31

JR Z,CONT_4

INC D

CALL VERIFY

POP DE

CALL TRANS

; экран

; заполняется ; атрибутом 0

;копирование ; графической ; информации ; на экран ; снятие координат ; с вершины конвейера и занесение в DE ; X -> DE, Y -> DE

; сохраним DE ; если Y=0, то на ; CONTJ

; иначе проверка ; точки сверху ; восстановим DE ; снова сохраним ; если Y=28, то на ; CONT_2

; иначе проверка точки снизу

; аналогично ; слева

аналогично справа

ЭТЮДЫ

реса в экранной области

1110 ORG 41000

1120 DEFB 10,6

1130 DEFB 16,16

1140 DEFB 22,6

занесение координат на конвейер

Текст процедуры PRINT:

1. От редакции - Приветствуем и поздравляем с наступившим Новым Годом наших постоянных читателей и тех, кто держит в руках ZX РЕВЮ впервые!
2. Спектрум в школе - Метод Зайделя решения СЛАУ.
3. Новые программы - И.Рощин. ABCDcopy v.1.1
4. Новые программы - И.Рощин. FLOPPY FORMAT v.1.00.
5. Новые программы - RST7. Интегрированный комплекс разработчика для программирования на ассемблере TASM4.
6. Визитная карточка - По многочисленным просьбам читателей мы сегодня представим Вашему вниманию электронные средства массовой информации. SPECTROFON, ZX-FORMAT, ZX-POWER.
7. TR-DOS для начинающих - интегральная микросхема КР 1818 ВГ93.
8. Читатель - читателю - о железе, софте и прочем...
9. Читатель - читателю - восстановление утерянной информации.
10. Компьютеры, которые мы выбираем - доработка компьютера "ATM-TURBO".
11. Этюды - простейшие приёмы написания грамтоных программ.
12. Этюды - процедура SPRITE OUT для вывода спрайтов с маской с точностью до пикселя.
13. Этюды - несколько полезных советов для написания оптимальных процедур.
14. Этюды - процедуры быстрого скроллинга экрана.
15. Этюды - процедура рисования круга без использования вычислений с плавающей точкой.
16. Этюды - несколько процедур для системных программистов.
17. Этюды - процедура заполнения экрана.
18. Этюды - процедура проявления экрана.
19. Этюды - примеры улучшения процедур.
20. Этюды - процедура очистки экрана оригинальным способом.
21. Этюды - программа вывода картинки на экран.
22. Этюды - процедура увеличения изображения в центре экрана на весь экран.
23. Этюды - процедура выгрузки/загрузки, не использующую системные переменные.
24. Этюды - процедура печати 42 символов в строке.
25. Ретро - начинаем новую рубрику "РЕТРО" В нее мы будем включать лучшие материалы из выпусков ZX РЕВЮ и других изданий прошлых лет.
26. Форум - единый стандарт программирования на Ассемблере.
27. Форум - доступ к порту #iF в TR-DOS 5.03.
28. Форум - о сокращении времени форматирования.
29. Форум - ещё раз о программе "ЖИЗНЬ".
30. Форум - изменения в мини-драйвере дисковых операций.
31. Форум - вызов TR-DOS из меню Бейсика-128.
32. Форум-Игры - в разделе рассмотрены: Dun Darach, Murray Mause (Supercop), Wild West Seymour, Sim City, Hero Quest, Dizzy-Y, Apollo, Cliffhanger, Laser Squad, Movie, Elite, Where Time Stood Still, Sceptre, Carrier Command, Math Day.
33. Перекресток - в разделе рассмотрены: Matt Lucas Florida Detective, Human Torch and The Thing, Экзаменационное расследование, Витязь Светогор, Snowball.
34. Перекресток драконов - книгу которую мы начинаем публиковать в данном номере ZX РЕВЮ, автор пргислал нам давно. Очень трудно нам было найти возможность ее публикации в виде отдельного издания довольно большого объема.
35. Советы экспертов - описание игры WELLINGTON AT WATERLOO.
36. Советы экспертов - описание игры NAPOLEON.
37. Советы экспертов - описание игры STAR FOX.
38. Компьютерная новелла - "Безумный зверь" (по игре " The Saga").
39. Компьютерная новелла - "Русалка" (по игре "MERMAID MADNESS").
40. Возвращаясь к напечатанному - в недавно выпущенной нами книге П.Федина "Полное описание и полный дизассемблер TR DOS 5.04 (5.03)" из-за технологической ошибки не был напечатан последний файл полного дизассемблера.
41. Справочная информация - где можно приобрести наши издания.