例題１５　絵定義　｢PICTURE〜END｣

平面上に家の絵を描画しなさい。

(LIST)

10 LET  lx1=-6

20 LET  lx2=6

30 LET  ly1=-6

40 LET  ly2=6

50 LET  a=1

60 SET WINDOW lx1,lx2,ly1,ly2

70 PICTURE House   

80    SET AREA COLOR 15                           

90    PLOT AREA:  0,1; 0,0; 2,0; 2,1                          ! 壁     

100    SET AREA COLOR 2                   

110    PLOT AREA: -0.6,1; 2.6,1; 2,2; 0,2                    ! 屋根             

120    SET AREA COLOR 10

130    PLOT AREA: 0.1,0; 0.1,0.8; 0.5,0.8; 0.5,0              ! ドア              

140    SET AREA COLOR 5

150    PLOT AREA: 1.4,0.4; 1.9,0.4; 1.9,0.8; 1.4,0.8         ! 窓 

160    SET AREA COLOR 12

170    PLOT AREA: 1.7,2; 1.7,2.3; 1.5,2.3; 1.5,2              ! 煙突

180 END PICTURE

190 DRAW AXES

200 DRAW House

＜類題15＞平面上に好きな絵を描画しなさい。

例題１６　図形の変換　｢DRAW〜WITH｣

例題１５で描いた家の絵を、次のように変換して描画せよ。 　(1) x軸方向に2，y軸方向に1だけ平行移動する。 　(2) x軸方向に2倍，y軸方向に3倍に拡大する。 　(3) 原点を中心として30°だけ回転する。

(LIST)

(1)

200 DRAW House WITH SHIFT(2, 1)

(2)

200 DRAW House WITH SCALE(2, 3)

(3)

200 DRAW House WITH ROTATE(30*PI/180)

＜類題16＞類題15で描いた絵を、次のように変換して描画せよ。
　(1) x軸方向に3，y軸方向に-1だけ平行移動する。
　(2) x軸方向に2倍，y軸方向に-1倍に拡大する。
　(3) 原点を中心として120°だけ回転する