Web Turtle
; Koch - A line system fractal ; Written for WebTurtle by ; Geert Pante (Geert.Pante@rug.ac.be) ; January 1999 LET D 4 LET LEN 3 RIGHT 90 MOVE 120 RIGHT 90 MOVE 70 RIGHT 150 GO KOCH LEFT 120 GO KOCH LEFT 120 GO KOCH END # KOCH IF D > 0 PUSH D LET D D-1 GO KOCH POP D RIGHT 60 PUSH D LET D D-1 GO KOCH POP D LEFT 120 PUSH D LET D D-1 GO KOCH POP D RIGHT 60 PUSH D LET D D-1 GO KOCH POP D ENDIF IF D = 0 DRAW LEN ENDIF RETURN
Input 1:
Input 2:
Input 3:
Input 4:
Input 5:
Input 6:
Input 7:
Input 8:
Input 9:
HELP!
|
Home
|
Comments?
"Web Turtle," created by
Bill Kendrick
, 1997-2017.
