Arreglo pequeño bug

This commit is contained in:
antoniovillena 2016-11-25 19:03:38 +01:00
parent 19006b4fbb
commit 52c975c98f
1 changed files with 3 additions and 10 deletions

View File

@ -327,6 +327,7 @@ star33 in a, (c)
jr z, star37 jr z, star37
dec a dec a
call cbname call cbname
xor a
jr star38 jr star38
star37 dec l star37 dec l
ld l, (hl) ld l, (hl)
@ -426,7 +427,7 @@ tstart5 sub $80
sub '1' sub '1'
cp 9 cp 9
ld h, a ld h, a
jp c, runbit1 jp c, runbit
jp z, alto easter jp z, alto easter
cp $19-'1' cp $19-'1'
jr z, start7 jr z, start7
@ -628,15 +629,7 @@ conti2 adc a, a ; 0 0 MODE1 /DISCONT MODE0 /I2KB /DISNMI DIVEN
xor %10101100 ; LOCK MODE1 DISCONT MODE0 I2KB DISNMI DIVEN 0 xor %10101100 ; LOCK MODE1 DISCONT MODE0 I2KB DISNMI DIVEN 0
ld (alto conti9+1), a ld (alto conti9+1), a
jp alto micont jp alto micont
runbit ;ld bc, zxuno_port runbit ld b, h
; ld e, core_addr
; out (c), e
; inc b
; in l, (c)
; in a, (c)
; or l
; jr nz, ccon0 ; descomentar cuando esté implementada lectura coreaddr
runbit1 ld b, h
call calbit call calbit
ld bc, zxuno_port ld bc, zxuno_port
ld e, core_addr ld e, core_addr