それぞれの線セグメントが1/3のオリジナルでそれぞれ長い4つのセグメントの人の長さの破線に取り替えられる過程を繰り返すことによって、雪の薄片を入手します。 ここで、オリジナルの図は正三角形でした。

スクリプトはあなたが長い多角形の世代を促進するのに使用することができる方法を示します。 標準の LineToを使用することの代わりに、スクリプトで示されるようにポイントのバッチで原始の addstrを使用してください。

輸入スクリプト

特性s: ""
DrawSnowflakeLoopに関して(a、b、n)
ﾂ????lobal xmlgk
ﾂ????そしてf(n>0)
ﾂ????????aにx1、y1をetします。
ﾂ????????bにx2、y2をetします。
ﾂ????????etはdyにdxします。(x2--x1)/3、(y2--y1)/3
ﾂ????????cをetします。x1+dx、y1+dy
ﾂ????????rawSnowflakeLoop(a、c、n--1)
ﾂ????????dx2、dy2をetします。dx / 2、--(sqrt3)/2*dy、(sqrt3)/2*が+ dy / 2をdxする
ﾂ????????dをetします。x1+dx+dx2、y1+dy+dy2
ﾂ????????rawSnowflakeLoop(c、d、n--1)
ﾂ????????cをetします。x1+2*dx、y1+2*dy
ﾂ????????rawSnowflakeLoop(d、c、n--1)
ﾂ????????rawSnowflakeLoop(c、b、n--1)
ﾂ????lse
ﾂ????????「etのsからs、」、」(ストリングとしてのb)
ﾂ????????そしてf(sを数える)>1000
ﾂ????????????AddPathへのエルxmlgk(「L」、「「s)、」
ﾂ????????????ストリングとしてのetのsからb
ﾂ????????if
ﾂ????if
終わりのDrawSnowflakeLoop
DrawItに関して(a、b、n)
ﾂ????lobal xmlgk
ﾂ????テキスト項目デリミタをetします。{","}
ﾂ????sをetする、「」
ﾂ????rawSnowflakeLoop(a、b、n)
ﾂ????AddPathへのエルxmlgk(「L」、「「s)、」
終わりのDrawIt

20にi1を設定してください。
350にi2を設定してください。
120にjを設定してください。
aを設定します。i1、j
bを設定します。i2、j
cを設定します。(i1+i2)/2、j+(i2--i1)*(cosパイ/6)
tを設定します。c、a、b、c
0にwを設定してください。

1〜5までのn_ステップで、繰り返してください。
ﾂ????BeginFigureへのet w(w)
ﾂ????etPenWidth(0.5)
ﾂ????etPenColor({0, 0, 0.8, 1})
ﾂ????2〜4までのiがあるepeat
ﾂ????????oveTo(tの項目i)
ﾂ????????rawIt(tの項目i、t、n_ステップの項目(i--1))
ﾂ????第反復
ﾂ????rawPath(2)
ﾂ????ndFigure()
ﾂ????milepause0.5
終わりの反復