STRIPES


Must first define TRIANGLE (with a variable), since we will use it in STRIPES.

TO TRIANGLE :X
REPEAT 3[FD :X RT 120]
END

Plan for STRIPES:
make several TRIANGLES of different sizes

Note: In the sample below, each traingle requires a separate statement. When we learn about "recursion" we can do the same thing in fewer steps.

TO STRIPES
TRIANGLE 15
TRAINGLE 25
TRIANGLE 35
TRIANGLE 45
END