August 16, 2012
# Clockwork Zajal Sketchsetup do  smoothing true   alpha_blending true  framerate 24   background 0 enddraw do  translate width/2, height/2    for i in 1..9     aRadius = width/18*(9-i)    aResolution = 12-i        rotate ((cos(time/(i*360))*360)/2)/Math::PI    color 255,i*12        circle_resolution aResolution    circle 0, 0, aRadius  endend

# Clockwork Zajal Sketch

setup do
  smoothing true
  alpha_blending true
  framerate 24 
  background 0 
end

draw do
  translate width/2, height/2
 
  for i in 1..9 
    aRadius = width/18*(9-i)
    aResolution = 12-i
    
    rotate ((cos(time/(i*360))*360)/2)/Math::PI
    color 255,i*12
    
    circle_resolution aResolution
    circle 0, 0, aRadius
  end
end