work III 黑色饗宴

size 300 300
paper 0


Repeat A 0 300
{
pen 100
Line (20+A*4) 0 (20+A*4) 300
pen 50
Line (15+A*4) 0 (15+A*4) 300
pen 20
Line (10+A*4) 0 (10+A*4) 300
pen 10
Line (5+A*4) 0 (5+A*4) 300

pen 100
Line (20+A/8) 300 (20+A/8) 0
pen 50
Line (15+A/4) 300 (15+A/4) 0
pen 20
Line (10+A/2) 300 (10+A/2) 0
pen 10
Line (5+A/1) 300 (5+A/1) 0
}



Repeat A 0 300

{

pen 90

Line 0 (A*6) (A*6) 300

pen 90

Line 0 (A*6) (A*6) 0

}


Repeat A 0 300
{
pen A
line A A 300 A
}