2010年1月16日 星期六

作業拾


主題:羽毛










size 400 400
paper 100
fast

command rect x y w h c
{
pen (c) (h) (h)
line x y (x+w) (y+w)

line x y (x-w) (y+w)

}

forever
{
same? 100
{
rect (60-(

沒有留言:

張貼留言