falso
/
zxuno-git
mirror of https://github.com/zxdos/zxuno.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Support for LX16

This commit is contained in:
antoniovillena 2017-12-07 10:13:50 +01:00
parent 66a2245f4b
commit dbbc9b10a7
2 changed files with 30 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
firmware/firmware.asm
View File

@ -358,6 +358,7 @@ start7 ld de, tmpbuf
call_prnstr ; Imprime máquina (ROM o core) call_prnstr ; Imprime máquina (ROM o core)
ENDIF ENDIF
start8 start8
IF version<5
wreg flash_cs, 0 ; activamos spi, enviando un 0 wreg flash_cs, 0 ; activamos spi, enviando un 0
wreg flash_spi, $9f ; jedec id wreg flash_spi, $9f ; jedec id
in a, (c) in a, (c)
@ -375,6 +376,7 @@ star10 add hl, hl
dec a dec a
jr nz, star10 jr nz, star10
ld (alto fllen), hl ld (alto fllen), hl
ENDIF
wreg scan_code, $f6 ; $f6 = kb set defaults wreg scan_code, $f6 ; $f6 = kb set defaults
halt halt
halt halt
@ -2129,6 +2131,9 @@ rotp call readat0 ; read 512 bytes of entries (16 entries)
erfnf ld ix, cad78 erfnf ld ix, cad78
terror jp ferror terror jp ferror
saba saba
IF version=5
sub $32
ELSE
IF version=4 IF version=4
sub $31 sub $31
ELSE ELSE
@ -2143,6 +2148,7 @@ saba
ENDIF ENDIF
ENDIF ENDIF
ENDIF ENDIF
ENDIF
ENDIF ENDIF
jr nz, erfnf jr nz, erfnf
call testl call testl
@ -2226,6 +2232,9 @@ otve call readata
erfnf2 jp erfnf erfnf2 jp erfnf
sabe pop bc sabe pop bc
pop hl pop hl
IF version=5
sub $32
ELSE
IF version=4 IF version=4
sub $31 sub $31
ELSE ELSE
@ -2240,6 +2249,7 @@ sabe pop bc
ENDIF ENDIF
ENDIF ENDIF
ENDIF ENDIF
ENDIF
ENDIF ENDIF
jr nz, erfnf2 jr nz, erfnf2
call testl call testl
@ -2885,12 +2895,17 @@ imyesn call bloq1
; HL: address of bitstream ; HL: address of bitstream
; ------------------------------------ ; ------------------------------------
calbit inc b calbit inc b
IF version<5
calbi1 ld a, 9 calbi1 ld a, 9
cp b cp b
ld hl, $0040 ld hl, $0040
jr nc, calbi2 jr nc, calbi2
ld hl, $0b80 ld hl, $0b80
calbi2 ld de, $0540 calbi2 ld de, $0540
ELSE
calbi1 ld hl, $0980
ld de, $0740
ENDIF
calbi3 add hl, de calbi3 add hl, de
djnz calbi3 djnz calbi3
ret ret
@ -4153,8 +4168,13 @@ finlog incbin strings.bin.zx7b
sdtab defw $0020, $0040 sdtab defw $0020, $0040
defw $0040, $0080 defw $0040, $0080
fllen defw $0000, $0000 fllen defw $0000, $0000
IF version<5
defw $0540 defw $0540
subnn sub 6 subnn sub 6
ELSE
defw $0740
subnn sub 6*4
ENDIF
ret ret
IF recovery=0 IF recovery=0
micont wreg master_conf, 1 micont wreg master_conf, 1
@ -4481,9 +4501,11 @@ slot2a ld de, 3
and $3f and $3f
ld h, d ld h, d
ld l, a ld l, a
IF version<5
cp 19 cp 19
jr c, slot2b jr c, slot2b
ld e, $c0 ld e, $c0
ENDIF
slot2b add hl, de ; $00c0 y 2f80 slot2b add hl, de ; $00c0 y 2f80
add hl, hl add hl, hl
add hl, hl add hl, hl

8
firmware/strings.asm
View File

@ -311,6 +311,13 @@ cad79 defb ' Successfully burned ', 0
cad80 defb 'EAR input', 0 cad80 defb 'EAR input', 0
cad81 defb 'SD file', 0 cad81 defb 'SD file', 0
cad82 defb 'Input machine\'s name', 0 cad82 defb 'Input machine\'s name', 0
IF version=5
files defb 'ESXDOS ZX2'
defb 'FIRMWAREZX2'
defb 'FLASH ZX2'
defb 'SPECTRUMZX2'
fileco defb 'CORE ZX2'
ELSE
IF version=4 IF version=4
files defb 'ESXDOS ZX1' files defb 'ESXDOS ZX1'
defb 'FIRMWAREZX1' defb 'FIRMWAREZX1'
@ -342,6 +349,7 @@ fileco defb 'CORE ZXA'
ENDIF ENDIF
ENDIF ENDIF
ENDIF ENDIF
ENDIF
cad83 defb 'Input', 0 cad83 defb 'Input', 0
defb $11, $11, $11, $11, $11, $11, $11, $11, 0 defb $11, $11, $11, $11, $11, $11, $11, $11, 0
defb 'Keyb Layout', 0 defb 'Keyb Layout', 0