2009年11月5日 星期四

期中考-康丁斯基-2

圖片:
影片:

load dbngraphics.dbn

paper 68 87 76

size 300 300fast

//兩個圓
circle 80 125 55 100

circle 80 125 54 99

circle80 125 53 98

circle 80 125 52 97

circle 80 125 51 96

circle 80 125 50 95
circle 80 125 20 100

circle 80 125 19 99

circle 80 125 18 98

circle 80 125 17 97

circle 80 125 16 96

circle 80 125 15 95

circle 80 125 14 94

circle 80 125 13 93

circle 80 125 12 92

circle 80 125 11 91

circle 80 125 10 90

circle 80 125 9 89

circle 80 125 8 88

circle 80 125 7 87

circle 80 125 6 86

circle 80 125 5 85

circle 80 125 4 84

circle 80 125 3 83

circle 80 125 2 82

circle 80 125 1 81

//彎刀
circle 240 10 40 100

circle 240 10 39 99

circle 240 10 38 98

circle 240 10 37 97

circle 240 10 36 96

circle 240 10 35 95

circle 240 0 40 100

circle 240 0 41 101

circle 240 0 42 102

circle 240 0 43 103
//左下紅色三角形

pen 35 10 10

repeat A 50 110

{

line A 5 80 125

}

//左上紅色倒三角形
repeat A 30 130

{

line A 200 80 125

}
//三個黑色三角形

pen 0 0 0

repeat A 125 165

{

line A 85 145 125

}
repeat A 130 160

{

line A 45 145 84

}
repeat A 135 155

{

line A 5 145 44

}
//右下橘色三角形

pen 70 30 0

repeat A 200 280

{

line A 75 240 25

}

//右下黑色倒三角形
pen 0 0 0

repeat A 252 268

{

line A 90 260 76

}
//右邊紅色直角三角形

pen 80 10 20

repeat A 170 235

{

line A 80 235 225

}

//右邊紅色小直角三角形
pen 50 0 0

repeat A 235 245

{

line A 85 235 80

}

//右邊黃色小直角三角形
pen 90 80 0

repeat A 235 250

{

line A 95 235 85

}

//右邊綠色直角三角形
pen 0 25 10

repeat A 235 265

{

line A 120 235 135

}
//右邊紅色直角三角形

pen 50 0 0

repeat A 235 265

{

line A 135 265 120

}
//紅色正方形1

pen 85 0 0

repeat A 170 200

{

line A 195 185 180

}

//紅色正方形2
pen 85 0 0

repeat A 170 200

{

line A 195 185 210

}
//右邊白色矩形

pen 100 100 100

repeat A 100 105

{

line 236 A 275 A

}

//左邊黃色矩形
pen 90 80 0

repeat A 230 240

{

line 20 A 75 A

}

期中考-康丁斯基

圖片:


















影片:

程式碼:

load dbngraphics.dbn

paper 68 87 76

size 300 300

fast
circle 80 125 55 100

circle 80 125 20 100

circle 240 10 40 100

circle 240 0 40 100
pen 35 10 10

repeat A 50 110

{

line A 5 80 125

}
repeat A 30 130

{

line A 200 80 125

}
triangle 125 85 145 125 165 85

triangle 130 45 145 84 160 45

triangle 135 5 145 44 155 5
triangle 200 75 240 25 280 75

triangle 252 90 260 75 268 90
triangle 170 80 235 80 235 220

triangle 235 80 235 85 245 85

triangle 235 85 235 95 250 95
pen 100 100 100

Repeat A 100 105

{

line 236 A 275 A

}
pen 90 80 0

repeat A 230 240

{

line 20 A 75 A

}

2009年11月2日 星期一

work3-三原型

三原型 : 專注




















影片:

程式碼:

load dbngraphics.dbn

paper 50 10 10size 300 300

fast
circle 150 150 145 0

circle 150 150 125 0

circle 150 150 100 0

circle 150 150 75 0

circle 150 150 50 0

circle 150 150 25 0

circle 187 150 12 0

circle 213 150 12 0

circle 238 150 12 0

circle 263 150 12 0

circle 285 150 10 0
circle 113 150 12 0

circle 87 150 12 0

circle 62 150 12 0

circle 37 150 12 0

circle 15 150 10 0
circle 150 187 12 0

circle 150 213 12 0

circle 150 238 12 0

circle 150 263 12 0

circle 150 285 10 0
circle 150 113 12 0

circle 150 87 12 0

circle 150 62 12 0

circle 150 37 12 0

circle 150 15 10 0
pen 60 40 0

rectangle 125 175 175 125

rectangle 126 174 174 126

rectangle 127 173 173 127

rectangle 128 172 172 128

rectangle 129 171 171 129

rectangle 100 100 200 200

rectangle 75 75 225 225

rectangle 50 50 250 250

rectangle 25 25 275 275

rectangle 0 0 300 300

2009年11月1日 星期日

work2-pattern

pattern-雨過天晴

repeat A 0 300


{

pen 10 80 A

line 0 A 300 A

}



Repeat A 0 200

{

pen 100

Line (A*4) 0 (A*4) 300

}



Repeat A 300 0

{

pen 100 100 10 Line (300+A*80) 0 (5+A/10) 300

}



Repeat A 300 0

{

pen 100 100 10 Line (0+A*80) 0 (5+A/10) 300

}



Repeat A 300 0

{

pen 100 100 10 Line (275+A/80) 0 (5+A*10) 300

}

影片: