プログラミングによる論理

(1) できあがりのイメージ

(2) 雪だるまとツリーを描く

100 screen 3, 0
110 cls 3
120 '雪だるま
130 circle (450,250),60,5
140 paint (480,270),7,5
150 circle(450,150),40,5
160 paint (450,140),7,5
170 circle (430,140),5,0
180 paint (430,140),0,0
190 circle (470,140),5,0
200 paint(470,140),0,0
210 circle(450,160),8,2
220 paint(450,160),2,2

230 '手
240 line(380,168)-(410,215),6
250 line(520,168)-(490,215),6
260 circle (380,168),8,7
270 paint(380,168),7,7
280 circle (520,168),8,7
290 paint(520,168),7,7
300 '帽子
310 line(450,110)-(490,78),5
320 line(490,78)-(520,94),5
330 line(520,94)-(490,150),5
340 paint(490,110),2,5
300 '帽子
310 line(450,110)-(490,78),5
320 line(490,78)-(520,94),5
330 line(520,94)-(490,150),5
340 paint(490,110),2,5
350 '木
360 line(200,162)-(120,250),4
370 line(120,250)-(280,250),4
380 line(280,250)-(200,162),4
390 paint(190,230),4,4
400 line(200,220)-(90,300),4
410 line(90,300)-(310,300),4
420 line(310,300)-(200,220),4
430 paint(200,280),4,4
440 line(200,280)-(60,350),4
450 line(60,350)-(340,350),4
460 line(340,350)-(200,280),4
470 paint(200,320),4,4
480 '鉢
490 line(150,350)-(250,420),2,bf
500 line(150,350)-(250,420),0,b
510 line(150,373)-(250,396),0,b
520 line(200,373)-(200,396),0
530 line(175,350)-(225,373),0,b
540 line(175,396)-(225,420),0,b
550 '星
560 line(200,140)-(190,160),6
570 line(190,160)-(220,150),6
580 line(220,150)-(180,150),6
590 line(180,150)-(210,160),6
600 line(210,160)-(200,140),6
610 paint (200,152),6,6
620 paint (200,145),6,6
630 paint (190,151),6,6
640 paint (210,151),6,6
650 paint (195,157),6,6
660 paint (205,157),6,6
 

 

(3) 背景を描く

670 '丘
680 circle (100,600),350,7
690 paint (100,350),7,7
700 circle (470,600),300,7
720 paint (470,350),7,7

 

(4) 完 成

100 screen 3, 0
110 cls 3
111 '背景
112 paint (0,0),1,7
113 '丘
114 circle (100,600),350,7
115 paint (100,350),7,7
116 circle (470,600),300,7
117 paint (470,350),7,7

120 '雪だるま
130 circle (450,250),60,5

戻る