Update card detection

This commit is contained in:
Terence Boldt 2024-04-18 14:05:30 -04:00
parent ebc7484a12
commit 9247c81479
4 changed files with 16 additions and 14 deletions

View File

@ -122,7 +122,7 @@ TextCardNotFound:
.byte "Apple2-IO-RPi not found",$8D,$00
TextDriverInstalled:
.byte "Clock driver installed",$8D,$00
.byte "Apple2-IO-RPi Clock driver version 0001",$8D,$00
Driver:
lda #GetTimeCommand

View File

@ -71,7 +71,6 @@ CardNotFound:
PrintCardNotFound:
lda TextCardNotFound,y
beq Failed
ora #$80
jsr PrintChar
iny
bne PrintCardNotFound
@ -82,7 +81,6 @@ FoundCard:
PrintCardFound:
lda TextCardFound,y
beq PrintCardNumber
ora #$80
jsr PrintChar
iny
bne PrintCardFound
@ -108,7 +106,6 @@ Start:
PrintString:
lda Text,y
beq copyDriver
ora #$80
jsr PrintChar
iny
bne PrintString
@ -159,18 +156,24 @@ a2help:
.byte "a2help", $00
Text:
aschi "RPI command version: 000E"
.byte $8d
.byte $00
.if HW_TYPE = 0
aschi "RPI command version: 000F (classic)"
.else
aschi "RPI command version: 800F (pico)"
.endif
.byte $8d
.byte $00
IdBytes:
.byte $E0,$20,$E0,$00,$E0,$03,$E0,$3C,$A9,$3F
TextCardFound:
.byte "Found Apple2-IO-RPi in slot ",$00
aschi "Found Apple2-IO-RPi in slot "
.byte $00
TextCardNotFound:
.byte "Apple2-IO-RPi not found",$8D
aschi "Apple2-IO-RPi not found"
.byte $8D
end:
.byte $00

View File

@ -310,9 +310,9 @@ restoreChar:
Text:
.if HW_TYPE = 0
.byte "Apple2-IO-RPi Shell Version 000F",$8d
.byte "Apple2-IO-RPi Shell Version 0010 (classic)",$8d
.else
.byte "Apple2-IO-RPi Shell Version 800F",$8d
.byte "Apple2-IO-RPi Shell Version 8010 (pico)",$8d
.endif
.byte "(c)2020-2024 Terence J. Boldt",$8d
.byte $8d

View File

@ -9,6 +9,5 @@
18 PRINT "To start a shell to the RPi, type:"
19 PRINT "-shell"
20 PRINT
21 PRINT "To add RPI command to ProDOS, type:"
22 PRINT "-rpi.command"
23 PRINT
21 PRINT CHR$ (4)"-clock.driver"
22 PRINT CHR$ (4)"-rpi.command"