期末考

size 400 400
paper 100
fast

command rects x y w h r g b
{
pen r g b
repeat w1 0 50
{
pen r g b
line (x+(w1*4)) (y-h) (x+(w1*4)) (y+h)
}
}

forever
{
same? 100
{
rects 10 14
paper (/4)
}
same? 0
{
rects 5 5
}
}

size 400 400
paper 100
fast

command rects x y w h r g b
{
pen r g b
repeat w1 0 50
{
pen r g b
line (x+(w1/4)) (y-h*2) (x+(w1/4)) (y+h)
}
}

forever
{
same? 100
{
rects 10 14
paper (/4)
}
same? 0
{
rects 5 5
}
}

這是抽象的北極光!!影片上傳在e化=)!!