期中：數位康丁斯基

// enter programload
dbngraphics.dbn
size 400 300
paper 60 90 80
fast

//黑三角
Repeat A 155 115
{
pen 100
triangle 225 115 250 A 275 115
}
Repeat A 115 75
{
pen 100
triangle 233 75 250 A 269 75
}
Repeat A 75 33
{
pen 100
triangle 235 33 250 A 260 33
}
Repeat A 40 75
{ pen 100
triangle 60 85 40 115 A 115
}
//大橘三角
repeat A 25 150
{pen 80 40 0
triangle 90 33 25 85 A 85
}
//亮橘紅三角
Repeat A 100 110
{
pen 90 25 20
triangle 90 110 105 A 105 110
}
//黃三角
Repeat A 110 130
{
pen 255 215 0
triangle 80 130 105 A 105 130
}
//綠三角
Repeat A 150 177
{
pen 10 30 15
triangle 50 150 105 A 105 150
}
//亮橘紅三角repeat A 50 105
{
pen 90 25 20
triangle 50 150 50 177 A 177
}
//白條
repeat B 0 5
{
pen 5
line 50 (137+B) 105 (137+B)
}
//黃條
repeat B 0 8
{
pen 100 80 0
line 325 (270+B) 380 (270+B)
}
//大圓(外)
Repeat A 50 40
{
circle 310 160 A 100
}
Repeat A 43 35
{
circle 310 160 A 60
}
Repeat A 35 25
{
circle 310 160 A 40
}//紅褐三角
repeat A 225 160
{
pen 50 10 0
triangle 260 225 310 A 360 225
}//紅紫三角
Repeat A 160 25
{
pen 30 0 20
triangle 275 25 310 A 350 25
}//大圓(內)
Repeat A 25 10
{
circle 310 160 A 0
}Repeat A 10 0
{
circle 310 160 A 100
}//紅方形
repeat B 0 20
{
pen 80 5 0
line 165 (250+B) 185 (250+B)
}//右下圓弧repeat a 0 7
{
circle 90 5 (a+40) (60)
}//右下遮罩
repeat a 0 30
{
pen 60 90 80
rectangle (30+a) (0+a) (150-a) (0-a)
}//右上圓弧
repeat a 0 5
{
circle 85 265 (a+30) (0)
circle 70 255 (a+50) (50)
}//右上遮罩
repeat A 0 170
{
pen 60 90 80
triangle 125 250 170 300 A 300
}//桃紅三角Repeat A 285 101
{
pen 85 35 40
triangle 106 101 106 A 200 101
}