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

Aumento velocidad en firmware

This commit is contained in:
antoniovillena 2016-05-15 00:21:16 +02:00
parent 1d00d31018
commit cff31983be
2 changed files with 24 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
cores/Spectrum/multiboot.v
View File

@ -223,12 +223,31 @@ always @*
end end
GEN2_L: GEN2_L:
begin
next_state = MOD_H;
icap_ce = 0;
icap_wr = 0;
icap_din = {8'h6B, spi_addr[23:16]}; // 16'h030A; // 03 lectura SPI opcode + direccion SPI ALTA (03 = 1x, 6B = 4x)
end
/////// Registro MODE (para carga a 4x tras reboot)
MOD_H:
begin
next_state = MOD_L;
icap_ce = 0;
icap_wr = 0;
icap_din = 16'h3301; // Escritura a reg MODE
end
MOD_L:
begin begin
next_state = NUL_L; next_state = NUL_L;
icap_ce = 0; icap_ce = 0;
icap_wr = 0; icap_wr = 0;
icap_din = {8'h03, spi_addr[23:16]}; // 16'h030A; // 03 lectura SPI opcode + direccion SPI ALTA icap_din = 16'h3100; // Activamos bit de lectura a modo 4x en el proceso de Config
end end
/////
NUL_L: NUL_L:
begin begin

7
firmware/firmware.asm
View File

@ -214,6 +214,7 @@ keytab defb $00, $7a, $78, $63, $76 ; Caps z x c v
start ld bc, chrend-runbit start ld bc, chrend-runbit
ldir ldir
wreg scandbl_ctrl, $80
call loadch call loadch
im 1 im 1
ld de, fincad-1 ; descomprimo cadenas ld de, fincad-1 ; descomprimo cadenas
@ -312,10 +313,10 @@ star38 ld de, tmpbuf
ld (de), a ld (de), a
pop bc pop bc
call_prnstr ; Imprime máquina (ROM o core) call_prnstr ; Imprime máquina (ROM o core)
start4 ld d, a start4 ld d, 4
pop af pop af
jr nz, start5 jr nz, start5
ld d, a ld d, 16
start5 djnz start6 start5 djnz start6
dec de dec de
ld a, d ld a, d
@ -1379,7 +1380,6 @@ tosd ld ix, cad75
; out (c), l ; out (c), l
; call send1z ; call send1z
wreg scandbl_ctrl, $80
sbc hl, hl ; read MBR sbc hl, hl ; read MBR
ld ix, tmpbu2 ld ix, tmpbu2
call inirea call inirea
@ -1442,7 +1442,6 @@ tosd5 ld c, SPI_PORT
jr z, fatxx ; 04,06,0b,0c,0e -> FAT32 jr z, fatxx ; 04,06,0b,0c,0e -> FAT32
errsd ld ix, cad77 errsd ld ix, cad77
ferror ;wreg master_conf, 0 ferror ;wreg master_conf, 0
wreg scandbl_ctrl, 0
ld bc, $090d ld bc, $090d
call_prnstr call_prnstr
ld a, cad80 & $ff ld a, cad80 & $ff