Circle()は、中心点と半径を指定して円を描きます。後続の引数は追加の半径を指定します。
win = New Window( "円",
Graph Box( Frame Size( 200, 200 ),
Circle( {50, 50}, 10, 12, 25 )
)
);
Circle()には、オプションの最後の引数"fill"もあります。これを指定すると、関数内に定義された円はすべて、現在fill colorで指定されている色で塗りつぶされます。"fill"が省略された場合、円は塗りつぶされません。
図12.15 円を描く
win = New Window( "円",
Graph Box(
Frame Size( 200, 200 ),
Circle( {50, 50}, Pixel Radius( 10 ), Pixel Radius( 12 ), Pixel Radius( 25 ) )
)
);
win = New Window( "長方形",
Graph Box(
Frame Size( 200, 200 ),
Pen Color( 1 );
Rect( 0, 40, 60, 0 );
Pen Color( 3 );
Rect( 10, 60, 70, 10 );
Pen Color( 4 );
Rect( 50, 90, 90, 50 );
Pen Color( 5 );
Rect( 0, 80, 70, 70 );
)
);
Rect()には、オプションの第5引数fill（塗りつぶし）があります。長方形を塗りつぶさない場合は0を、塗りつぶす場合は1を指定します。fillのデフォルト値は0です。長方形は、現在fill colorで指定されている色で塗りつぶされます。
win = New Window( "長方形の枠",
Graph Box( Frame Size( 200, 200 ), Rect( 0, 40, 60, 0, -1 ) )
);
win = New Window( "楕円",
Graph Box(
Frame Size( 200, 200 ),
Pen Color( 1 );
Oval( 0, 40, 60, 0 );
Pen Color( 3 );
Oval( 10, 60, 70, 10 );
Pen Color( 4 );
Oval( 50, 90, 90, 50 );
Pen Color( 5 );
Oval( 0, 80, 70, 70 );
)
);
Oval()にも、オプションの第5引数fill（塗りつぶし）があります。楕円を塗りつぶさない場合は0を、塗りつぶす場合は1を指定します。fillのデフォルト値は0です。楕円は、現在fill colorで指定されている色で塗りつぶされます。
長方形と楕円（塗りつぶしあり／なし）は、長方形と楕円のグラフです。塗りつぶした場合と、塗りつぶしていない場合の両方を示しています。塗りつぶしを行ったグラフを見ると、長方形には輪郭がなく、 楕円には輪郭があります。塗りつぶした長方形に輪郭を描きたい場合は、まず塗りつぶした長方形を描いてから、その後、同じ座標を使用して塗りつぶしていない長方形を描いてください。
図12.16 長方形と楕円（塗りつぶしあり／なし）
