Último mensaje de la página anterior:
Chema escribió:Respecto a las localizaciones donde se pide una tecla mira a ver si son las que tienen asignado gráfico pero que se visitan por segunda vez, con lo que no se pinta. En ese caso no debería esperarse por tecla, creo recordar.
Se me acaba de ocurrir y no tengo pc a mano para probar.
Esta es la rutina que pide al usuario que pulse tecla (emite un beep)
si es llamada cuando Spectrum no lo hace ... habrá que buscar un ejemplo de comportamiento diferente
y trazarlo
saludos
pere
L_969A ;L_969A: XOR A ; 969A AF ; A = A XOR A ; A = 0, borra A, flag Z = 1
; *** ADDED 15c7 (PSR) warn user to press a key ***
ldb #1 ; to make only one beep
jsr Beeps ; warns user to press a key
; *** END_ADDED ***
jsr i_84C2 ; espera una tecla ; IN A, ($FE) ; 969B DB FE ; Lee teclado (todas las filas)
; AND $1F ; 969D E6 1F ; Hace AND lógico de A con $1F
; CP $1F ; 969F FE 1F ; Compara A con $1F
; Ver que se puede hacer !? ; JR Z, L_969A ; 96A1 28 F7 ; si flag Z=1, bucle atrás
; color blanco/gris ; LD A, $07 ; 96A3 3E 07 ; Carga A con $07
; lo pone como color de borde ; OUT ($FE), A ; 96A5 D3 FE ; el valor de A se escribe en el puerto $FE
rts ; RET ; 96A7 C9 ; Retorna