期中:數位康丁斯基

期中:數位康丁斯基

load dbngraphics.dbn
size 500 500
paper 30 80 120
//

FASTRepeat a 450 465
{
pen a 120 20
line 400 a 475 a
}
//

Repeat N 0 15{circle 375 275 (N/2) 100}

Repeat V 15 60{circle 375 275 (V/2) 0}

Repeat P 30 35{circle 375 275 P 100}
//

set M 60
Repeat B 325 425
{
pen A 20 50
triangle B M 375 (M+200) 425 M
}
//

Repeat A 225 275
{
pen 100
line A 100 250 145
}
//

Repeat A 220 280
{
pen 100
line A 145 250 180
}
//

Repeat A 210 290
{
pen 100
line A 180 250 225
}
//

Repeat A 300 450
{
pen 50 40 60
line A 400 375 275
}
//

Repeat A 25 150
{
pen 220 100 40line A 175 85 90
}
//

Repeat A 100 225
{
pen 180 60 250
line A 200 100 455
}
//

Repeat A 25 100
{
pen 40 110 100
line A 280 100 325
}
//

Repeat A 25 100
{
pen 100 50 100
line A 325 25 280
}
//

Repeat A 75 100
{
pen 100 120 20
line A 235 100 220
}
//

Repeat A 75 100
{
pen 120 50 200
line A 215 100 200
}
//

Repeat A 30 70
{
pen 200
line A 220 50 180
}
//
field 20 260 100 250 0
//

Repeat A 200 250
{
pen 180 40 40
line A 400 250 360
}
//

Repeat D 200 250
{
pen 180 40 40
line D 360 200 400
}
//

Repeat A 115 130{
circle 90 0 A 80}