Better? "drawmountains"

Mountains are drawn only by the plot procedure.
Easier for the C64?

grafproc.asm

@@ -1295,22 +1295,15 @@ drawmountainsloop
 	sty ydraw+1
 ;    jsr DrawLine
 ;	there was Drawline proc 
-    lda #screenheight
+drawline
-    sec
-    sbc ydraw
-    sta tempbyte01
     jsr plot.MakePlot
 	; after plot we have: (xbyte),y - addres of screen byte; X - index in bittable (number of bit)
 ;    jmp IntoDraw    ; jumps inside Draw routine
                     ; because one pixel is already plotted (and who cares? :) )
-@
+	inc ydraw
-	lda (xbyte),y
+	lda ydraw
-	and bittable2,x
+	cmp #screenheight
-	sta (xbyte),y
+	bne drawline
-;IntoDraw
-	adw xbyte #screenBytes
-	dec tempbyte01
-	bne @-
 ;	end of Drawline proc
 NoMountain
     inw modify