|
Этюды - индикаторы.
|
Этюды
Индикаторы.
(С) Хомяк Сергей
г. Луцк
LD ВС,65533 LD А. #08 OUT (С).А IN А, я; AND #07 LD HL.20718 CALL 25048 LD ВС,65533 LD A, #09
0UTA.%A
AND #07
LD HL,20719 CALL 25048 LD ВС. 65533 LD A. #0A OUT (С) A IN A. (65 AND #07 LD HL.20720 LD (HL),#00 INC H
LD (HL),#00 INC H
LD (HL),#00 INC H
LD (HL) #00 INC H
LD (HL).#0O INC H
LD (HL),#00 INC H
LD (HL),#00
Предлагаю такой вид индикатора состояния музыкального соп-
FD FF
08
79
78 07
ЕЕ 50 D8 61 FD FF 09
79
78 07
EF 50 D8 61 FD FF 0А
79 78 07
F0 50 00
00
00
00
00
00
00
роцессора. При максимальной громкости, его высота равна одному курсору. В зависимости от громкости, фон индикатора изменяется.
открываем доступ к регистру 8 сопроцессора
считываем его данные
данные не должны быть больше 7
место расположения 1 индикатора
переход на подпрограмму индикации
открываем доступ к
регистру 9 сопроцессора
считываем его данные
данные не должны быть больше 7
место расположения 2 индикатора
переход на подпрограмму индикации
открываем доступ к
регистру 10 сопроцессора
считываем его данные данные не должны быть больше 7 место расположения 3 индикатора начало подпрограммы индикации
очистка того места,куда
будет выведен индикатор
ЭТЮДЫ
.#00
25068
25069
25071
25072
25073 25( 74 25075
25077
25078 25080 25082 25( 84 25085
24
36 00
24 В7 С8 47
36 FE
25
10 FB
26 5А F6 40 77
С9
изменение цвета фона индикатора
INC Н LD (HL). INC Н OR А RET Z LD Е. А LD (HL),#FE DEC Н DJNZ 25069 LD Н *5А OR #4 LD (HL).А RET вывод определенного кол ва линий в зависимости от данных с регистра
Этот трехканальный индикатор можно увидеть во многих музыкал-ках. Он красиво смотрится на экране и при максимальной громкости его высота достигает 24 линии (трех курсоров) Отображение на экране ведется через одну линию.
LD ВС.65533 L A, #08 OUT (C).A IN A,(Cl LD B, #AF LD HL,21933 CALL 25048 LD ВС.65533 LD A #)9 OUT (C).A IN A. (Cj LD B, #AD LD HL,21934 CALL 25048 LD ВС,65533 LD t #0A OUT (С) A IN A, (Cl LD B,#AB LD HL,21935 LD С, A XOR A LD D, #0F DEC С
JP M.25058 LD A. #7E LD (ftL),A DEC H LD A, H AND #07 JR NZ.25079 LD A. ft AND #F8 LD H, A LD A, L SUB #20 LD L, A JP Z.25080 LD A H
25000 25003 25005 25007 25009 25011 25014 25017 25020 25022 2 024 25026 25028 25031 25034 25037 2 039 25041 25043 25045
25048
25049
25050
25052
25053 25056
25058
25059
25060
25061 25 363
25065
25066
25068
25069
25070
25072
25073 25075
01 FD FF 3 08 ED 79 ED 78 06 AF 21 ВВ 55 CD D8 61 01 FD FF ЗЕ 09 ED 79 ED 78 06 AD 21 ВС 55 CD D8 61 01 FD FF 3E OA ED 79 ED 78 06 AB 21 BD 55 4F AF
06 OF OD
FA E2 61 ЗЕ 7E 77 25
7
E6 07 20 OE 7C
E6 F8
67
7D
D6 20 6F
28 05 7C
выбираэм регистр 8 сопроцессора
считываем его данные
место нахождения 1 индикатора переход на подпрограмму индикации
выбираем регистр 9 сопроцессора считываем его данные
место f ахожде чя 2 индикатора переход на подпрограмму инд кации
выбираем регистр 10 с опроцессора считываем его данные
место нахождения 3 индикатора начало подпрограммы индикации
отображение на экране данных с регистра
очистка экрана от
25076 С6 08 ADD А,#08
25078 67 LD Н. А "старых" данных
25079 25 DEC ft
25080 AF XOR A
25081 10 El DJNZ 25052 25083 C9 RET
Продолжается продажа программ для ZX Spectrum: - текстовый редактор ВК Write — система упр ления базой данных ВК CardFile — высокоэффективная система архивирования программ vPack.
Достаточно прислать конверт с обратным адресом. Адрес для заявок:
257010 Черкассы, а/я 1529 * * *
Если у кого-нибудь есть 128-я версия игры PACMANIA (с музыкой
Йля AY . а также заставки к 4грам .P.SOCCER MANAGER, THE DOUBLE и PACMANIA, пожалуйста, напишите по указанному адресу:
320009 г.Днепропетровск ул.Леваневского, д.10, корп 1, кв.46 Игрексофт
Обменяюсь программами жанра ARCADE / ADVENTURE ( QUEST ) и схемами доработок компьютера "ОРЕЛЬ БК-08" Приобрету или поменяю фирменные англииские кассеты ( с цветной картинкой и книжечкой-инструкцией ) с игрми сериала DIZZY или подобными
335045. г.Севаотополь-45, ул. Дм.Ульянова, д.10. кв.9, Киселевич! Ал ксандру. Тел.: (0690) 23-02-09 с 20 до 22 часов
Продам и обменяю программы ( игровые и системные ) на кассетах! Буду рад переписываться с любителями адвентюрных игр. а также с различными клубами ZX" Могу предложить игры на русском языке.
Адрес: 349238, г.Ровеньки 5, Луганская обл., ул Менделеева-36, Кравникову Денису или to Regal Phoenix.
|