support no suffix

2024-06-09 06:29:28 +00:00 · 2018-03-22 18:05:12 -07:00 · 2018-03-22 18:05:12 -07:00 · 0afc33f594
commit 0afc33f594
parent ab07090b46
1 changed files with 6 additions and 1 deletions
--- a/src/onbeyond/z5/z5.s
+++ b/src/onbeyond/z5/z5.s
@ -437,7 +437,12 @@ skipupper
                lda     #>brand
                sta     $ddb7

+                ;skip suffix handling if not present
+
                ldy     $2006
+                lda     $2006-2,y
+                cmp     '.'
+                bne     ++
                inc     $2006
                lda     #'V'
                sta     $2006+1,y
@ -466,7 +471,7 @@ skipupper
                sta     $2006,y
                lda     #'Z'
                sta     $2006-1,y
-                jsr     hddopendir
++              jsr     hddopendir
                jmp     entry

 call80          jsr     $c300