Элита для Специалиста

[Lethargeek]

ты Элиту на Акорне видел?

это в которой всё мерцает и мигает? а у тебя еще и проц дохлей примерно в два раза

все рисуется на экран - экран большой буферизовать не куда

но ты же не на весь экран рисуешь... или на весь??

ну ты код то пиши

я бы сделал как-нибудь вот так:

; основной цикл для "горизонтальных" отрезков

; "прямая" подветка
_hh0:
 or (hl)
 ld (hl),a
 dec CTR
 ret z
_hh1:
 ld a,ERR
 sub DY
 ld ERR,a
 jp c,_hd2
_hh2:
 ld a,MASK
 rrca
 ld MASK,a
 jp nc,_hh0
 inc h
 or (hl)
 ld (hl),a
 dec CTR
 jp nz,_hh1
 ret

; "диагональная" подветка
_hd0:
 or (hl)
 ld (hl),a
 dec CTR
 ret z
_hd1:
 ld a,ERR
 sub (DY-DX)
 ld ERR,a
 jp nc,_hh2
_hd2:
 inc l
 ld a,MASK
 rrca
 ld MASK,a
 jp nc,_hd0
 inc h
 or (hl)
 ld (hl),a
 dec CTR
 jp nz,_hd1
 ret

основной цикл для "вертикальных" - аналогично
CTR, MASK, ERR - распихиваешь в любые из регистров b c d e
в оставшийся свободный можно поместить одно из значений DY или (DY-DX)
второе придётся вписывать прямо в код