Пивен Илья, г.Томск.
КОРР.: Предлагаю Вам релоцируемую процедуру, которая переворачивает
экран без использования буфера. Дальнейшие направления объединить в один блок
с CLOCK от ZX РЕВЮ 94/2 и получить прикольчик от IBM. Очень надеюсь, что столь
необычная процедура не "канет в лету".
Смотрится очень эффектно!
ORG #9C40
LD HL,#4000
LD DE,#57FF
LD BC,#C00
CYCL PUSH BC
PUSH HL
PUSH DE
LD L,(HL)
LD B,#8
LOOP1 RR L
RL H
DJNZ LOOP1
LD A,H
EX DE,HL
LD L,(HL)
LD B,#8
LOOP2 RR L
RL H
DJNZ LOOP2
POP DE
LD (DE),A
LD A,H
POP HL
LD HL,A
DEC DE
INC HL
DEC BC
LD A,B
OR C
JR NZ,CYKL
LD HL,#5800
LD DE,#5AFF
LD BC,#180
ATR PUSH HL
LD L,(HL)
LD A,(DE)
LD H,A
LD A,L
LD (DE),A
LD A,H
POP HL
LD HL,A
INC HL
DEC DE
DEC BC
LD A,B
OR C
JR NZ,ATR
RET
Дамп для MON:
#9C40 21 00 40 11 FF 57 01 00
#9C48 0C C5 E5 D5 6E 06 08 CB
#9C50 1D CB 14 10 FA 7C EB 6E
#9C58 06 08 CB 1D CB 14 10 FA
#9C60 D1 12 7C E1 77 1B 23 C1
#9C68 0B 78 B1 20 DC 21 00 58
#9C70 11 FF 5A 01 80 01 E5 6E
#9C78 1A 67 7D 12 7C E1 77 23
#9C80 1B 0B 78 B1 20 F0 C9 00
