aboutsummaryrefslogtreecommitdiffstats
path: root/examples/glsl-view/stream-controls.alv
blob: 0b726fda413c0d751f0b6d31e9cfc81f7060fd87 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
([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);
}")