Fix bug in DISP.asm when STSWIN and STSENT are both present.

bkrug · May 18, 2024 · 627a70f · 627a70f
1 parent 9e1eb9b
commit 627a70f
Showing 1 changed file with 8 additions and 8 deletions.
diff --git a/Src/DISP.asm b/Src/DISP.asm
@@ -142,25 +142,25 @@ NOT1   RT
 STRPAR 
 * Let R0 = contain document status
        MOV  *R13,R0
-* Did the user press enter?
-       COC  @STSENT,R0
-       JEQ  SP1
 * Did the window move?
        COC  @STSWIN,R0
+       JEQ  SP1
+* Did the user press enter?
+       COC  @STSENT,R0
        JEQ  SP2
 * Set starting position to cursor's
 * paragraph.
        MOV  @PARINX,R9
        RT
+* Set starting position based on window
+* position.
+SP1    MOV  @WINPAR,R9
+       RT
 * The user pressed enter, so start from
 * a previous paragraph.
-SP1    MOV  @PARENT,R9
+SP2    MOV  @PARENT,R9
        DEC  R9
        RT
-* Set starting position based on window
-* position.
-SP2    MOV  @WINPAR,R9
-       RT
        
 *
 * Set VDP write address so that the