mirror of https://github.com/zxdos/zxuno.git
commit
0f7aab6bf6
Binary file not shown.
|
@ -3181,10 +3181,10 @@ calbi3 add hl, de
|
||||||
ELSE
|
ELSE
|
||||||
calbi1 ld a, b ;1-40
|
calbi1 ld a, b ;1-40
|
||||||
sub 20
|
sub 20
|
||||||
|
jr z, calbi2
|
||||||
jr c, calbi2 ;<20 c n
|
jr c, calbi2 ;<20 c n
|
||||||
ld b, a ;>=20 nc n-20
|
ld b, a ;>=20 nc n-20
|
||||||
calbi2 ld hl, $fec0
|
calbi2 ld hl, $fec0
|
||||||
ret z
|
|
||||||
ld de, $0c40
|
ld de, $0c40
|
||||||
calbi3 add hl, de
|
calbi3 add hl, de
|
||||||
djnz calbi3
|
djnz calbi3
|
||||||
|
|
Loading…
Reference in New Issue