SHR: Fix VDU5 text spacing

2025-01-03 22:30:09 +00:00 · 2023-01-08 08:37:16 -05:00 · 2023-01-08 08:37:16 -05:00 · 74847e02bf
commit 74847e02bf
parent d8067ff725
3 changed files with 2 additions and 2 deletions
--- a/applecorn.po
+++ b/applecorn.po
--- a/auxmem.vdu.s
+++ b/auxmem.vdu.s
@ -388,7 +388,7 @@ PRCHR7        PLA
              JMP   HGRPRCHAR              ; Write character to HGR
 :NOTHGR       BVC   :NOTSHR
              JMP   SHRPRCHAR              ; Write character to SHR
-:NOTSHR       BRA   GETCHROK               ; Text mode
+:NOTSHR       RTS
 

 * OSBYTE &87 - Read character at cursor
--- a/mainmem.shr.s
+++ b/mainmem.shr.s
@ -283,7 +283,7 @@ SHRVDU5CH320  >>>   ENTMAIN
              MX    %00                    ; Tell Merlin
              LDA   SHRXPIXEL
              CLC
-              ADC   #$08
+              ADC   #16                    ; Advance to next column
              CMP   #639-16
              BCS   :NEWLINE               ; X-pos >= limit
              STA   SHRXPIXEL