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

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

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

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

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