Этюды - "бегущая" строка.

   ИФК: Александр Кабанов из г.Прокопьевска прислал сокращенный на 5 байт и 
ускоренный вариант "бегущей строки", опубликованной в ZX РЕВЮ 95/6 (MUGY).

          LD HL,#401F; адрес верхнего правого угла окна строки
          LD C,8
LOOP1     LD B,32    ; ширина строки в знакоместах
          LD E,L
          OR A
LOOP2     RL (HL)
          DEC L
          DJNZ LOOP2
          LD L,E
          INC H
          DEC C
          JR NZ,LOOP1
          RET