Просто как вариант. В лоб, без таблиц и стека.
Скролл на 3 бита(пикселя)
46 тактов на байт.
Код:LD C,$F8 .... LD A,(HL) RLCA RLCA RLCA LD E,A XOR D AND C XOR D LD (HL),A DEC L LD A,(HL) RLCA RLCA RLCA LD D,A XOR E AND C XOR E LD (HL),A DEC LСкрытый текст
Код:LD HL,$401f LD BC,$8f8 loop LD A,(HL) RLCA RLCA RLCA LD D,A AND C LD (HL),A DEC L DUP 15 LD A,(HL) RLCA RLCA RLCA LD E,A XOR D AND C XOR D LD (HL),A DEC L LD A,(HL) RLCA RLCA RLCA LD D,A XOR E AND C XOR E LD (HL),A DEC L EDUP LD A,(HL) RLCA RLCA RLCA LD E,A XOR D AND C XOR D LD (HL),A LD DE,256+31 ADD HL,DE DEC B JP NZ,loop[свернуть]




Ответить с цитированием