由程序生成的动画。主要代码如下,用的是自己设计的编程语言~
let flo =
color (90, 8.5, 6) $
flower 1 [ star_soft 4 0.1 0.15 ]
let rec tree =
color (0,3,0) $ linewidth (0.02) $ branch $
(0,0) ^t 0
.. ^ mark' 0.55 (growth 0.6 (delay 1 (trans (rotated -1) tree)))
.. (0.5,0.1)
.. ^ mark (delay 0.5 (trans (rotated 0.3 %%+ scaled 0.95) tree))
.. (1,0)
.. ^ mark flo
评论