fix hard-disk image numbering

This commit is contained in:
Peter Ferrie 2021-09-04 13:00:23 -07:00
parent 23500497b2
commit aa5781ac15

View File

@ -123,9 +123,9 @@ CreateFileOnHardDisk
@nextDigit @nextDigit
inc HardDiskImagePath-4, x inc HardDiskImagePath-4, x
lda HardDiskImagePath-4, x lda HardDiskImagePath-4, x
cmp #'9'+1 cmp #$39+1 ; '9'+1
bcc @findSpare ; loop back to check if new filename exists bcc @findSpare ; loop back to check if new filename exists
lda #'0' lda #$30 ; '0'
sta HardDiskImagePath-4, x sta HardDiskImagePath-4, x
dex dex
bne @nextDigit bne @nextDigit