Fast draw mountains fixed!

2026-05-20 22:34:21 +02:00 · 2023-06-12 14:26:06 +02:00
parent 0c1f2e5164
commit 7efb642300
4 changed files with 16 additions and 14 deletions
@@ -184,12 +184,6 @@ ClearPlot
    mva #1 color

 drawmountainsloop
-    ldy #0
-    lda (modify),y
-    cmp #screenheight
-    beq NoMountain
-    sta ydraw
-    sty ydraw+1
 .IF FASTER_GRAF_PROCS = 1
    ; calculate lower point in one screen byte
    lda xdraw
@@ -205,8 +199,15 @@ NotLower
    bpl @-
    sta temp2
    inc temp2	; this is our minimum
-    iny
 MinCalculated
+.ENDIF
+    ldy #0
+    lda (modify),y
+    cmp #screenheight
+    beq NoMountain
+    sta ydraw
+    sty ydraw+1
+.IF FASTER_GRAF_PROCS = 1
 ;    there was Drawline proc
    lda #screenheight
    sec