作業九:年年有魚

新年快到了
祝大家年年有魚

size 400 400
load dbngraphics.dbn

{
Paper 100 1 1
Pen 10
repeat A 0 100
{
Same? A 30
{
Line 0 (A*6) (A*6) 300
}

Notsame? A 30
{
Line 0 (A*6) (A*6) 300
}




Same? A 30
{
Line 300 (A*6) (A*6) 0
}

Notsame? A 30
{
Line 300 (A*6) (A*6) 0
}
}
}

Repeat A 30 20

{

circle 50 50 (A/2+10) 0

}