Fix #267 - clear line 25 on starting MODE0 or 1

2023-01-16 19:29:55 -05:00 · 2023-01-16 19:29:55 -05:00 · 6016c59eeb
parent 4c8deecbf8
commit 6016c59eeb
2 changed files with 13 additions and 2 deletions
--- a/applecorn.po
+++ b/applecorn.po
--- a/mainmem.shr.s
+++ b/mainmem.shr.s
@ -200,8 +200,19 @@ SHRXPLDROW    LDX   SHRPIXELS              ; Pixels per byte


 * Clear text row 24 (0-based index)
-SHRCLR24      
-* $9800
+SHRCLR24      CLC                          ; 65816 native mode
+              XCE
+              REP   #$30                   ; 16 bit M & X
+              MX    %00                    ; Tell Merlin
+              LDX   #$00
+              LDA   #$00
+:L1           STAL  $E19800,X
+              INX
+              CPX   #$0500
+              BNE   :L1
+              SEC                          ; 65816 emulation mode
+              XCE
+              MX    %11                    ; Tell Merlin
              RTS