diff --git a/grafproc.asm b/grafproc.asm
index cb9db73..f3808aa 100644
--- a/grafproc.asm
+++ b/grafproc.asm
@@ -1295,22 +1295,15 @@ drawmountainsloop
 	sty ydraw+1
 ;    jsr DrawLine
 ;	there was Drawline proc 
-    lda #screenheight
-    sec
-    sbc ydraw
-    sta tempbyte01
+drawline
     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? :) )
-@
-	lda (xbyte),y
-	and bittable2,x
-	sta (xbyte),y
-;IntoDraw
-	adw xbyte #screenBytes
-	dec tempbyte01
-	bne @-
+	inc ydraw
+	lda ydraw
+	cmp #screenheight
+	bne drawline
 ;	end of Drawline proc
 NoMountain
     inw modify
diff --git a/scorch.bin b/scorch.bin
index ffb3aa9..782f35e 100644
Binary files a/scorch.bin and b/scorch.bin differ
diff --git a/scorch.xex b/scorch.xex
index f18acb2..d9daa63 100644
Binary files a/scorch.xex and b/scorch.xex differ