*=$F820
; just the usual startup help now
LDA #<fmessage
LDY #>fmessage
JSR $AB1E
LDX #$18
JSR bars
LDA #<fmessage2
LDY #>fmessage2
JSR $AB1E
LDA #<dmessage
LDY #>dmessage
JSR $AB1E
LDX #$13
JSR bars
; skip the SD devices line if no SD card is present
LDX $faf6
CPX #$80
BNE skipsddevices
LDA #<dmessage2sd
LDY #>dmessage2sd
JSR $AB1E
skipsddevices
LDA #<dmessage2
LDY #>dmessage2
JSR $AB1E
LDX #$28
JSR bars
LDA #<dmessage3
LDY #>dmessage3
JSR $AB1E
; now device status messages, static for now as the bytes aren't set
; first the REU
LDX $faf7
CPX #$c0
BEQ reu2m
CPX #$80
BEQ reu512
LDA #<reusize0
LDY #>reusize0
JMP reuset
reu512
LDA #<reusize512
LDY #>reusize512
JMP reuset
reu2m
LDA #<reusize2048
LDY #>reusize2048
reuset
JSR $AB1E
LDA #<reumessage
LDY #>reumessage
JSR $AB1E
; then the SD status
LDA #<sdmessage1
LDY #>sdmessage1
JSR $AB1E
; insert NOT if no SD card present
LDX $faf6
CPX #$80
BEQ skipsdnot
LDA #<sdnot
LDY #>sdnot
JSR $AB1E
skipsdnot
LDA #<sdmessage2
LDY #>sdmessage2
JSR $AB1E
LDA #<sd8
LDY #>sd8
LDX $faf6
CPX #$80
BEQ sddev
LDA #<sd12
LDY #>sd12
sddev
JSR $AB1E
; check for byte indicating /sys/ mounted at $1af5
LDX $FAF5
CPX #$80
BNE skipwarn
LDA #<wmessage
LDY #>wmessage
JSR $AB1E
skipwarn
; jump to where the old routine would have (Basic NEW?)
JMP $A644
; just display X horizontal bar characters
bars
LDA #$C0
JSR $FFD2
DEX
CPX #$00
BNE bars
RTS
sdmessage1
.TEXT "* SD CARD "
.BYTE 0
sdnot
.TEXT "NOT "
.BYTE 0
sdmessage2
.TEXT "FOUND, DEFAULT DRIVE: "
.BYTE 0
sd8
.TEXT "8."
.BYTE 13,0
sd12
.TEXT "12."
.BYTE 13,0
reusize0
.TEXT "- NO "
.BYTE 0
reusize512
.TEXT "+ 512KB "
.BYTE 0
reusize2048
.TEXT "+ 2048KB "
.BYTE 0
reumessage
.TEXT "RAM EXPANSION UNIT FOUND."
.BYTE 13,0
fmessage
.TEXT 13
.TEXT "À FUNCTION KEYS ’"
.BYTE 0
fmessage2
.TEXT 13
.TEXT " F1’ LIST F2’ DIR F3’ RUN F4’ SYS4K*N"
; .BYTE 13
.TEXT " F5’ LOAD F6’ SAVE F7’ QMENU F8’ ACE-64"
.BYTE 13,13,0
dmessage
.TEXT "À DEVICE ASSIGNMENTS ’"
.BYTE 0
dmessage2sd
.BYTE 13
.TEXT " 8’ SD FS0 9’ SD FS1 10’ SD FS2 11’ SD FS3"
.BYTE 0
dmessage2
.BYTE 13
.TEXT " 12’ INTF 1 13’ INTF 2 14’ APPS 15’ ACE-64"
.BYTE 13,13,0
dmessage3
.BYTE 13,0
wmessage
.TEXT "! WARNING’: /SYS/ MOUNTED ON DEVICE 8."
.BYTE 13,0
; just the usual startup help now
LDA #<fmessage
LDY #>fmessage
JSR $AB1E
LDX #$18
JSR bars
LDA #<fmessage2
LDY #>fmessage2
JSR $AB1E
LDA #<dmessage
LDY #>dmessage
JSR $AB1E
LDX #$13
JSR bars
; skip the SD devices line if no SD card is present
LDX $faf6
CPX #$80
BNE skipsddevices
LDA #<dmessage2sd
LDY #>dmessage2sd
JSR $AB1E
skipsddevices
LDA #<dmessage2
LDY #>dmessage2
JSR $AB1E
LDX #$28
JSR bars
LDA #<dmessage3
LDY #>dmessage3
JSR $AB1E
; now device status messages, static for now as the bytes aren't set
; first the REU
LDX $faf7
CPX #$c0
BEQ reu2m
CPX #$80
BEQ reu512
LDA #<reusize0
LDY #>reusize0
JMP reuset
reu512
LDA #<reusize512
LDY #>reusize512
JMP reuset
reu2m
LDA #<reusize2048
LDY #>reusize2048
reuset
JSR $AB1E
LDA #<reumessage
LDY #>reumessage
JSR $AB1E
; then the SD status
LDA #<sdmessage1
LDY #>sdmessage1
JSR $AB1E
; insert NOT if no SD card present
LDX $faf6
CPX #$80
BEQ skipsdnot
LDA #<sdnot
LDY #>sdnot
JSR $AB1E
skipsdnot
LDA #<sdmessage2
LDY #>sdmessage2
JSR $AB1E
LDA #<sd8
LDY #>sd8
LDX $faf6
CPX #$80
BEQ sddev
LDA #<sd12
LDY #>sd12
sddev
JSR $AB1E
; check for byte indicating /sys/ mounted at $1af5
LDX $FAF5
CPX #$80
BNE skipwarn
LDA #<wmessage
LDY #>wmessage
JSR $AB1E
skipwarn
; jump to where the old routine would have (Basic NEW?)
JMP $A644
; just display X horizontal bar characters
bars
LDA #$C0
JSR $FFD2
DEX
CPX #$00
BNE bars
RTS
sdmessage1
.TEXT "* SD CARD "
.BYTE 0
sdnot
.TEXT "NOT "
.BYTE 0
sdmessage2
.TEXT "FOUND, DEFAULT DRIVE: "
.BYTE 0
sd8
.TEXT "8."
.BYTE 13,0
sd12
.TEXT "12."
.BYTE 13,0
reusize0
.TEXT "- NO "
.BYTE 0
reusize512
.TEXT "+ 512KB "
.BYTE 0
reusize2048
.TEXT "+ 2048KB "
.BYTE 0
reumessage
.TEXT "RAM EXPANSION UNIT FOUND."
.BYTE 13,0
fmessage
.TEXT 13
.TEXT "À FUNCTION KEYS ’"
.BYTE 0
fmessage2
.TEXT 13
.TEXT " F1’ LIST F2’ DIR F3’ RUN F4’ SYS4K*N"
; .BYTE 13
.TEXT " F5’ LOAD F6’ SAVE F7’ QMENU F8’ ACE-64"
.BYTE 13,13,0
dmessage
.TEXT "À DEVICE ASSIGNMENTS ’"
.BYTE 0
dmessage2sd
.BYTE 13
.TEXT " 8’ SD FS0 9’ SD FS1 10’ SD FS2 11’ SD FS3"
.BYTE 0
dmessage2
.BYTE 13
.TEXT " 12’ INTF 1 13’ INTF 2 14’ APPS 15’ ACE-64"
.BYTE 13,13,0
dmessage3
.BYTE 13,0
wmessage
.TEXT "! WARNING’: /SYS/ MOUNTED ON DEVICE 8."
.BYTE 13,0