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

Adelanto el seteo de layout de teclado para detectar pulsación en arranque

This commit is contained in:
antoniovillena 2017-05-29 12:53:44 +02:00
parent 285c6ab648
commit 29e40433ca
3 changed files with 20 additions and 17 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
firmware/FIRMWARE.ZX1
View File

Binary file not shown.

35
firmware/firmware.asm
View File

@ -368,20 +368,7 @@ star45 add hl, hl
dec a
jr nz, star45
ld (alto fllen), hl
IF recovery=0
ld d, 4
pop af
jr nz, start5
ld d, 16
start5 djnz start6
dec de
ld a, d
or e
jr nz, start6
ld hl, $0017 ; Si se acaba el temporizador borrar
ld de, $2001 ; lo de presione Break
call window
start50 wreg scan_code, $f6 ; $f6 = kb set defaults
wreg scan_code, $f6 ; $f6 = kb set defaults
halt
halt
wreg scan_code, $ed ; $ed + 2 = kb set leds + numlock
@ -405,7 +392,23 @@ star54 inc b
outi
bit 7, h ; compruebo si la direccion es 0000 (final)
jr nz, star54 ; repito si no lo es
star55 ld hl, (joykey)
star55
IF recovery=0
ld d, 4
pop af
jr nz, start5
ld d, 16
start5 djnz start6
dec de
ld a, d
or e
jr nz, start6
ld hl, $0017 ; Si se acaba el temporizador borrar
ld de, $2001 ; lo de presione Break
push bc
call window
pop bc
ld hl, (joykey)
inc h
inc l
ld a, h
@ -2489,7 +2492,7 @@ blst4 call combol
ld (active), a
jr nc, blst5
ld (bitstr), a
blst5 jp start50
blst5 jp conti
ENDIF
imyesn call bloq1

2
firmware/strings.asm
View File

@ -24,6 +24,7 @@ cad5 defm $10, ' ', $1c, ' and ', $1d, ' to move selection ', $10,
defb $11, $11, $11, $11, $11, $11, $11, $11, $11
defb $11, $11, $11, $11, $11, $11, $11, $11, $11
defb $11, $11, $11, $11, $11, $11, $11, $11, $15, 0
cad118 defm ' Please select boot machine', 0
cad6 defb 'Enter Setup', 0
cad7 defb ' Main ROMs Upgrade Boot Advanced Exit', 0
defb $12, $11, $11, $11, $11, $11, $11, $11, $11, $11, $11, $11, $11, $11
@ -343,7 +344,6 @@ cad116 defb 'Disable for', 0
defb 'tibility with', 0
defb 'old games', 0, 0
cad117 defb ' Add new core', 0
cad118 defm ' Please select boot machine', 0
;cad199 defb 'af0000 bc0000 de0000 hl0000 sp0000 ix0000 iy0000', 0