Startup sets LastBreak flag

Fixes FORTH startup problem.
2022-11-08 01:51:12 +00:00 · 2022-11-08 01:51:12 +00:00 · 5024aa5a98
parent 30fc0d3512
commit 5024aa5a98
1 changed files with 3 additions and 1 deletions
--- a/auxmem.init.s
+++ b/auxmem.init.s
@ -119,6 +119,8 @@ MOSHIGH     SEI                              ; Ensure IRQs disabled
            STA   $0300,X
            INX
            BNE   :SCLR
+            INC   BYTEVARBASE+$FD            ; Last reset=Hard
+* TO DO: Do this properly

            LDX   #ENDVEC-DEFVEC-1
 :INITPG2    LDA   DEFVEC,X                   ; Set up vectors
@ -208,7 +210,7 @@ BYTE00      BEQ   BYTE00A                    ; OSBYTE 0,0 - generate error
            RTS                              ; %000x1xxx host type, 'A'pple
 BYTE00A     BRK
            DB    $F7
-HELLO       ASC   'Applecorn MOS 2022-11-07'
+HELLO       ASC   'Applecorn MOS 2022-11-04'
            DB    $00                        ; Unify MOS messages
 * TO DO: Move into RAM
 GSSPEED     DB    $00                        ; $80 if GS is fast, $00 for slow