Skip to main content

fmessage

*=$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