作業六:自畫像與自由創作

自畫像:

自由創作:

作業5

程式碼:

Load dbngraphics.dbn//設定畫布大小
size 200 200

//設定背景
paper 10

//利用時間控制線條顏色
repeat x 0 200
{
pen 50 10
line 0 0 x 200
}

repeat x 0 200
{
pen 50 10
line 200 200 x 0
}
//設計一個以中心點為座標的空心方形
command rect a y w h c
{
pen c 20 30
line (a-w/2) (y-h/2) (a+w/2) (y-h/2)
line (a+w/2) (y-h/2) (a+w/2) (y+h/2)
line (a+w/2) (y+h/2) (a-w/2) (y+h/2)
line (a-w/2) (y+h/2) (a-w/2) (y-h/2)
}

repeat v1 0 75
{
rect 25 25 v1 v1
}
command rect a y w h c
{
pen c 20 30
line (a-w/2) (y-h/2) (a+w/2) (y-h/2)
line (a+w/2) (y-h/2) (a+w/2) (y+h/2)
line (a+w/2) (y+h/2) (a-w/2) (y+h/2)
line (a-w/2) (y+h/2) (a-w/2) (y-h/2)
}

repeat v1 0 75
{
rect 175 175 v1 v1
}
command rect a y w h c
{
pen c 20 30
line (a-w/2) (y-h/2) (a+w/2) (y-h/2)
line (a+w/2) (y-h/2) (a+w/2) (y+h/2)
line (a+w/2) (y+h/2) (a-w/2) (y+h/2)
line (a-w/2) (y+h/2) (a-w/2) (y-h/2)
}

repeat v1 0 75
{
rect 25 175 v1 v1
}
command rect a y w h c
{
pen c 20 30
line (a-w/2) (y-h/2) (a+w/2) (y-h/2)
line (a+w/2) (y-h/2) (a+w/2) (y+h/2)
line (a+w/2) (y+h/2) (a-w/2) (y+h/2)
line (a-w/2) (y+h/2) (a-w/2) (y-h/2)
}

repeat v1 0 75
{
rect 175 25 v1 v1
}
command rect a y w h c
{
pen c 20 30
line (a-w/2) (y-h/2) (a+w/2) (y-h/2)
line (a+w/2) (y-h/2) (a+w/2) (y+h/2)
line (a+w/2) (y+h/2) (a-w/2) (y+h/2)
line (a-w/2) (y+h/2) (a-w/2) (y-h/2)
}
repeat v1 0 40
{
rect 100 100 v1 v1
}
command rect a y w h c
{
pen c 20 30
line (a-w/2) (y-h/2) (a+w/2) (y-h/2)
line (a+w/2) (y-h/2) (a+w/2) (y+h/2)
line (a+w/2) (y+h/2) (a-w/2) (y+h/2)
line (a-w/2) (y+h/2) (a-w/2) (y-h/2)
}
//圓圈圈內repeat A 40 60{circle 100 100 (A/2) 20
}

11/6 期中:數位康丁斯基

程式碼：

Load dbngraphics.dbn

size 400 300

paper 46 139 87

fastset M 50

//三角形

//01

pen 0 0 0

Repeat A 195 265

{ line A 105 230 145}

//02

pen 0 0 0

Repeat A 205 255

{ line A 65 230 105}

//03

pen 0 0 0

Repeat A 210 250{

line A 25 230 65}
//04

pen 0 30 0

Repeat A 40 100

{ line A 150 100 185}/

/05

pen 70 10 10

Repeat A 40 100

{ line A 185 40 150}
//06

repeat A 0 10
{

pen 238 180 34

line 390 (270+A) 335 (270+A)}
//07

repeat A 0 10
{

pen 100 100 100

line 15 (132+A) 100 (132+A)}
//08

Repeat E 105 125

{

pen 238 180 34

triangle (M*2) E (M*2) (M*2+5) (M*1+20) (M*2+25)}

//09

Repeat E 95 105

