2009年11月13日 星期五

作業五



size 400 400

paper 100


repeat x 0 400

{
pen ((

2009年11月12日 星期四

作業四: 使用command square 結構綜合設計



size 200 200
paper 100
command square x y s c
{
pen (c+5) (c-10) (c*10)
line (x+10) 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 5 0
{
repeat B 5 0
{
square (25+(A+B)*15) (25+(B+2)*15) 25 ((A+B)*9)
}
}

repeat A 0 5
{
repeat B 0 5
{
square (10+(A+B)*15) (10+(B+2)*15) 25 ((A+B)*8)
}
}
repeat A 5 0
{
repeat B 5 0
{
square (25+(A+B)*15) (25+(B+2)*15) 25 ((A+B)*7)
}
}

repeat A 5 0
{
repeat B 5 0
{
square (25+(A)*15) (25+(B+2)*15) 25 ((A+B)*6)
}
}

2009年11月5日 星期四

期中考- 融合


load dbngraphics.dbn
paper 0 80 45
size 500 425
fast
Repeat A 120 130

{

circle 100 225 (A/2+20) 90

}

Repeat A 25 0

{

circle 100 225 (A) 90

}

Repeat A 125 135

{

circle 375 425 (A/2+20) 0

}
repeat B 325 425
{

pen 10 80 45
line 275 B 350 B

}
REpeat B 350 425
{

pen 10 80 45
line 400 B 450 B
}


Repeat A 125 135

{

circle 375 400 (A/2+20) 0

}
repeat B 375 425
{

pen 10 80 45
line 450 B 465 B
}
repeat B 325 425
{

pen 10 80 45
line 275 B 350 B

}
repeat a 0 100
{


pen 80 0 0
triangle 100 225 (50+a) 50 150 50

}







repeat g 0 10
{

pen 75 60 0
line 20 (375+G) 100 (375+G)

}


repeat a 120 250
{

pen 60 10 0
triangle 375 400 (125+a) 180 250 180

}
repeat a 0 225
{

pen 70 30 0
triangle 375 75 (275+a) 165 300 165

}
repeat g 0 10
{

pen 100 100 100
line 375 (225+G) 490 (225+G)

}
repeat a 0 35
{

pen 100 100 0
triangle 400 220 (375+a) 220 375 200

}
repeat a 0 25
{

pen 50 10 0
triangle 400 200 (375+a) 200 375 180

}
repeat g 0 50
{

pen 54 0 0
line 375 (250+G) 450 (250+G)

}
repeat a 0 75
{

pen 10 30 0
triangle 400 250 (375+a) 250 375 300

}
repeat a 375 425
{

pen 0 0 0
triangle 450 165 (50+a) 210 425 210

}
repeat a 0 150
{

pen 70 0 0
triangle 100 225 (25+a) 325 120 250

}
repeat a 100 140
{


pen 0 0 0
triangle 200 125 (80+a) 70 190 70

}
repeat a 100 150
{


pen 0 0 0
triangle 200 175 (75+a) 125 190 125

}
repeat a 100 150
{


pen 0 0 0
triangle 200 225 (75+a) 175 190 175

}
Repeat A 130 140

{

circle 375 25 (A/2+20) 90

}
repeat B 0 70
{

pen 0 80 45
line 275 B 300 B

}
repeat B 0 70
{

pen 0 80 45
line 450 B 465 B

}






2009年10月27日 星期二

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


load dbngraphics.dbn
paper 100 20 30
size 300 375
fast
circle 100 300 50 0
circle 100 300 48 0

circle 100 300 46 0

circle 100 300 44 0

circle 100 300 42 0

circle 100 300 40 0
circle 100 300 38 0

circle 100 300 36 0



repeat a 0 100
{

pen 90 80 100
triangle (0) 0 (50+a) 150 130 130
//triangle (0) 0 (25-a) 150 130 130
}
repeat a 0 100
{

pen 90 80 100
triangle 300 0 (50+a) 150 130 130
//triangle 300 0 (25-a) 150 130 130
}
repeat a 0 100
{

pen 80 90 100
triangle 225 325 (50+a) 150 130 130
//triangle 300 0 (25-a) 150 130 130
}
repeat a 0 100
{


pen 80 90 100
triangle 0 300 (50+a) 150 130 130
//triangle 0 0 (25-a) 150 130 130
}


repeat g 0 50
{



pen 80 90 100
line 50 (150+G) 150 (150+G)


line 50 (175+G) 150 (175+G)


line (50+G) 250 (50+G) 150
line (100+G) 250 (100+G) 150



}
circle 100 300 50 0
circle 100 300 48 0

circle 100 300 46 0

circle 100 300 44 0

circle 100 300 42 0

circle 100 300 40 0
circle 100 300 38 0

circle 100 300 36 0


2009年10月14日 星期三

作業二 : pattern-顏色




paper 100



size 300 300
repeat B 0 20


{


pen 100 100 100


line 0 (280+B) 300 (280+B)


line 0 (0+B) 300 (0+B)

line (280+B) 0 (280+B) 300


line (0+B) 0 (0+B) 300

}

repeat C 0 20
{


pen 70 0 0
line 20 (260+C) 280 (260+C)


line 20 (20+C) 280 (20+C)

line (260+C) 20 (260+C) 280


line (20+C) 20 (20+C) 280

}

repeat D 0 20
{


pen 70 30 0
line 40 (240+D) 260 (240+D)


line 40 (40+D) 260 (40+D)

line (240+D) 40 (240+D) 260


line (40+D) 40 (40+D) 260

}

repeat E 0 20
{


pen 70 70 0
line 60 (220+E) 240 (220+E)


line 60 (60+E) 240 (60+E)

line (220+E) 60 (220+E) 240


line (60+E) 60 (60+E) 240

}

repeat F 0 20
{


pen 0 70 0
line 80 (200+F) 220 (200+F)


line 80 (80+F) 220 (80+F)

line (200+F) 80 (200+F) 220


line (80+F) 80 (80+F) 220

}

repeat G 0 20
{


pen 0 0 50
line 100 (180+G) 200 (180+G)


line 100 (100+G) 200 (100+G)

line (180+G) 100 (180+G) 200


line (100+G) 100 (100+G) 200

}


repeat H 0 20
{


pen 50 0 50
line 120 (160+H) 180 (160+H)


line 120 (120+H) 180 (120+H)

line (160+H) 120 (160+H) 180


line (120+H) 120 (120+H) 180

}









2009年9月30日 星期三

作業一 :個人中文名字設計 –黃嘉鈴


size 500 500
paper 90 20 0
pen 0
line 50 425 450 425
line 100 475 100 375
line 200 475 200 375
line 100 375 200 375
line 50 350 250 350
line 80 325 90 250
line 210 325 200 250
line 80 325 210 325

line 90 250 200 250
line 85 287 205 287
line 145 325 145 250
pen 90
line 145 245 75 175
line 145 245 215 175
line 100 190 190 190
line 75 170 215 170
line 122 190 122 110
line 215 170 170 120
line 90 110 150 110
line 160 120 200 110
line 95 135 122 110
line 122 110 149 135
pen 80 50 30
line 350 475 350 375
line 300 375 400 375
line 300 350 400 350
line 300 350 310 300
line 400 350 390 300
line 310 300 390 300
line 275 260 425 260
line 317 275 325 225
line 388 275 375 225
line 280 200 340 200
line 310 220 290 120
line 340 200 320 120
line 360 200 360 120
line 400 200 400 120
line 360 200 400 200