: run t dup floor - 6 * ;
( road )
1 y 2 * -
x y 2 * 8 ** t 9 / sin * + .5 -
abs
2dup
>
.5 y - *
-rot
( lines )
45 *
>
3 1 y 1.8 * - / run + floor 2 mod 1 y 1.8 * - * 4 /
*
+
( grass )
dup 0 = .5 y - * .75 **
y .5 < *
over + over
( mountains )
1
x
t 9 / cos
+
12 * sin 30 / y .6 - < *
+
( sky )
1.5 y 1.3 * - y .5 > * -