數位康丁斯基

image



video

程式碼

size 450 400
load dbngraphics.dbn
paper 60 100 100
fast
repeat a 30 120{pen 100 80 0
line a 360 a 375 }Repeat A 70 180 { pen 50 0 0line a 30 125 165}
Repeat A 200 260 { pen 0 0 0line a 135 230 180}
Repeat A 205 255 { pen 0 0 0line a 85 230 135}Repeat A 210 250 { pen 0 0 0line a 35 230 85}
Repeat A 350 270{ pen 90 10 0line a 125 350 350}
Repeat A 420 300{ pen 100 35 0line a 115 350 40}
repeat a 350 430{pen 100 100 100
line a 165 a 175}


不管本人如何試，程式碼都是這副德性...借室友的電腦也這樣

作業四: 結構綜合設計 -不規則對稱

size 200 200paper 50 30 80
command square x y s c{pen cline y y x (y+s)line x (y+s) (x+s) (y+s)line (x+s) (y+s) (x+s) yline (x+s) y x y}repeat A 50 -50{repeat B 0 20{square (10+(A+A)*15) (10+(B+B)*15) 50 (20+(A+B)*8)}}repeat A 4 0{repeat B 5 0{square (25+(A+A)*15) (25+(B+B)*15) 25 (10+(A+B)*7)}}

作業三-黑暗能量

load dbngraphics.dbn
paper 20
size 300 300
fast
pen 0 0 100triangle 150 200 108 123 192 123pen 0 100 0triangle 150 250 108 123 192 123pen 100 0 0triangle 150 300 108 123 192 123pen 0 0 100rectangle 25 25 275 275pen 0 100 0rectangle 50 50 250 250pen 0 0 100rectangle 75 75 225 225pen 100 0 0rectangle 100 100 200 200pen 0 60 0rectangle 125 125 175 175



repeat A 0 100{circle 0 10 (A/2+5) 90
}
repeat A 0 100{circle 300 290 (A/2+5) 90
}
repeat A 0 100{circle 300 10 (A/2+5) 90
}
repeat A 0 100{circle 10 300 (A/2+5) 90
}

作業二 : pattern 設計應用 -行人穿越道

size 300 300
fast

Repeat B 0 25

{

Repeat A 100 50

{

Set [(A*2) (B*12)] 75

}

}

作業一：個人中文名字設計

size 500 500
paper 0 50 80
line 25 0 25 500
line 50 0 50 500

line 75 0 75 500

line 100 0 100 500

line 125 0 125 500
line 150 0 150 500
line 175 0 175 500
line 200 0 200 500
line 225 0 225 500
line 250 0 250 500
line 275 0 275 500
line 300 0 300 500
line 325 0 325 500
line 350 0 350 500
line 375 0 375 500
line 400 0 400 500
line 425 0 425 500
line 450 0 450 500
line 475 0 475 500

line 0 25 500 25
line 0 50 500 50
line 0 75 500 75
line 0 100 500 100
line 0 125 500 125
line 0 150 500 150
line 0 175 500 175
line 0 200 500 200
line 0 250 500 250
line 0 275 500 275
line 0 300 500 300
line 0 325 500 325
line 0 350 500 350
line 0 225 500 225
line 0 400 500 400
line 0 425 500 425
line 0 450 500 450
line 0 475 500 475
line 0 375 500 375

pen 100 0 0

line 50 400 125 475

line 125 475 200 400
line 75 400 175 400
line 175 400 125 375
line 125 300 100 325
line 175 450 175 25
line 150 250 200 250
line 150 275 200 275
line 75 350 225 350
line 175 400 200 400
line 200 400 200 275
line 100 325 125 350
line 125 300 75 250
line 75 275 300 175
line 275 250 425 250
line 350 275 350 225
line 300 225 300 200
line 400 225 400 200
line 275 100 225 50
line 300 75 450 25
line 350 100 375 75
line 400 100 425 75