mirror of https://github.com/zxdos/zxuno.git
Actualizo con cambio propuesto por Quest para mantener layout de teclado tras reset
This commit is contained in:
parent
ca2814fb53
commit
46a48a4f42
|
|
@ -373,7 +373,8 @@ star51 ld a, (layout)
|
|||
ld hl, finus-1
|
||||
star52 djnz star53
|
||||
ld hl, finav-1
|
||||
star53 ld de, $ffff
|
||||
star53 djnz star55
|
||||
ld de, $ffff
|
||||
call dzx7b
|
||||
wreg key_map, 0
|
||||
ld hl, $c001
|
||||
|
|
@ -381,7 +382,7 @@ star54 inc b
|
|||
outi
|
||||
bit 7, h ; compruebo si la direccion es 0000 (final)
|
||||
jr nz, star54 ; repito si no lo es
|
||||
ld hl, (joykey)
|
||||
star55 ld hl, (joykey)
|
||||
inc h
|
||||
inc l
|
||||
ld a, h
|
||||
|
|
@ -1990,6 +1991,7 @@ advan ld h, 20
|
|||
ld bc, $0f04
|
||||
ld iy, layout
|
||||
call showop
|
||||
defw cad875
|
||||
defw cad88
|
||||
defw cad89
|
||||
defw cad90
|
||||
|
|
@ -2054,6 +2056,7 @@ advan1 call showop
|
|||
add hl, de
|
||||
jr nz, advan2
|
||||
call popupw
|
||||
defw cad875
|
||||
defw cad88
|
||||
defw cad89
|
||||
defw cad90
|
||||
|
|
|
|||
|
|
@ -1,6 +1,6 @@
|
|||
cad0 defb 'Core: ',0
|
||||
cad1 defm 'http://zxuno.speccy.org', 0
|
||||
defm 'ZX-Uno BIOS v0.55', 0
|
||||
defm 'ZX-Uno BIOS v0.56', 0
|
||||
defm 'Copyleft ', 127, ' 2016 ZX-Uno Team', 0
|
||||
defm 'Processor: Z80 3.5MHz', 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
|
||||
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.55 ', $7f, '2016 ZX-Uno Team', 0
|
||||
defb ' BIOS v0.56 ', $7f, '2016 ZX-Uno Team', 0
|
||||
IF recovery=0
|
||||
cad10 defb 'Hardware tests', 0
|
||||
defb $11, $11, $11, $11, $11, $11, $11, $11, $11, $11, $11, $11
|
||||
|
|
@ -339,7 +339,8 @@ cad85 defb 'Simulated', 0
|
|||
defb 'configuration', 0, 0
|
||||
cad86 defb 'Real joystick', 0
|
||||
defb 'configuration', 0, 0
|
||||
cad87 defb 'Select default', 0
|
||||
cad87 defb 'Select '
|
||||
cad875 defb 'Default', 0
|
||||
defb 'video output', 0, 0
|
||||
cad99 defb 'Enable VGA', 0
|
||||
defb 'scanlines', 0, 0
|
||||
|
|
|
|||
Loading…
Reference in New Issue