ti/lcd: use brand new support for IX in SRL and RR

Tento commit je obsažen v:
Virgil Dupras 2019-11-10 22:07:44 -05:00
rodič 2bff486cd2
revize 30d6fdb16b

Zobrazit soubor

@ -258,17 +258,12 @@ lcdSendGlyph:
ret z ; zero? nothing to do
push bc ; --> lvl 1
xor a
ld b, a
ld a, (ix)
; TODO: support SRL (IX) and RR (IX) in zasm
ld (ix+FNT_HEIGHT), a
.shiftLoop:
srl a
rr b
srl (ix)
rr (ix+FNT_HEIGHT)
dec c
jr nz, .shiftLoop
ld (ix), a
ld a, b
ld (ix+FNT_HEIGHT), a
pop bc ; <-- lvl 1
ret