next up previous
Next: B. 課題6Bへの一つのヒント: タートルグラフィックス Up: A. 補足: 色を塗る命令 PAINT, Previous: A..1 PAINT


A..2 MAT PLOT AREA

多角形の頂点の座標を配列変数に記憶させておけば、 命令1つで多角形内部を塗り潰すことができます。 詳しくはオンライン・ヘルプを参照して下さい。

赤い三角形を描く

REM testmatplotarea.bas --- mat plot area 
DIM x(3),y(3)
LET  x(1)=0
LET  y(1)=0
LET  x(2)=2
LET  y(2)=1
LET  x(3)=1
LET  y(3)=2
SET WINDOW -1,3,-1,3
DRAW grid
SET AREA COLOR "red"
MAT PLOT AREA: x,y
END

MAT PLOT AREA: x,y
  PLOT AREA: x(1),y(1);x(2),y(2);x(3),y(3)
と同じ意味になります (というわけで、 PLOT AREA のオンライン・ヘルプも適宜参照して下さい)。 -- 三角形ならば PLOT AREA でも良いけれど、 星形でやるのは (点が多いので) 面倒ですね。

図 2: testmatplotarea.BAS -- MAT PLOT AREA で塗る
\includegraphics[width=10cm]{prog0508/testmatplotarea.eps}


next up previous
Next: B. 課題6Bへの一つのヒント: タートルグラフィックス Up: A. 補足: 色を塗る命令 PAINT, Previous: A..1 PAINT
桂田 祐史
2013-05-29