作業四 command square 結構綜合設計

size 150 150
paper 100 100 20
command square x y s c
{
pen c
line x y s (s+s)


}
repeat A 1 20
{
repeat B 0 20
{
square (A*10+3) (B*10+5) 2 (A+B*10)
}
}