mirror of https://github.com/zxdos/zxuno.git
Últimos cambios, ya sí los definivos que se grabarán para el crowd.
This commit is contained in:
parent
b4658e919b
commit
1515d6fa2d
|
@ -236,7 +236,7 @@ start ld bc, chrend-runbit
|
||||||
rrc l
|
rrc l
|
||||||
add hl, hl
|
add hl, hl
|
||||||
ld a, (outvid)
|
ld a, (outvid)
|
||||||
rrca
|
; rrca
|
||||||
rrca
|
rrca
|
||||||
ld a, h
|
ld a, h
|
||||||
adc a, a
|
adc a, a
|
||||||
|
@ -1984,7 +1984,7 @@ advan1 call showop
|
||||||
ld c, $0b
|
ld c, $0b
|
||||||
call showop
|
call showop
|
||||||
defw cad96
|
defw cad96
|
||||||
defw cad97
|
; defw cad97
|
||||||
defw cad98
|
defw cad98
|
||||||
defw $ffff
|
defw $ffff
|
||||||
call showop
|
call showop
|
||||||
|
@ -2005,7 +2005,7 @@ advan1 call showop
|
||||||
defw cad110
|
defw cad110
|
||||||
defw cad111
|
defw cad111
|
||||||
defw cad112
|
defw cad112
|
||||||
defw cad113
|
; defw cad113
|
||||||
defw $ffff
|
defw $ffff
|
||||||
ld de, $1201
|
ld de, $1201
|
||||||
call listas
|
call listas
|
||||||
|
@ -2070,12 +2070,12 @@ advan5 djnz advan6
|
||||||
defw cad110
|
defw cad110
|
||||||
defw cad111
|
defw cad111
|
||||||
defw cad112
|
defw cad112
|
||||||
defw cad113
|
; defw cad113
|
||||||
defw $ffff
|
defw $ffff
|
||||||
ret
|
ret
|
||||||
advan6 call popupw
|
advan6 call popupw
|
||||||
defw cad96
|
defw cad96
|
||||||
defw cad97
|
; defw cad97
|
||||||
defw cad98
|
defw cad98
|
||||||
defw $ffff
|
defw $ffff
|
||||||
ret
|
ret
|
||||||
|
@ -3433,7 +3433,8 @@ conti5 ld a, (ix)
|
||||||
call alto rdflsh
|
call alto rdflsh
|
||||||
ld a, (checkc)
|
ld a, (checkc)
|
||||||
dec a
|
dec a
|
||||||
jr nz, conti8
|
; jr nz, conti8
|
||||||
|
jr conti8
|
||||||
push ix
|
push ix
|
||||||
push bc
|
push bc
|
||||||
call alto check
|
call alto check
|
||||||
|
|
|
@ -1,6 +1,6 @@
|
||||||
cad0 defb 'Core: ',0
|
cad0 defb 'Core: ',0
|
||||||
cad1 defm 'http://zxuno.speccy.org', 0
|
cad1 defm 'http://zxuno.speccy.org', 0
|
||||||
defm 'ZX-Uno BIOS v0.44', 0
|
defm 'ZX-Uno BIOS v0.45', 0
|
||||||
defm 'Copyleft ', 127, ' 2016 ZX-Uno Team', 0
|
defm 'Copyleft ', 127, ' 2016 ZX-Uno Team', 0
|
||||||
defm 'Processor: Z80 3.5MHz', 0
|
defm 'Processor: Z80 3.5MHz', 0
|
||||||
defm 'Memory: 512K Ok', 0
|
defm 'Memory: 512K Ok', 0
|
||||||
|
@ -37,7 +37,7 @@ cad8 defm $10, ' ', $10, ' ', $10, 0
|
||||||
cad9 defb $14, $11, $11, $11, $11, $11, $11, $11, $11, $11, $11, $11, $11, $11
|
cad9 defb $14, $11, $11, $11, $11, $11, $11, $11, $11, $11, $11, $11, $11, $11
|
||||||
defb $11, $11, $11, $11, $11, $11, $11, $11, $11, $11, $11, $11, $18, $11
|
defb $11, $11, $11, $11, $11, $11, $11, $11, $11, $11, $11, $11, $18, $11
|
||||||
defb $11, $11, $11, $11, $11, $11, $11, $11, $11, $11, $11, $11, $11, $15, 0
|
defb $11, $11, $11, $11, $11, $11, $11, $11, $11, $11, $11, $11, $11, $15, 0
|
||||||
defb ' BIOS v0.44 ', $7f, '2016 ZX-Uno Team', 0
|
defb ' BIOS v0.45 ', $7f, '2016 ZX-Uno Team', 0
|
||||||
IF recovery=0
|
IF recovery=0
|
||||||
cad10 defb 'Hardware tests', 0
|
cad10 defb 'Hardware tests', 0
|
||||||
defb $11, $11, $11, $11, $11, $11, $11, $11, $11, $11, $11, $11
|
defb $11, $11, $11, $11, $11, $11, $11, $11, $11, $11, $11, $11
|
||||||
|
|
Loading…
Reference in New Issue