{pen 139 20 10

triangle (M*2) E (M*2) (M+45) (M*1+30) (M*2+5)}

//10

pen 0 0 0

Repeat A 30 65

{ line A 115 48 85}
//11

Repeat E 95 275

{pen 70 10 10

triangle (M*2) E (M*3+30) (M*1+45) (M*2) (M*5+25)}
//12

pen 30 0 0

Repeat A 270 380

{ line A 250 325 170}

//13

pen 35 0 0

Repeat A 295 355

{ line A 15 325 170}

//14

pen 139 37 0

Repeat A 15 152

{ line A 84 85 20}

//15

pen 60 0 0

Repeat A 235 200

{ line 175 A 210 230}

//16

pen 60 0 0

Repeat A 195 230

{ line 175 200 210 A }

//圓形//外
circle 325 170 60 100

circle 325 170 59 100

circle 325 170 58 100

circle 325 170 57 100

circle 325 170 56 100

circle 325 170 55 100

circle 325 170 54 100
//中

circle 325 170 53 80

circle 325 170 52 80

circle 325 170 51 80

circle 325 170 50 80

circle 325 170 49 80

circle 325 170 48 80

circle 325 170 47 80

//白中

pen 100 100 100

Repeat A 46 26

{ circle 325 170 A 60}

//小

pen 0 0 30

Repeat A 25 0

{ circle 325 170 A 40}

作業4-command square

粉紅色的感情線
一塊疊過一塊 ,糾葛不休
最後只能慧劍斬情絲了

size 200 200
paper 100
command square x y s c
{
pen (3*(c)) (c) (2*c)
line x y x (y+s)
line x (y+s) (x+s) (y+s)
line (x+s) (y+s) (x+s) y
line (x+s) y x y
}
repeat A 1 4
{
repeat B 1 4
{
square (10+(A+A)*15) (10+(B+B)*15) 25 (10+(A+B)*8)
}}
repeat A 4 0
{repeat B 4 0
{square (25+(A+A)*15) (25+(B+B)*15) 25 (10+(A+B)*7)
}}
repeat A 1 9
{repeat B 0 7
{square (A*10+3) (B*10+5) 6 (A+B*10)
}}
repeat A 1 12
{repeat B 0 9
{square (A*10+3) (B*10+5) 4 (A+B*10)
}}
repeat A 1 9
{repeat B 0 9
{square (A*10+3) (B*10+5) 4 (A+B*10)
}}
repeat A 9 1
{repeat B 9 0
{square (A*5+3) (B*5+5) 3 (A+B*10)
}}
repeat A 9 3
{
repeat B 13 2
{square (A+B*8+5) (A+B*8+15) 11(A+B*10)
}}

作業3-三原型

3原型的運用:

圓形的白色漩渦裡
夾雜了粉色的方框
一個著接一個
永遠脫離不了黑色方框所包圍的世界








load dbngraphics.dbn
paper 199 21 133
size 300 300
fast

rectangle 5 20 0 80
rectangle 5 100 0 165
rectangle 5 185 0 250

rectangle 20 0 80 10
rectangle 100 0 160 10
rectangle 180 0 240 10
rectangle 260 0 300 10

rectangle 20 300 80 290
rectangle 100 300 160 290
rectangle 180 300 240 290
rectangle 260 300 300 290

rectangle 295 20 310 80

rectangle 295 100 310 165

rectangle 295 185 310 250

circle 150 150 190 15

circle 150 150 170 15

circle 150 150 150 15

circle 150 150 130 15

circle 150 150 110 15

circle 150 150 90 15

circle 150 150 70 15

circle 150 150 50 15

circle 150 150 30 15

circle 150 150 10 15

pen 139 10 80

rectangle 125 175 175 125

rectangle 126 174 174 126

rectangle 127 173 173 127

rectangle 128 172 172 128

rectangle 100 100 200 200

rectangle 75 75 225 225

rectangle 50 50 250 250

作業2

作業2








