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

}






沒有留言:

張貼留言