期中考 融合

load dbngraphics.dbn
size 350 300
paper 75 86 80
fast

repeat a 0 10
{
pen 90 80 40
line (15) (260+a) (70) (260+a)
pen (90-a) (95-a) 95
line (231) (120+a) (320) (120+a)
}

Repeat c 0 10
{
circle 75 150 (45+c) 100
circle 75 150 (40+c) 80
circle 75 150 (30+c) 60
circle 75 150 (20+c) 20
circle 75 150 (10+c) 0
circle 75 150 (c) 100
}

Repeat d 0 50
{
pen (d/2) (d/3) (30-d)
triangle (25+d) 225 (125-d) 225 75 150
triangle (50+d) 25 (100-d) 25 75 150
}

Repeat d 0 20
{
pen 100
triangle (120+d) 30 (140-d) 30 130 65
triangle (115+d) 65 (145-d) 65 130 100
triangle (110+d) 100 (150-d) 100 130 135
}

Repeat e 0 70
{
pen (70-(e/2)) (20-(e/2)) (20)
triangle (160) 90 (230-e) 90 230 275
pen (80) (30) (e-50)
triangle (190+e) 85 (325-e) 85 255 25

}

Repeat f 0 20
{
pen 70 0 0
triangle (231) 100 (250-f) 100 231 90

}

Repeat g 0 30
{
pen 90 90 0
triangle (231) 115 (260-g) 115 231 100
pen 100
triangle (275) 110 (305-g) 110 290 85

}

Repeat h 0 75
{
pen (20-(h/2)) (50-(h/3)) 20
triangle (231) 140 (305-h) 140 231 175
pen (70-(h/2)) 0 0
triangle (231) 175 (305-h) 175 305 140
}

Repeat i 0 42
{
pen 70 0 0
triangle (140+i) (220) (180) (210) 190 240
triangle (140+i) (220) (190-i) (240) 150 250
}

作業五:時間變化

//設定畫布大小
size 200 200
//設定背景

repeat w 0 100
{
paper (/8) (*1) (/w)
}

//利用時間控制
repeat y 0 9
{
repeat x 0 200
{
repeat z 100 200
{

pen (x/4) (y*10)
line (100-z) ((y*z)*2) (z+100) (((y+1)*z)*2)

pen (x*5) (y/2)
line (250-z) ((y*z)*5) (0-z) (((y+1)*z)*5)

}
refresh
repeat q 0 200
{
pen q
line 0 q q 0
pen q
line 200 (200-q) (200-q) 200
}
//設計一個以中心點為座標的空心方形
command rect a b c d e
{
pen e (e/2) (e*10)
line (a-c/2) (b-d/2) (a+c/2) (b-d/2)
line (a+c/2) (b-d/2) (a+c/2) (b+d/2)
line (a+c/2) (b+d/2) (a-c/2) (b+d/2)
line (a-c/2) (b+d/2) (a-c/2) (b-d/2)

}

repeat v1 0 200
{
rect 100 100 v1 v1
}
repeat q 0 200
{
pen q
line (q+200) 0 0 (q+200)
pen q
line 0 (200-q) (200-q) 0
}
}

}

作業四:彩色毛玻璃

太陽好大 毛玻璃折射很刺眼....

size 220 220
paper 0

fast

command rect L B R T

{
pen (t) (20+t) (10*t)
repeat F 0 10
{
line ((20*f)+(l)) (b+t-(l)) ((20*f)+(l)) ((b*t)-l)
line (b+t-(l)) ((20*f)+(l)) ((b*t)-l) ((20*f)+(l))
}
}

repeat c 0 10
{
repeat a 0 20
{
repeat b 0 60
{

rect a (b*2) (c*10) (b*2)

}
}
}


反差色

作業三: 使用三原型綜合設計創作

魔法陣

load dbngraphics.dbn
size 260 260
paper 80 40 40

circle 135 125 170 20
circle 135 125 160 20
circle 135 125 150 20
circle 135 125 140 20

repeat a 0 250
{
pen 90 70 70
triangle (130) 10 (10+a) 170 130 130
//triangle (130) 20 (10-a) 170 130 130
}

repeat a 0 250
{
pen 90 40 50
triangle (130) 255 (10+a) 65 120 120
}

repeat a 1 20
{
set b 1
circle 70 170(3*a) 20

set b 1
circle 190 170(3*a) 20

set b 1
circle 130 67(3*a) 20

}

repeat a 0 60
{
pen 80 40 40
triangle (130) 70 (130+a) 170 130 130
triangle (130) 70 (130-a) 170 130 130
}

repeat a 1 11
{
set b 1
circle 130 135(3*a) 20
}

