作業二 : pattern - 山光水色

size 300 300
paper 0
repeat A 75 100
{
pen 80 100 180
line 0 A 300 A
}
repeat A 110 300
{
pen 150 80 20
line 0 A 300 A
}
repeat A 50 0
{
pen 0
line (A*7) 300 (A*5) 110
}
repeat A 0 50
{
pen 100 50 0
line 300 (A*7) (A*6) 75
}
repeat A 0 25
{
pen 100 200 0
line 0 (75+(A*90)) 300 (75+(A*10))
line 0 (75+(A*90)+1) 300 (75+(A*10)+1)
line 0 (75+(A*90)+2) 300 (75+(A*10)+10)
}
repeat A 0 50
{
pen 90 80 170
line 255 (A*7) (A*6) 75pen 50 30 100line 300 (A*7) (A*8) 75
}
repeat A 0 25
{
pen 0 80 100line 0 (A*3) 300 (A*3)
}
repeat A 50 0
{
pen 200 20 30
Line 300 (A*6) (A*6) 0
}