2009年12月7日 星期一

作業六:自畫像







size 400 400
paper 90
fast

command rect x y w h c
{
pen 20 60 80
line (x-w/x) (y-h/x) (x+w/x) (y-h/x)
line (x+w/w) (y-h/w) (x+w/w) (y+h/w)
line (x+w/y) (y+h/y) (x-w/y) (y+h/y)
}
forever
{
rect 10 10

沒有留言:

張貼留言