max v2;
#N vpatcher 82 103 798 578;
#P message 490 408 93 196617 vasp buf!=1 buf!=2;
#N vpatcher 40 55 218 175;
#P newex 45 79 61 196617 vasp.update;
#P newex 45 56 45 196617 vasp.= 0;
#N comlet vasp to clear in;
#P inlet 45 26 15 0;
#P connect 0 0 1 0;
#P connect 1 0 2 0;
#P pop;
#P newobj 490 428 78 196617 p clear_buffers;
#P newex 79 393 58 196617 vasp.!= -1.;
#P comment 332 310 43 196617 false/0;
#P message 71 123 61 196617 vasp buf!=1;
#P newex 155 247 55 196617 vasp.= -1.;
#P newex 92 247 55 196617 vasp.= 0.3;
#P newex 224 214 55 196617 vasp.upper;
#P newex 155 214 58 196617 vasp.lower;
#P newex 224 247 59 196617 vasp.!bevel;
#P newex 92 214 55 196617 vasp.upper;
#P newex 31 214 58 196617 vasp.lower;
#P newex 121 302 61 196617 vasp.update;
#P newex 30 247 55 196617 vasp.bevel;
#P newex 182 187 55 196617 vasp.upper;
#P newex 71 187 58 196617 vasp.lower;
#P newex 71 154 121 196617 vasp.m 2;
#P newex 79 368 70 196617 vasp.= buf!=1;
#P message 79 338 61 196617 vasp buf!=2;
#N vpatcher 40 55 418 371;
#P button 183 82 15 0;
#P newex 129 145 60 196617 prepend set;
#N comlet waveform~ mode messages;
#P inlet 129 121 15 0;
#P newex 259 64 27 196617 << 1;
#P newex 206 121 40 196617 change;
#P newex 206 145 107 196617 select 0 1 2;
#P newex 206 98 27 196617 |;
#P newex 47 121 40 196617 change;
#P outlet 129 252 15 0;
#P message 47 145 65 196617 constrain \$1;
#P newex 129 195 45 196617 loadbang;
#P newex 47 40 222 196617 pushkeys;
#P message 270 169 58 196617 mode move;
#P message 206 213 61 196617 mode select;
#P message 238 191 52 196617 mode loop;
#P connect 3 0 7 0;
#P connect 7 0 5 0;
#P connect 12 0 13 0;
#P fasten 2 0 6 0 275 243 134 243;
#P fasten 1 0 6 0 211 243 134 243;
#P fasten 0 0 6 0 243 243 134 243;
#P fasten 5 0 6 0 52 243 134 243;
#P connect 11 0 14 0;
#P connect 14 0 8 0;
#P connect 3 3 8 0;
#P connect 8 0 10 0;
#P connect 10 0 9 0;
#P connect 13 0 1 0;
#P connect 9 0 1 0;
#P connect 4 0 1 0;
#P connect 11 0 8 1;
#P connect 9 1 0 0;
#P connect 3 4 11 0;
#P connect 9 2 2 0;
#P pop;
#P hidden newobj 375 80 49 196617 p wfkeys;
#P hidden message 375 241 54 196617 set buf!=2;
#P user waveform~ 375 262 312 99 3 9;
#W mode select;
#W mouseoutput continuous;
#W unit ms;
#W grid 1000.;
#W ticks 8.;
#W labels 1;
#W vlabels 1;
#W vticks 1;
#W vzoom 1.;
#W voffset 0.;
#W bpm 120. 4.;
#W frgb 0 0 0;
#W brgb 255 255 255;
#W rgb2 132 132 132;
#W rgb3 0 0 0;
#W rgb4 0 0 0;
#W rgb5 255 255 255;
#W rgb6 100 100 100;
#W rgb7 100 100 100;
#P newex 586 428 101 196617 buffer~ buf!=2 2000;
#P hidden message 375 119 54 196617 set buf!=1;
#P hidden newex 375 100 45 196617 loadbang;
#P user waveform~ 375 137 312 99 3 9;
#W mode select;
#W mouseoutput continuous;
#W unit ms;
#W grid 1000.;
#W ticks 8.;
#W labels 1;
#W vlabels 1;
#W vticks 1;
#W vzoom 1.;
#W voffset 0.;
#W bpm 120. 4.;
#W frgb 0 0 0;
#W brgb 255 255 255;
#W rgb2 132 132 132;
#W rgb3 0 0 0;
#W rgb4 0 0 0;
#W rgb5 255 255 255;
#W rgb6 100 100 100;
#W rgb7 100 100 100;
#P newex 79 428 61 196617 vasp.update;
#P newex 586 408 101 196617 buffer~ buf!=1 2000;
#P comment 45 80 147 196617 argument/right inlet: value;
#P comment 45 63 59 196617 not equal;
#P comment 45 41 89 196622 vasp.!=;
#P comment 176 125 92 196617 generate a function;
#P comment 334 267 40 196617 true/1;
#P comment 148 396 216 196617 test if a part of the function is not equal to -1.;
#P connect 22 0 20 0;
#P fasten 18 0 22 0 76 209 36 209;
#P connect 29 0 17 0;
#P connect 17 0 18 0;
#P connect 15 0 16 0;
#P connect 16 0 31 0;
#P connect 31 0 7 0;
#P fasten 18 0 23 0 76 209 97 209;
#P connect 23 0 27 0;
#P fasten 28 0 21 0 160 283 126 283;
#P fasten 27 0 21 0 97 283 126 283;
#P fasten 20 0 21 0 35 283 126 283;
#P fasten 24 0 21 0 229 283 126 283;
#P fasten 19 0 25 0 187 209 160 209;
#P connect 25 0 28 0;
#P connect 17 1 19 0;
#P fasten 19 0 26 0 187 209 229 209;
#P connect 26 0 24 0;
#P hidden connect 9 0 10 0;
#P hidden connect 14 0 8 0;
#P hidden connect 10 0 8 0;
#P hidden fasten 9 0 13 0 380 100 380 100;
#P hidden connect 14 0 12 0;
#P hidden connect 13 0 12 0;
#P connect 33 0 32 0;
#P pop;