程式碼:
paper 90 40 60
size 300 300
repeat E 0 1
{
pen 0 0 0
line 10 (180+E) 290 (280+E)
line 10 (20+E) 290 (120+E)
line (280+E) 10 (220+E) 290
line (80+E) 10 (20+E) 290
}
repeat D 0 2
{
pen 40 25 70
line 0 (80+D) 300 (80+D)
line 0 (64+D) 300 (64+D)
line 0 (48+D) 300 (48+D)
line 0 (32+D) 300 (32+D)
line 0 (16+D) 300 (16+D)
line 0 (0+D) 300 (0+D)
line 0 (218+D) 300 (218+D)
line 0 (234+D) 300 (234+D)
line 0 (250+D) 300 (250+D)
line 0 (266+D) 300 (266+D)
line 0 (282+D) 300 (282+D)
line (80+D) 0 (80+D) 300
line (64+D) 0 (64+D) 300
line (48+D) 0 (48+D) 300
line (32+D) 0 (32+D) 300
line (16+D) 0 (16+D) 300
line (0+D) 0 (0+D) 300
line (218+D) 0 (218+D) 300
line (234+D) 0 (234+D) 300
line (250+D) 0 (250+D) 300
line (266+D) 0 (266+D) 300
line (282+D) 0 (282+D) 300
}
repeat A 0 10
{
pen 75 5 55
line 96 (146+A) 144 (146+A)
line 96 (196+A) 144 (196+A)
line 156 (196+A) 204 (196+A)
line 146 (96+A) 154 (96+A)
line 146 (146+A) 154 (146+A)
line 146 (196+A) 154 (196+A)
line 144 (96+A) 96 (96+A)
line 156 (146+A) 204 (146+A)
line 156 (96+A) 204 (96+A)
}
repeat A 0 10
{
pen 100 100 100
line 146 (96+A) 154 (96+A) line 146 (146+A) 154 (146+A) line 146 (196+A) 154 (196+A)}

個人中文名字設計

個人中文名字設計-洪士雅



程式碼：
size 400 450
paper 95 30 50
pen 0 0 100
line 10 440 200 440
line 10 439 200 439
line 10 145 10 440
line 11 145 11 440
line 10 145 200 145
line 10 146 200 146
line 180 440 180 10
line 179 440 179 10
line 93 10 180 10
line 93 11 180 11
line 60 145 50 25
line 59 145 49 25
line 10 421 50 421
line 10 420 50 420
line 10 420 50 420
line 10 420 50 420
line 10 261 50 261
line 10 260 50 260
line 11 145 51 200
line 10 145 50 200
line 73 421 200 421
line 73 420 200 420
line 82 433 82 145
line 83 433 83 145
line 140 144 101 100
line 140 145 100 100
line 139 145 178 100
line 139 144 177 100
line 220 440 275 440
line 220 441 275 441
line 228 440 228 10
line 229 440 229 10
line 228 420 390 420
line 228 421 390 421
line 228 375 390 375
line 228 376 390 376
line 228 325 390 325
line 228 324 390 324
line 228 11 390 11
line 228 10 390 10
line 378 420 378 10
line 379 420 379 10
line 360 435 380 435
line 360 434 380 434
line 360 433 380 433
line 360 432 380 432
line 360 431 380 431
line 360 430 380 430
line 300 300 378 300
line 300 299 378 299
line 345 325 345 11
line 344 325 344 11
line 300 10 350 10
line 299 10 299 10

pen 93 40 50
line 20 20 380 20line 20 20 20 430
line 20 430 380 430line 380 20 380 430

line 40 45 360 45line 40 45 40 405
line 40 405 360 405line 360 45 360 405

line 80 90 320 90line 80 90 80 360
line 80 360 320 360line 320 90 320 360

line 120 135 280 135line 120 135 120 315
line 120 315 280 315line 280 135 280 315

line 160 180 240 180line 160 180 160
line160 270 240 270line 240 180 240 270

line 184 205 220 205line 184 205 184 245
line 184 245 220 245line 220 205 220 245