sketch experiment 8 - circles animated

Nikolaus Gradwohl2020-10-14T02:19:13+00:00

for this sketch experiment I animated the circles i create in experiment 3

experiment nr 8

(make-instance 'blub )
(defsketch blub ((title "circles anim") (p 0))
  (background (rgb 1 1 1 ))
  (incf p 0.1)
  (translate 200 50)
  (dotimes (i 720)
    (with-pen (make-pen :stroke (rgb 0 0 0 0.1 ))
      (push-matrix)

      (setf f (+ p  (* (sin (* 6.28 (/ i 720)) ) (+ 0 (* 100 (cos (/ i 72.3)))))))
      (circle (* 100 (sin (* 3.14 (/ i 180)))) (/ i 2.7) f)
      (pop-matrix )
      )
    )
  )
Tweet This! submit to reddit Digg! Tags: | no comments | no trackbacks

See also:

sketch experiment 7 - osc events
sketch experiment 6 - color
sketch experiment 5 - grid
sketch experiment 3 - animation
sketch experiment 3 - circles

Trackbacks

Comments

Leave a response

Leave a comment