作業七: 應用 Mouse-1-2-3 配合Time 4-----DNA

我以線條表示複雜結構的DNA
DNA的組合是如此複雜又簡單
已背景為黑
突顯其奧秘


程式碼

size 400 400
paper 100

fast
command rect x y w h c

{
pen 50 20
line (x-w/10) (y-h/10) (x+w/2) (y-h/2)
line (x+w/10) (y-h/10) (x+w/2) (y+h/2)
line (x+w/10) (y+h/10) (x-w/2) (y+h/2)
line (x-w/10) (y+h/10) (x-w/2) (y-h/2)
}


forever
{
rect <Ｍouse 1> <Ｍouse 2> <Ｍouse 1> <Ｍouse 3> <Ｔime 4>
}