三原型

load dbngraphics.dbn

paper 90 100 10

size 300 300f

ast
pen 70 50 80

circle 100 10 80 100

circle 100 10 70 100

circle 100 10 60 100

circle 100 10 50 100

circle 100 10 40 100

circle 100 10 10 100

circle 190 10 150 150

circle 170 10 150 150

circle 150 10 150 150

circle 130 10 150 150

circle 110 10 150 150

circle 90 15 150 150

circle 70 15 150 150

circle 50 15 150 150

circle 30 15 150 150

circle 10 15 150 150
pen 70 50 80

rectangle 130 170 170 130

rectangle 125 175 175 125

rectangle 128 172 172 128

rectangle 80 80 100 100

rectangle 101 101 121 121

rectangle 122 122 142 142

rectangle 143 143 163 163

rectangle 164 164 184 184

rectangle 185 185 205 205

rectangle 206 206 226 226

rectangle 80 80 220 220

rectangle 70 70 230 230

rectangle 50 50 250 250

rectangle 49 49 249 249

rectangle 48 48 248 248

rectangle 45 45 245 245

作業

load dbngraphics.dbn

size 300 300

repeat A 0 300{pen 50 60 Aline 0 0 A 300}
repeat A 0 300{pen 50 60 Aline 300 300 A 0}
repeat A 50 200
{
pen 90 85 10
line (A*8) 0 (A*2) 300line 0 (A*8) 300 (A*2)
}
repeat A 300 0{
pen 80 90 10 line (A/10) 0 (A*10) 300line 0 (A/10) 300 (A*10) }
repeat A 300 0
{
pen 90 100 10 line (100+A*5) 0 (A/2) 300
}

repeat A 300 0
{
pen 70 80 10 line (A*30) 0 (A/10) 300
}

大黃蜂

load dbngraphics.dbn
paper 100
size 300 300
fast
//頭冠上的徽章

Repeat D 0 30

{ pen 90 80 2

triangle (135+D) 185 150 165 150 275}

//頭冠

repeat B 0 10

{ pen 90 80 30 line (90) (235+B) (150) (160+B)

pen 90 80 30 line (150) (160+B) (210) (235+B)

}
//頭冠repeat A 0 10

{ pen 90 70 10 line (40) (240+A) (100) (150+A)

pen 90 70 10 line (100) (150+A) (150) (195+A)

pen 90 70 10 line (150) (195+A) (200) (150+A)

pen 90 70 10 line (200) (150+A) (260) (240+A)
}
//頭冠

repeat B 0 10

{ pen 90 80 30 line (80) (215+B) (150) (140+B)

pen 90 80 30 line (150) (140+B) (220) (215+B)

}
//眼睛

Repeat C 0 65

{ pen 0 triangle 50 120 (115-C) 120 50 145

pen 0 triangle 240 120 (240-C) 120 240 145
}
//鼻子

Repeat D 0 40

{ pen 40 0 0

triangle (130+D) 65 150 45 150 125}
//嘴巴

repeat E 0 10

{ pen 95 90 5 line (120) (20+E) (180) (20+E)
}
//臉紋

repeat F 0 10

{ pen 90 70 10 line (40) (90+F) (80) (50+F)

pen 90 70 10 line (40) (70+F) (80) (30+F)

pen 90 70 10 line (220) (50+F) (260) (90+F)

pen 90 70 10 line (220) (30+F) (260) (70+F)
}

期中考- 補交(有訊息告知)

TO 教授:

學生我從上禮拜三到日
我請了假 跟家人出國了
所以上禮拜四 11/5日 的早上的課
沒能即時 上傳期中作業

懇請教授讓我補交，謝謝!!

load dbngraphics.dbn

size 350 300

paper 60 60 60
fast

//長方形repeat A 0 10

{ pen 90 70 10

line (20) (260+A) (90) (260+A)

pen 50 30 10

line 225 (145+A) 330 (145+A)}
//圓形
Repeat J 0 40

{ circle 75 150 (50-J) 100

Repeat B 0 20
{ circle 75 150 (25-B) 75 }
}
//圓形上重疊三角型

Repeat C 0 45

{ pen 80 0 0

triangle (30+C) 225 (120-C) 225 75 150

triangle (50+C) 25 (100-C) 25 75 150}
//三個疊在一起的三角型

Repeat D 0 20

{ pen 10 70 25

triangle (120+D) 40 (140-D) 40 130 60

triangle (115+D) 60 (145-D) 60 130 80

triangle (110+D) 80 (150-D) 80 130 110}
//右邊直角三角形
Repeat E 0 60

{ pen 20 40 20

triangle 165 110 (225-E) 110 225 255}
//右邊倒三角

Repeat E 0 65

{pen 80 45 15

triangle (195+E) 85 (310-E) 85 250 30}
//小直角三角形
Repeat F 0 20

{ pen 40 10 10

triangle (235) 125 (245-F) 125 225 105
}
Repeat G 0 25

{ pen 70 80 50

triangle 225 140 (250-G) 140 225 125

pen 90

triangle (270+G) 120 (300-G) 120 285 85}
//三角形變長方形

Repeat H 0 65

{ pen 5 40 20

triangle 225 160 (290-H) 160 225 185
pen 80 0 0

triangle 225 185 (290-H) 185 290 160}
//菱形

Repeat I 0 40

{ pen 80 0 0

triangle (160+I) 225 180 205 180 245}