互動媒體設計 期中考

load dbngraphics.dbnsize 450 350paper 60 120 60
fast
circle 100 160 50 60circle 100 160 49 60circle 100 160 48 60circle 100 160 47 60circle 100 160 46 60circle 100 160 45 60circle 100 160 44 60
circle 100 160 20 60circle 100 160 19 60circle 100 160 18 60circle 100 160 17 60circle 100 160 16 60circle 100 160 15 60circle 100 160 14 60circle 100 160 13 60circle 100 160 12 60circle 100 160 11 60circle 100 160 10 60circle 100 160 9 60circle 100 160 8 60circle 100 160 7 60circle 100 160 6 60circle 100 160 5 60circle 100 160 4 60circle 100 160 3 60circle 100 160 2 60circle 100 160 4 60circle 100 160 0 60
pen 90 80 30line 25 310 100 310line 25 311 100 311line 25 312 100 312line 25 313 100 313line 25 314 100 314line 25 315 100 315line 25 316 100 316line 25 317 100 317
pen 0line 352 130 440 130line 352 131 440 131line 352 132 440 132line 352 133 440 133line 352 134 440 134line 352 135 440 135line 352 136 440 136line 352 137 440 137

Repeat d 0 50{ pen 100 triangle (175+d) 25 (225-d) 25 200 65 triangle (170+d) 65 (230-d) 65 200 100 triangle (165+d) 100 (235-d) 100 200 145}
Repeat e 0 80{ pen 100 30 20 triangle (275) 100 (350-e) 90 350 300
pen 100 60 20 triangle (300+e) 80 (425-e) 80 355 25
}
Repeat a 0 60{ pen 100 triangle (70+a) 25 (130-a) 25 100 150 triangle (50+a) 260 (150-a) 260 100 155
}
Repeat f 0 73{ pen 100 triangle (352) 140 (425-f) 140 352 180 pen 100 0 0 triangle (352) 180 (425-f) 180 425 140}

Repeat r 0 38{ pen 90 90 0 triangle (352) 115 (390-r) 115 352 100 }
Repeat r 0 18{ pen 90 0 0 triangle (352) 100 (370-r) 100 352 90 }

Repeat p 0 40{ pen 100 triangle (400+p) 120 (440-p) 120 420 85
}

作業五

size 300 300
paper 100
fast


repeat c 0 100
{
repeat x 0 300
{
//清除畫面
//paper 10
pen ((%10)*10) ((%20)*5)
line 150 150 0 x
line 150 150 x 300
line 150 150 300 (300-x)
line 150 150 (300-x) 0
//更新畫面
refresh
}
//更新畫面
refresh
}

作業四

size 300 300
paper 50 60 20
command square x y s c
{
pen 80 60 c
line y y x (c+s)
line y (y*s) (x*s) (y/s)
}
repeat A 0 60
{
pen 30 60 80
repeat B 0 60
{
square (A*50+5) (B*30+10) 1 (60+(A*B-60))
}
}
command square x y s c
{
pen c
line (s+s)c c c
}
repeat A 1 5
{
repeat B 0 5
{
square (A*50+5) (B*5+5) 2 (A+B*20)
}
}

作業三

load dbngraphics.dbn

paper 100
size 300 300
fast

circle 145 150 145 0
circle 145 150 125 0
circle 145 150 30 0
circle 145 150 35 0
circle 145 150 40 0
circle 145 150 45 0
circle 145 150 55 0
circle 145 150 100 0
circle 145 150 75 0
circle 145 150 50 0
circle 145 150 25 0
circle 145 150 30 0
circle 145 150 35 0
circle 145 150 40 0
circle 145 150 45 0
circle 145 150 55 0
circle 145 150 60 0
circle 145 150 100 0
circle 145 150 105 0
circle 145 150 110 0
circle 145 150 115 0
circle 145 150 120 0
circle 145 150 125 0
circle 145 150 130 0
circle 145 150 135 0
circle 145 150 140 0
circle 145 150 145 0
circle 145 150 95 0
circle 145 150 90 0
circle 145 150 85 0
circle 145 150 80 0
circle 145 150 75 0
circle 145 150 70 0
circle 145 150 65 0

作業二

load dbngraphics.dbn
paper 60 50 90
size 300 300
repeat a -20 300
{
pen 80 100 30
line 300 (10+a) 0 (10+a)}
fast
circle 150 150 125 50
circle 150 150 124 49
circle 150 150 123 48
circle 150 150 122 47
circle 150 150 121 46
circle 150 150 120 45
circle 150 150 119 44

Repeat A 0 45
{
circle 200 180 (A/2+0) 40
circle 100 180 (A/2+0) 40
}

作業一

size 500 400

paper 120 40 50

pen 60 200 200

line 25 375 225 375

line 25 350 225 350

line 25 350 25 250

line 25 250 225 250

line 225 350 225 250

line 125 390 125 100

line 75 200 225 200

line 50 150 375 150

line 125 150 50 75

line 125 150 200 75

line 100 100 150 100

line 150 100 125 75

line 125 75 175 75

line 175 75 150 25

line 150 25 123 28

line 110 100 75 25

line 250 390 425 390

line 425 390 425 300

line 425 300 400 325

line 325 390 275 300

line 275 275 275 175

line 275 275 400 275

line 400 275 400 175

line 275 175 450 175

line 275 245 400 245

line 275 215 400 215

line 300 175 250 90

line 250 90 350 25

line 325 175 275 25

line 380 175 380 125

line 450 175 450 125

line 380 125 450 125

line 380 110 370 25

line 380 110 450 110

line 450 110 450 25

line 450 25 440 30

line 375 75 450 75

line 375 50 450 50

個人中文名字設計

size 500 400
paper 120 40 50
pen 60 200 200
line 25 375 225 375
line 25 350 225 350
line 25 350 25 250
line 25 250 225 250
line 225 350 225 250
line 125 390 125 100
line 75 200 225 200
line 50 150 375 150
line 125 150 50 75
line 125 150 200 75
line 100 100 150 100
line 150 100 125 75
line 125 75 175 75
line 175 75 150 25
line 150 25 123 28
line 110 100 75 25
line 250 390 425 390
line 425 390 425 300
line 425 300 400 325
line 325 390 275 300
line 275 275 275 175
line 275 275 400 275
line 400 275 400 175
line 275 175 450 175
line 275 245 400 245
line 275 215 400 215
line 300 175 250 90
line 250 90 350 25
line 325 175 275 25
line 380 175 380 125
line 450 175 450 125
line 380 125 450 125
line 380 110 370 25
line 380 110 450 110
line 450 110 450 25
line 450 25 440 30
line 375 75 450 75
line 375 50 450 50