200 PICTURE tragon(n)
210    IF n=12 THEN 
220       PLOT POINTS: 0,0
230    ELSE
240       DRAW tragon(n+1) WITH SCALE(1/SQR(3))*ROTATE(PI/6) 
250       DRAW tragon(n+1) WITH SHIFT(-2,0)*SCALE(1/SQR(3))*ROTATE(PI/6)*SHIFT(2,0)
260       DRAW tragon(n+1) WITH SHIFT(-1,-SQR(3))*SCALE(1/SQR(3))*ROTATE(PI/6)*SHIFT(1,SQR(3))
270    END IF
280 END PICTURE
290 SET WINDOW -2,3,-2,3
300 SET POINT STYLE 1
310 DRAW tragon(0)
320 END
