Build updates for FusionX
This commit is contained in:
@@ -415,7 +415,7 @@ FDCJMPL2: JP (IX)
|
|||||||
;-------------------------------------------------------------------------------
|
;-------------------------------------------------------------------------------
|
||||||
; 0 + <- 39
|
; 0 + <- 39
|
||||||
; -----------------------------------------
|
; -----------------------------------------
|
||||||
MSGSON: DB "+ TZFS v1.7 ", NULL ; Version 1.0-> first split from RFS v2.0
|
MSGSON: DB "+ TZFS v1.7.1 ", NULL ; Version 1.0-> first split from RFS v2.0
|
||||||
MSGSONEND: DB " **", CR, NULL ; Signon banner termination.
|
MSGSONEND: DB " **", CR, NULL ; Signon banner termination.
|
||||||
IF BUILD_FUSIONX = 0
|
IF BUILD_FUSIONX = 0
|
||||||
MSGSONT80: DB "(T80)", NULL ; T80 CPU detected.
|
MSGSONT80: DB "(T80)", NULL ; T80 CPU detected.
|
||||||
|
|||||||
@@ -737,16 +737,17 @@ RD1: CALL MOTOR
|
|||||||
JR C,STPEIR
|
JR C,STPEIR
|
||||||
CALL RTAPETZFS
|
CALL RTAPETZFS
|
||||||
JR C,STPEIR
|
JR C,STPEIR
|
||||||
RET2S: BIT 3,D
|
JR EIRTN
|
||||||
JR Z,EIRTN
|
;RET2S: BIT 3,D
|
||||||
|
; JR Z,EIRTN
|
||||||
STPEIR: CALL BRKEY ; Double check reason for exit, was it a break key?
|
STPEIR: CALL BRKEY ; Double check reason for exit, was it a break key?
|
||||||
LD A,01H
|
LD A,01H
|
||||||
JR NC,STPEIR1
|
JR NC,STPEIR1
|
||||||
LD A,02H
|
LD A,02H
|
||||||
STPEIR1: LD (RESULT),A ; Store result for later use.
|
STPEIR1: LD (RESULT),A ; Store result for later use.
|
||||||
CALL MSTOP
|
|
||||||
SCF ; Indicate error condition.
|
SCF ; Indicate error condition.
|
||||||
EIRTN: EI
|
EIRTN: CALL MSTOP
|
||||||
|
EI
|
||||||
RET
|
RET
|
||||||
|
|
||||||
;READ DATA
|
;READ DATA
|
||||||
|
|||||||
BIN
roms/tzfs.rom
vendored
BIN
roms/tzfs.rom
vendored
Binary file not shown.
Reference in New Issue
Block a user