2010年1月15日 星期五

Work Nine - 巨浪


size 600 400

paper 100

fast


command

one x y c v d b n

{

pen d b n
line x y (c-15) (v-50)

line (x+20) (y-10) (c+10) (v-30)

}

command two q w e r t y u

{

pen t y u
line q w (e-15) (r-50)

line (q+20) (w-10) (e+10) (r-30)

}

forever

{

same? 100

{

one (

}

notsame? 100

{

two (

}
same? 100

{

paper 100

}

}

沒有留言:

張貼留言