2009年10月29日 星期四

【作業四】command square 結構綜合設計-編織
















size 200 200
paper 50
command square x y s c
{
pen (5*c)(c+12)(2*c-20)
line x y x (y+c)
line x (y+s) (x+y) (y+s)
line (x+s) (y+s) (x+s) y
line (x+s) y x y
}

repeat A 0 18
{
repeat B 0 18
{
square (a*12) (b*15) -20 (100-(A*B))
}
}

repeat A 0 9
{
repeat B 0 9
{
square (a*20) (b*20) 5 (100-(A*B))
}
}

repeat A -1 9
{
repeat B -1 9
{
square (a*40) (b*40) 40 ((a-10)*b*30+20)
}
}


其他顏色













































2009年10月21日 星期三

【作業三】使用三原型綜合設計創作 -波動





















load dbngraphics.dbn
paper 100
size 200 450

fast

circle 200 225 50 0
circle 200 225 100 20
circle 200 225 150 40
circle 200 225 200 60
circle 200 225 250 80

circle 0 225 50 0
circle 0 225 100 20
circle 0 225 150 40
circle 0 225 200 60
circle 0 225 250 80

circle 100 450 50 0
circle 100 450 100 20
circle 100 450 150 40
circle 100 450 200 60
circle 100 450 250 80

circle 200 225 50 0
circle 200 225 100 20
circle 200 225 150 40
circle 200 225 200 60
circle 200 225 250 80

circle 0 225 50 0
circle 0 225 100 20
circle 0 225 150 40
circle 0 225 200 60
circle 0 225 250 80

circle 100 450 50 0
circle 100 450 100 20
circle 100 450 150 40
circle 100 450 200 60
circle 100 450 250 80

circle 100 0 50 0
circle 100 0 100 20
circle 100 0 150 40
circle 100 0 200 60
circle 100 0 250 80

circle 200 225 50 0
circle 200 225 100 20
circle 200 225 150 40
circle 200 225 200 60
circle 200 225 250 80

circle 0 225 50 0
circle 0 225 100 20
circle 0 225 150 40
circle 0 225 200 60
circle 0 225 250 80

circle 100 450 50 0
circle 100 450 100 20
circle 100 450 150 40
circle 100 450 200 60
circle 100 450 250 80

circle 100 0 50 0
circle 100 0 100 20
circle 100 0 150 40
circle 100 0 200 60
circle 100 0 250 80

Repeat A 80 10

{
circle 100 225 (A/2+20) A
}

2009年10月15日 星期四

【作業二】pattern設計應用-思緒
















size 550 120
paper 100 60 80

Repeat A 0 200

{
pen 10 (a+70) (a+100)
Line (-80+A*11) 0 (8+A*5) 120

pen (a-70) 80 50
Line (4+A*5) 0 (10+A*3) 120

pen 90 (a-40) 50
Line (15+A*4) 0 (15+A*4) 120

pen 0
Line 0 (A*4) (A*4) 100

pen 0
Line 550 (A*4) (A*4) 0
}


Repeat A 0 200

{
pen 100
Line (A*4) 0 (A*4) 550
}

2009年10月1日 星期四

【作業一】個人中文名字設計-嚴子涵





































// enter program
size 500 500
paper 50 10 0
pen 100 100 100

line 80 465 150 465
line 80 465 80 395
line 80 395 150 395
line 150 395 150 465

line 270 465 435 465
line 270 465 270 270
line 435 370 435 465

line 45 370 435 370
line 45 370 45 65

line 80 330 435 330
line 45 285 160 285
line 120 330 120 285
line 80 250 160 250
line 80 190 160 190
line 45 160 160 160
line 80 285 80 160
line 160 285 160 65
line 270 270 465 270

line 160 65 420 65
line 420 65 420 330

line 230 235 330 235
line 290 235 290 95
line 275 95 290 95

line 160 250 420 65
line 160 65 420 250