作業二 : 企鵝臉

load dbngraphics.dbn

paper 60 80 5

size 300 300

fast

Repeat A 0 20
{
pen 90 0 30
triangle 150 200 150 (A/2+80) -900 (A-10)
triangle 150 200 150 (A/2+80) -800 (A-10)
triangle 150 200 150 (A/2+80) -700 (A-10)
triangle 150 200 150 (A/2+80) -600 (A-10)
triangle 150 200 150 (A/2+80) -500 (A-10)
triangle 150 200 150 (A/2+80) -4(A-10)
triangle 150 200 150 (A/2+80) -300 (A-10)
triangle 150 200 150 (A/2+80) -200 (A-10)
triangle 150 200 150 (A/2+80) -100 (A-10)
triangle 150 200 150 (A/2+80) 100 (A-10)
triangle 150 200 150 (A/2+80) 200 (A-10)
triangle 150 200 150 (A/2+80) 300 (A-10)
triangle 150 200 150 (A/2+80) 400 (A-10)
triangle 150 200 150 (A/2+80) 500 (A-10)
triangle 150 200 150 (A/2+80) 700 (A-10)
triangle 150 200 150 (A/2+80) 800 (A-10)
triangle 150 200 150 (A/2+80) 900 (A-10)
Repeat B 0 0
{
field 0 300 300 (B+200) 8
field 0 290 300 (B+200) 15
field 0 280 300 (B+200) 30
field 0 270 300 (B+200) 45
field 0 260 300 (B+200) 60
field 0 250 300 (B+200) 75
field 0 240 300 (B+200) 90
field 0 230 300 (B+200) 105
Repeat B 0 0
{
field 0 300 300 (B+200) 8
field 0 290 300 (B+200) 15
field 0 280 300 (B+200) 30
field 0 270 300 (B+200) 45
field 0 260 300 (B+200) 60
field 0 250 300 (B+200) 75
field 0 240 300 (B+200) 90
field 0 230 300 (B+200) 105
}
}
}

Repeat C 0 10
{
field 300 0 (C+230) 200 0
field 255 0 (C+220) 200 8
field 245 0 (C+210) 200 15
field 235 0 (C+200) 200 30
field 225 0 (C+190) 200 45
field 215 0 (C+180) 200 60
field 205 0 (C+170) 200 75
field 195 0 (C+160) 200 90
field 175 0 (C+150) 200 105
}
Repeat D 0 10
{
field 300 0 0 200 0
field 300 0 (D+50) 200 8
field 245 0 (D+60) 200 15
field 235 0 (D+70) 200 30
field 225 0 (D+80) 200 45
field 215 0 (D+90) 200 60
field 205 0 (D+100) 200 75
field 195 0 (D+110) 200 90
field 175 0 (D+120) 200 105
}
Repeat D 0 20

{
circle 250 150 (70-D) 10
circle 250 150 (20-D) 60
circle 20 150 (70-d) 40
circle 10 150 (20-d) 80
pen 90 0 30

rectangle (25-d) (0+d) (200-d) (25+d)

}
Repeat f 0 50
{
pen 80 80 0

Line 120 250 ((f*1)+10) 300
Line 120 250 ((f*1)-10) 300
Line 120 250 ((f*3)+10) 300
Line 120 250 ((f*3)-10) 300
Line 120 250 ((f*6)+10) 300
Line 120 250 ((f*6)-10) 300
pen 80 60 0
Line 120 250 ((f*2)-10) 300
Line 120 250 ((f*2)+10) 300
Line 120 250 ((f*4)-10) 300
Line 120 250 ((f*4)+10) 300
}


-------------------------------------------------------------------------------------------------

利用幾何圖形與漸層效果
拼湊出一張國王企鵝的臉

作業一 ：個人中文名字設計 –鍾涵茹

paper 60 20 20
size 200 180
pen 0
line 5 5 200 200
line 10 20 30 40
line 25 45 45 45
line 10 35 20 45
line 35 35 35 15
line 35 15 30 20
line 30 20 80 70
line 20 20 20 0
line 20 0 200 180
line 35 35 40 30
line 45 35 45 25
line 60 60 60 0
line 80 80 80 44
line 52 42 52 15
line 52 15 80 43
line 70 50 70 32
line 0 110 70 180
line 25 180 25 45
line 25 135 40 120
line 0 75 125 200
line 40 120 120 200
line 0 65 135 200
line 0 65 20 45
line 40 105 40 45
line 60 70 190 200
line 60 80 180 200
line 60 125 60 90
line 60 90 170 200
line 80 110 80 145
line 60 90 80 145
line 70 145 70 80