сохранение указателя стека
lxi h,0000h
dad sp
shld sohr_sp
подготовка регистров.
HL должна читать адрес шиирмы, который где-то вычисляется и хранится в памяти
lhld adr_shirm - в HL загрузить адрес верхней строки "ширмы" из памяти.
lxi d,$0100 - в DE загрузить смещение для перехода к следующей колонке "ширмы".
lxi b,$ffff - в BC загружаем "ширму" или $0000 для её снятия.
mvi a,$20 - счетчик количества колонок ширмы, если пользоваться циклом
shirm_scr:
sphl - адрес ширмы в указатель стека
push b - две строки ширмы
push b - две строки ширмы
dad d - переход на следующую колонку ширмы
dcr a - счетчик циклов для ширмы
jnz shirm_scr - на повтор цикла
восстановление указателя стека
lhld sohr_sp
sphl
если циклом не пользоваться, а просто повторить 32 раза 4 команды загрузки ширмы, то её заполнение ускоряется на 30%.
[свернуть]