期末1月7

箭頭

用箭頭代表向上的力量

size 400 400

paper 10

fast

command rect x y s h c

{
pen (c+10) (c-10) (c*10)
line (x+10) y (x) (y+s)
line x (y+s) (x+s) (y+s)
line (x+10) (y+s) (x+s) y
}
forever

{
same? 100
{

rect 50 20

}

}