作業十: 應用 Key 整合判斷結構式 配合其它的指令

小方格從左到右移動

構成 米字 的圖案




size 400 400
paper 100
fast
command rects x y w h r g b
{
pen r g b
repeat w1 (-w) (w)
{
pen r g b
line (x+(w1/2)) (y-h/2) (x+(w1/2)) (y+h/2)
}
}
forever
{
same? 100
{
rects 20 20
}
same? 100
{
paper 10
}
}

順便祝大家新年快樂 ^^