Arreglo bug de inicialización de teclado (falla en periboard) detectado por Quest

This commit is contained in:
antoniovillena 2018-02-24 17:23:14 +01:00
parent 9391f71e15
commit ac7378196d
3 changed files with 11 additions and 11 deletions

Binary file not shown.

View File

@ -405,14 +405,6 @@ star10 add hl, hl
jr nz, star10
ld (alto fllen), hl
ENDIF
wreg scan_code, $f6 ; $f6 = kb set defaults
halt
halt
wreg scan_code, $ed ; $ed + 2 = kb set leds + numlock
halt
wreg scan_code, $02
halt
wreg mouse_data, $f4 ; $f4 = init Kmouse
star11 ld a, (layout)
rr a
ld hl, fines-1
@ -440,6 +432,14 @@ star16 djnz star18
ld a, d
or e
jr nz, star18
wreg scan_code, $f6 ; $f6 = kb set defaults
halt
halt
wreg scan_code, $ed ; $ed + 2 = kb set leds + numlock
halt
wreg scan_code, $02
halt
wreg mouse_data, $f4 ; $f4 = init Kmouse
IF vertical=0
ld hl, $0017 ; Si se acaba el temporizador borrar
ld de, $2001 ; lo de presione Break

View File

@ -1,6 +1,6 @@
cad0 defb 'Core: ',0
cad1 defb 'http://zxuno.speccy.org', 0
defb 'ZX-Uno BIOS v0.72', 0
defb 'ZX-Uno BIOS v0.73', 0
defb 'Copyleft ', 127, ' 2018 ZX-Uno Team', 0
defb 'Processor: Z80 3.5MHz', 0
defb 'Memory: '
@ -37,7 +37,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.72 ', $7f, '2018 ZX-Uno Team', 0
defb ' BIOS v0.73 ', $7f, '2018 ZX-Uno Team', 0
ELSE
defb 'Press <Edit> to Setup',0
defb ' <Break> Boot Menu', 0
@ -68,7 +68,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.72 ', $7f, '2018 ZX1 Team', 0
defb ' BIOS v0.73 ', $7f, '2018 ZX1 Team', 0
defs $66
ENDIF
cad10 defb 'Hardware tests', 0