Actualizo firmware para LX16

This commit is contained in:
antoniovillena 2018-10-14 17:24:17 +02:00
parent e0a5283e1d
commit 110c924437
5 changed files with 3215 additions and 3217 deletions

File diff suppressed because it is too large Load Diff

Binary file not shown.

View File

@ -14,22 +14,21 @@
di
ld sp, $bfff-ini+6
wreg flash_cs, 1 ; desactivamos spi, enviando un 0
ld de, $c771 ; tras el out (c), h de bffc se ejecuta
push de ; un rst 0 para iniciar la nueva ROM
ld de, $ed80 ; en $bffc para evitar que el cambio de ROM
push de ; colisione con la siguiente instruccion
ld bc, $bffc-ini+6
push bc
wreg joyconf, %00010000
wreg master_mapper, 8 ; paginamos la ROM en $c000
wreg scandbl_ctrl, $c0 ; lo pongo a 28MHz
in a, ($1f)
cp %00011000 ; arriba y disparo a la vez
jr z, recov
cp %00010100 ; arriba y disparo a la vez
jr z, recov
wreg flash_cs, 1 ; desactivamos spi, enviando un 0
jr cont
wreg flash_cs, 0 ; activamos spi, enviando un 0
wreg flash_spi, 6 ; envío write enable
wreg flash_cs, 1 ; desactivamos spi, enviando un 1
wreg flash_cs, 0 ; activamos spi, enviando un 0
wreg flash_spi, $c5 ; envío wrear
out (c), 0
jp cont
nop
rst28 ld bc, zxuno_port + $100
pop hl
@ -46,7 +45,21 @@ getbit ld a, (hl)
rst38 jp $c006
cont wreg flash_cs, 0 ; activamos spi, enviando un 0
block $0066 - $
nmi66 jp $c003
retn
cont wreg flash_cs, 1 ; desactivamos spi, enviando un 1
wreg joyconf, %00010000
wreg master_mapper, 8 ; paginamos la ROM en $c000
wreg scandbl_ctrl, $c0 ; lo pongo a 28MHz
in a, ($1f)
cp %00011000 ; arriba y disparo a la vez
jr z, recov
cp %00010100 ; arriba y disparo a la vez
jr z, recov
wreg flash_cs, 0 ; activamos spi, enviando un 0
wreg flash_spi, 3 ; envio flash_spi un 3, orden de lectura
ini out (c), h ; envia direccion 008000, a=00,e=80,a=00
out (c), e
@ -68,12 +81,6 @@ recov ld hl, firmware-1
pop bc
jr boot1
defb 'AV2018'
nmi66 jp $c003
retn
block $0100 - $
include scroll/define.asm
ld sp, 0

View File

@ -3098,12 +3098,16 @@ calbi1 ld a, b ;1-69
ld b, a ;>=35 nc n-35
calbi2 ccf
push bc
push af
adc a, a
wreg flash_cs, 0 ; activamos spi, enviando un 0
wreg flash_spi, 6 ; envío write enable
wreg flash_cs, 1 ; desactivamos spi, enviando un 1
wreg flash_cs, 0 ; activamos spi, enviando un 0
wreg flash_spi, $c5 ; envío wrear
ld e, 0
rl e
out (c), e
out (c), a
wreg flash_cs, 1 ; desactivamos spi, enviando un 1
pop af
or a
pop bc
ld hl, $0240
@ -4123,15 +4127,18 @@ savech ld a, $20
; ------------------------
wrflsh
IF version=2
push af
adc a, a
wreg flash_cs, 0 ; activamos spi, enviando un 0
wreg flash_spi, 6 ; envío write enable
wreg flash_cs, 1 ; desactivamos spi, enviando un 1
wreg flash_cs, 0 ; activamos spi, enviando un 0
wreg flash_spi, $c5 ; envío wrear
ld l, 0
adc hl, hl
out (c), l
out (c), a
wreg flash_cs, 1 ; desactivamos spi, enviando un 1
pop af
ENDIF
wrfls0 ex af, af'
xor a
wrfls1 wreg flash_cs, 0 ; activamos spi, enviando un 0
wreg flash_spi, 6 ; envío write enable
wreg flash_cs, 1 ; desactivamos spi, enviando un 1
@ -4139,7 +4146,7 @@ wrfls1 wreg flash_cs, 0 ; activamos spi, enviando un 0
wreg flash_spi, $20 ; envío sector erase
out (c), d
out (c), e
out (c), a
out (c), 0
wreg flash_cs, 1 ; desactivamos spi, enviando un 1
wrfls2 call waits5
wreg flash_cs, 0 ; activamos spi, enviando un 0
@ -4603,29 +4610,27 @@ loadch
; A: number of pages (256 bytes) to read
; ------------------------
IF version=1
rdflsh ex af, af'
push hl
rdflsh push hl
ELSE
rdflsh push hl
push af
adc a, a
wreg flash_cs, 0 ; activamos spi, enviando un 0
wreg flash_spi, 6 ; envío write enable
wreg flash_cs, 1 ; desactivamos spi, enviando un 1
wreg flash_cs, 0 ; activamos spi, enviando un 0
wreg flash_spi, $c5 ; envío wrear
ld b, 0
rl b
ex af, af'
ld a, b
ld b, (zxuno_port >> 8)+1
out (c), a
wreg flash_cs, 1 ; desactivamos spi, enviando un 1
pop af
ENDIF
xor a
wreg flash_cs, 0 ; activamos spi, enviando un 0
wreg flash_spi, 3 ; envio flash_spi un 3, orden de lectura
pop hl
push hl
out (c), h
out (c), l
out (c), a
ex af, af'
out (c), 0
ex de, hl
in f, (c)
rdfls1 ld e, $20

View File

@ -4,7 +4,7 @@ cad1 defb 'http://zxuno.speccy.org', 0
ELSE
cad1 defb 'http://zxdos.forofpga.es', 0
ENDIF
defb 'ZX-Uno BIOS v0.75', 0
defb 'ZX-Uno BIOS v0.76', 0
defb 'Copyleft ', 127, ' 2018 ZX-Uno Team', 0
defb 'Processor: Z80 3.5MHz', 0
defb 'Memory: '
@ -41,7 +41,7 @@ cad8 defb $10, ' ', $10, ' ', $10, 0
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, $11, $15, 0
defb ' BIOS v0.75 ', $7f, '2018 ZX-Uno Team', 0
defb ' BIOS v0.76 ', $7f, '2018 ZX-Uno Team', 0
ELSE
defb 'Press <Edit> to Setup',0
defb ' <Break> Boot Menu', 0
@ -72,7 +72,7 @@ cad8 defb $10, ' ', $10, 0
cad9 defb $14, $11, $11, $11, $11, $11, $11, $11, $11, $11, $11, $11, $11, $11
defb $11, $11, $11, $11
defb $11, $11, $11, $11, $11, $11, $11, $11, $11, $11, $11, $11, $11, $15, 0
defb ' BIOS v0.75 ', $7f, '2018 ZX1 Team', 0
defb ' BIOS v0.76 ', $7f, '2018 ZX1 Team', 0
defs $66
ENDIF
cad10 defb 'Hardware tests', 0