2 ' made by Svjatoslav Agejenko
\r
4 ' H-Page: svjatoslav.eu
\r
5 ' E-Mail: svjatoslav@svjatoslav.eu
\r
22 IF p > 10 THEN z = RND * c / 20: p = p - (RND * 20 + 10)
\r
23 c1 = POINT(x, y - 1)
\r
24 c = (c1 + c) \ 2 + ((RND * 2) - z)
\r
26 IF c > 63 THEN c = 63
\r