([1]import* glsl-view link-time)
([2]import osc)

([5]def
  *clock* ([3]clock false 120)
  *oscout* ([4]osc/connect 'localhost' 9000))

([13]def
  paused? ([7]switch ([6]every 2) true false)
  cam ([12]doto ([8]stream-source '2D' '/dev/video0')
    ([9]freeze paused?)
    ([11]step! ([10]every 0.5))))

([15]draw $[14]shader"
in vec2 uv;
out vec4 color;

void main() {
  color = texture($cam, uv);
  color.rgb = mix(color.rgb, color.rrr, $paused? ? 1 : 0);
}")