max v2; #N vpatcher 261 96 989 752; #P origin -115 0; #P window setfont "Sans Serif" 9.; #P message 507 465 28 9109513 open; #P toggle 452 441 15 0; #P newex 376 432 27 9109513 +~; #P newex 341 431 27 9109513 +~; #P newex 429 493 56 9109513 sfrecord~ 2; #N vpatcher 640 67 1240 467; #P outlet 90 277 15 0; #P outlet 62 277 15 0; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 15 128 94 9109513 expr $f1*$f1/200000; #P newex 91 237 27 9109513 *~; #P newex 61 237 27 9109513 *~; #P newex 15 186 27 9109513 line~; #P newex 15 163 56 9109513 append 100; #P newex 15 104 88 9109513 scale 0 127 0. 500.; #P window linecount 0; #P newex 15 76 41 9109513 ctlin b 3; #N comlet ins1 R; #P inlet 91 50 15 0; #N comlet ins1 L; #P inlet 62 50 15 0; #P connect 2 0 3 0; #P connect 3 0 8 0; #P connect 8 0 4 0; #P connect 4 0 5 0; #P connect 0 0 6 0; #P connect 6 0 9 0; #P fasten 5 0 6 1 20 218 83 218; #P connect 7 0 10 0; #P connect 1 0 7 0; #P fasten 5 0 7 1 20 218 113 218; #P pop; #P newobj 499 308 41 9109513 p levels; #N vpatcher 646 150 1246 550; #P window setfont "Sans Serif" 9.; #N vpatcher 15 55 615 455; #P origin -6 -41; #N comlet route your variables; #P hidden inlet 59 414 15 0; #P outlet 569 353 15 0; #P outlet 375 355 15 0; #P hidden button 71 301 15 0; #P objectname randPh[1]; #P window setfont "Sans Serif" 9.; #P window linecount 0; #P hidden newex 70 336 45 9109513 loadbang; #P hidden message 71 368 56 9109513 strSlew 600; #P hidden message 301 369 41 9109513 mudi5 0; #P hidden message 254 362 41 9109513 mudi4 0; #P hidden message 217 356 41 9109513 mudi3 0; #P hidden message 172 364 41 9109513 mudi2 0; #P hidden message 131 362 41 9109513 mudi1 0; #P hidden newex 317 554 59 9109513 pvar randPh; #P hidden newex 277 512 55 9109513 pvar mudi4; #P hidden newex 297 491 55 9109513 pvar mudi5; #P hidden newex 257 533 55 9109513 pvar mudi3; #P hidden newex 38 12 78 9109513 unpack 1 1 1 1 1; #P hidden message 235 382 61 9109513 pitchMIDI 29; #P hidden message 242 400 89 9109513 harmNum 3 4 5 7 8; #P hidden message 241 423 125 9109513 strSpeed -60 -50 -40 -30 -20; #P hidden message 113 417 127 9109513 strCenter 0.5 0.4 0.3 0.2 0.1; #P hidden message 105 394 126 9109513 strRange 0.1 0.2 0.3 0.4 0.5; #P window linecount 2; #P hidden newex 77 456 274 9109513 route pitchHz pitchMIDI harmNum strRange strCenter strSpeed strSlew mudi1 mudi2 mudi3 mudi4 mudi5 randPh; #P window linecount 1; #P hidden newex 197 512 60 9109513 pvar strSlew; #P hidden newex 97 533 70 9109513 pvar pitchMIDI; #P hidden newex 77 554 61 9109513 pvar pitchHz; #P hidden newex 237 554 55 9109513 pvar mudi2; #P hidden newex 217 491 55 9109513 pvar mudi1; #P hidden newex 177 533 67 9109513 pvar strSpeed; #P hidden newex 157 554 69 9109513 pvar strCenter; #P hidden newex 137 491 68 9109513 pvar strRange; #P hidden newex 117 512 71 9109513 pvar harmNum; #P hidden newex 87 30 19 9109513 t b; #P hidden newex 159 50 68 9109513 pack 1 1 1 1 1; #P number 140 239 17 9 0 0 32 139 0 0 0 221 221 221 222 222 222 0 0 0; #P number 115 239 17 9 0 0 32 139 0 0 0 221 221 221 222 222 222 0 0 0; #P number 90 239 17 9 0 0 32 139 0 0 0 221 221 221 222 222 222 0 0 0; #P number 65 239 17 9 0 0 32 139 0 0 0 221 221 221 222 222 222 0 0 0; #P number 40 239 17 9 0 0 32 139 0 0 0 221 221 221 222 222 222 0 0 0; #P hidden newex 38 236 115 9109513 unpack 1 1 1 1 1; #P window linecount 2; #P comment 161 73 38 9109513 multiply/divide; #P window setfont "Sans Serif" 14.; #P window linecount 1; #P comment 290 77 85 9109518 fundamental; #P toggle 110 73 25 0; #P objectname mudi4; #P toggle 86 73 25 0; #P objectname mudi3; #P toggle 62 73 25 0; #P objectname mudi2; #P toggle 134 73 25 0; #P objectname mudi5; #P toggle 38 73 25 0; #P objectname mudi1; #P window setfont "Sans Serif" 9.; #P hidden message 253 76 34 9109513 set \$1; #P hidden newex 275 48 28 9109513 mtof; #P hidden message 353 74 34 9109513 set \$1; #P hidden newex 353 48 28 9109513 ftom; #P window setfont "Sans Serif" 24.; #P number 353 99 81 24 0 134 259 139 0 0 0 221 221 221 222 222 222 0 0 0; #P objectname pitchMIDI; #P flonum 253 99 84 24 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0; #P objectname pitchHz; #P user multiSlider 38 96 121 140 1. 30. 5 2665 47 0 3 5 2 25 0; #M frgb 30 152 43; #M brgb 225 226 238; #M rgb2 127 127 127; #M rgb3 0 0 0; #M rgb4 115 199 116; #M rgb5 74 105 182; #M rgb6 112 158 18; #M rgb7 149 211 110; #M rgb8 187 9 201; #M rgb9 224 62 37; #M rgb10 7 114 128; #P objectname harmNum; #P window setfont "Sans Serif" 9.; #P comment 231 256 80 9109513 Slew Time (ms); #P flonum 193 255 35 9 0. 0 1 139 0 0 0 221 221 221 222 222 222 0 0 0; #P objectname strSlew; #P user multiSlider 395 161 118 75 -100. 30. 5 2937 47 0 0 2 0 0 0; #M frgb 23 134 16; #M brgb 213 210 35; #M rgb2 127 127 127; #M rgb3 0 0 0; #M rgb4 37 52 91; #M rgb5 74 105 182; #M rgb6 112 158 18; #M rgb7 149 211 110; #M rgb8 187 9 201; #M rgb9 224 62 37; #M rgb10 7 114 128; #P objectname strSpeed; #P comment 398 143 51 9109513 speed; #P comment 279 143 38 9109513 center; #P comment 161 143 38 9109513 range; #P user multiSlider 277 161 118 75 0. 1. 5 2937 47 0 0 2 0 0 1; #M frgb 200 211 69; #M brgb 61 134 48; #M rgb2 127 127 127; #M rgb3 0 0 0; #M rgb4 37 52 91; #M rgb5 74 105 182; #M rgb6 112 158 18; #M rgb7 149 211 110; #M rgb8 187 9 201; #M rgb9 224 62 37; #M rgb10 7 114 128; #P objectname strCenter; #P user multiSlider 159 161 118 75 0. 1. 5 2937 47 0 0 2 0 0 0; #M frgb 30 152 43; #M brgb 156 224 56; #M rgb2 127 127 127; #M rgb3 0 0 0; #M rgb4 37 52 91; #M rgb5 74 105 182; #M rgb6 112 158 18; #M rgb7 149 211 110; #M rgb8 187 9 201; #M rgb9 224 62 37; #M rgb10 7 114 128; #P objectname strRange; #P button 461 142 15 0; #P objectname randPh; #N vpatcher 234 32 957 750; #P origin 0 18; #P window setfont "Sans Serif" 9.; #P number 147 76 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0; #N vpatcher 312 265 693 649; #P window setfont "Sans Serif" 9.; #P flonum 92 210 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0; #P window linecount 1; #N vpatcher 15 55 615 496; #P window setfont "Sans Serif" 9.; #P flonum 37 316 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0; #P flonum 18 335 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0; #P flonum 9 252 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0; #P flonum 240 238 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0; #P flonum 17 119 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0; #P window linecount 1; #P newex 214 88 19 9109513 t b; #P outlet 116 278 15 0; #P outlet 96 278 15 0; #P outlet 76 278 15 0; #P outlet 57 278 15 0; #P outlet 37 278 15 0; #P newex 141 232 54 9109513 expr 1./$f1; #P newex 121 211 54 9109513 expr 1./$f1; #P newex 101 254 54 9109513 expr 1./$f1; #P newex 81 232 54 9109513 expr 1./$f1; #P newex 61 211 54 9109513 expr 1./$f1; #P newex 341 110 27 9109513 + 1; #P newex 117 163 34 9109513 gate 2; #P newex 320 134 27 9109513 + 1; #P newex 97 187 34 9109513 gate 2; #P newex 301 110 27 9109513 + 1; #P newex 77 163 34 9109513 gate 2; #P newex 281 134 27 9109513 + 1; #P newex 57 187 34 9109513 gate 2; #P newex 261 110 27 9109513 + 1; #P newex 261 68 93 9109513 unpack 1. 1. 1. 1. 1.; #P newex 37 163 34 9109513 gate 2; #N comlet multiply(0)/divide(1) (list of bool); #P inlet 261 50 15 0; #N comlet HarmNum; #P inlet 61 55 15 0; #P newex 61 108 93 9109513 unpack 1. 1. 1. 1. 1.; #P window linecount 0; #P comment 333 203 100 9109513 if right inlet is 1 then invert the left input; #P connect 4 0 28 0; #P connect 1 0 26 0; #P connect 15 0 29 0; #P fasten 6 0 4 0 266 159 42 159; #P connect 4 0 20 0; #P connect 15 0 20 0; #P connect 4 0 30 0; #P connect 15 0 30 0; #P fasten 8 0 7 0 286 159 62 159; #P connect 16 0 21 0; #P connect 7 0 21 0; #P connect 25 0 1 0; #P connect 2 0 1 0; #P connect 1 0 4 1; #P connect 4 1 15 0; #P connect 17 0 22 0; #P connect 9 0 22 0; #P fasten 10 0 9 0 306 159 82 159; #P connect 1 1 7 1; #P connect 7 1 16 0; #P connect 18 0 23 0; #P connect 11 0 23 0; #P fasten 12 0 11 0 325 159 102 159; #P connect 1 2 9 1; #P connect 9 1 17 0; #P connect 19 0 24 0; #P connect 13 0 24 0; #P fasten 14 0 13 0 346 159 122 159; #P connect 1 3 11 1; #P connect 11 1 18 0; #P connect 1 4 13 1; #P connect 13 1 19 0; #P connect 5 0 25 0; #P connect 6 0 27 0; #P connect 3 0 5 0; #P connect 5 0 6 0; #P connect 5 1 8 0; #P connect 5 2 10 0; #P connect 5 3 12 0; #P connect 5 4 14 0; #P pop; #P newobj 136 187 54 9109513 p unpacker; #N comlet multiply(0)/divide(1) (list of bool); #P inlet 180 151 15 0; #N comlet Fundamental (Hz \, Signal); #P outlet 19 315 15 0; #P newex 19 142 27 9109513 line~; #P newex 19 118 56 9109513 append 100; #P newex 47 87 28 9109513 mtof; #N comlet Fundamental (MIDI # \, int/float); #P inlet 47 54 15 0; #N comlet min5; #P outlet 273 312 15 0; #N comlet min4; #P outlet 231 295 15 0; #N comlet min3; #P outlet 190 310 15 0; #N comlet min2; #P outlet 160 293 15 0; #N comlet min1; #P outlet 119 308 15 0; #P newex 274 268 27 9109513 *~; #P newex 232 268 27 9109513 *~; #P newex 190 268 27 9109513 *~; #P newex 160 268 27 9109513 *~; #P newex 119 268 27 9109513 *~; #N comlet Fundamental (Hz \, float); #P inlet 19 54 15 0; #N comlet HarmNum; #P inlet 136 151 15 0; #P window linecount 3; #P comment 134 32 100 9109513 should i make the slewing logarithmic? mtof~?; #P connect 14 0 15 0; #P connect 2 0 15 0; #P connect 15 0 16 0; #P connect 16 0 17 0; #P connect 13 0 14 0; #P connect 19 0 20 0; #P fasten 16 0 3 0 24 242 124 242; #P connect 3 0 8 0; #P connect 1 0 19 0; #P connect 19 0 3 1; #P fasten 16 0 4 0 24 242 165 242; #P connect 4 0 9 0; #P fasten 19 1 4 1 152 265 182 265; #P connect 18 0 19 1; #P fasten 16 0 5 0 24 242 195 242; #P connect 5 0 10 0; #P fasten 19 2 5 1 163 262 212 262; #P connect 6 0 11 0; #P fasten 16 0 6 0 24 242 237 242; #P fasten 19 3 6 1 174 259 254 259; #P connect 7 0 12 0; #P fasten 16 0 7 0 24 242 279 242; #P fasten 19 4 7 1 185 256 296 256; #P pop; #P newobj 62 119 113 9109513 p carrier+modulator freqs; #N vpatcher 1089 377 1364 629; #P window setfont "Sans Serif" 9.; #N vpatcher 15 55 130 207; #P outlet 6 108 15 0; #P window setfont "Sans Serif" 9.; #P newex 6 80 37 9109513 / 1000.; #P inlet 6 26 15 0; #P newex 6 48 62 9109513 random 1001; #P connect 1 0 0 0; #P connect 0 0 2 0; #P connect 2 0 3 0; #P pop; #P newobj 185 91 34 9109513 p rand; #N vpatcher 15 55 130 207; #P outlet 6 108 15 0; #P window setfont "Sans Serif" 9.; #P newex 6 80 37 9109513 / 1000.; #P inlet 6 26 15 0; #P newex 6 48 62 9109513 random 1001; #P connect 1 0 0 0; #P connect 0 0 2 0; #P connect 2 0 3 0; #P pop; #P newobj 143 91 34 9109513 p rand; #N vpatcher 15 55 130 207; #P outlet 6 108 15 0; #P window setfont "Sans Serif" 9.; #P newex 6 80 37 9109513 / 1000.; #P inlet 6 26 15 0; #P newex 6 48 62 9109513 random 1001; #P connect 1 0 0 0; #P connect 0 0 2 0; #P connect 2 0 3 0; #P pop; #P newobj 102 91 34 9109513 p rand; #N vpatcher 15 55 130 207; #P outlet 6 108 15 0; #P window setfont "Sans Serif" 9.; #P newex 6 80 37 9109513 / 1000.; #P inlet 6 26 15 0; #P newex 6 48 62 9109513 random 1001; #P connect 1 0 0 0; #P connect 0 0 2 0; #P connect 2 0 3 0; #P pop; #P newobj 60 91 34 9109513 p rand; #N vpatcher 15 55 130 207; #P outlet 6 108 15 0; #P window setfont "Sans Serif" 9.; #P newex 6 80 37 9109513 / 1000.; #P inlet 6 26 15 0; #P newex 6 48 62 9109513 random 1001; #P connect 1 0 0 0; #P connect 0 0 2 0; #P connect 2 0 3 0; #P pop; #P newobj 19 91 34 9109513 p rand; #N comlet min5; #P outlet 185 191 15 0; #N comlet min4; #P outlet 143 174 15 0; #N comlet min3; #P outlet 102 189 15 0; #N comlet min2; #P outlet 60 172 15 0; #N comlet min1; #P outlet 19 187 15 0; #N comlet Slew Time; #P inlet 19 49 15 0; #P connect 0 0 6 0; #P connect 6 0 1 0; #P connect 0 0 7 0; #P connect 7 0 2 0; #P connect 0 0 8 0; #P connect 8 0 3 0; #P connect 0 0 9 0; #P connect 9 0 4 0; #P connect 0 0 10 0; #P connect 10 0 5 0; #P pop; #P newobj 605 85 84 9109513 p randomizePhase; #N comlet randomize phase (bang); #P inlet 605 60 15 0; #N comlet multiply/divide (list of bool); #P inlet 119 51 15 0; #N comlet harmonic number (list of ints); #P inlet 99 51 15 0; #N comlet pitch (MIDI # \, int/float); #P inlet 79 51 15 0; #N comlet pitch (Hz \, int/float); #P inlet 58 51 15 0; #N vpatcher 515 155 790 407; #N comlet min5; #P outlet 185 191 15 0; #N comlet min4; #P outlet 143 174 15 0; #N comlet min3; #P outlet 102 189 15 0; #N comlet min2; #P outlet 60 172 15 0; #N comlet min1; #P outlet 19 187 15 0; #P window setfont "Sans Serif" 9.; #N vpatcher 45 330 281 527; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 67 60 28 9109513 mtof; #N comlet min; #P outlet 67 155 15 0; #P window linecount 0; #P newex 67 116 45 9109513 line~ 100; #N comlet range; #P inlet 67 32 15 0; #P inlet 7 31 15 0; #P message 7 77 34 9109513 set \$1; #P newex 67 95 56 9109513 append 100; #P connect 2 0 1 0; #P connect 3 0 6 0; #P connect 6 0 0 0; #P connect 1 0 0 0; #P connect 0 0 4 0; #P connect 4 0 5 0; #P pop; #P newobj 186 147 40 9109513 p mod5; #N vpatcher 45 330 281 527; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 67 63 28 9109513 mtof; #N comlet min; #P outlet 67 155 15 0; #P window linecount 0; #P newex 67 116 45 9109513 line~ 100; #N comlet range; #P inlet 67 32 15 0; #P inlet 7 31 15 0; #P message 7 77 34 9109513 set \$1; #P newex 67 95 56 9109513 append 100; #P connect 2 0 1 0; #P connect 3 0 6 0; #P connect 6 0 0 0; #P connect 1 0 0 0; #P connect 0 0 4 0; #P connect 4 0 5 0; #P pop; #P newobj 144 147 40 9109513 p mod4; #N vpatcher 45 330 281 527; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 67 62 28 9109513 mtof; #N comlet min; #P outlet 67 155 15 0; #P window linecount 0; #P newex 67 116 45 9109513 line~ 100; #N comlet range; #P inlet 67 32 15 0; #P inlet 7 31 15 0; #P message 7 77 34 9109513 set \$1; #P newex 67 95 56 9109513 append 100; #P connect 2 0 1 0; #P connect 3 0 6 0; #P connect 6 0 0 0; #P connect 1 0 0 0; #P connect 0 0 4 0; #P connect 4 0 5 0; #P pop; #P newobj 102 147 40 9109513 p mod3; #N vpatcher 45 330 281 527; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 67 61 28 9109513 mtof; #N comlet min; #P outlet 67 155 15 0; #P window linecount 0; #P newex 67 116 45 9109513 line~ 100; #N comlet range; #P inlet 67 32 15 0; #P inlet 7 31 15 0; #P message 7 77 34 9109513 set \$1; #P newex 67 95 56 9109513 append 100; #P connect 2 0 1 0; #P connect 3 0 6 0; #P connect 6 0 0 0; #P connect 1 0 0 0; #P connect 0 0 4 0; #P connect 4 0 5 0; #P pop; #P newobj 60 147 40 9109513 p mod2; #N vpatcher 45 330 281 581; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 67 65 28 9109513 mtof; #N comlet min; #P outlet 67 155 15 0; #P window linecount 0; #P newex 67 116 45 9109513 line~ 100; #N comlet range; #P inlet 67 32 15 0; #P inlet 7 31 15 0; #P message 7 77 34 9109513 set \$1; #P newex 67 95 56 9109513 append 100; #P connect 2 0 1 0; #P connect 3 0 6 0; #P connect 6 0 0 0; #P connect 1 0 0 0; #P connect 0 0 4 0; #P connect 4 0 5 0; #P pop; #P newobj 19 147 39 9109513 p mod1; #N comlet Slew Time; #P inlet 19 54 15 0; #N comlet Range; #P inlet 48 30 15 0; #P newex 48 81 93 9109513 unpack 1. 1. 1. 1. 1.; #P connect 2 0 3 0; #P connect 3 0 8 0; #P connect 1 0 0 0; #P connect 0 0 3 1; #P fasten 2 0 4 0 24 144 65 144; #P connect 4 0 9 0; #P fasten 0 1 4 1 73 141 95 141; #P fasten 2 0 5 0 24 144 107 144; #P connect 5 0 10 0; #P fasten 0 2 5 1 93 138 137 138; #P connect 6 0 11 0; #P fasten 2 0 6 0 24 144 149 144; #P fasten 0 3 6 1 113 135 179 135; #P connect 7 0 12 0; #P fasten 2 0 7 0 24 144 191 144; #P fasten 0 4 7 1 133 132 221 132; #P pop; #P newobj 341 84 70 9109513 p strLFOspeed; #N comlet Slew Time; #P inlet 416 60 15 0; #N vpatcher 594 88 944 322; #N comlet max5; #P outlet 206 191 15 0; #N comlet min5; #P outlet 176 191 15 0; #N comlet max4; #P outlet 163 175 15 0; #N comlet min4; #P outlet 134 174 15 0; #N comlet max3; #P outlet 122 189 15 0; #N comlet min3; #P outlet 93 189 15 0; #N comlet max2; #P outlet 80 173 15 0; #N comlet min2; #P outlet 51 172 15 0; #N comlet max1; #P outlet 38 188 15 0; #N comlet min1; #P outlet 10 187 15 0; #P window setfont "Sans Serif" 9.; #N vpatcher 45 330 281 527; #N comlet min; #P outlet 149 155 15 0; #P window setfont "Sans Serif" 9.; #P newex 149 116 45 9109513 line~ 100; #P newex 149 95 56 9109513 append 100; #N comlet min; #P outlet 67 155 15 0; #P newex 67 116 45 9109513 line~ 100; #N comlet Center; #P inlet 149 31 15 0; #N comlet range; #P inlet 67 32 15 0; #P inlet 7 31 15 0; #P message 7 77 34 9109513 set \$1; #P newex 67 95 56 9109513 append 100; #P newex 67 74 92 9109513 my.range-center; #P connect 3 0 2 0; #P connect 4 0 0 0; #P connect 2 0 1 0; #P connect 0 0 1 0; #P connect 1 0 6 0; #P connect 6 0 7 0; #P connect 5 0 0 1; #P connect 0 1 8 0; #P connect 2 0 8 0; #P connect 8 0 9 0; #P connect 9 0 10 0; #P pop; #P newobj 177 147 40 9109513 p mod5; #N vpatcher 45 330 281 527; #N comlet min; #P outlet 149 155 15 0; #P window setfont "Sans Serif" 9.; #P newex 149 116 45 9109513 line~ 100; #P newex 149 95 56 9109513 append 100; #N comlet min; #P outlet 67 155 15 0; #P newex 67 116 45 9109513 line~ 100; #N comlet Center; #P inlet 149 31 15 0; #N comlet range; #P inlet 67 32 15 0; #P inlet 7 31 15 0; #P message 7 77 34 9109513 set \$1; #P newex 67 95 56 9109513 append 100; #P newex 67 74 92 9109513 my.range-center; #P connect 3 0 2 0; #P connect 4 0 0 0; #P connect 2 0 1 0; #P connect 0 0 1 0; #P connect 1 0 6 0; #P connect 6 0 7 0; #P connect 5 0 0 1; #P connect 2 0 8 0; #P connect 0 1 8 0; #P connect 8 0 9 0; #P connect 9 0 10 0; #P pop; #P newobj 135 147 40 9109513 p mod4; #N vpatcher 45 330 281 527; #N comlet min; #P outlet 149 155 15 0; #P window setfont "Sans Serif" 9.; #P newex 149 116 45 9109513 line~ 100; #P newex 149 95 56 9109513 append 100; #N comlet min; #P outlet 67 155 15 0; #P newex 67 116 45 9109513 line~ 100; #N comlet Center; #P inlet 149 31 15 0; #N comlet range; #P inlet 67 32 15 0; #P inlet 7 31 15 0; #P message 7 77 34 9109513 set \$1; #P newex 67 95 56 9109513 append 100; #P newex 67 74 92 9109513 my.range-center; #P connect 3 0 2 0; #P connect 4 0 0 0; #P connect 2 0 1 0; #P connect 0 0 1 0; #P connect 1 0 6 0; #P connect 6 0 7 0; #P connect 5 0 0 1; #P connect 2 0 8 0; #P connect 0 1 8 0; #P connect 8 0 9 0; #P connect 9 0 10 0; #P pop; #P newobj 93 147 40 9109513 p mod3; #N vpatcher 45 330 281 527; #N comlet min; #P outlet 149 155 15 0; #P window setfont "Sans Serif" 9.; #P newex 149 116 45 9109513 line~ 100; #P newex 149 95 56 9109513 append 100; #N comlet min; #P outlet 67 155 15 0; #P newex 67 116 45 9109513 line~ 100; #N comlet Center; #P inlet 149 31 15 0; #N comlet range; #P inlet 67 32 15 0; #P inlet 7 31 15 0; #P message 7 77 34 9109513 set \$1; #P newex 67 95 56 9109513 append 100; #P newex 67 74 92 9109513 my.range-center; #P connect 3 0 2 0; #P connect 4 0 0 0; #P connect 2 0 1 0; #P connect 0 0 1 0; #P connect 1 0 6 0; #P connect 6 0 7 0; #P connect 5 0 0 1; #P connect 0 1 8 0; #P connect 2 0 8 0; #P connect 8 0 9 0; #P connect 9 0 10 0; #P pop; #P newobj 51 147 40 9109513 p mod2; #N vpatcher 45 330 281 527; #N comlet min; #P outlet 149 155 15 0; #P window setfont "Sans Serif" 9.; #P newex 149 116 45 9109513 line~ 100; #P newex 149 95 56 9109513 append 100; #N comlet min; #P outlet 67 155 15 0; #P newex 67 116 45 9109513 line~ 100; #N comlet Center; #P inlet 149 31 15 0; #N comlet range; #P inlet 67 32 15 0; #P inlet 7 31 15 0; #P message 7 77 34 9109513 set \$1; #P newex 67 95 56 9109513 append 100; #P newex 67 74 92 9109513 my.range-center; #P connect 3 0 2 0; #P connect 4 0 0 0; #P connect 2 0 1 0; #P connect 0 0 1 0; #P connect 1 0 6 0; #P connect 6 0 7 0; #P connect 5 0 0 1; #P connect 2 0 8 0; #P connect 0 1 8 0; #P connect 8 0 9 0; #P connect 9 0 10 0; #P pop; #P newobj 10 147 39 9109513 p mod1; #N comlet Slew Time; #P inlet 10 54 15 0; #N comlet Center; #P inlet 227 31 15 0; #N comlet Range; #P inlet 24 30 15 0; #P newex 24 81 93 9109513 unpack 1. 1. 1. 1. 1.; #P newex 227 81 93 9109513 unpack 1. 1. 1. 1. 1.; #P connect 4 0 5 0; #P connect 5 0 10 0; #P connect 2 0 1 0; #P connect 1 0 5 1; #P fasten 0 0 5 2 232 129 43 129; #P connect 5 1 11 0; #P fasten 4 0 6 0 15 144 56 144; #P connect 6 0 12 0; #P fasten 1 1 6 1 49 141 71 141; #P connect 6 1 13 0; #P fasten 0 1 6 2 252 126 86 126; #P fasten 4 0 7 0 15 144 98 144; #P connect 7 0 14 0; #P fasten 1 2 7 1 69 138 113 138; #P connect 7 1 15 0; #P fasten 0 2 7 2 272 123 128 123; #P connect 8 0 16 0; #P fasten 4 0 8 0 15 144 140 144; #P fasten 1 3 8 1 89 135 155 135; #P connect 8 1 17 0; #P fasten 0 3 8 2 292 120 170 120; #P connect 9 0 18 0; #P fasten 4 0 9 0 15 144 182 144; #P fasten 1 4 9 1 109 132 197 132; #P connect 9 1 19 0; #P fasten 0 4 9 2 312 117 212 117; #P connect 3 0 0 0; #P pop; #P newobj 416 84 175 9109513 p strLFOminMax; #N comlet Modulation Strength LFO Speed; #P inlet 401 60 15 0; #N comlet Modulation Strength LFO Center; #P inlet 580 60 15 0; #N comlet Modulation Strength LFO Range; #P inlet 498 60 15 0; #P outlet 383 688 15 0; #P outlet 324 688 15 0; #N vpatcher 15 55 227 334; #N comlet phase offset output; #P outlet 70 218 15 0; #N comlet 0 phase output; #P outlet 22 218 15 0; #N comlet max (sig); #P inlet 157 34 15 0; #N comlet min (sig); #P inlet 115 34 15 0; #N comlet phase offset; #P inlet 88 34 15 0; #P window setfont "Sans Serif" 9.; #P window linecount 1; #N vpatcher 534 100 993 385; #P outlet 47 252 15 0; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 47 164 27 9109513 *~; #P newex 47 202 27 9109513 +~; #P outlet 89 252 15 0; #P newex 152 175 27 9109513 +~; #P newex 89 164 27 9109513 *~; #P window linecount 2; #P comment 300 188 91 9109513 scaler coefficient = 0.5 * (max-min); #P comment 301 223 91 9109513 adding constant = scaler/2+min; #P window linecount 1; #P newex 152 131 33 9109513 *~ 0.5; #P newex 89 202 27 9109513 +~; #P window linecount 6; #P comment 300 92 91 9109513 first scale the inputs to have the right range \, then add a constant that brings the wave to the right scale; #P window linecount 1; #P newex 152 104 27 9109513 -~; #N comlet max out; #P inlet 227 49 15 0; #N comlet min out; #P inlet 185 49 15 0; #N comlet input 2; #P inlet 89 50 15 0; #N comlet input 1; #P inlet 47 50 15 0; #P window linecount 2; #P comment 300 54 91 9109513 assumes oth inputs are (-1 \, 1); #P connect 1 0 15 0; #P connect 15 0 14 0; #P connect 14 0 16 0; #P fasten 8 0 15 1 157 154 69 154; #P fasten 12 0 14 1 157 197 69 197; #P connect 2 0 11 0; #P connect 11 0 7 0; #P connect 7 0 13 0; #P fasten 8 0 11 1 157 154 111 154; #P fasten 12 0 7 1 157 197 111 197; #P fasten 4 0 5 0 232 89 157 89; #P connect 5 0 8 0; #P connect 8 0 12 0; #P fasten 3 0 5 1 190 96 174 96; #P fasten 3 0 12 1 190 167 174 167; #P pop; #P newobj 22 159 58 9109513 p dual scale; #P newex 38 93 60 9109513 cycle~ 1 0.5; #N comlet frequency; #P inlet 22 33 15 0; #P window linecount 0; #P newex 22 66 44 9109513 cycle~ 1; #P connect 1 0 0 0; #P connect 0 0 3 0; #P connect 3 0 7 0; #P fasten 1 0 2 0 27 58 43 58; #P connect 2 0 3 1; #P fasten 5 0 3 2 120 138 116 138 59 138; #P fasten 6 0 3 3 162 149 75 149; #P connect 3 1 8 0; #P connect 4 0 2 1; #P pop; #P newobj 644 246 64 9109513 p phasedLFO; #N vpatcher 25 70 163 288; #P outlet 8 175 15 0; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 8 144 27 9109513 *~; #P window linecount 0; #N vpatcher 335 374 495 695; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 82 162 27 9109513 +~ 1; #P newex 82 132 28 9109513 *~ -1; #N comlet; #P outlet 31 230 15 0; #P newex 31 189 27 9109513 +~; #P window linecount 0; #P newex 31 155 27 9109513 *~; #N comlet scale input from this number to 1; #P inlet 82 52 15 0; #N comlet signal in; #P inlet 31 52 15 0; #P connect 0 0 2 0; #P connect 2 0 3 0; #P connect 3 0 4 0; #P fasten 1 0 2 1 87 119 53 119; #P connect 6 0 3 1; #P connect 1 0 5 0; #P connect 5 0 6 0; #P pop; #P newobj 25 112 59 9109513 p am.scale~; #N comlet AM amount: 1=ringmod \; 0=no modulation; #P inlet 74 32 15 0; #N comlet modulator; #P inlet 25 32 15 0; #N comlet carrier; #P inlet 8 32 15 0; #P connect 0 0 4 0; #P connect 4 0 5 0; #P connect 1 0 3 0; #P connect 3 0 4 1; #P connect 2 0 3 1; #P pop; #P newobj 383 650 40 9109513 p AM; #N vpatcher 25 70 163 288; #P outlet 8 175 15 0; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 8 144 27 9109513 *~; #P window linecount 0; #N vpatcher 335 374 495 695; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 82 162 27 9109513 +~ 1; #P newex 82 132 28 9109513 *~ -1; #N comlet; #P outlet 31 230 15 0; #P newex 31 189 27 9109513 +~; #P window linecount 0; #P newex 31 155 27 9109513 *~; #N comlet scale input from this number to 1; #P inlet 82 52 15 0; #N comlet signal in; #P inlet 31 52 15 0; #P connect 0 0 2 0; #P connect 2 0 3 0; #P connect 3 0 4 0; #P fasten 1 0 2 1 87 119 53 119; #P connect 6 0 3 1; #P connect 1 0 5 0; #P connect 5 0 6 0; #P pop; #P newobj 25 112 59 9109513 p am.scale~; #N comlet AM amount: 1=ringmod \; 0=no modulation; #P inlet 74 32 15 0; #N comlet modulator; #P inlet 25 32 15 0; #N comlet carrier; #P inlet 8 32 15 0; #P connect 0 0 4 0; #P connect 4 0 5 0; #P connect 1 0 3 0; #P connect 3 0 4 1; #P connect 2 0 3 1; #P pop; #P newobj 324 650 40 9109513 p AM; #P newex 339 603 36 9109513 cycle~; #N vpatcher 15 55 227 334; #N comlet phase offset output; #P outlet 70 218 15 0; #N comlet 0 phase output; #P outlet 22 218 15 0; #N comlet max (sig); #P inlet 157 34 15 0; #N comlet min (sig); #P inlet 115 34 15 0; #N comlet phase offset; #P inlet 88 34 15 0; #P window setfont "Sans Serif" 9.; #P window linecount 1; #N vpatcher 534 100 993 385; #P outlet 47 252 15 0; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 47 164 27 9109513 *~; #P newex 47 202 27 9109513 +~; #P outlet 89 252 15 0; #P newex 152 175 27 9109513 +~; #P newex 89 164 27 9109513 *~; #P window linecount 2; #P comment 300 188 91 9109513 scaler coefficient = 0.5 * (max-min); #P comment 301 223 91 9109513 adding constant = scaler/2+min; #P window linecount 1; #P newex 152 131 33 9109513 *~ 0.5; #P newex 89 202 27 9109513 +~; #P window linecount 6; #P comment 300 92 91 9109513 first scale the inputs to have the right range \, then add a constant that brings the wave to the right scale; #P window linecount 1; #P newex 152 104 27 9109513 -~; #N comlet max out; #P inlet 227 49 15 0; #N comlet min out; #P inlet 185 49 15 0; #N comlet input 2; #P inlet 89 50 15 0; #N comlet input 1; #P inlet 47 50 15 0; #P window linecount 2; #P comment 300 54 91 9109513 assumes oth inputs are (-1 \, 1); #P connect 1 0 15 0; #P connect 15 0 14 0; #P connect 14 0 16 0; #P fasten 8 0 15 1 157 154 69 154; #P fasten 12 0 14 1 157 197 69 197; #P connect 2 0 11 0; #P connect 11 0 7 0; #P connect 7 0 13 0; #P fasten 8 0 11 1 157 154 111 154; #P fasten 12 0 7 1 157 197 111 197; #P fasten 4 0 5 0 232 89 157 89; #P connect 5 0 8 0; #P connect 8 0 12 0; #P fasten 3 0 5 1 190 96 174 96; #P fasten 3 0 12 1 190 167 174 167; #P pop; #P newobj 22 159 58 9109513 p dual scale; #P newex 38 93 60 9109513 cycle~ 1 0.5; #N comlet frequency; #P inlet 22 33 15 0; #P window linecount 0; #P newex 22 66 44 9109513 cycle~ 1; #P connect 1 0 0 0; #P connect 0 0 3 0; #P connect 3 0 7 0; #P fasten 1 0 2 0 27 58 43 58; #P connect 2 0 3 1; #P fasten 5 0 3 2 120 138 116 138 59 138; #P fasten 6 0 3 3 162 149 75 149; #P connect 3 1 8 0; #P connect 4 0 2 1; #P pop; #P newobj 578 246 64 9109513 p phasedLFO; #N vpatcher 25 70 163 288; #P outlet 8 175 15 0; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 8 144 27 9109513 *~; #P window linecount 0; #N vpatcher 335 374 495 695; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 82 162 27 9109513 +~ 1; #P newex 82 132 28 9109513 *~ -1; #N comlet; #P outlet 31 230 15 0; #P newex 31 189 27 9109513 +~; #P window linecount 0; #P newex 31 155 27 9109513 *~; #N comlet scale input from this number to 1; #P inlet 82 52 15 0; #N comlet signal in; #P inlet 31 52 15 0; #P connect 0 0 2 0; #P connect 2 0 3 0; #P connect 3 0 4 0; #P fasten 1 0 2 1 87 119 53 119; #P connect 6 0 3 1; #P connect 1 0 5 0; #P connect 5 0 6 0; #P pop; #P newobj 25 112 59 9109513 p am.scale~; #N comlet AM amount: 1=ringmod \; 0=no modulation; #P inlet 74 32 15 0; #N comlet modulator; #P inlet 25 32 15 0; #N comlet carrier; #P inlet 8 32 15 0; #P connect 0 0 4 0; #P connect 4 0 5 0; #P connect 1 0 3 0; #P connect 3 0 4 1; #P connect 2 0 3 1; #P pop; #P newobj 383 570 40 9109513 p AM; #N vpatcher 25 70 163 288; #P outlet 8 175 15 0; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 8 144 27 9109513 *~; #P window linecount 0; #N vpatcher 335 374 495 695; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 82 162 27 9109513 +~ 1; #P newex 82 132 28 9109513 *~ -1; #N comlet; #P outlet 31 230 15 0; #P newex 31 189 27 9109513 +~; #P window linecount 0; #P newex 31 155 27 9109513 *~; #N comlet scale input from this number to 1; #P inlet 82 52 15 0; #N comlet signal in; #P inlet 31 52 15 0; #P connect 0 0 2 0; #P connect 2 0 3 0; #P connect 3 0 4 0; #P fasten 1 0 2 1 87 119 53 119; #P connect 6 0 3 1; #P connect 1 0 5 0; #P connect 5 0 6 0; #P pop; #P newobj 25 112 59 9109513 p am.scale~; #N comlet AM amount: 1=ringmod \; 0=no modulation; #P inlet 75 32 15 0; #N comlet modulator; #P inlet 25 32 15 0; #N comlet carrier; #P inlet 8 32 15 0; #P connect 0 0 4 0; #P connect 4 0 5 0; #P connect 1 0 3 0; #P connect 3 0 4 1; #P connect 2 0 3 1; #P pop; #P newobj 324 570 40 9109513 p AM; #P newex 339 523 36 9109513 cycle~; #N vpatcher 15 55 227 334; #N comlet phase offset output; #P outlet 70 218 15 0; #N comlet 0 phase output; #P outlet 22 218 15 0; #N comlet max (sig); #P inlet 157 34 15 0; #N comlet min (sig); #P inlet 115 34 15 0; #N comlet phase offset; #P inlet 88 34 15 0; #P window setfont "Sans Serif" 9.; #P window linecount 1; #N vpatcher 534 100 993 385; #P outlet 47 252 15 0; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 47 164 27 9109513 *~; #P newex 47 202 27 9109513 +~; #P outlet 89 252 15 0; #P newex 152 175 27 9109513 +~; #P newex 89 164 27 9109513 *~; #P window linecount 2; #P comment 300 188 91 9109513 scaler coefficient = 0.5 * (max-min); #P comment 301 223 91 9109513 adding constant = scaler/2+min; #P window linecount 1; #P newex 152 131 33 9109513 *~ 0.5; #P newex 89 202 27 9109513 +~; #P window linecount 6; #P comment 300 92 91 9109513 first scale the inputs to have the right range \, then add a constant that brings the wave to the right scale; #P window linecount 1; #P newex 152 104 27 9109513 -~; #N comlet max out; #P inlet 227 49 15 0; #N comlet min out; #P inlet 185 49 15 0; #N comlet input 2; #P inlet 89 50 15 0; #N comlet input 1; #P inlet 47 50 15 0; #P window linecount 2; #P comment 300 54 91 9109513 assumes oth inputs are (-1 \, 1); #P connect 1 0 15 0; #P connect 15 0 14 0; #P connect 14 0 16 0; #P fasten 8 0 15 1 157 154 69 154; #P fasten 12 0 14 1 157 197 69 197; #P connect 2 0 11 0; #P connect 11 0 7 0; #P connect 7 0 13 0; #P fasten 8 0 11 1 157 154 111 154; #P fasten 12 0 7 1 157 197 111 197; #P fasten 4 0 5 0 232 89 157 89; #P connect 5 0 8 0; #P connect 8 0 12 0; #P fasten 3 0 5 1 190 96 174 96; #P fasten 3 0 12 1 190 167 174 167; #P pop; #P newobj 22 159 58 9109513 p dual scale; #P newex 38 93 60 9109513 cycle~ 1 0.5; #N comlet frequency; #P inlet 22 33 15 0; #P window linecount 0; #P newex 22 66 44 9109513 cycle~ 1; #P connect 1 0 0 0; #P connect 0 0 3 0; #P connect 3 0 7 0; #P fasten 1 0 2 0 27 58 43 58; #P connect 2 0 3 1; #P fasten 5 0 3 2 120 138 116 138 59 138; #P fasten 6 0 3 3 162 149 75 149; #P connect 3 1 8 0; #P connect 4 0 2 1; #P pop; #P newobj 512 246 64 9109513 p phasedLFO; #N vpatcher 25 70 163 288; #P outlet 8 175 15 0; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 8 144 27 9109513 *~; #P window linecount 0; #N vpatcher 335 374 495 695; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 82 162 27 9109513 +~ 1; #P newex 82 132 28 9109513 *~ -1; #N comlet; #P outlet 31 230 15 0; #P newex 31 189 27 9109513 +~; #P window linecount 0; #P newex 31 155 27 9109513 *~; #N comlet scale input from this number to 1; #P inlet 82 52 15 0; #N comlet signal in; #P inlet 31 52 15 0; #P connect 0 0 2 0; #P connect 2 0 3 0; #P connect 3 0 4 0; #P fasten 1 0 2 1 87 119 53 119; #P connect 6 0 3 1; #P connect 1 0 5 0; #P connect 5 0 6 0; #P pop; #P newobj 25 112 59 9109513 p am.scale~; #N comlet AM amount: 1=ringmod \; 0=no modulation; #P inlet 74 32 15 0; #N comlet modulator; #P inlet 25 32 15 0; #N comlet carrier; #P inlet 8 32 15 0; #P connect 0 0 4 0; #P connect 4 0 5 0; #P connect 1 0 3 0; #P connect 3 0 4 1; #P connect 2 0 3 1; #P pop; #P newobj 383 494 40 9109513 p AM; #N vpatcher 25 70 163 288; #P outlet 8 175 15 0; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 8 144 27 9109513 *~; #P window linecount 0; #N vpatcher 335 374 495 695; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 82 162 27 9109513 +~ 1; #P newex 82 132 28 9109513 *~ -1; #N comlet; #P outlet 31 230 15 0; #P newex 31 189 27 9109513 +~; #P window linecount 0; #P newex 31 155 27 9109513 *~; #N comlet scale input from this number to 1; #P inlet 82 52 15 0; #N comlet signal in; #P inlet 31 52 15 0; #P connect 0 0 2 0; #P connect 2 0 3 0; #P connect 3 0 4 0; #P fasten 1 0 2 1 87 119 53 119; #P connect 6 0 3 1; #P connect 1 0 5 0; #P connect 5 0 6 0; #P pop; #P newobj 25 112 59 9109513 p am.scale~; #N comlet AM amount: 1=ringmod \; 0=no modulation; #P inlet 74 32 15 0; #N comlet modulator; #P inlet 25 32 15 0; #N comlet carrier; #P inlet 8 32 15 0; #P connect 0 0 4 0; #P connect 4 0 5 0; #P connect 1 0 3 0; #P connect 3 0 4 1; #P connect 2 0 3 1; #P pop; #P newobj 324 494 40 9109513 p AM; #P newex 339 447 36 9109513 cycle~; #N vpatcher 15 55 227 334; #N comlet phase offset output; #P outlet 70 218 15 0; #N comlet 0 phase output; #P outlet 22 218 15 0; #N comlet max (sig); #P inlet 157 34 15 0; #N comlet min (sig); #P inlet 115 34 15 0; #N comlet phase offset; #P inlet 88 34 15 0; #P window setfont "Sans Serif" 9.; #P window linecount 1; #N vpatcher 534 100 993 385; #P outlet 47 252 15 0; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 47 164 27 9109513 *~; #P newex 47 202 27 9109513 +~; #P outlet 89 252 15 0; #P newex 152 175 27 9109513 +~; #P newex 89 164 27 9109513 *~; #P window linecount 2; #P comment 300 188 91 9109513 scaler coefficient = 0.5 * (max-min); #P comment 301 223 91 9109513 adding constant = scaler/2+min; #P window linecount 1; #P newex 152 131 33 9109513 *~ 0.5; #P newex 89 202 27 9109513 +~; #P window linecount 6; #P comment 300 92 91 9109513 first scale the inputs to have the right range \, then add a constant that brings the wave to the right scale; #P window linecount 1; #P newex 152 104 27 9109513 -~; #N comlet max out; #P inlet 227 49 15 0; #N comlet min out; #P inlet 185 49 15 0; #N comlet input 2; #P inlet 89 50 15 0; #N comlet input 1; #P inlet 47 50 15 0; #P window linecount 2; #P comment 300 54 91 9109513 assumes oth inputs are (-1 \, 1); #P connect 1 0 15 0; #P connect 15 0 14 0; #P connect 14 0 16 0; #P fasten 8 0 15 1 157 154 69 154; #P fasten 12 0 14 1 157 197 69 197; #P connect 2 0 11 0; #P connect 11 0 7 0; #P connect 7 0 13 0; #P fasten 8 0 11 1 157 154 111 154; #P fasten 12 0 7 1 157 197 111 197; #P fasten 4 0 5 0 232 89 157 89; #P connect 5 0 8 0; #P connect 8 0 12 0; #P fasten 3 0 5 1 190 96 174 96; #P fasten 3 0 12 1 190 167 174 167; #P pop; #P newobj 22 159 58 9109513 p dual scale; #P newex 38 93 60 9109513 cycle~ 1 0.5; #N comlet frequency; #P inlet 22 33 15 0; #P window linecount 0; #P newex 22 66 44 9109513 cycle~ 1; #P connect 1 0 0 0; #P connect 0 0 3 0; #P connect 3 0 7 0; #P fasten 1 0 2 0 27 58 43 58; #P connect 2 0 3 1; #P fasten 5 0 3 2 120 138 116 138 59 138; #P fasten 6 0 3 3 162 149 75 149; #P connect 3 1 8 0; #P connect 4 0 2 1; #P pop; #P newobj 446 246 64 9109513 p phasedLFO; #N vpatcher 25 70 163 288; #P outlet 8 175 15 0; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 8 144 27 9109513 *~; #P window linecount 0; #N vpatcher 335 374 495 695; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 82 162 27 9109513 +~ 1; #P newex 82 132 28 9109513 *~ -1; #N comlet; #P outlet 31 230 15 0; #P newex 31 189 27 9109513 +~; #P window linecount 0; #P newex 31 155 27 9109513 *~; #N comlet scale input from this number to 1; #P inlet 82 52 15 0; #N comlet signal in; #P inlet 31 52 15 0; #P connect 0 0 2 0; #P connect 2 0 3 0; #P connect 3 0 4 0; #P fasten 1 0 2 1 87 119 53 119; #P connect 6 0 3 1; #P connect 1 0 5 0; #P connect 5 0 6 0; #P pop; #P newobj 25 112 59 9109513 p am.scale~; #N comlet AM amount: 1=ringmod \; 0=no modulation; #P inlet 74 32 15 0; #N comlet modulator; #P inlet 25 32 15 0; #N comlet carrier; #P inlet 8 32 15 0; #P connect 0 0 4 0; #P connect 4 0 5 0; #P connect 1 0 3 0; #P connect 3 0 4 1; #P connect 2 0 3 1; #P pop; #P newobj 383 414 40 9109513 p AM; #N vpatcher 25 70 338 383; #P outlet 8 175 15 0; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 8 144 27 9109513 *~; #P window linecount 0; #N vpatcher 335 374 495 695; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 82 162 27 9109513 +~ 1; #P newex 82 132 28 9109513 *~ -1; #N comlet; #P outlet 31 230 15 0; #P newex 31 189 27 9109513 +~; #P window linecount 0; #P newex 31 155 27 9109513 *~; #N comlet scale input from this number to 1; #P inlet 82 52 15 0; #N comlet signal in; #P inlet 31 52 15 0; #P connect 0 0 2 0; #P connect 2 0 3 0; #P connect 3 0 4 0; #P fasten 1 0 2 1 87 119 53 119; #P connect 6 0 3 1; #P connect 1 0 5 0; #P connect 5 0 6 0; #P pop; #P newobj 25 112 59 9109513 p am.scale~; #N comlet AM amount: 1=ringmod \; 0=no modulation; #P inlet 74 32 15 0; #N comlet modulator; #P inlet 25 32 15 0; #N comlet carrier; #P inlet 8 32 15 0; #P connect 0 0 4 0; #P connect 4 0 5 0; #P connect 1 0 3 0; #P connect 3 0 4 1; #P connect 2 0 3 1; #P pop; #P newobj 324 414 40 9109513 p AM; #P newex 339 367 36 9109513 cycle~; #N vpatcher 15 55 227 334; #N comlet phase offset output; #P outlet 70 218 15 0; #N comlet 0 phase output; #P outlet 22 218 15 0; #N comlet max (sig); #P inlet 157 34 15 0; #N comlet min (sig); #P inlet 115 34 15 0; #N comlet phase offset; #P inlet 88 34 15 0; #P window setfont "Sans Serif" 9.; #P window linecount 1; #N vpatcher 534 100 993 385; #P outlet 47 252 15 0; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 47 164 27 9109513 *~; #P newex 47 202 27 9109513 +~; #P outlet 89 252 15 0; #P newex 152 175 27 9109513 +~; #P newex 89 164 27 9109513 *~; #P window linecount 2; #P comment 300 188 91 9109513 scaler coefficient = 0.5 * (max-min); #P window linecount 6; #P comment 301 223 29 9109513 adding constant = scaler/2+min; #P window linecount 1; #P newex 152 131 33 9109513 *~ 0.5; #P newex 89 202 27 9109513 +~; #P window linecount 2; #P comment 300 92 239 9109513 first scale the inputs to have the right range \, then add a constant that brings the wave to the right scale; #P window linecount 0; #P newex 152 104 27 9109513 -~; #N comlet max out; #P inlet 227 49 15 0; #N comlet min out; #P inlet 185 49 15 0; #N comlet input 2; #P inlet 89 50 15 0; #N comlet input 1; #P inlet 47 50 15 0; #P comment 300 54 91 9109513 assumes oth inputs are (-1 \, 1); #P connect 1 0 15 0; #P connect 15 0 14 0; #P connect 14 0 16 0; #P fasten 8 0 15 1 157 154 69 154; #P fasten 12 0 14 1 157 197 69 197; #P connect 2 0 11 0; #P connect 11 0 7 0; #P connect 7 0 13 0; #P fasten 8 0 11 1 157 154 111 154; #P fasten 12 0 7 1 157 197 111 197; #P fasten 4 0 5 0 232 89 157 89; #P connect 5 0 8 0; #P connect 8 0 12 0; #P fasten 3 0 5 1 190 96 174 96; #P fasten 3 0 12 1 190 167 174 167; #P pop; #P newobj 22 159 58 9109513 p dual scale; #P newex 38 93 60 9109513 cycle~ 1 0.5; #N comlet frequency; #P inlet 22 33 15 0; #P window linecount 0; #P newex 22 66 44 9109513 cycle~ 1; #P connect 1 0 0 0; #P connect 0 0 3 0; #P connect 3 0 7 0; #P fasten 1 0 2 0 27 58 43 58; #P connect 2 0 3 1; #P fasten 5 0 3 2 120 138 116 138 59 138; #P fasten 6 0 3 3 162 149 75 149; #P connect 3 1 8 0; #P connect 4 0 2 1; #P pop; #P newobj 380 246 64 9109513 p phasedLFO; #N vpatcher 25 70 400 378; #P outlet 77 207 15 0; #P window setfont "Sans Serif" 9.; #P newex 77 176 27 9109513 *~; #N vpatcher 335 374 495 695; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 82 162 27 9109513 +~ 1; #P newex 82 132 28 9109513 *~ -1; #N comlet; #P outlet 31 230 15 0; #P newex 31 189 27 9109513 +~; #P window linecount 0; #P newex 31 155 27 9109513 *~; #N comlet scale input from this number to 1; #P inlet 82 52 15 0; #N comlet signal in; #P inlet 31 52 15 0; #P connect 0 0 2 0; #P connect 2 0 3 0; #P connect 3 0 4 0; #P fasten 1 0 2 1 87 119 53 119; #P connect 6 0 3 1; #P connect 1 0 5 0; #P connect 5 0 6 0; #P pop; #P newobj 94 112 59 9109513 p am.scale~; #N comlet AM amount2: 1=ringmod \; 0=no modulation; #P inlet 143 33 15 0; #P outlet 8 207 15 0; #P newex 8 176 27 9109513 *~; #N vpatcher 335 374 495 695; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 82 162 27 9109513 +~ 1; #P newex 82 132 28 9109513 *~ -1; #N comlet; #P outlet 31 230 15 0; #P newex 31 189 27 9109513 +~; #P window linecount 0; #P newex 31 155 27 9109513 *~; #N comlet scale input from this number to 1; #P inlet 82 52 15 0; #N comlet signal in; #P inlet 31 52 15 0; #P connect 0 0 2 0; #P connect 2 0 3 0; #P connect 3 0 4 0; #P fasten 1 0 2 1 87 119 53 119; #P connect 6 0 3 1; #P connect 1 0 5 0; #P connect 5 0 6 0; #P pop; #P newobj 25 112 59 9109513 p am.scale~; #N comlet AM amount1: 1=ringmod \; 0=no modulation; #P inlet 74 33 15 0; #N comlet modulator; #P inlet 25 32 15 0; #N comlet carrier; #P inlet 8 32 15 0; #P connect 0 0 4 0; #P connect 4 0 5 0; #P connect 1 0 3 0; #P connect 3 0 4 1; #P connect 2 0 3 1; #P fasten 0 0 8 0 13 159 82 159; #P connect 8 0 9 0; #P fasten 1 0 7 0 30 83 99 83; #P connect 7 0 8 1; #P connect 6 0 7 1; #P pop; #P newobj 324 328 69 9109513 p dual-AM; #P newex 343 283 36 9109513 cycle~; #P newex 324 246 36 9109513 cycle~; #P connect 28 0 34 0; #P connect 29 0 34 1; #P connect 30 0 34 2; #P connect 29 0 35 0; #P connect 31 0 34 3; #P fasten 34 0 0 0 67 239 329 239; #P connect 0 0 2 0; #P connect 2 0 5 0; #P connect 5 0 9 0; #P connect 9 0 13 0; #P connect 13 0 17 0; #P connect 17 0 20 0; #P fasten 34 2 4 0 107 356 344 356; #P connect 4 0 5 1; #P fasten 34 3 8 0 127 439 344 439; #P connect 8 0 9 1; #P fasten 34 4 12 0 147 517 344 517; #P connect 12 0 13 1; #P fasten 34 5 16 0 167 594 344 594; #P connect 16 0 17 1; #P connect 26 0 27 0; #P fasten 34 1 1 0 87 274 348 274; #P connect 1 0 2 1; #P fasten 7 0 5 2 451 392 359 392; #P fasten 11 0 9 2 517 472 359 472; #P fasten 15 0 13 2 583 548 359 548; #P fasten 19 0 17 2 649 628 359 628; #P fasten 3 0 2 2 385 308 367 308; #P fasten 27 0 3 0 346 153 385 153; #P fasten 3 1 2 3 439 317 386 317; #P connect 2 1 6 0; #P connect 6 0 10 0; #P connect 10 0 14 0; #P connect 14 0 18 0; #P connect 18 0 21 0; #P fasten 33 0 3 1 610 154 403 154; #P fasten 4 0 6 1 344 400 403 400; #P fasten 8 0 10 1 344 480 403 480; #P fasten 12 0 14 1 344 556 403 556; #P fasten 16 0 18 1 344 636 403 636; #P connect 24 0 27 1; #P fasten 7 1 6 2 505 405 418 405; #P fasten 11 1 10 2 571 485 418 485; #P fasten 15 1 14 2 637 561 418 561; #P fasten 19 1 18 2 703 641 418 641; #P connect 26 0 25 0; #P connect 25 0 3 2; #P connect 25 1 3 3; #P fasten 27 1 7 0 361 150 451 150; #P fasten 33 1 7 1 628 157 469 157; #P fasten 25 2 7 2 457 138 487 138; #P connect 22 0 25 1; #P fasten 25 3 7 3 475 135 505 135; #P fasten 27 2 11 0 376 147 517 147; #P fasten 33 2 11 1 646 160 535 160; #P fasten 25 4 11 2 493 132 553 132; #P fasten 25 5 11 3 511 129 571 129; #P fasten 27 3 15 0 391 144 583 144; #P connect 23 0 25 2; #P fasten 33 3 15 1 664 163 601 163; #P connect 32 0 33 0; #P fasten 25 6 15 2 529 126 619 126; #P fasten 25 7 15 3 547 123 637 123; #P fasten 27 4 19 0 406 141 649 141; #P fasten 33 4 19 1 682 166 667 166; #P fasten 25 8 19 2 565 120 685 120; #P fasten 25 9 19 3 583 117 703 117; #P pop; #P newobj 375 328 204 9109513 p dirty work; #P comment 477 142 100 9109513 randomize phase; #P user panel 228 73 233 61; #X brgb 125 219 221; #X frgb 0 0 0; #X border 1; #X rounded 0; #X shadow 0; #X done; #P hidden connect 49 0 19 0; #P hidden connect 12 0 26 0; #P hidden connect 26 0 27 0; #P hidden connect 49 1 21 0; #P hidden connect 26 1 28 0; #P hidden connect 61 0 60 0; #P hidden connect 60 0 59 0; #P hidden connect 58 0 43 0; #P hidden connect 57 0 43 0; #P hidden connect 56 0 43 0; #P hidden connect 55 0 43 0; #P hidden connect 54 0 43 0; #P hidden connect 44 0 43 0; #P hidden connect 45 0 43 0; #P hidden connect 46 0 43 0; #P hidden connect 47 0 43 0; #P hidden connect 48 0 43 0; #P hidden connect 59 0 43 0; #P hidden connect 64 0 43 0; #P hidden connect 43 0 40 0; #P hidden connect 49 2 22 0; #P hidden connect 20 0 33 0; #P hidden connect 23 0 33 0; #P hidden connect 22 0 33 0; #P hidden connect 21 0 33 0; #P hidden connect 26 2 29 0; #P hidden connect 43 1 41 0; #P hidden connect 60 0 44 0; #P hidden connect 49 3 23 0; #P hidden connect 60 0 45 0; #P hidden connect 26 3 30 0; #P hidden connect 43 2 34 0; #P hidden connect 60 0 54 0; #P hidden connect 49 4 20 0; #P hidden connect 43 3 35 0; #P hidden connect 26 4 31 0; #P hidden connect 43 4 36 0; #P hidden connect 33 0 32 0; #P hidden connect 19 0 32 0; #P hidden connect 60 0 55 0; #P hidden connect 21 0 32 1; #P hidden connect 43 5 37 0; #P hidden connect 22 0 32 2; #P hidden connect 43 6 42 0; #P hidden connect 23 0 32 3; #P hidden connect 20 0 32 4; #P hidden connect 60 0 56 0; #P hidden connect 43 7 38 0; #P hidden connect 60 0 48 0; #P hidden connect 43 8 39 0; #P hidden connect 60 0 46 0; #P hidden connect 60 0 47 0; #P hidden connect 17 0 18 0; #P hidden connect 18 0 13 0; #P hidden connect 60 0 57 0; #P hidden connect 43 9 50 0; #P hidden fasten 14 0 17 0 358 135 344 135 344 52 280 52; #P hidden connect 43 10 52 0; #P hidden connect 43 11 51 0; #P hidden connect 60 0 58 0; #P hidden connect 43 12 53 0; #P hidden fasten 13 0 15 0 258 137 241 137 241 45 358 45; #P hidden connect 15 0 16 0; #P hidden connect 16 0 14 0; #P hidden fasten 13 0 2 0 258 325 380 325; #P connect 2 0 62 0; #P hidden fasten 14 0 2 1 358 322 404 322; #P hidden fasten 12 0 2 2 43 319 428 319; #P hidden fasten 32 0 2 3 164 316 452 316; #P hidden fasten 9 0 2 4 400 313 476 313; #P hidden fasten 10 0 2 5 198 304 500 304; #P hidden fasten 4 0 2 6 164 307 524 307; #P hidden fasten 5 0 2 7 282 310 548 310; #P hidden fasten 3 0 2 8 466 301 572 301; #P connect 2 1 63 0; #P pop; #P newobj 160 247 52 9109513 p amulator; #P newex 190 301 53 9109513 svf~ 10; #P user meter~ 28 322 108 335 50 0 168 0 103 103 103 255 153 0 255 0 0 217 217 0 153 186 0 12 3 3 3 3; #P newex 116 300 53 9109513 svf~ 10; #N vpatcher 650 36 1250 436; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 375 206 69 9109513 prepend mudi4; #P newex 362 181 69 9109513 prepend mudi3; #P newex 349 148 69 9109513 prepend mudi2; #P newex 336 123 69 9109513 prepend mudi1; #P newex 115 163 85 9109513 prepend harmNum; #N vpatcher 463 26 1063 426; #P outlet 200 223 15 0; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 202 181 66 9109513 pak 1 1 1 1 1; #P newex 294 127 79 9109513 scale 0 127 1 30; #P newex 251 96 79 9109513 scale 0 127 1 30; #P newex 198 119 79 9109513 scale 0 127 1 30; #P newex 150 91 79 9109513 scale 0 127 1 30; #P window linecount 0; #P newex 110 120 79 9109513 scale 0 127 1 30; #N comlet 5; #P inlet 293 64 15 0; #N comlet 4; #P inlet 258 52 15 0; #N comlet 3; #P inlet 197 56 15 0; #N comlet 2; #P inlet 152 59 15 0; #N comlet 1; #P inlet 110 79 15 0; #P connect 0 0 5 0; #P connect 1 0 6 0; #P connect 2 0 7 0; #P connect 10 0 11 0; #P connect 5 0 10 0; #P connect 6 0 10 1; #P connect 7 0 10 2; #P connect 8 0 10 3; #P connect 3 0 8 0; #P connect 9 0 10 4; #P connect 4 0 9 0; #P pop; #P newobj 115 136 65 9109513 p kno_1-30; #P newex 258 163 81 9109513 prepend strSpeed; #N vpatcher 463 26 1063 426; #P outlet 200 223 15 0; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 202 181 78 9109513 pak 1. 1. 1. 1. 1.; #P newex 294 127 96 9109513 scale 0 127 -100. 30.; #P newex 251 96 96 9109513 scale 0 127 -100. 30.; #P newex 198 119 96 9109513 scale 0 127 -100. 30.; #P newex 150 91 96 9109513 scale 0 127 -100. 30.; #P window linecount 0; #P newex 110 120 96 9109513 scale 0 127 -100. 30.; #N comlet 5; #P inlet 293 64 15 0; #N comlet 4; #P inlet 258 52 15 0; #N comlet 3; #P inlet 197 56 15 0; #N comlet 2; #P inlet 152 59 15 0; #N comlet 1; #P inlet 110 79 15 0; #P connect 0 0 5 0; #P connect 1 0 6 0; #P connect 2 0 7 0; #P connect 10 0 11 0; #P connect 5 0 10 0; #P connect 6 0 10 1; #P connect 7 0 10 2; #P connect 3 0 8 0; #P connect 8 0 10 3; #P connect 9 0 10 4; #P connect 4 0 9 0; #P pop; #P newobj 258 107 65 9109513 p kno_-100-30; #P window linecount 2; #P newex 154 187 51 9109513 prepend strCenter; #P window linecount 1; #N vpatcher 463 26 1063 426; #P outlet 200 223 15 0; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 202 181 78 9109513 pak 1. 1. 1. 1. 1.; #P newex 294 127 79 9109513 scale 0 127 0. 1.; #P newex 251 96 79 9109513 scale 0 127 0. 1.; #P newex 198 119 79 9109513 scale 0 127 0. 1.; #P newex 150 91 79 9109513 scale 0 127 0. 1.; #P window linecount 0; #P newex 110 120 79 9109513 scale 0 127 0. 1.; #N comlet 5; #P inlet 293 64 15 0; #N comlet 4; #P inlet 258 52 15 0; #N comlet 3; #P inlet 197 56 15 0; #N comlet 2; #P inlet 152 59 15 0; #N comlet 1; #P inlet 110 79 15 0; #P connect 0 0 5 0; #P connect 1 0 6 0; #P connect 2 0 7 0; #P connect 10 0 11 0; #P connect 5 0 10 0; #P connect 6 0 10 1; #P connect 7 0 10 2; #P connect 3 0 8 0; #P connect 8 0 10 3; #P connect 9 0 10 4; #P connect 4 0 9 0; #P pop; #P newobj 154 102 63 9109513 p kno_0-1; #P window linecount 2; #P newex 50 183 49 9109513 prepend strRange; #P window linecount 1; #N vpatcher 463 26 1063 426; #P outlet 200 223 15 0; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 202 181 78 9109513 pak 1. 1. 1. 1. 1.; #P newex 294 127 79 9109513 scale 0 127 0. 1.; #P newex 251 96 79 9109513 scale 0 127 0. 1.; #P newex 198 119 79 9109513 scale 0 127 0. 1.; #P newex 150 91 79 9109513 scale 0 127 0. 1.; #P window linecount 0; #P newex 110 120 79 9109513 scale 0 127 0. 1.; #N comlet 5; #P inlet 293 64 15 0; #N comlet 4; #P inlet 258 52 15 0; #N comlet 3; #P inlet 197 56 15 0; #N comlet 2; #P inlet 152 59 15 0; #N comlet 1; #P inlet 110 79 15 0; #P connect 0 0 5 0; #P connect 1 0 6 0; #P connect 2 0 7 0; #P connect 10 0 11 0; #P connect 5 0 10 0; #P connect 6 0 10 1; #P connect 7 0 10 2; #P connect 3 0 8 0; #P connect 8 0 10 3; #P connect 9 0 10 4; #P connect 4 0 9 0; #P pop; #P newobj 50 98 63 9109513 p kno_0-1; #P newex 174 318 78 9109513 pak 1. 1. 1. 1. 1.; #N comlet properly prepended output; #P outlet 24 263 15 0; #P window linecount 2; #P newex 24 133 46 9109513 prepend pitchMIDI; #N comlet button - bottom right; #P inlet 375 73 15 0; #N comlet button - bottom left; #P inlet 362 55 15 0; #N comlet button - top right; #P inlet 349 73 15 0; #N comlet button - top left; #P inlet 336 55 15 0; #N comlet knob - r3 c8; #P inlet 323 73 15 0; #N comlet knob - r3 c7; #P inlet 310 55 15 0; #N comlet knob - r3 c6; #P inlet 297 73 15 0; #N comlet knob - r3 c5; #P inlet 284 55 15 0; #N comlet knob - r3 c4; #P inlet 271 73 15 0; #N comlet knob - r3 c3; #P inlet 258 55 15 0; #N comlet knob - r3 c2; #P inlet 245 73 15 0; #N comlet knob - r3 c1; #P inlet 232 55 15 0; #N comlet knob - r2 c8; #P inlet 219 73 15 0; #N comlet knob - r2 c7; #P inlet 206 55 15 0; #N comlet knob - r2 c6; #P inlet 193 73 15 0; #N comlet knob - r2 c5; #P inlet 180 55 15 0; #N comlet knob - r2 c4; #P inlet 167 73 15 0; #N comlet knob - r2 c3; #P inlet 154 55 15 0; #N comlet knob - r2 c2; #P inlet 141 73 15 0; #N comlet knob - r2 c1; #P inlet 128 55 15 0; #N comlet knob - r1 c8; #P inlet 115 73 15 0; #N comlet knob - r1 c7; #P inlet 102 55 15 0; #N comlet knob - r1 c6; #P inlet 89 73 15 0; #N comlet knob - r1 c5; #P inlet 76 55 15 0; #N comlet knob - r1 c4; #P inlet 63 73 15 0; #N comlet knob - r1 c3; #P inlet 50 55 15 0; #N comlet knob - r1 c2; #P inlet 37 73 15 0; #N comlet knob - r1 c1; #P inlet 24 55 15 0; #P connect 0 0 28 0; #P connect 28 0 29 0; #P fasten 32 0 29 0 55 244 29 244; #P fasten 34 0 29 0 159 244 29 244; #P fasten 36 0 29 0 263 244 29 244; #P fasten 38 0 29 0 120 244 29 244; #P fasten 39 0 29 0 341 244 29 244; #P fasten 40 0 29 0 354 244 29 244; #P fasten 41 0 29 0 367 244 29 244; #P fasten 42 0 29 0 380 244 29 244; #P connect 2 0 31 0; #P connect 31 0 32 0; #P connect 3 0 31 1; #P connect 4 0 31 2; #P connect 5 0 31 3; #P connect 6 0 31 4; #P fasten 1 0 37 0 42 123 120 123; #P connect 37 0 38 0; #P connect 8 0 37 1; #P connect 9 0 37 2; #P connect 10 0 33 0; #P fasten 16 0 37 3 237 127 159 127; #P connect 33 0 34 0; #P connect 11 0 33 1; #P fasten 17 0 37 4 250 127 172 127; #P connect 12 0 33 2; #P connect 13 0 33 3; #P connect 14 0 33 4; #P connect 18 0 35 0; #P connect 35 0 36 0; #P connect 19 0 35 1; #P connect 20 0 35 2; #P connect 21 0 35 3; #P connect 22 0 35 4; #P connect 24 0 39 0; #P connect 25 0 40 0; #P connect 26 0 41 0; #P connect 27 0 42 0; #P pop; #P newobj 137 197 365 9109513 p encode amulator controls; #P newex 362 52 45 9109513 loadbang; #P newex 51 211 27 9109513 zl; #P newex 203 92 28 9109513 sel 5; #N comlet R out; #P outlet 163 375 15 0; #N comlet L out; #P outlet 140 375 15 0; #P button 259 130 15 0; #P comment 245 103 100 9109513 dump; #P button 381 127 15 0; #N vpatcher 364 202 1045 602; #P origin 44 0; #P button 572 47 15 0; #P window setfont "Sans Serif" 9.; #P window linecount 1; #N vpatcher 15 55 615 782; #P origin 0 32; #P window setfont "Sans Serif" 9.; #P newex 18 442 48 9109513 zl group 2; #P message 16 52 31 9109513 81 0 82 0 83 0 84 0 85 0 86 0 87 0 88 0 89 0 90 0 91 0 92 0 93 0 94 0 95 0 96 0 97 0 98 0 99 0 100 0 101 0 102 0 103 0 104 0 105 0 106 0 107 0 108 0; #N comlet to coll; #P outlet 16 468 15 0; #N comlet bang; #P inlet 16 25 15 0; #P connect 0 0 2 0; #P connect 3 0 1 0; #P connect 2 0 3 0; #P pop; #P newobj 556 101 46 9109513 p intialize; #P message 539 136 28 9109513 clear; #N comlet bang to intialize; #P inlet 554 65 15 0; #N comlet bang to randomize; #P inlet 593 65 15 0; #N vpatcher 15 55 615 455; #N comlet to coll; #P outlet 99 224 15 0; #N comlet bang; #P inlet 98 62 15 0; #P window setfont "Sans Serif" 9.; #P newex 98 107 40 9109513 uzi 28; #P connect 1 0 0 0; #P pop; #P newobj 600 121 58 9109513 p randomize; #N comlet button - bottom right; #P outlet 405 202 15 0; #N comlet button - bottom left; #P outlet 392 184 15 0; #N comlet button - top right; #P outlet 379 202 15 0; #N comlet button - top left; #P outlet 366 184 15 0; #N comlet knob - r3 c8; #P outlet 353 202 15 0; #N comlet knob - r3 c7; #P outlet 340 184 15 0; #N comlet knob - r3 c6; #P outlet 327 202 15 0; #N comlet knob - r3 c5; #P outlet 314 184 15 0; #N comlet knob - r3 c4; #P outlet 301 202 15 0; #N comlet knob - r3 c3; #P outlet 288 184 15 0; #N comlet knob - r3 c2; #P outlet 275 202 15 0; #N comlet knob - r3 c1; #P outlet 262 184 15 0; #N comlet knob - r2 c8; #P outlet 249 202 15 0; #N comlet knob - r2 c7; #P outlet 236 184 15 0; #N comlet knob - r2 c6; #P outlet 223 202 15 0; #N comlet knob - r2 c5; #P outlet 210 184 15 0; #N comlet knob - r2 c4; #P outlet 197 202 15 0; #N comlet knob - r2 c3; #P outlet 184 184 15 0; #N comlet knob - r2 c2; #P outlet 171 202 15 0; #N comlet knob - r2 c1; #P outlet 158 184 15 0; #N comlet Dump out; #P outlet 455 236 15 0; #P newex 455 194 44 9109513 pack 1 1; #N comlet bang to dump; #P inlet 510 65 15 0; #P window linecount 0; #P message 510 108 31 9109513 dump; #P window linecount 1; #P newex 455 95 31 9109513 zl rev; #N coll ; #P newobj 455 148 53 9109513 coll; #N comlet knob - r1 c8; #P outlet 145 202 15 0; #N comlet knob - r1 c7; #P outlet 132 184 15 0; #N comlet knob - r1 c6; #P outlet 119 202 15 0; #N comlet knob - r1 c5; #P outlet 106 184 15 0; #N comlet knob - r1 c4; #P outlet 93 202 15 0; #N comlet knob - r1 c3; #P outlet 80 184 15 0; #N comlet knob - r1 c2; #P outlet 67 202 15 0; #P newex 54 125 27 9109513 - 80; #N comlet knob - r1 c1; #P outlet 54 184 15 0; #P newex 54 154 365 9109513 gate 28; #P window linecount 0; #P newex 10 91 54 9109513 unpack 1 1; #P inlet 10 50 15 0; #P connect 0 0 1 0; #P connect 1 1 4 0; #P connect 4 0 2 0; #P connect 2 0 3 0; #P connect 2 1 5 0; #P connect 2 2 6 0; #P connect 2 3 7 0; #P connect 2 4 8 0; #P connect 2 5 9 0; #P connect 2 6 10 0; #P connect 2 7 11 0; #P connect 2 8 18 0; #P connect 2 9 19 0; #P connect 2 10 20 0; #P connect 2 11 21 0; #P connect 2 12 22 0; #P connect 2 13 23 0; #P connect 2 14 24 0; #P connect 2 15 25 0; #P connect 2 16 26 0; #P connect 2 17 27 0; #P connect 2 18 28 0; #P connect 2 19 29 0; #P connect 2 20 30 0; #P connect 2 21 31 0; #P connect 2 22 32 0; #P connect 2 23 33 0; #P connect 2 24 34 0; #P connect 2 25 35 0; #P connect 2 26 36 0; #P connect 2 27 37 0; #P fasten 1 0 2 1 15 119 414 119; #P fasten 0 0 13 0 15 70 460 70; #P connect 13 0 12 0; #P connect 14 0 12 0; #P connect 41 0 12 0; #P connect 42 0 12 0; #P connect 12 0 16 0; #P connect 16 0 17 0; #P connect 12 1 16 1; #P connect 15 0 14 0; #P connect 40 0 42 0; #P connect 43 0 42 0; #P pop; #P newobj 137 170 378 9109513 p decode midi; #N comlet midi out; #P outlet 501 250 15 0; #N comlet select 3 for dump; #P inlet 203 60 15 0; #P newex 28 143 27 9109513 zl; #N comlet midi controls; #P inlet 90 60 15 0; #P comment 377 105 100 9109513 intialize; #P connect 15 0 16 0; #P connect 18 0 15 0; #P connect 1 0 5 0; #P connect 5 0 14 0; #P connect 15 1 9 0; #P connect 5 1 14 1; #P connect 14 0 18 0; #P connect 5 2 14 2; #P connect 17 1 10 0; #P connect 5 3 14 3; #P connect 5 4 14 4; #P connect 18 1 17 0; #P connect 5 5 14 5; #P connect 3 0 11 0; #P connect 5 6 14 6; #P connect 5 7 14 7; #P connect 5 8 14 8; #P connect 5 9 14 9; #P connect 11 0 5 1; #P connect 8 0 5 1; #P connect 5 10 14 10; #P connect 5 11 14 11; #P connect 5 12 14 12; #P connect 5 13 14 13; #P connect 5 14 14 14; #P connect 5 15 14 15; #P connect 5 16 14 16; #P connect 5 17 14 17; #P connect 5 18 14 18; #P connect 6 0 5 2; #P connect 13 0 5 2; #P connect 5 19 14 19; #P connect 5 20 14 20; #P connect 5 21 14 21; #P connect 5 22 14 22; #P connect 5 23 14 23; #P connect 5 24 14 24; #P connect 5 25 14 25; #P connect 5 26 14 26; #P connect 5 27 14 27; #P connect 5 28 4 0; #P pop 1; #P newobj 500 231 41 9109513 p sinam; #P user meter~ 229 316 309 329 50 0 168 0 103 103 103 255 153 0 255 0 0 217 217 0 153 186 0 12 3 3 3 3; #P user ezdac~ 330 483 374 516 0; #N vpatcher 640 67 1240 467; #P outlet 90 277 15 0; #P outlet 62 277 15 0; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 15 128 94 9109513 expr $f1*$f1/200000; #P newex 91 237 27 9109513 *~; #P newex 61 237 27 9109513 *~; #P newex 15 186 27 9109513 line~; #P newex 15 163 56 9109513 append 100; #P newex 15 104 88 9109513 scale 0 127 0. 500.; #P window linecount 0; #P newex 15 76 41 9109513 ctlin b 1; #N comlet ins1 R; #P inlet 91 50 15 0; #N comlet ins1 L; #P inlet 62 50 15 0; #P connect 2 0 3 0; #P connect 3 0 8 0; #P connect 8 0 4 0; #P connect 4 0 5 0; #P connect 0 0 6 0; #P connect 6 0 9 0; #P fasten 5 0 6 1 20 218 83 218; #P connect 7 0 10 0; #P connect 1 0 7 0; #P fasten 5 0 7 1 20 218 113 218; #P pop; #P newobj 336 367 41 9109513 p levels; #P button 439 265 15 0; #N vpatcher 468 144 1068 544; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 362 68 45 9109513 loadbang; #P number 162 81 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0; #P window linecount 0; #P newex 203 92 28 9109513 sel 3; #N comlet R out; #P outlet 218 277 15 0; #N comlet L out; #P outlet 195 277 15 0; #P button 259 130 15 0; #P comment 245 103 100 9109513 dump; #P button 381 127 15 0; #P number 228 205 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0; #P number 137 205 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0; #N vpatcher 65 206 746 606; #P origin 44 0; #P button 572 47 15 0; #P window setfont "Sans Serif" 9.; #N vpatcher 15 55 615 782; #P origin 0 32; #P window setfont "Sans Serif" 9.; #P newex 18 442 48 9109513 zl group 2; #P message 16 52 35 9109513 81 11 82 11 83 11 84 11 85 11 86 11 87 11 88 11 89 11 90 11 91 11 92 11 93 11 94 11 95 11 96 11 97 11 98 11 99 11 100 11 101 11 102 11 103 11 104 11 105 0 106 0 107 0 108 0; #N comlet to coll; #P outlet 16 468 15 0; #N comlet bang; #P inlet 16 25 15 0; #P connect 0 0 2 0; #P connect 3 0 1 0; #P connect 2 0 3 0; #P pop; #P newobj 556 101 46 9109513 p intialize; #P message 539 136 28 9109513 clear; #N comlet bang to intialize; #P inlet 554 65 15 0; #N comlet bang to randomize; #P inlet 593 65 15 0; #N vpatcher 15 55 615 455; #N comlet to coll; #P outlet 99 224 15 0; #N comlet bang; #P inlet 98 62 15 0; #P window setfont "Sans Serif" 9.; #P newex 98 107 40 9109513 uzi 28; #P connect 1 0 0 0; #P pop; #P newobj 600 121 58 9109513 p randomize; #N comlet button - bottom right; #P outlet 405 202 15 0; #N comlet button - bottom left; #P outlet 392 184 15 0; #N comlet button - top right; #P outlet 379 202 15 0; #N comlet button - top left; #P outlet 366 184 15 0; #N comlet knob - r3 c8; #P outlet 353 202 15 0; #N comlet knob - r3 c7; #P outlet 340 184 15 0; #N comlet knob - r3 c6; #P outlet 327 202 15 0; #N comlet knob - r3 c5; #P outlet 314 184 15 0; #N comlet knob - r3 c4; #P outlet 301 202 15 0; #N comlet knob - r3 c3; #P outlet 288 184 15 0; #N comlet knob - r3 c2; #P outlet 275 202 15 0; #N comlet knob - r3 c1; #P outlet 262 184 15 0; #N comlet knob - r2 c8; #P outlet 249 202 15 0; #N comlet knob - r2 c7; #P outlet 236 184 15 0; #N comlet knob - r2 c6; #P outlet 223 202 15 0; #N comlet knob - r2 c5; #P outlet 210 184 15 0; #N comlet knob - r2 c4; #P outlet 197 202 15 0; #N comlet knob - r2 c3; #P outlet 184 184 15 0; #N comlet knob - r2 c2; #P outlet 171 202 15 0; #N comlet knob - r2 c1; #P outlet 158 184 15 0; #N comlet Dump out; #P outlet 455 236 15 0; #P newex 455 194 44 9109513 pack 1 1; #N comlet bang to dump; #P inlet 510 65 15 0; #P message 510 108 31 9109513 dump; #P window linecount 1; #P newex 455 95 31 9109513 zl rev; #N coll ; #P newobj 455 148 53 9109513 coll; #N comlet knob - r1 c8; #P outlet 145 202 15 0; #N comlet knob - r1 c7; #P outlet 132 184 15 0; #N comlet knob - r1 c6; #P outlet 119 202 15 0; #N comlet knob - r1 c5; #P outlet 106 184 15 0; #N comlet knob - r1 c4; #P outlet 93 202 15 0; #N comlet knob - r1 c3; #P outlet 80 184 15 0; #N comlet knob - r1 c2; #P outlet 67 202 15 0; #P newex 54 125 27 9109513 - 80; #N comlet knob - r1 c1; #P outlet 54 184 15 0; #P newex 54 154 365 9109513 gate 28; #P window linecount 0; #P newex 10 91 54 9109513 unpack 1 1; #P inlet 10 50 15 0; #P connect 0 0 1 0; #P connect 1 1 4 0; #P connect 4 0 2 0; #P connect 2 0 3 0; #P connect 2 1 5 0; #P connect 2 2 6 0; #P connect 2 3 7 0; #P connect 2 4 8 0; #P connect 2 5 9 0; #P connect 2 6 10 0; #P connect 2 7 11 0; #P connect 2 8 18 0; #P connect 2 9 19 0; #P connect 2 10 20 0; #P connect 2 11 21 0; #P connect 2 12 22 0; #P connect 2 13 23 0; #P connect 2 14 24 0; #P connect 2 15 25 0; #P connect 2 16 26 0; #P connect 2 17 27 0; #P connect 2 18 28 0; #P connect 2 19 29 0; #P connect 2 20 30 0; #P connect 2 21 31 0; #P connect 2 22 32 0; #P connect 2 23 33 0; #P connect 2 24 34 0; #P connect 2 25 35 0; #P connect 2 26 36 0; #P connect 2 27 37 0; #P fasten 1 0 2 1 15 119 414 119; #P fasten 0 0 13 0 15 70 460 70; #P connect 13 0 12 0; #P connect 14 0 12 0; #P connect 41 0 12 0; #P connect 42 0 12 0; #P connect 12 0 16 0; #P connect 16 0 17 0; #P connect 12 1 16 1; #P connect 15 0 14 0; #P connect 40 0 42 0; #P connect 43 0 42 0; #P pop; #P newobj 137 170 378 9109513 p decode midi; #N comlet midi out; #P outlet 501 250 15 0; #N comlet select 1 for dump; #P inlet 203 60 15 0; #P newex 111 281 27 9109513 zl; #N comlet midi controls; #P inlet 90 60 15 0; #P comment 377 105 100 9109513 intialize; #P connect 1 0 5 0; #P connect 5 0 6 0; #P connect 3 0 14 0; #P connect 3 0 13 0; #P connect 5 7 7 0; #P connect 10 0 5 1; #P connect 13 0 5 1; #P connect 15 0 5 2; #P connect 8 0 5 2; #P connect 5 28 4 0; #P pop; #P newobj 423 231 68 9109513 p instrument 2; #N vpatcher 105 125 1154 641; #P origin 60 0; #P window setfont "Sans Serif" 9.; #P newex 8 455 31 9109513 zl rev; #P button 49 139 15 0; #P button 28 141 15 0; #P outlet 8 479 15 0; #P newex 598 104 33 9109513 sel 16; #P newex 568 104 33 9109513 sel 15; #P newex 538 104 33 9109513 sel 14; #P newex 508 104 33 9109513 sel 13; #P message 598 248 351 9109513 65 0 73 0 66 0 74 0 67 127 75 0 68 0 76 127 69 0 77 0 70 0 78 0 71 0 79 0 72 127 80 127; #P message 568 267 351 9109513 65 0 73 0 66 0 74 0 67 0 75 0 68 0 76 0 69 0 77 0 70 0 78 0 71 0 79 0 72 127 80 0; #P message 508 305 341 9109513 65 0 73 0 66 0 74 0 67 0 75 0 68 0 76 0 69 0 77 0 70 0 78 0 71 127 79 0 72 0 80 0; #P message 538 286 351 9109513 65 127 73 127 66 0 74 0 67 127 75 127 68 0 76 0 69 0 77 0 70 0 78 0 71 127 79 127 72 0 80 0; #P message 478 324 351 9109513 65 0 73 0 66 0 74 0 67 0 75 0 68 0 76 0 69 0 77 0 70 127 78 127 71 0 79 0 72 0 80 0; #P message 448 342 351 9109513 65 0 73 0 66 0 74 0 67 0 75 0 68 0 76 0 69 0 77 0 70 127 78 0 71 0 79 0 72 0 80 0; #P newex 478 104 33 9109513 sel 12; #P newex 448 104 33 9109513 sel 11; #P message 388 381 351 9109513 65 0 73 0 66 0 74 0 67 0 75 0 68 0 76 0 69 127 77 0 70 0 78 0 71 0 79 0 72 0 80 0; #P message 418 362 351 9109513 65 0 73 0 66 0 74 0 67 0 75 0 68 0 76 0 69 127 77 127 70 0 78 0 71 0 79 0 72 0 80 0; #P newex 418 104 33 9109513 sel 10; #P newex 388 104 28 9109513 sel 9; #P newex 218 103 28 9109513 sel 8; #P newex 188 103 28 9109513 sel 7; #P newex 158 103 28 9109513 sel 6; #P newex 128 103 28 9109513 sel 5; #P message 218 247 361 9109513 65 0 73 0 66 0 74 0 67 127 75 0 68 127 76 127 69 0 77 0 70 0 78 0 71 0 79 0 72 0 80 0; #P message 188 266 351 9109513 65 0 73 0 66 0 74 0 67 0 75 0 68 127 76 0 69 0 77 0 70 0 78 0 71 0 79 0 72 0 80 0; #P message 128 304 351 9109513 65 0 73 0 66 0 74 0 67 127 75 0 68 0 76 0 69 0 77 0 70 0 78 0 71 0 79 0 72 0 80 0; #P message 158 285 371 9109513 65 127 73 127 66 0 74 0 67 127 75 127 68 0 76 0 69 0 77 0 70 0 78 0 71 0 79 0 72 0 80 0; #P message 98 323 361 9109513 65 0 73 0 66 127 74 127 67 0 75 0 68 0 76 0 69 0 77 0 70 0 78 0 71 0 79 0 72 0 80 0; #P message 68 342 351 9109513 65 0 73 0 66 127 74 0 67 0 75 0 68 0 76 0 69 0 77 0 70 0 78 0 71 0 79 0 72 0 80 0; #P newex 98 103 28 9109513 sel 4; #P newex 68 103 28 9109513 sel 3; #P message 8 380 351 9109513 65 127 73 0 66 0 74 0 67 0 75 0 68 0 76 0 69 0 77 0 70 0 78 0 71 0 79 0 72 0 80 0; #P message 38 361 361 9109513 65 127 73 127 66 0 74 0 67 0 75 0 68 0 76 0 69 0 77 0 70 0 78 0 71 0 79 0 72 0 80 0; #P newex 8 431 48 9109513 zl group 2; #P newex 38 103 28 9109513 sel 2; #P newex 8 103 28 9109513 sel 1; #N comlet selection; #P inlet 8 63 15 0; #P connect 0 0 1 0; #P connect 1 0 5 0; #P connect 4 0 3 0; #P connect 5 0 3 0; #P connect 3 0 37 0; #P connect 37 0 34 0; #P connect 1 0 35 0; #P fasten 0 0 2 0 13 94 43 94; #P connect 2 0 4 0; #P connect 2 0 36 0; #P connect 6 0 8 0; #P connect 7 0 9 0; #P connect 14 0 11 0; #P connect 15 0 10 0; #P connect 16 0 12 0; #P connect 17 0 13 0; #P connect 18 0 21 0; #P connect 19 0 20 0; #P connect 22 0 24 0; #P connect 23 0 25 0; #P connect 30 0 27 0; #P connect 31 0 26 0; #P connect 32 0 28 0; #P connect 33 0 29 0; #P pop; #P newobj 474 123 101 9109513 p radio buttons emacs; #P window linecount 3; #P comment 352 56 100 9109513 note: need to correct radio buttons \, send 1->127; #P window linecount 1; #N vpatcher 477 219 1077 619; #P window setfont "Sans Serif" 9.; #P newex 308 130 155 9109513 if $i2>=81 && $i2<=108 then $i1 $i2; #N comlet fx 8; #P outlet 294 364 15 0; #N comlet instrument 8; #P outlet 281 344 15 0; #N comlet fx 7; #P outlet 268 364 15 0; #N comlet instrument 7; #P outlet 255 344 15 0; #N comlet fx 6; #P outlet 242 364 15 0; #N comlet instrument 6; #P outlet 229 344 15 0; #N comlet fx 5; #P outlet 216 364 15 0; #N comlet instrument 5; #P outlet 203 344 15 0; #N comlet fx 4; #P outlet 190 364 15 0; #N comlet instrument 4; #P outlet 177 344 15 0; #N comlet fx 3; #P outlet 164 364 15 0; #N comlet instrument 3; #P outlet 151 344 15 0; #N comlet fx 2; #P outlet 138 364 15 0; #N comlet instrument 2; #P outlet 125 344 15 0; #N comlet fx 1; #P outlet 112 364 15 0; #N comlet instrument 1; #P outlet 99 344 15 0; #P newex 12 95 46 9109513 print ctlin; #N comlet selection: instruments go 1 \, 3 \, 5...15 fx go 2 \, 4 \, 6..16; #P outlet 52 271 15 0; #P newex 220 213 27 9109513 * 2; #P newex 220 186 27 9109513 - 7; #P newex 99 214 27 9109513 + 1; #P newex 99 189 27 9109513 * 2; #P newex 99 162 131 9109513 if $i1<8 then $i1 else out2 $i1; #P newex 99 308 219 9109513 gate 16; #P newex 76 67 44 9109513 pack 1 1; #P newex 99 122 27 9109513 - 65; #P newex 99 96 219 9109513 if ($i2 > 64) && ($i2<=80) then $i2 else out2 $i1 $i2; #P newex 76 47 40 9109513 ctlin b; #P fasten 9 0 10 0 225 242 57 242; #P fasten 7 0 10 0 104 239 57 239; #P connect 0 0 3 0; #P connect 3 0 1 0; #P connect 1 0 2 0; #P connect 2 0 5 0; #P connect 5 0 6 0; #P connect 6 0 7 0; #P connect 7 0 4 0; #P fasten 9 0 4 0 225 245 104 245; #P connect 4 0 12 0; #P connect 0 1 3 1; #P connect 4 1 13 0; #P connect 4 2 14 0; #P connect 4 3 15 0; #P connect 4 4 16 0; #P connect 4 5 17 0; #P connect 4 6 18 0; #P connect 4 7 19 0; #P connect 4 8 20 0; #P connect 4 9 21 0; #P connect 5 1 8 0; #P connect 8 0 9 0; #P connect 4 10 22 0; #P connect 4 11 23 0; #P connect 4 12 24 0; #P connect 4 13 25 0; #P connect 4 14 26 0; #P connect 4 15 27 0; #P connect 1 1 28 0; #P connect 28 0 4 1; #P pop; #P newobj 335 146 222 9109513 p midi in; #P newex 78 306 54 9109513 unpack 1 1; #P newex 78 350 40 9109513 ctlout d; #P newex 205 160 31 9109513 zl rev; #P comment 206 251 38 9109513 ctl #; #P comment 250 251 38 9109513 val; #P window setfont "Sans Serif" 18.; #P number 205 223 41 18 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0; #P number 249 223 45 18 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0; #P window setfont "Sans Serif" 9.; #P newex 205 190 54 9109513 unpack 1 1; #P newex 205 138 44 9109513 pack 1 1; #P comment 97 157 38 9109513 chan; #P comment 3 166 38 9109513 ctl #; #P comment 46 166 38 9109513 val; #P number 98 138 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0; #P window setfont "Sans Serif" 18.; #P number 2 138 41 18 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0; #P number 45 138 45 18 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0; #P window setfont "Sans Serif" 9.; #P newex 205 118 40 9109513 ctlin b; #N vpatcher 646 150 1246 550; #P window setfont "Sans Serif" 9.; #P newex 190 301 53 9109513 svf~ 10; #P user meter~ 28 322 108 335 50 0 168 0 103 103 103 255 153 0 255 0 0 217 217 0 153 186 0 12 3 3 3 3; #P newex 116 300 53 9109513 svf~ 10; #N vpatcher 650 36 1250 436; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 375 206 69 9109513 prepend mudi4; #P newex 362 181 69 9109513 prepend mudi3; #P newex 349 148 69 9109513 prepend mudi2; #P newex 336 123 69 9109513 prepend mudi1; #P newex 115 163 85 9109513 prepend harmNum; #N vpatcher 463 26 1063 426; #P outlet 200 223 15 0; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 202 181 66 9109513 pak 1 1 1 1 1; #P newex 294 127 79 9109513 scale 0 127 1 30; #P newex 251 96 79 9109513 scale 0 127 1 30; #P newex 198 119 79 9109513 scale 0 127 1 30; #P newex 150 91 79 9109513 scale 0 127 1 30; #P window linecount 0; #P newex 110 120 79 9109513 scale 0 127 1 30; #N comlet 5; #P inlet 293 64 15 0; #N comlet 4; #P inlet 258 52 15 0; #N comlet 3; #P inlet 197 56 15 0; #N comlet 2; #P inlet 152 59 15 0; #N comlet 1; #P inlet 110 79 15 0; #P connect 0 0 5 0; #P connect 1 0 6 0; #P connect 2 0 7 0; #P connect 10 0 11 0; #P connect 5 0 10 0; #P connect 6 0 10 1; #P connect 7 0 10 2; #P connect 8 0 10 3; #P connect 3 0 8 0; #P connect 9 0 10 4; #P connect 4 0 9 0; #P pop; #P newobj 115 136 65 9109513 p kno_1-30; #P newex 258 163 81 9109513 prepend strSpeed; #N vpatcher 463 26 1063 426; #P outlet 200 223 15 0; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 202 181 78 9109513 pak 1. 1. 1. 1. 1.; #P newex 294 127 96 9109513 scale 0 127 -100. 30.; #P newex 251 96 96 9109513 scale 0 127 -100. 30.; #P newex 198 119 96 9109513 scale 0 127 -100. 30.; #P newex 150 91 96 9109513 scale 0 127 -100. 30.; #P window linecount 0; #P newex 110 120 96 9109513 scale 0 127 -100. 30.; #N comlet 5; #P inlet 293 64 15 0; #N comlet 4; #P inlet 258 52 15 0; #N comlet 3; #P inlet 197 56 15 0; #N comlet 2; #P inlet 152 59 15 0; #N comlet 1; #P inlet 110 79 15 0; #P connect 0 0 5 0; #P connect 1 0 6 0; #P connect 2 0 7 0; #P connect 10 0 11 0; #P connect 5 0 10 0; #P connect 6 0 10 1; #P connect 7 0 10 2; #P connect 3 0 8 0; #P connect 8 0 10 3; #P connect 9 0 10 4; #P connect 4 0 9 0; #P pop; #P newobj 258 107 65 9109513 p kno_-100-30; #P window linecount 2; #P newex 154 187 51 9109513 prepend strCenter; #P window linecount 1; #N vpatcher 463 26 1063 426; #P outlet 200 223 15 0; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 202 181 78 9109513 pak 1. 1. 1. 1. 1.; #P newex 294 127 79 9109513 scale 0 127 0. 1.; #P newex 251 96 79 9109513 scale 0 127 0. 1.; #P newex 198 119 79 9109513 scale 0 127 0. 1.; #P newex 150 91 79 9109513 scale 0 127 0. 1.; #P window linecount 0; #P newex 110 120 79 9109513 scale 0 127 0. 1.; #N comlet 5; #P inlet 293 64 15 0; #N comlet 4; #P inlet 258 52 15 0; #N comlet 3; #P inlet 197 56 15 0; #N comlet 2; #P inlet 152 59 15 0; #N comlet 1; #P inlet 110 79 15 0; #P connect 0 0 5 0; #P connect 1 0 6 0; #P connect 2 0 7 0; #P connect 10 0 11 0; #P connect 5 0 10 0; #P connect 6 0 10 1; #P connect 7 0 10 2; #P connect 3 0 8 0; #P connect 8 0 10 3; #P connect 9 0 10 4; #P connect 4 0 9 0; #P pop; #P newobj 154 102 63 9109513 p kno_0-1; #P window linecount 2; #P newex 50 183 49 9109513 prepend strRange; #P window linecount 1; #N vpatcher 463 26 1063 426; #P outlet 200 223 15 0; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 202 181 78 9109513 pak 1. 1. 1. 1. 1.; #P newex 294 127 79 9109513 scale 0 127 0. 1.; #P newex 251 96 79 9109513 scale 0 127 0. 1.; #P newex 198 119 79 9109513 scale 0 127 0. 1.; #P newex 150 91 79 9109513 scale 0 127 0. 1.; #P window linecount 0; #P newex 110 120 79 9109513 scale 0 127 0. 1.; #N comlet 5; #P inlet 293 64 15 0; #N comlet 4; #P inlet 258 52 15 0; #N comlet 3; #P inlet 197 56 15 0; #N comlet 2; #P inlet 152 59 15 0; #N comlet 1; #P inlet 110 79 15 0; #P connect 0 0 5 0; #P connect 1 0 6 0; #P connect 2 0 7 0; #P connect 10 0 11 0; #P connect 5 0 10 0; #P connect 6 0 10 1; #P connect 7 0 10 2; #P connect 3 0 8 0; #P connect 8 0 10 3; #P connect 9 0 10 4; #P connect 4 0 9 0; #P pop; #P newobj 50 98 63 9109513 p kno_0-1; #P newex 174 318 78 9109513 pak 1. 1. 1. 1. 1.; #N comlet properly prepended output; #P outlet 24 263 15 0; #P window linecount 2; #P newex 24 133 46 9109513 prepend pitchMIDI; #N comlet button - bottom right; #P inlet 375 73 15 0; #N comlet button - bottom left; #P inlet 362 55 15 0; #N comlet button - top right; #P inlet 349 73 15 0; #N comlet button - top left; #P inlet 336 55 15 0; #N comlet knob - r3 c8; #P inlet 323 73 15 0; #N comlet knob - r3 c7; #P inlet 310 55 15 0; #N comlet knob - r3 c6; #P inlet 297 73 15 0; #N comlet knob - r3 c5; #P inlet 284 55 15 0; #N comlet knob - r3 c4; #P inlet 271 73 15 0; #N comlet knob - r3 c3; #P inlet 258 55 15 0; #N comlet knob - r3 c2; #P inlet 245 73 15 0; #N comlet knob - r3 c1; #P inlet 232 55 15 0; #N comlet knob - r2 c8; #P inlet 219 73 15 0; #N comlet knob - r2 c7; #P inlet 206 55 15 0; #N comlet knob - r2 c6; #P inlet 193 73 15 0; #N comlet knob - r2 c5; #P inlet 180 55 15 0; #N comlet knob - r2 c4; #P inlet 167 73 15 0; #N comlet knob - r2 c3; #P inlet 154 55 15 0; #N comlet knob - r2 c2; #P inlet 141 73 15 0; #N comlet knob - r2 c1; #P inlet 128 55 15 0; #N comlet knob - r1 c8; #P inlet 115 73 15 0; #N comlet knob - r1 c7; #P inlet 102 55 15 0; #N comlet knob - r1 c6; #P inlet 89 73 15 0; #N comlet knob - r1 c5; #P inlet 76 55 15 0; #N comlet knob - r1 c4; #P inlet 63 73 15 0; #N comlet knob - r1 c3; #P inlet 50 55 15 0; #N comlet knob - r1 c2; #P inlet 37 73 15 0; #N comlet knob - r1 c1; #P inlet 24 55 15 0; #P connect 0 0 28 0; #P fasten 42 0 29 0 380 244 29 244; #P fasten 41 0 29 0 367 244 29 244; #P fasten 40 0 29 0 354 244 29 244; #P fasten 39 0 29 0 341 244 29 244; #P fasten 38 0 29 0 120 244 29 244; #P fasten 36 0 29 0 263 244 29 244; #P fasten 34 0 29 0 159 244 29 244; #P fasten 32 0 29 0 55 244 29 244; #P connect 28 0 29 0; #P connect 2 0 31 0; #P connect 31 0 32 0; #P connect 3 0 31 1; #P connect 4 0 31 2; #P connect 5 0 31 3; #P connect 6 0 31 4; #P fasten 1 0 37 0 42 123 120 123; #P connect 37 0 38 0; #P connect 8 0 37 1; #P connect 9 0 37 2; #P connect 10 0 33 0; #P fasten 16 0 37 3 237 127 159 127; #P connect 33 0 34 0; #P connect 11 0 33 1; #P fasten 17 0 37 4 250 127 172 127; #P connect 12 0 33 2; #P connect 13 0 33 3; #P connect 14 0 33 4; #P connect 18 0 35 0; #P connect 35 0 36 0; #P connect 19 0 35 1; #P connect 20 0 35 2; #P connect 21 0 35 3; #P connect 22 0 35 4; #P connect 24 0 39 0; #P connect 25 0 40 0; #P connect 26 0 41 0; #P connect 27 0 42 0; #P pop; #P newobj 137 197 365 9109513 p encode amulator controls; #P newex 362 52 45 9109513 loadbang; #P newex 51 211 27 9109513 zl; #N vpatcher 20 250 620 650; #P origin -6 32; #N comlet route your variables; #P hidden inlet 59 341 15 0; #P outlet 569 280 15 0; #P outlet 375 282 15 0; #P window setfont "Sans Serif" 9.; #P number 360 65 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0; #P hidden button 71 228 15 0; #P objectname randPh[1]; #P window linecount 0; #P hidden newex 70 263 45 9109513 loadbang; #P hidden message 71 295 56 9109513 strSlew 600; #P hidden message 301 296 41 9109513 mudi5 0; #P hidden message 254 289 41 9109513 mudi4 0; #P hidden message 217 283 41 9109513 mudi3 0; #P hidden message 172 291 41 9109513 mudi2 0; #P hidden message 131 289 41 9109513 mudi1 0; #P hidden newex 317 481 59 9109513 pvar randPh; #P hidden newex 277 439 55 9109513 pvar mudi4; #P hidden newex 297 418 55 9109513 pvar mudi5; #P hidden newex 257 460 55 9109513 pvar mudi3; #P hidden newex 38 -61 78 9109513 unpack 1 1 1 1 1; #P hidden message 235 309 61 9109513 pitchMIDI 29; #P hidden message 242 327 89 9109513 harmNum 3 4 5 7 8; #P hidden message 241 350 125 9109513 strSpeed -60 -50 -40 -30 -20; #P hidden message 113 344 127 9109513 strCenter 0.5 0.4 0.3 0.2 0.1; #P hidden message 105 321 126 9109513 strRange 0.1 0.2 0.3 0.4 0.5; #P window linecount 2; #P hidden newex 77 383 274 9109513 route pitchHz pitchMIDI harmNum strRange strCenter strSpeed strSlew mudi1 mudi2 mudi3 mudi4 mudi5 randPh; #P window linecount 1; #P hidden newex 197 439 60 9109513 pvar strSlew; #P hidden newex 97 460 70 9109513 pvar pitchMIDI; #P hidden newex 77 481 61 9109513 pvar pitchHz; #P hidden newex 237 481 55 9109513 pvar mudi2; #P hidden newex 217 418 55 9109513 pvar mudi1; #P hidden newex 177 460 67 9109513 pvar strSpeed; #P hidden newex 157 481 69 9109513 pvar strCenter; #P hidden newex 137 418 68 9109513 pvar strRange; #P hidden newex 117 439 71 9109513 pvar harmNum; #P hidden newex 87 -43 19 9109513 t b; #P hidden newex 159 -23 68 9109513 pack 1 1 1 1 1; #P number 140 166 17 9 0 0 32 139 0 0 0 221 221 221 222 222 222 0 0 0; #P number 115 166 17 9 0 0 32 139 0 0 0 221 221 221 222 222 222 0 0 0; #P number 90 166 17 9 0 0 32 139 0 0 0 221 221 221 222 222 222 0 0 0; #P number 65 166 17 9 0 0 32 139 0 0 0 221 221 221 222 222 222 0 0 0; #P number 40 166 17 9 0 0 32 139 0 0 0 221 221 221 222 222 222 0 0 0; #P hidden newex 38 163 115 9109513 unpack 1 1 1 1 1; #P window linecount 2; #P comment 161 0 38 9109513 multiply/divide; #P window setfont "Sans Serif" 14.; #P window linecount 1; #P comment 290 4 85 9109518 fundamental; #P toggle 110 0 25 0; #P objectname mudi4; #P toggle 86 0 25 0; #P objectname mudi3; #P toggle 62 0 25 0; #P objectname mudi2; #P toggle 134 0 25 0; #P objectname mudi5; #P toggle 38 0 25 0; #P objectname mudi1; #P window setfont "Sans Serif" 9.; #P hidden message 253 3 34 9109513 set \$1; #P hidden newex 275 -25 28 9109513 mtof; #P hidden message 353 1 34 9109513 set \$1; #P hidden newex 353 -25 28 9109513 ftom; #P window setfont "Sans Serif" 24.; #P number 353 26 81 24 0 134 259 139 0 0 0 221 221 221 222 222 222 0 0 0; #P objectname pitchMIDI; #P flonum 253 26 84 24 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0; #P objectname pitchHz; #P user multiSlider 38 23 121 140 1. 30. 5 2665 47 0 3 5 2 25 0; #M frgb 30 152 43; #M brgb 225 226 238; #M rgb2 127 127 127; #M rgb3 0 0 0; #M rgb4 115 199 116; #M rgb5 74 105 182; #M rgb6 112 158 18; #M rgb7 149 211 110; #M rgb8 187 9 201; #M rgb9 224 62 37; #M rgb10 7 114 128; #P objectname harmNum; #P window setfont "Sans Serif" 9.; #P comment 231 183 80 9109513 Slew Time (ms); #P flonum 193 182 35 9 0. 0 1 139 0 0 0 221 221 221 222 222 222 0 0 0; #P objectname strSlew; #P user multiSlider 395 88 118 75 -100. 30. 5 2937 47 0 0 2 0 0 0; #M frgb 23 134 16; #M brgb 213 210 35; #M rgb2 127 127 127; #M rgb3 0 0 0; #M rgb4 37 52 91; #M rgb5 74 105 182; #M rgb6 112 158 18; #M rgb7 149 211 110; #M rgb8 187 9 201; #M rgb9 224 62 37; #M rgb10 7 114 128; #P objectname strSpeed; #P comment 398 70 51 9109513 speed; #P comment 279 70 38 9109513 center; #P comment 161 70 38 9109513 range; #P user multiSlider 277 88 118 75 0. 1. 5 2937 47 0 0 2 0 0 1; #M frgb 200 211 69; #M brgb 61 134 48; #M rgb2 127 127 127; #M rgb3 0 0 0; #M rgb4 37 52 91; #M rgb5 74 105 182; #M rgb6 112 158 18; #M rgb7 149 211 110; #M rgb8 187 9 201; #M rgb9 224 62 37; #M rgb10 7 114 128; #P objectname strCenter; #P user multiSlider 159 88 118 75 0. 1. 5 2937 47 0 0 2 0 0 0; #M frgb 30 152 43; #M brgb 156 224 56; #M rgb2 127 127 127; #M rgb3 0 0 0; #M rgb4 37 52 91; #M rgb5 74 105 182; #M rgb6 112 158 18; #M rgb7 149 211 110; #M rgb8 187 9 201; #M rgb9 224 62 37; #M rgb10 7 114 128; #P objectname strRange; #P button 461 69 15 0; #P objectname randPh; #N vpatcher 237 101 960 819; #P origin 0 18; #P window setfont "Sans Serif" 9.; #P number 147 76 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0; #P window linecount 1; #N vpatcher 312 265 693 649; #P window setfont "Sans Serif" 9.; #P flonum 92 210 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0; #P window linecount 1; #N vpatcher 15 55 615 496; #P window setfont "Sans Serif" 9.; #P flonum 37 316 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0; #P flonum 18 335 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0; #P flonum 9 252 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0; #P flonum 240 238 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0; #P flonum 17 119 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0; #P window linecount 1; #P newex 214 88 19 9109513 t b; #P outlet 116 278 15 0; #P outlet 96 278 15 0; #P outlet 76 278 15 0; #P outlet 57 278 15 0; #P outlet 37 278 15 0; #P newex 141 232 54 9109513 expr 1./$f1; #P newex 121 211 54 9109513 expr 1./$f1; #P newex 101 254 54 9109513 expr 1./$f1; #P newex 81 232 54 9109513 expr 1./$f1; #P newex 61 211 54 9109513 expr 1./$f1; #P newex 341 110 27 9109513 + 1; #P newex 117 163 34 9109513 gate 2; #P newex 320 134 27 9109513 + 1; #P newex 97 187 34 9109513 gate 2; #P newex 301 110 27 9109513 + 1; #P newex 77 163 34 9109513 gate 2; #P newex 281 134 27 9109513 + 1; #P newex 57 187 34 9109513 gate 2; #P newex 261 110 27 9109513 + 1; #P newex 261 68 93 9109513 unpack 1. 1. 1. 1. 1.; #P newex 37 163 34 9109513 gate 2; #N comlet multiply(0)/divide(1) (list of bool); #P inlet 261 50 15 0; #N comlet HarmNum; #P inlet 61 55 15 0; #P newex 61 108 93 9109513 unpack 1. 1. 1. 1. 1.; #P window linecount 0; #P comment 333 203 100 9109513 if right inlet is 1 then invert the left input; #P connect 4 0 28 0; #P connect 1 0 26 0; #P connect 15 0 29 0; #P fasten 6 0 4 0 266 159 42 159; #P connect 15 0 20 0; #P connect 4 0 20 0; #P connect 15 0 30 0; #P connect 4 0 30 0; #P fasten 8 0 7 0 286 159 62 159; #P connect 7 0 21 0; #P connect 16 0 21 0; #P connect 2 0 1 0; #P connect 25 0 1 0; #P connect 1 0 4 1; #P connect 4 1 15 0; #P connect 9 0 22 0; #P connect 17 0 22 0; #P fasten 10 0 9 0 306 159 82 159; #P connect 1 1 7 1; #P connect 7 1 16 0; #P connect 11 0 23 0; #P connect 18 0 23 0; #P fasten 12 0 11 0 325 159 102 159; #P connect 1 2 9 1; #P connect 9 1 17 0; #P connect 13 0 24 0; #P connect 19 0 24 0; #P fasten 14 0 13 0 346 159 122 159; #P connect 1 3 11 1; #P connect 11 1 18 0; #P connect 1 4 13 1; #P connect 13 1 19 0; #P connect 5 0 25 0; #P connect 6 0 27 0; #P connect 3 0 5 0; #P connect 5 0 6 0; #P connect 5 1 8 0; #P connect 5 2 10 0; #P connect 5 3 12 0; #P connect 5 4 14 0; #P pop; #P newobj 136 187 54 9109513 p unpacker; #N comlet multiply(0)/divide(1) (list of bool); #P inlet 180 151 15 0; #N comlet Fundamental (Hz \, Signal); #P outlet 19 315 15 0; #P newex 19 142 27 9109513 line~; #P newex 19 118 56 9109513 append 100; #P newex 47 87 28 9109513 mtof; #N comlet Fundamental (MIDI # \, int/float); #P inlet 47 54 15 0; #N comlet min5; #P outlet 273 312 15 0; #N comlet min4; #P outlet 231 295 15 0; #N comlet min3; #P outlet 190 310 15 0; #N comlet min2; #P outlet 160 293 15 0; #N comlet min1; #P outlet 119 308 15 0; #P newex 274 268 27 9109513 *~; #P newex 232 268 27 9109513 *~; #P newex 190 268 27 9109513 *~; #P newex 160 268 27 9109513 *~; #P newex 119 268 27 9109513 *~; #N comlet Fundamental (Hz \, float); #P inlet 19 54 15 0; #N comlet HarmNum; #P inlet 136 151 15 0; #P window linecount 3; #P comment 134 32 100 9109513 should i make the slewing logarithmic? mtof~?; #P connect 2 0 15 0; #P connect 14 0 15 0; #P connect 15 0 16 0; #P connect 16 0 17 0; #P connect 13 0 14 0; #P connect 19 0 20 0; #P fasten 16 0 3 0 24 242 124 242; #P connect 3 0 8 0; #P connect 1 0 19 0; #P connect 19 0 3 1; #P fasten 16 0 4 0 24 242 165 242; #P connect 4 0 9 0; #P fasten 19 1 4 1 152 265 182 265; #P connect 18 0 19 1; #P fasten 16 0 5 0 24 242 195 242; #P connect 5 0 10 0; #P fasten 19 2 5 1 163 262 212 262; #P connect 6 0 11 0; #P fasten 16 0 6 0 24 242 237 242; #P fasten 19 3 6 1 174 259 254 259; #P connect 7 0 12 0; #P fasten 16 0 7 0 24 242 279 242; #P fasten 19 4 7 1 185 256 296 256; #P pop; #P newobj 62 119 113 9109513 p carrier+modulator freqs; #N vpatcher 1089 377 1364 629; #P window setfont "Sans Serif" 9.; #N vpatcher 15 55 130 207; #P outlet 6 108 15 0; #P window setfont "Sans Serif" 9.; #P newex 6 80 37 9109513 / 1000.; #P inlet 6 26 15 0; #P newex 6 48 62 9109513 random 1001; #P connect 1 0 0 0; #P connect 0 0 2 0; #P connect 2 0 3 0; #P pop; #P newobj 185 91 34 9109513 p rand; #N vpatcher 15 55 130 207; #P outlet 6 108 15 0; #P window setfont "Sans Serif" 9.; #P newex 6 80 37 9109513 / 1000.; #P inlet 6 26 15 0; #P newex 6 48 62 9109513 random 1001; #P connect 1 0 0 0; #P connect 0 0 2 0; #P connect 2 0 3 0; #P pop; #P newobj 143 91 34 9109513 p rand; #N vpatcher 15 55 130 207; #P outlet 6 108 15 0; #P window setfont "Sans Serif" 9.; #P newex 6 80 37 9109513 / 1000.; #P inlet 6 26 15 0; #P newex 6 48 62 9109513 random 1001; #P connect 1 0 0 0; #P connect 0 0 2 0; #P connect 2 0 3 0; #P pop; #P newobj 102 91 34 9109513 p rand; #N vpatcher 15 55 130 207; #P outlet 6 108 15 0; #P window setfont "Sans Serif" 9.; #P newex 6 80 37 9109513 / 1000.; #P inlet 6 26 15 0; #P newex 6 48 62 9109513 random 1001; #P connect 1 0 0 0; #P connect 0 0 2 0; #P connect 2 0 3 0; #P pop; #P newobj 60 91 34 9109513 p rand; #N vpatcher 15 55 130 207; #P outlet 6 108 15 0; #P window setfont "Sans Serif" 9.; #P newex 6 80 37 9109513 / 1000.; #P inlet 6 26 15 0; #P newex 6 48 62 9109513 random 1001; #P connect 1 0 0 0; #P connect 0 0 2 0; #P connect 2 0 3 0; #P pop; #P newobj 19 91 34 9109513 p rand; #N comlet min5; #P outlet 185 191 15 0; #N comlet min4; #P outlet 143 174 15 0; #N comlet min3; #P outlet 102 189 15 0; #N comlet min2; #P outlet 60 172 15 0; #N comlet min1; #P outlet 19 187 15 0; #N comlet Slew Time; #P inlet 19 49 15 0; #P connect 0 0 6 0; #P connect 6 0 1 0; #P connect 0 0 7 0; #P connect 7 0 2 0; #P connect 0 0 8 0; #P connect 8 0 3 0; #P connect 0 0 9 0; #P connect 9 0 4 0; #P connect 0 0 10 0; #P connect 10 0 5 0; #P pop; #P newobj 605 85 84 9109513 p randomizePhase; #N comlet randomize phase (bang); #P inlet 605 60 15 0; #N comlet multiply/divide (list of bool); #P inlet 119 51 15 0; #N comlet harmonic number (list of ints); #P inlet 99 51 15 0; #N comlet pitch (MIDI # \, int/float); #P inlet 79 51 15 0; #N comlet pitch (Hz \, int/float); #P inlet 58 51 15 0; #N vpatcher 515 155 790 407; #N comlet min5; #P outlet 185 191 15 0; #N comlet min4; #P outlet 143 174 15 0; #N comlet min3; #P outlet 102 189 15 0; #N comlet min2; #P outlet 60 172 15 0; #N comlet min1; #P outlet 19 187 15 0; #P window setfont "Sans Serif" 9.; #N vpatcher 45 330 281 527; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 67 60 28 9109513 mtof; #N comlet min; #P outlet 67 155 15 0; #P window linecount 0; #P newex 67 116 45 9109513 line~ 100; #N comlet range; #P inlet 67 32 15 0; #P inlet 7 31 15 0; #P message 7 77 34 9109513 set \$1; #P newex 67 95 56 9109513 append 100; #P connect 2 0 1 0; #P connect 3 0 6 0; #P connect 1 0 0 0; #P connect 6 0 0 0; #P connect 0 0 4 0; #P connect 4 0 5 0; #P pop; #P newobj 186 147 40 9109513 p mod5; #N vpatcher 45 330 281 527; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 67 63 28 9109513 mtof; #N comlet min; #P outlet 67 155 15 0; #P window linecount 0; #P newex 67 116 45 9109513 line~ 100; #N comlet range; #P inlet 67 32 15 0; #P inlet 7 31 15 0; #P message 7 77 34 9109513 set \$1; #P newex 67 95 56 9109513 append 100; #P connect 2 0 1 0; #P connect 3 0 6 0; #P connect 1 0 0 0; #P connect 6 0 0 0; #P connect 0 0 4 0; #P connect 4 0 5 0; #P pop; #P newobj 144 147 40 9109513 p mod4; #N vpatcher 45 330 281 527; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 67 62 28 9109513 mtof; #N comlet min; #P outlet 67 155 15 0; #P window linecount 0; #P newex 67 116 45 9109513 line~ 100; #N comlet range; #P inlet 67 32 15 0; #P inlet 7 31 15 0; #P message 7 77 34 9109513 set \$1; #P newex 67 95 56 9109513 append 100; #P connect 2 0 1 0; #P connect 3 0 6 0; #P connect 1 0 0 0; #P connect 6 0 0 0; #P connect 0 0 4 0; #P connect 4 0 5 0; #P pop; #P newobj 102 147 40 9109513 p mod3; #N vpatcher 45 330 281 527; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 67 61 28 9109513 mtof; #N comlet min; #P outlet 67 155 15 0; #P window linecount 0; #P newex 67 116 45 9109513 line~ 100; #N comlet range; #P inlet 67 32 15 0; #P inlet 7 31 15 0; #P message 7 77 34 9109513 set \$1; #P newex 67 95 56 9109513 append 100; #P connect 2 0 1 0; #P connect 3 0 6 0; #P connect 1 0 0 0; #P connect 6 0 0 0; #P connect 0 0 4 0; #P connect 4 0 5 0; #P pop; #P newobj 60 147 40 9109513 p mod2; #N vpatcher 45 330 281 581; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 67 65 28 9109513 mtof; #N comlet min; #P outlet 67 155 15 0; #P window linecount 0; #P newex 67 116 45 9109513 line~ 100; #N comlet range; #P inlet 67 32 15 0; #P inlet 7 31 15 0; #P message 7 77 34 9109513 set \$1; #P newex 67 95 56 9109513 append 100; #P connect 2 0 1 0; #P connect 3 0 6 0; #P connect 1 0 0 0; #P connect 6 0 0 0; #P connect 0 0 4 0; #P connect 4 0 5 0; #P pop; #P newobj 19 147 39 9109513 p mod1; #N comlet Slew Time; #P inlet 19 54 15 0; #N comlet Range; #P inlet 48 30 15 0; #P newex 48 81 93 9109513 unpack 1. 1. 1. 1. 1.; #P connect 2 0 3 0; #P connect 3 0 8 0; #P connect 1 0 0 0; #P connect 0 0 3 1; #P fasten 2 0 4 0 24 144 65 144; #P connect 4 0 9 0; #P fasten 0 1 4 1 73 141 95 141; #P fasten 2 0 5 0 24 144 107 144; #P connect 5 0 10 0; #P fasten 0 2 5 1 93 138 137 138; #P connect 6 0 11 0; #P fasten 2 0 6 0 24 144 149 144; #P fasten 0 3 6 1 113 135 179 135; #P connect 7 0 12 0; #P fasten 2 0 7 0 24 144 191 144; #P fasten 0 4 7 1 133 132 221 132; #P pop; #P newobj 341 84 70 9109513 p strLFOspeed; #N comlet Slew Time; #P inlet 416 60 15 0; #N vpatcher 594 88 944 322; #N comlet max5; #P outlet 206 191 15 0; #N comlet min5; #P outlet 176 191 15 0; #N comlet max4; #P outlet 163 175 15 0; #N comlet min4; #P outlet 134 174 15 0; #N comlet max3; #P outlet 122 189 15 0; #N comlet min3; #P outlet 93 189 15 0; #N comlet max2; #P outlet 80 173 15 0; #N comlet min2; #P outlet 51 172 15 0; #N comlet max1; #P outlet 38 188 15 0; #N comlet min1; #P outlet 10 187 15 0; #P window setfont "Sans Serif" 9.; #N vpatcher 45 330 281 527; #N comlet min; #P outlet 149 155 15 0; #P window setfont "Sans Serif" 9.; #P newex 149 116 45 9109513 line~ 100; #P newex 149 95 56 9109513 append 100; #N comlet min; #P outlet 67 155 15 0; #P newex 67 116 45 9109513 line~ 100; #N comlet Center; #P inlet 149 31 15 0; #N comlet range; #P inlet 67 32 15 0; #P inlet 7 31 15 0; #P message 7 77 34 9109513 set \$1; #P newex 67 95 56 9109513 append 100; #P newex 67 74 92 9109513 my.range-center; #P connect 3 0 2 0; #P connect 4 0 0 0; #P connect 2 0 1 0; #P connect 0 0 1 0; #P connect 1 0 6 0; #P connect 6 0 7 0; #P connect 5 0 0 1; #P connect 2 0 8 0; #P connect 0 1 8 0; #P connect 8 0 9 0; #P connect 9 0 10 0; #P pop; #P newobj 177 147 40 9109513 p mod5; #N vpatcher 45 330 281 527; #N comlet min; #P outlet 149 155 15 0; #P window setfont "Sans Serif" 9.; #P newex 149 116 45 9109513 line~ 100; #P newex 149 95 56 9109513 append 100; #N comlet min; #P outlet 67 155 15 0; #P newex 67 116 45 9109513 line~ 100; #N comlet Center; #P inlet 149 31 15 0; #N comlet range; #P inlet 67 32 15 0; #P inlet 7 31 15 0; #P message 7 77 34 9109513 set \$1; #P newex 67 95 56 9109513 append 100; #P newex 67 74 92 9109513 my.range-center; #P connect 3 0 2 0; #P connect 4 0 0 0; #P connect 2 0 1 0; #P connect 0 0 1 0; #P connect 1 0 6 0; #P connect 6 0 7 0; #P connect 5 0 0 1; #P connect 0 1 8 0; #P connect 2 0 8 0; #P connect 8 0 9 0; #P connect 9 0 10 0; #P pop; #P newobj 135 147 40 9109513 p mod4; #N vpatcher 45 330 281 527; #N comlet min; #P outlet 149 155 15 0; #P window setfont "Sans Serif" 9.; #P newex 149 116 45 9109513 line~ 100; #P newex 149 95 56 9109513 append 100; #N comlet min; #P outlet 67 155 15 0; #P newex 67 116 45 9109513 line~ 100; #N comlet Center; #P inlet 149 31 15 0; #N comlet range; #P inlet 67 32 15 0; #P inlet 7 31 15 0; #P message 7 77 34 9109513 set \$1; #P newex 67 95 56 9109513 append 100; #P newex 67 74 92 9109513 my.range-center; #P connect 3 0 2 0; #P connect 4 0 0 0; #P connect 2 0 1 0; #P connect 0 0 1 0; #P connect 1 0 6 0; #P connect 6 0 7 0; #P connect 5 0 0 1; #P connect 0 1 8 0; #P connect 2 0 8 0; #P connect 8 0 9 0; #P connect 9 0 10 0; #P pop; #P newobj 93 147 40 9109513 p mod3; #N vpatcher 45 330 281 527; #N comlet min; #P outlet 149 155 15 0; #P window setfont "Sans Serif" 9.; #P newex 149 116 45 9109513 line~ 100; #P newex 149 95 56 9109513 append 100; #N comlet min; #P outlet 67 155 15 0; #P newex 67 116 45 9109513 line~ 100; #N comlet Center; #P inlet 149 31 15 0; #N comlet range; #P inlet 67 32 15 0; #P inlet 7 31 15 0; #P message 7 77 34 9109513 set \$1; #P newex 67 95 56 9109513 append 100; #P newex 67 74 92 9109513 my.range-center; #P connect 3 0 2 0; #P connect 4 0 0 0; #P connect 2 0 1 0; #P connect 0 0 1 0; #P connect 1 0 6 0; #P connect 6 0 7 0; #P connect 5 0 0 1; #P connect 2 0 8 0; #P connect 0 1 8 0; #P connect 8 0 9 0; #P connect 9 0 10 0; #P pop; #P newobj 51 147 40 9109513 p mod2; #N vpatcher 45 330 281 527; #N comlet min; #P outlet 149 155 15 0; #P window setfont "Sans Serif" 9.; #P newex 149 116 45 9109513 line~ 100; #P newex 149 95 56 9109513 append 100; #N comlet min; #P outlet 67 155 15 0; #P newex 67 116 45 9109513 line~ 100; #N comlet Center; #P inlet 149 31 15 0; #N comlet range; #P inlet 67 32 15 0; #P inlet 7 31 15 0; #P message 7 77 34 9109513 set \$1; #P newex 67 95 56 9109513 append 100; #P newex 67 74 92 9109513 my.range-center; #P connect 3 0 2 0; #P connect 4 0 0 0; #P connect 2 0 1 0; #P connect 0 0 1 0; #P connect 1 0 6 0; #P connect 6 0 7 0; #P connect 5 0 0 1; #P connect 0 1 8 0; #P connect 2 0 8 0; #P connect 8 0 9 0; #P connect 9 0 10 0; #P pop; #P newobj 10 147 39 9109513 p mod1; #N comlet Slew Time; #P inlet 10 54 15 0; #N comlet Center; #P inlet 227 31 15 0; #N comlet Range; #P inlet 24 30 15 0; #P newex 24 81 93 9109513 unpack 1. 1. 1. 1. 1.; #P newex 227 81 93 9109513 unpack 1. 1. 1. 1. 1.; #P connect 4 0 5 0; #P connect 5 0 10 0; #P connect 2 0 1 0; #P connect 1 0 5 1; #P fasten 0 0 5 2 232 129 43 129; #P connect 5 1 11 0; #P fasten 4 0 6 0 15 144 56 144; #P connect 6 0 12 0; #P fasten 1 1 6 1 49 141 71 141; #P connect 6 1 13 0; #P fasten 0 1 6 2 252 126 86 126; #P fasten 4 0 7 0 15 144 98 144; #P connect 7 0 14 0; #P fasten 1 2 7 1 69 138 113 138; #P connect 7 1 15 0; #P fasten 0 2 7 2 272 123 128 123; #P connect 8 0 16 0; #P fasten 4 0 8 0 15 144 140 144; #P fasten 1 3 8 1 89 135 155 135; #P connect 8 1 17 0; #P fasten 0 3 8 2 292 120 170 120; #P connect 9 0 18 0; #P fasten 4 0 9 0 15 144 182 144; #P fasten 1 4 9 1 109 132 197 132; #P connect 9 1 19 0; #P fasten 0 4 9 2 312 117 212 117; #P connect 3 0 0 0; #P pop; #P newobj 416 84 175 9109513 p strLFOminMax; #N comlet Modulation Strength LFO Speed; #P inlet 401 60 15 0; #N comlet Modulation Strength LFO Center; #P inlet 580 60 15 0; #N comlet Modulation Strength LFO Range; #P inlet 498 60 15 0; #P outlet 383 688 15 0; #P outlet 324 688 15 0; #N vpatcher 15 55 227 334; #N comlet phase offset output; #P outlet 70 218 15 0; #N comlet 0 phase output; #P outlet 22 218 15 0; #N comlet max (sig); #P inlet 157 34 15 0; #N comlet min (sig); #P inlet 115 34 15 0; #N comlet phase offset; #P inlet 88 34 15 0; #P window setfont "Sans Serif" 9.; #P window linecount 1; #N vpatcher 534 100 993 385; #P outlet 47 252 15 0; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 47 164 27 9109513 *~; #P newex 47 202 27 9109513 +~; #P outlet 89 252 15 0; #P newex 152 175 27 9109513 +~; #P newex 89 164 27 9109513 *~; #P window linecount 2; #P comment 300 188 91 9109513 scaler coefficient = 0.5 * (max-min); #P comment 301 223 91 9109513 adding constant = scaler/2+min; #P window linecount 1; #P newex 152 131 33 9109513 *~ 0.5; #P newex 89 202 27 9109513 +~; #P window linecount 6; #P comment 300 92 91 9109513 first scale the inputs to have the right range \, then add a constant that brings the wave to the right scale; #P window linecount 1; #P newex 152 104 27 9109513 -~; #N comlet max out; #P inlet 227 49 15 0; #N comlet min out; #P inlet 185 49 15 0; #N comlet input 2; #P inlet 89 50 15 0; #N comlet input 1; #P inlet 47 50 15 0; #P window linecount 2; #P comment 300 54 91 9109513 assumes oth inputs are (-1 \, 1); #P connect 1 0 15 0; #P connect 15 0 14 0; #P connect 14 0 16 0; #P fasten 8 0 15 1 157 154 69 154; #P fasten 12 0 14 1 157 197 69 197; #P connect 2 0 11 0; #P connect 11 0 7 0; #P connect 7 0 13 0; #P fasten 8 0 11 1 157 154 111 154; #P fasten 12 0 7 1 157 197 111 197; #P fasten 4 0 5 0 232 89 157 89; #P connect 5 0 8 0; #P connect 8 0 12 0; #P fasten 3 0 5 1 190 96 174 96; #P fasten 3 0 12 1 190 167 174 167; #P pop; #P newobj 22 159 58 9109513 p dual scale; #P newex 38 93 60 9109513 cycle~ 1 0.5; #N comlet frequency; #P inlet 22 33 15 0; #P window linecount 0; #P newex 22 66 44 9109513 cycle~ 1; #P connect 1 0 0 0; #P connect 0 0 3 0; #P connect 3 0 7 0; #P fasten 1 0 2 0 27 58 43 58; #P connect 2 0 3 1; #P fasten 5 0 3 2 120 138 116 138 59 138; #P fasten 6 0 3 3 162 149 75 149; #P connect 3 1 8 0; #P connect 4 0 2 1; #P pop; #P newobj 644 246 64 9109513 p phasedLFO; #N vpatcher 25 70 163 288; #P outlet 8 175 15 0; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 8 144 27 9109513 *~; #P window linecount 0; #N vpatcher 335 374 495 695; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 82 162 27 9109513 +~ 1; #P newex 82 132 28 9109513 *~ -1; #N comlet; #P outlet 31 230 15 0; #P newex 31 189 27 9109513 +~; #P window linecount 0; #P newex 31 155 27 9109513 *~; #N comlet scale input from this number to 1; #P inlet 82 52 15 0; #N comlet signal in; #P inlet 31 52 15 0; #P connect 0 0 2 0; #P connect 2 0 3 0; #P connect 3 0 4 0; #P fasten 1 0 2 1 87 119 53 119; #P connect 6 0 3 1; #P connect 1 0 5 0; #P connect 5 0 6 0; #P pop; #P newobj 25 112 59 9109513 p am.scale~; #N comlet AM amount: 1=ringmod \; 0=no modulation; #P inlet 74 32 15 0; #N comlet modulator; #P inlet 25 32 15 0; #N comlet carrier; #P inlet 8 32 15 0; #P connect 0 0 4 0; #P connect 4 0 5 0; #P connect 1 0 3 0; #P connect 3 0 4 1; #P connect 2 0 3 1; #P pop; #P newobj 383 650 40 9109513 p AM; #N vpatcher 25 70 163 288; #P outlet 8 175 15 0; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 8 144 27 9109513 *~; #P window linecount 0; #N vpatcher 335 374 495 695; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 82 162 27 9109513 +~ 1; #P newex 82 132 28 9109513 *~ -1; #N comlet; #P outlet 31 230 15 0; #P newex 31 189 27 9109513 +~; #P window linecount 0; #P newex 31 155 27 9109513 *~; #N comlet scale input from this number to 1; #P inlet 82 52 15 0; #N comlet signal in; #P inlet 31 52 15 0; #P connect 0 0 2 0; #P connect 2 0 3 0; #P connect 3 0 4 0; #P fasten 1 0 2 1 87 119 53 119; #P connect 6 0 3 1; #P connect 1 0 5 0; #P connect 5 0 6 0; #P pop; #P newobj 25 112 59 9109513 p am.scale~; #N comlet AM amount: 1=ringmod \; 0=no modulation; #P inlet 74 32 15 0; #N comlet modulator; #P inlet 25 32 15 0; #N comlet carrier; #P inlet 8 32 15 0; #P connect 0 0 4 0; #P connect 4 0 5 0; #P connect 1 0 3 0; #P connect 3 0 4 1; #P connect 2 0 3 1; #P pop; #P newobj 324 650 40 9109513 p AM; #P newex 339 603 40 9109513 tri~; #N vpatcher 15 55 227 334; #N comlet phase offset output; #P outlet 70 218 15 0; #N comlet 0 phase output; #P outlet 22 218 15 0; #N comlet max (sig); #P inlet 157 34 15 0; #N comlet min (sig); #P inlet 115 34 15 0; #N comlet phase offset; #P inlet 88 34 15 0; #P window setfont "Sans Serif" 9.; #P window linecount 1; #N vpatcher 534 100 993 385; #P outlet 47 252 15 0; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 47 164 27 9109513 *~; #P newex 47 202 27 9109513 +~; #P outlet 89 252 15 0; #P newex 152 175 27 9109513 +~; #P newex 89 164 27 9109513 *~; #P window linecount 2; #P comment 300 188 91 9109513 scaler coefficient = 0.5 * (max-min); #P comment 301 223 91 9109513 adding constant = scaler/2+min; #P window linecount 1; #P newex 152 131 33 9109513 *~ 0.5; #P newex 89 202 27 9109513 +~; #P window linecount 6; #P comment 300 92 91 9109513 first scale the inputs to have the right range \, then add a constant that brings the wave to the right scale; #P window linecount 1; #P newex 152 104 27 9109513 -~; #N comlet max out; #P inlet 227 49 15 0; #N comlet min out; #P inlet 185 49 15 0; #N comlet input 2; #P inlet 89 50 15 0; #N comlet input 1; #P inlet 47 50 15 0; #P window linecount 2; #P comment 300 54 91 9109513 assumes oth inputs are (-1 \, 1); #P connect 1 0 15 0; #P connect 15 0 14 0; #P connect 14 0 16 0; #P fasten 8 0 15 1 157 154 69 154; #P fasten 12 0 14 1 157 197 69 197; #P connect 2 0 11 0; #P connect 11 0 7 0; #P connect 7 0 13 0; #P fasten 8 0 11 1 157 154 111 154; #P fasten 12 0 7 1 157 197 111 197; #P fasten 4 0 5 0 232 89 157 89; #P connect 5 0 8 0; #P connect 8 0 12 0; #P fasten 3 0 5 1 190 96 174 96; #P fasten 3 0 12 1 190 167 174 167; #P pop; #P newobj 22 159 58 9109513 p dual scale; #P newex 38 93 60 9109513 cycle~ 1 0.5; #N comlet frequency; #P inlet 22 33 15 0; #P window linecount 0; #P newex 22 66 44 9109513 cycle~ 1; #P connect 1 0 0 0; #P connect 0 0 3 0; #P connect 3 0 7 0; #P fasten 1 0 2 0 27 58 43 58; #P connect 2 0 3 1; #P fasten 5 0 3 2 120 138 116 138 59 138; #P fasten 6 0 3 3 162 149 75 149; #P connect 3 1 8 0; #P connect 4 0 2 1; #P pop; #P newobj 578 246 64 9109513 p phasedLFO; #N vpatcher 25 70 163 288; #P outlet 8 175 15 0; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 8 144 27 9109513 *~; #P window linecount 0; #N vpatcher 335 374 495 695; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 82 162 27 9109513 +~ 1; #P newex 82 132 28 9109513 *~ -1; #N comlet; #P outlet 31 230 15 0; #P newex 31 189 27 9109513 +~; #P window linecount 0; #P newex 31 155 27 9109513 *~; #N comlet scale input from this number to 1; #P inlet 82 52 15 0; #N comlet signal in; #P inlet 31 52 15 0; #P connect 0 0 2 0; #P connect 2 0 3 0; #P connect 3 0 4 0; #P fasten 1 0 2 1 87 119 53 119; #P connect 6 0 3 1; #P connect 1 0 5 0; #P connect 5 0 6 0; #P pop; #P newobj 25 112 59 9109513 p am.scale~; #N comlet AM amount: 1=ringmod \; 0=no modulation; #P inlet 74 32 15 0; #N comlet modulator; #P inlet 25 32 15 0; #N comlet carrier; #P inlet 8 32 15 0; #P connect 0 0 4 0; #P connect 4 0 5 0; #P connect 1 0 3 0; #P connect 3 0 4 1; #P connect 2 0 3 1; #P pop; #P newobj 383 570 40 9109513 p AM; #N vpatcher 25 70 163 288; #P outlet 8 175 15 0; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 8 144 27 9109513 *~; #P window linecount 0; #N vpatcher 335 374 495 695; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 82 162 27 9109513 +~ 1; #P newex 82 132 28 9109513 *~ -1; #N comlet; #P outlet 31 230 15 0; #P newex 31 189 27 9109513 +~; #P window linecount 0; #P newex 31 155 27 9109513 *~; #N comlet scale input from this number to 1; #P inlet 82 52 15 0; #N comlet signal in; #P inlet 31 52 15 0; #P connect 0 0 2 0; #P connect 2 0 3 0; #P connect 3 0 4 0; #P fasten 1 0 2 1 87 119 53 119; #P connect 6 0 3 1; #P connect 1 0 5 0; #P connect 5 0 6 0; #P pop; #P newobj 25 112 59 9109513 p am.scale~; #N comlet AM amount: 1=ringmod \; 0=no modulation; #P inlet 75 32 15 0; #N comlet modulator; #P inlet 25 32 15 0; #N comlet carrier; #P inlet 8 32 15 0; #P connect 0 0 4 0; #P connect 4 0 5 0; #P connect 1 0 3 0; #P connect 3 0 4 1; #P connect 2 0 3 1; #P pop; #P newobj 324 570 40 9109513 p AM; #P newex 339 523 40 9109513 tri~; #N vpatcher 15 55 227 334; #N comlet phase offset output; #P outlet 70 218 15 0; #N comlet 0 phase output; #P outlet 22 218 15 0; #N comlet max (sig); #P inlet 157 34 15 0; #N comlet min (sig); #P inlet 115 34 15 0; #N comlet phase offset; #P inlet 88 34 15 0; #P window setfont "Sans Serif" 9.; #P window linecount 1; #N vpatcher 534 100 993 385; #P outlet 47 252 15 0; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 47 164 27 9109513 *~; #P newex 47 202 27 9109513 +~; #P outlet 89 252 15 0; #P newex 152 175 27 9109513 +~; #P newex 89 164 27 9109513 *~; #P window linecount 2; #P comment 300 188 91 9109513 scaler coefficient = 0.5 * (max-min); #P comment 301 223 91 9109513 adding constant = scaler/2+min; #P window linecount 1; #P newex 152 131 33 9109513 *~ 0.5; #P newex 89 202 27 9109513 +~; #P window linecount 6; #P comment 300 92 91 9109513 first scale the inputs to have the right range \, then add a constant that brings the wave to the right scale; #P window linecount 1; #P newex 152 104 27 9109513 -~; #N comlet max out; #P inlet 227 49 15 0; #N comlet min out; #P inlet 185 49 15 0; #N comlet input 2; #P inlet 89 50 15 0; #N comlet input 1; #P inlet 47 50 15 0; #P window linecount 2; #P comment 300 54 91 9109513 assumes oth inputs are (-1 \, 1); #P connect 1 0 15 0; #P connect 15 0 14 0; #P connect 14 0 16 0; #P fasten 8 0 15 1 157 154 69 154; #P fasten 12 0 14 1 157 197 69 197; #P connect 2 0 11 0; #P connect 11 0 7 0; #P connect 7 0 13 0; #P fasten 8 0 11 1 157 154 111 154; #P fasten 12 0 7 1 157 197 111 197; #P fasten 4 0 5 0 232 89 157 89; #P connect 5 0 8 0; #P connect 8 0 12 0; #P fasten 3 0 5 1 190 96 174 96; #P fasten 3 0 12 1 190 167 174 167; #P pop; #P newobj 22 159 58 9109513 p dual scale; #P newex 38 93 60 9109513 cycle~ 1 0.5; #N comlet frequency; #P inlet 22 33 15 0; #P window linecount 0; #P newex 22 66 44 9109513 cycle~ 1; #P connect 1 0 0 0; #P connect 0 0 3 0; #P connect 3 0 7 0; #P fasten 1 0 2 0 27 58 43 58; #P connect 2 0 3 1; #P fasten 5 0 3 2 120 138 116 138 59 138; #P fasten 6 0 3 3 162 149 75 149; #P connect 3 1 8 0; #P connect 4 0 2 1; #P pop; #P newobj 512 246 64 9109513 p phasedLFO; #N vpatcher 25 70 163 288; #P outlet 8 175 15 0; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 8 144 27 9109513 *~; #P window linecount 0; #N vpatcher 335 374 495 695; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 82 162 27 9109513 +~ 1; #P newex 82 132 28 9109513 *~ -1; #N comlet; #P outlet 31 230 15 0; #P newex 31 189 27 9109513 +~; #P window linecount 0; #P newex 31 155 27 9109513 *~; #N comlet scale input from this number to 1; #P inlet 82 52 15 0; #N comlet signal in; #P inlet 31 52 15 0; #P connect 0 0 2 0; #P connect 2 0 3 0; #P connect 3 0 4 0; #P fasten 1 0 2 1 87 119 53 119; #P connect 6 0 3 1; #P connect 1 0 5 0; #P connect 5 0 6 0; #P pop; #P newobj 25 112 59 9109513 p am.scale~; #N comlet AM amount: 1=ringmod \; 0=no modulation; #P inlet 74 32 15 0; #N comlet modulator; #P inlet 25 32 15 0; #N comlet carrier; #P inlet 8 32 15 0; #P connect 0 0 4 0; #P connect 4 0 5 0; #P connect 1 0 3 0; #P connect 3 0 4 1; #P connect 2 0 3 1; #P pop; #P newobj 383 494 40 9109513 p AM; #N vpatcher 25 70 163 288; #P outlet 8 175 15 0; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 8 144 27 9109513 *~; #P window linecount 0; #N vpatcher 335 374 495 695; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 82 162 27 9109513 +~ 1; #P newex 82 132 28 9109513 *~ -1; #N comlet; #P outlet 31 230 15 0; #P newex 31 189 27 9109513 +~; #P window linecount 0; #P newex 31 155 27 9109513 *~; #N comlet scale input from this number to 1; #P inlet 82 52 15 0; #N comlet signal in; #P inlet 31 52 15 0; #P connect 0 0 2 0; #P connect 2 0 3 0; #P connect 3 0 4 0; #P fasten 1 0 2 1 87 119 53 119; #P connect 6 0 3 1; #P connect 1 0 5 0; #P connect 5 0 6 0; #P pop; #P newobj 25 112 59 9109513 p am.scale~; #N comlet AM amount: 1=ringmod \; 0=no modulation; #P inlet 74 32 15 0; #N comlet modulator; #P inlet 25 32 15 0; #N comlet carrier; #P inlet 8 32 15 0; #P connect 0 0 4 0; #P connect 4 0 5 0; #P connect 1 0 3 0; #P connect 3 0 4 1; #P connect 2 0 3 1; #P pop; #P newobj 324 494 40 9109513 p AM; #P newex 339 447 40 9109513 tri~; #N vpatcher 15 55 227 334; #N comlet phase offset output; #P outlet 70 218 15 0; #N comlet 0 phase output; #P outlet 22 218 15 0; #N comlet max (sig); #P inlet 157 34 15 0; #N comlet min (sig); #P inlet 115 34 15 0; #N comlet phase offset; #P inlet 88 34 15 0; #P window setfont "Sans Serif" 9.; #P window linecount 1; #N vpatcher 534 100 993 385; #P outlet 47 252 15 0; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 47 164 27 9109513 *~; #P newex 47 202 27 9109513 +~; #P outlet 89 252 15 0; #P newex 152 175 27 9109513 +~; #P newex 89 164 27 9109513 *~; #P window linecount 2; #P comment 300 188 91 9109513 scaler coefficient = 0.5 * (max-min); #P comment 301 223 91 9109513 adding constant = scaler/2+min; #P window linecount 1; #P newex 152 131 33 9109513 *~ 0.5; #P newex 89 202 27 9109513 +~; #P window linecount 6; #P comment 300 92 91 9109513 first scale the inputs to have the right range \, then add a constant that brings the wave to the right scale; #P window linecount 1; #P newex 152 104 27 9109513 -~; #N comlet max out; #P inlet 227 49 15 0; #N comlet min out; #P inlet 185 49 15 0; #N comlet input 2; #P inlet 89 50 15 0; #N comlet input 1; #P inlet 47 50 15 0; #P window linecount 2; #P comment 300 54 91 9109513 assumes oth inputs are (-1 \, 1); #P connect 1 0 15 0; #P connect 15 0 14 0; #P connect 14 0 16 0; #P fasten 8 0 15 1 157 154 69 154; #P fasten 12 0 14 1 157 197 69 197; #P connect 2 0 11 0; #P connect 11 0 7 0; #P connect 7 0 13 0; #P fasten 8 0 11 1 157 154 111 154; #P fasten 12 0 7 1 157 197 111 197; #P fasten 4 0 5 0 232 89 157 89; #P connect 5 0 8 0; #P connect 8 0 12 0; #P fasten 3 0 5 1 190 96 174 96; #P fasten 3 0 12 1 190 167 174 167; #P pop; #P newobj 22 159 58 9109513 p dual scale; #P newex 38 93 60 9109513 cycle~ 1 0.5; #N comlet frequency; #P inlet 22 33 15 0; #P window linecount 0; #P newex 22 66 44 9109513 cycle~ 1; #P connect 1 0 0 0; #P connect 0 0 3 0; #P connect 3 0 7 0; #P fasten 1 0 2 0 27 58 43 58; #P connect 2 0 3 1; #P fasten 5 0 3 2 120 138 116 138 59 138; #P fasten 6 0 3 3 162 149 75 149; #P connect 3 1 8 0; #P connect 4 0 2 1; #P pop; #P newobj 446 246 64 9109513 p phasedLFO; #N vpatcher 25 70 163 288; #P outlet 8 175 15 0; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 8 144 27 9109513 *~; #P window linecount 0; #N vpatcher 335 374 495 695; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 82 162 27 9109513 +~ 1; #P newex 82 132 28 9109513 *~ -1; #N comlet; #P outlet 31 230 15 0; #P newex 31 189 27 9109513 +~; #P window linecount 0; #P newex 31 155 27 9109513 *~; #N comlet scale input from this number to 1; #P inlet 82 52 15 0; #N comlet signal in; #P inlet 31 52 15 0; #P connect 0 0 2 0; #P connect 2 0 3 0; #P connect 3 0 4 0; #P fasten 1 0 2 1 87 119 53 119; #P connect 6 0 3 1; #P connect 1 0 5 0; #P connect 5 0 6 0; #P pop; #P newobj 25 112 59 9109513 p am.scale~; #N comlet AM amount: 1=ringmod \; 0=no modulation; #P inlet 74 32 15 0; #N comlet modulator; #P inlet 25 32 15 0; #N comlet carrier; #P inlet 8 32 15 0; #P connect 0 0 4 0; #P connect 4 0 5 0; #P connect 1 0 3 0; #P connect 3 0 4 1; #P connect 2 0 3 1; #P pop; #P newobj 383 414 40 9109513 p AM; #N vpatcher 25 70 338 383; #P window setfont "Sans Serif" 9.; #P user number~ 106 98 145 113 9 139 3 2 0. 0. 0 0. 250 0. 0 0 0 221 221 221 222 222 222 0 0 0; #P user scope~ 65 160 195 290 256 3 128 -1. 1. 0 0. 0 0. 102 255 51 135 135 135 0; #P outlet 8 175 15 0; #P window linecount 1; #P newex 8 144 27 9109513 *~; #P window linecount 0; #N vpatcher 335 374 495 695; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 82 162 27 9109513 +~ 1; #P newex 82 132 28 9109513 *~ -1; #N comlet; #P outlet 31 230 15 0; #P newex 31 189 27 9109513 +~; #P window linecount 0; #P newex 31 155 27 9109513 *~; #N comlet scale input from this number to 1; #P inlet 82 52 15 0; #N comlet signal in; #P inlet 31 52 15 0; #P connect 0 0 2 0; #P connect 2 0 3 0; #P connect 3 0 4 0; #P fasten 1 0 2 1 87 119 53 119; #P connect 6 0 3 1; #P connect 1 0 5 0; #P connect 5 0 6 0; #P pop; #P newobj 25 112 59 9109513 p am.scale~; #N comlet AM amount: 1=ringmod \; 0=no modulation; #P inlet 74 32 15 0; #N comlet modulator; #P inlet 25 32 15 0; #N comlet carrier; #P inlet 8 32 15 0; #P connect 0 0 4 0; #P connect 4 0 5 0; #P connect 1 0 3 0; #P connect 3 0 4 1; #P connect 3 0 6 0; #P connect 2 0 3 1; #P pop; #P newobj 324 414 40 9109513 p AM; #P newex 339 367 40 9109513 tri~; #N vpatcher 15 55 227 334; #N comlet phase offset output; #P outlet 70 218 15 0; #N comlet 0 phase output; #P outlet 22 218 15 0; #N comlet max (sig); #P inlet 157 34 15 0; #N comlet min (sig); #P inlet 115 34 15 0; #N comlet phase offset; #P inlet 88 34 15 0; #P window setfont "Sans Serif" 9.; #P window linecount 1; #N vpatcher 534 100 993 385; #P outlet 47 252 15 0; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 47 164 27 9109513 *~; #P newex 47 202 27 9109513 +~; #P outlet 89 252 15 0; #P newex 152 175 27 9109513 +~; #P newex 89 164 27 9109513 *~; #P window linecount 2; #P comment 300 188 91 9109513 scaler coefficient = 0.5 * (max-min); #P window linecount 6; #P comment 301 223 91 9109513 adding constant = scaler/2+min; #P window linecount 1; #P newex 152 131 33 9109513 *~ 0.5; #P newex 89 202 27 9109513 +~; #P window linecount 2; #P comment 300 92 91 9109513 first scale the inputs to have the right range \, then add a constant that brings the wave to the right scale; #P window linecount 0; #P newex 152 104 27 9109513 -~; #N comlet max out; #P inlet 227 49 15 0; #N comlet min out; #P inlet 185 49 15 0; #N comlet input 2; #P inlet 89 50 15 0; #N comlet input 1; #P inlet 47 50 15 0; #P comment 300 54 91 9109513 assumes oth inputs are (-1 \, 1); #P connect 1 0 15 0; #P connect 15 0 14 0; #P connect 14 0 16 0; #P fasten 8 0 15 1 157 154 69 154; #P fasten 12 0 14 1 157 197 69 197; #P connect 2 0 11 0; #P connect 11 0 7 0; #P connect 7 0 13 0; #P fasten 8 0 11 1 157 154 111 154; #P fasten 12 0 7 1 157 197 111 197; #P fasten 4 0 5 0 232 89 157 89; #P connect 5 0 8 0; #P connect 8 0 12 0; #P fasten 3 0 5 1 190 96 174 96; #P fasten 3 0 12 1 190 167 174 167; #P pop; #P newobj 22 159 58 9109513 p dual scale; #P newex 38 93 60 9109513 cycle~ 1 0.5; #N comlet frequency; #P inlet 22 33 15 0; #P window linecount 0; #P newex 22 66 44 9109513 cycle~ 1; #P connect 1 0 0 0; #P connect 0 0 3 0; #P connect 3 0 7 0; #P fasten 1 0 2 0 27 58 43 58; #P connect 2 0 3 1; #P fasten 5 0 3 2 120 138 116 138 59 138; #P fasten 6 0 3 3 162 149 75 149; #P connect 3 1 8 0; #P connect 4 0 2 1; #P pop; #P newobj 380 246 64 9109513 p phasedLFO; #N vpatcher 25 70 400 378; #P outlet 77 207 15 0; #P window setfont "Sans Serif" 9.; #P newex 77 176 27 9109513 *~; #N vpatcher 335 374 495 695; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 82 162 27 9109513 +~ 1; #P newex 82 132 28 9109513 *~ -1; #N comlet; #P outlet 31 230 15 0; #P newex 31 189 27 9109513 +~; #P window linecount 0; #P newex 31 155 27 9109513 *~; #N comlet scale input from this number to 1; #P inlet 82 52 15 0; #N comlet signal in; #P inlet 31 52 15 0; #P connect 0 0 2 0; #P connect 2 0 3 0; #P connect 3 0 4 0; #P fasten 1 0 2 1 87 119 53 119; #P connect 6 0 3 1; #P connect 1 0 5 0; #P connect 5 0 6 0; #P pop; #P newobj 94 112 59 9109513 p am.scale~; #N comlet AM amount2: 1=ringmod \; 0=no modulation; #P inlet 143 33 15 0; #P outlet 8 207 15 0; #P newex 8 176 27 9109513 *~; #N vpatcher 335 374 495 695; #P window setfont "Sans Serif" 9.; #P window linecount 1; #P newex 82 162 27 9109513 +~ 1; #P newex 82 132 28 9109513 *~ -1; #N comlet; #P outlet 31 230 15 0; #P newex 31 189 27 9109513 +~; #P window linecount 0; #P newex 31 155 27 9109513 *~; #N comlet scale input from this number to 1; #P inlet 82 52 15 0; #N comlet signal in; #P inlet 31 52 15 0; #P connect 0 0 2 0; #P connect 2 0 3 0; #P connect 3 0 4 0; #P fasten 1 0 2 1 87 119 53 119; #P connect 6 0 3 1; #P connect 1 0 5 0; #P connect 5 0 6 0; #P pop; #P newobj 25 112 59 9109513 p am.scale~; #N comlet AM amount1: 1=ringmod \; 0=no modulation; #P inlet 74 33 15 0; #N comlet modulator; #P inlet 25 32 15 0; #N comlet carrier; #P inlet 8 32 15 0; #P connect 0 0 4 0; #P connect 4 0 5 0; #P connect 1 0 3 0; #P connect 3 0 4 1; #P connect 2 0 3 1; #P fasten 0 0 8 0 13 159 82 159; #P connect 8 0 9 0; #P fasten 1 0 7 0 30 83 99 83; #P connect 7 0 8 1; #P connect 6 0 7 1; #P pop; #P newobj 324 328 69 9109513 p dual-AM; #P newex 343 283 40 9109513 tri~; #P newex 324 246 40 9109513 tri~; #P window linecount 7; #P comment 21 592 88 9109513 make the gui params are - fundamental frequency - modulator numers - strength lfo rate and range; #P connect 29 0 35 0; #P connect 30 0 35 1; #P connect 31 0 35 2; #P connect 30 0 36 0; #P connect 32 0 35 3; #P fasten 35 0 1 0 67 239 329 239; #P connect 1 0 3 0; #P connect 3 0 6 0; #P connect 6 0 10 0; #P connect 10 0 14 0; #P connect 14 0 18 0; #P connect 18 0 21 0; #P fasten 35 2 5 0 107 356 344 356; #P connect 5 0 6 1; #P fasten 35 3 9 0 127 439 344 439; #P connect 9 0 10 1; #P fasten 35 4 13 0 147 517 344 517; #P connect 13 0 14 1; #P fasten 35 5 17 0 167 594 344 594; #P connect 17 0 18 1; #P connect 27 0 28 0; #P fasten 35 1 2 0 87 274 348 274; #P connect 2 0 3 1; #P fasten 8 0 6 2 451 392 359 392; #P fasten 12 0 10 2 517 472 359 472; #P fasten 16 0 14 2 583 548 359 548; #P fasten 20 0 18 2 649 628 359 628; #P fasten 4 0 3 2 385 308 367 308; #P fasten 28 0 4 0 346 153 385 153; #P fasten 4 1 3 3 439 317 386 317; #P connect 3 1 7 0; #P connect 7 0 11 0; #P connect 11 0 15 0; #P connect 15 0 19 0; #P connect 19 0 22 0; #P fasten 34 0 4 1 610 154 403 154; #P fasten 5 0 7 1 344 400 403 400; #P fasten 9 0 11 1 344 480 403 480; #P fasten 13 0 15 1 344 556 403 556; #P fasten 17 0 19 1 344 636 403 636; #P connect 25 0 28 1; #P fasten 8 1 7 2 505 405 418 405; #P fasten 12 1 11 2 571 485 418 485; #P fasten 16 1 15 2 637 561 418 561; #P fasten 20 1 19 2 703 641 418 641; #P connect 27 0 26 0; #P connect 26 0 4 2; #P connect 26 1 4 3; #P fasten 28 1 8 0 361 150 451 150; #P fasten 34 1 8 1 628 157 469 157; #P fasten 26 2 8 2 457 138 487 138; #P connect 23 0 26 1; #P fasten 26 3 8 3 475 135 505 135; #P fasten 28 2 12 0 376 147 517 147; #P fasten 34 2 12 1 646 160 535 160; #P fasten 26 4 12 2 493 132 553 132; #P fasten 26 5 12 3 511 129 571 129; #P fasten 28 3 16 0 391 144 583 144; #P connect 24 0 26 2; #P fasten 34 3 16 1 664 163 601 163; #P connect 33 0 34 0; #P fasten 26 6 16 2 529 126 619 126; #P fasten 26 7 16 3 547 123 637 123; #P fasten 28 4 20 0 406 141 649 141; #P fasten 34 4 20 1 682 166 667 166; #P fasten 26 8 20 2 565 120 685 120; #P fasten 26 9 20 3 583 117 703 117; #P pop; #P newobj 375 255 204 9109513 p dirty work; #P comment 477 69 100 9109513 randomize phase; #P user panel 228 0 233 61; #X brgb 125 219 221; #X frgb 0 0 0; #X border 1; #X rounded 0; #X shadow 0; #X done; #P hidden connect 49 0 19 0; #P hidden connect 12 0 26 0; #P hidden connect 26 0 27 0; #P hidden connect 49 1 21 0; #P hidden connect 26 1 28 0; #P hidden connect 61 0 60 0; #P hidden connect 60 0 59 0; #P hidden connect 65 0 43 0; #P hidden connect 59 0 43 0; #P hidden connect 48 0 43 0; #P hidden connect 47 0 43 0; #P hidden connect 46 0 43 0; #P hidden connect 45 0 43 0; #P hidden connect 44 0 43 0; #P hidden connect 54 0 43 0; #P hidden connect 55 0 43 0; #P hidden connect 56 0 43 0; #P hidden connect 57 0 43 0; #P hidden connect 58 0 43 0; #P hidden connect 43 0 40 0; #P hidden connect 49 2 22 0; #P hidden connect 20 0 33 0; #P hidden connect 23 0 33 0; #P hidden connect 22 0 33 0; #P hidden connect 21 0 33 0; #P hidden connect 26 2 29 0; #P hidden connect 43 1 41 0; #P hidden connect 60 0 44 0; #P hidden connect 49 3 23 0; #P hidden connect 60 0 45 0; #P hidden connect 26 3 30 0; #P hidden connect 43 2 34 0; #P hidden connect 60 0 54 0; #P hidden connect 49 4 20 0; #P hidden connect 43 3 35 0; #P hidden connect 26 4 31 0; #P hidden connect 43 4 36 0; #P hidden connect 19 0 32 0; #P hidden connect 33 0 32 0; #P hidden connect 60 0 55 0; #P hidden connect 21 0 32 1; #P hidden connect 43 5 37 0; #P hidden connect 22 0 32 2; #P hidden connect 43 6 42 0; #P hidden connect 23 0 32 3; #P hidden connect 20 0 32 4; #P hidden connect 60 0 56 0; #P hidden connect 43 7 38 0; #P hidden connect 60 0 48 0; #P hidden connect 43 8 39 0; #P hidden connect 60 0 46 0; #P hidden connect 60 0 47 0; #P hidden connect 17 0 18 0; #P hidden connect 18 0 13 0; #P hidden connect 60 0 57 0; #P hidden connect 43 9 50 0; #P hidden fasten 14 0 17 0 358 62 344 62 344 -21 280 -21; #P hidden connect 43 10 52 0; #P hidden connect 43 11 51 0; #P hidden connect 60 0 58 0; #P hidden connect 43 12 53 0; #P hidden fasten 13 0 15 0 258 64 241 64 241 -28 358 -28; #P hidden connect 15 0 16 0; #P hidden connect 16 0 14 0; #P connect 14 0 62 0; #P hidden fasten 13 0 2 0 258 252 380 252; #P connect 2 0 63 0; #P hidden fasten 14 0 2 1 358 249 404 249; #P hidden fasten 12 0 2 2 43 246 428 246; #P hidden fasten 32 0 2 3 164 243 452 243; #P hidden fasten 9 0 2 4 400 240 476 240; #P hidden fasten 10 0 2 5 198 231 500 231; #P hidden fasten 4 0 2 6 164 234 524 234; #P hidden fasten 5 0 2 7 282 237 548 237; #P hidden fasten 3 0 2 8 466 228 572 228; #P connect 2 1 64 0; #P pop; #P newobj 137 269 65 9109513 p amulator_tri; #P newex 203 92 28 9109513 sel 1; #N comlet R out; #P outlet 163 375 15 0; #N comlet L out; #P outlet 140 375 15 0; #P button 259 130 15 0; #P comment 245 103 100 9109513 dump; #P button 381 127 15 0; #N vpatcher 364 202 1045 602; #P origin 44 0; #P button 572 47 15 0; #P window setfont "Sans Serif" 9.; #P window linecount 1; #N vpatcher 15 55 615 782; #P origin 0 32; #P window setfont "Sans Serif" 9.; #P newex 18 442 48 9109513 zl group 2; #P message 16 52 31 9109513 81 0 82 0 83 0 84 0 85 0 86 0 87 0 88 0 89 0 90 0 91 0 92 0 93 0 94 0 95 0 96 0 97 0 98 0 99 0 100 0 101 0 102 0 103 0 104 0 105 0 106 0 107 0 108 0; #N comlet to coll; #P outlet 16 468 15 0; #N comlet bang; #P inlet 16 25 15 0; #P connect 0 0 2 0; #P connect 3 0 1 0; #P connect 2 0 3 0; #P pop; #P newobj 556 101 46 9109513 p intialize; #P message 539 136 28 9109513 clear; #N comlet bang to intialize; #P inlet 554 65 15 0; #N comlet bang to randomize; #P inlet 593 65 15 0; #N vpatcher 15 55 615 455; #N comlet to coll; #P outlet 99 224 15 0; #N comlet bang; #P inlet 98 62 15 0; #P window setfont "Sans Serif" 9.; #P newex 98 107 40 9109513 uzi 28; #P connect 1 0 0 0; #P pop; #P newobj 600 121 58 9109513 p randomize; #N comlet button - bottom right; #P outlet 405 202 15 0; #N comlet button - bottom left; #P outlet 392 184 15 0; #N comlet button - top right; #P outlet 379 202 15 0; #N comlet button - top left; #P outlet 366 184 15 0; #N comlet knob - r3 c8; #P outlet 353 202 15 0; #N comlet knob - r3 c7; #P outlet 340 184 15 0; #N comlet knob - r3 c6; #P outlet 327 202 15 0; #N comlet knob - r3 c5; #P outlet 314 184 15 0; #N comlet knob - r3 c4; #P outlet 301 202 15 0; #N comlet knob - r3 c3; #P outlet 288 184 15 0; #N comlet knob - r3 c2; #P outlet 275 202 15 0; #N comlet knob - r3 c1; #P outlet 262 184 15 0; #N comlet knob - r2 c8; #P outlet 249 202 15 0; #N comlet knob - r2 c7; #P outlet 236 184 15 0; #N comlet knob - r2 c6; #P outlet 223 202 15 0; #N comlet knob - r2 c5; #P outlet 210 184 15 0; #N comlet knob - r2 c4; #P outlet 197 202 15 0; #N comlet knob - r2 c3; #P outlet 184 184 15 0; #N comlet knob - r2 c2; #P outlet 171 202 15 0; #N comlet knob - r2 c1; #P outlet 158 184 15 0; #N comlet Dump out; #P outlet 455 236 15 0; #P newex 455 194 44 9109513 pack 1 1; #N comlet bang to dump; #P inlet 510 65 15 0; #P window linecount 0; #P message 510 108 31 9109513 dump; #P window linecount 1; #P newex 455 95 31 9109513 zl rev; #N coll ; #P newobj 455 148 53 9109513 coll; #N comlet knob - r1 c8; #P outlet 145 202 15 0; #N comlet knob - r1 c7; #P outlet 132 184 15 0; #N comlet knob - r1 c6; #P outlet 119 202 15 0; #N comlet knob - r1 c5; #P outlet 106 184 15 0; #N comlet knob - r1 c4; #P outlet 93 202 15 0; #N comlet knob - r1 c3; #P outlet 80 184 15 0; #N comlet knob - r1 c2; #P outlet 67 202 15 0; #P newex 54 125 27 9109513 - 80; #N comlet knob - r1 c1; #P outlet 54 184 15 0; #P newex 54 154 365 9109513 gate 28; #P window linecount 0; #P newex 10 91 54 9109513 unpack 1 1; #P inlet 10 50 15 0; #P connect 0 0 1 0; #P connect 1 1 4 0; #P connect 4 0 2 0; #P connect 2 0 3 0; #P connect 2 1 5 0; #P connect 2 2 6 0; #P connect 2 3 7 0; #P connect 2 4 8 0; #P connect 2 5 9 0; #P connect 2 6 10 0; #P connect 2 7 11 0; #P connect 2 8 18 0; #P connect 2 9 19 0; #P connect 2 10 20 0; #P connect 2 11 21 0; #P connect 2 12 22 0; #P connect 2 13 23 0; #P connect 2 14 24 0; #P connect 2 15 25 0; #P connect 2 16 26 0; #P connect 2 17 27 0; #P connect 2 18 28 0; #P connect 2 19 29 0; #P connect 2 20 30 0; #P connect 2 21 31 0; #P connect 2 22 32 0; #P connect 2 23 33 0; #P connect 2 24 34 0; #P connect 2 25 35 0; #P connect 2 26 36 0; #P connect 2 27 37 0; #P fasten 1 0 2 1 15 119 414 119; #P fasten 0 0 13 0 15 70 460 70; #P connect 42 0 12 0; #P connect 41 0 12 0; #P connect 14 0 12 0; #P connect 13 0 12 0; #P connect 12 0 16 0; #P connect 16 0 17 0; #P connect 12 1 16 1; #P connect 15 0 14 0; #P connect 43 0 42 0; #P connect 40 0 42 0; #P pop; #P newobj 137 170 378 9109513 p decode midi; #N comlet midi out; #P outlet 501 250 15 0; #N comlet select 3 for dump; #P inlet 203 60 15 0; #P newex 28 143 27 9109513 zl; #N comlet midi controls; #P inlet 90 60 15 0; #P comment 377 105 100 9109513 intialize; #P connect 16 0 17 0; #P connect 12 0 16 0; #P connect 1 0 5 0; #P connect 5 0 15 0; #P connect 15 0 12 0; #P connect 16 1 9 0; #P connect 5 1 15 1; #P connect 5 2 15 2; #P connect 18 1 10 0; #P connect 5 3 15 3; #P connect 5 4 15 4; #P connect 12 1 18 0; #P connect 5 5 15 5; #P connect 3 0 11 0; #P connect 5 6 15 6; #P connect 5 7 15 7; #P connect 5 8 15 8; #P connect 5 9 15 9; #P connect 8 0 5 1; #P connect 11 0 5 1; #P connect 5 10 15 10; #P connect 5 11 15 11; #P connect 5 12 15 12; #P connect 5 13 15 13; #P connect 5 14 15 14; #P connect 5 15 15 15; #P connect 5 16 15 16; #P connect 5 17 15 17; #P connect 5 18 15 18; #P connect 14 0 5 2; #P connect 6 0 5 2; #P connect 5 19 15 19; #P connect 5 20 15 20; #P connect 5 21 15 21; #P connect 5 22 15 22; #P connect 5 23 15 23; #P connect 5 24 15 24; #P connect 5 25 15 25; #P connect 5 26 15 26; #P connect 5 27 15 27; #P connect 5 28 4 0; #P pop 1; #P newobj 348 231 40 9109513 p triam; #P window linecount 3; #P comment 237 30 100 9109513 note: need to initialize colls in [obj]decode midi[/obj]; #P window linecount 1; #N vpatcher 105 125 1154 675; #P origin 60 0; #P window setfont "Sans Serif" 9.; #P number 280 55 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0; #P newex 455 479 48 9109513 zl group 2; #N comlet radio button midi control; #P outlet 455 503 15 0; #P newex 598 104 33 9109513 sel 16; #P newex 568 104 33 9109513 sel 15; #P newex 538 104 33 9109513 sel 14; #P newex 508 104 33 9109513 sel 13; #P message 598 248 348 9109513 65 0 73 0 66 0 74 0 67 0 75 0 68 0 76 1 69 0 77 0 70 0 78 0 71 0 79 0 127 80 127; #P message 568 267 351 9109513 65 0 73 0 66 0 74 0 67 0 75 0 68 0 76 0 69 0 77 0 70 0 78 0 71 0 79 0 72 127 80 0; #P message 508 305 351 9109513 65 0 73 0 66 0 74 0 67 0 75 0 68 0 76 0 69 0 77 0 70 0 78 0 71 127 79 0 72 0 80 0; #P message 538 286 361 9109513 65 0 73 0 66 0 74 0 67 0 75 1 68 0 76 0 69 0 77 0 70 0 78 0 71 127 79 127 72 0 80 0; #P message 478 324 361 9109513 65 0 73 0 66 0 74 0 67 0 75 0 68 0 76 0 69 0 77 0 70 127 78 127 71 0 79 0 72 0 80 0; #P message 448 342 351 9109513 65 0 73 0 66 0 74 0 67 0 75 0 68 0 76 0 69 0 77 0 70 127 78 0 71 0 79 0 72 0 80 0; #P newex 478 104 33 9109513 sel 12; #P newex 448 104 33 9109513 sel 11; #P message 388 381 351 9109513 65 0 73 0 66 0 74 0 67 0 75 0 68 0 76 0 69 127 77 0 70 0 78 0 71 0 79 0 72 0 80 0; #P message 418 362 361 9109513 65 0 73 0 66 0 74 0 67 0 75 0 68 0 76 0 69 127 77 127 70 0 78 0 71 0 79 0 72 0 80 0; #P newex 418 104 33 9109513 sel 10; #P newex 388 104 28 9109513 sel 9; #P newex 218 103 28 9109513 sel 8; #P newex 188 103 28 9109513 sel 7; #P newex 158 103 28 9109513 sel 6; #P newex 128 103 28 9109513 sel 5; #P message 218 247 361 9109513 65 0 73 0 66 0 74 0 67 0 75 0 68 127 76 127 69 0 77 0 70 0 78 0 71 0 79 0 72 0 80 0; #P message 188 266 351 9109513 65 0 73 0 66 0 74 0 67 0 75 0 68 127 76 0 69 0 77 0 70 0 78 0 71 0 79 0 72 0 80 0; #P message 128 304 351 9109513 65 0 73 0 66 0 74 0 67 127 75 0 68 0 76 0 69 0 77 0 70 0 78 0 71 0 79 0 72 0 80 0; #P message 158 285 361 9109513 65 0 73 0 66 0 74 0 67 127 75 127 68 0 76 0 69 0 77 0 70 0 78 0 71 0 79 0 72 0 80 0; #P message 98 323 361 9109513 65 0 73 0 66 127 74 127 67 0 75 0 68 0 76 0 69 0 77 0 70 0 78 0 71 0 79 0 72 0 80 0; #P message 68 342 351 9109513 65 0 73 0 66 127 74 0 67 0 75 0 68 0 76 0 69 0 77 0 70 0 78 0 71 0 79 0 72 0 80 0; #P newex 98 103 28 9109513 sel 4; #P newex 68 103 28 9109513 sel 3; #P message 8 380 351 9109513 65 127 73 0 66 0 74 0 67 0 75 0 68 0 76 0 69 0 77 0 70 0 78 0 71 0 79 0 72 0 80 0; #P message 38 361 361 9109513 65 127 73 127 66 0 74 0 67 0 75 0 68 0 76 0 69 0 77 0 70 0 78 0 71 0 79 0 72 0 80 0; #P newex 455 444 31 9109513 zl rev; #P newex 38 103 28 9109513 sel 2; #P newex 8 103 28 9109513 sel 1; #N comlet selection; #P inlet 8 65 15 0; #P connect 0 0 1 0; #P connect 1 0 5 0; #P fasten 0 0 2 0 13 94 43 94; #P connect 2 0 4 0; #P fasten 0 0 6 0 13 94 73 94; #P connect 6 0 8 0; #P fasten 0 0 7 0 13 94 103 94; #P connect 7 0 9 0; #P fasten 0 0 14 0 13 94 133 94; #P connect 14 0 11 0; #P fasten 0 0 15 0 13 94 163 94; #P connect 15 0 10 0; #P fasten 0 0 16 0 13 94 193 94; #P connect 16 0 12 0; #P fasten 0 0 17 0 13 94 223 94; #P connect 17 0 13 0; #P connect 0 0 36 0; #P fasten 0 0 18 0 13 94 393 94; #P connect 18 0 21 0; #P fasten 0 0 19 0 13 94 423 94; #P connect 19 0 20 0; #P fasten 0 0 22 0 13 94 453 94; #P connect 22 0 24 0; #P connect 29 0 3 0; #P connect 28 0 3 0; #P connect 26 0 3 0; #P connect 27 0 3 0; #P connect 25 0 3 0; #P connect 24 0 3 0; #P connect 20 0 3 0; #P connect 4 0 3 0; #P connect 5 0 3 0; #P connect 8 0 3 0; #P connect 9 0 3 0; #P connect 11 0 3 0; #P connect 10 0 3 0; #P connect 12 0 3 0; #P connect 13 0 3 0; #P connect 21 0 3 0; #P connect 3 0 35 0; #P connect 35 0 34 0; #P fasten 0 0 23 0 13 94 483 94; #P connect 23 0 25 0; #P fasten 0 0 30 0 13 94 513 94; #P connect 30 0 27 0; #P fasten 0 0 31 0 13 94 543 94; #P connect 31 0 26 0; #P fasten 0 0 32 0 13 94 573 94; #P connect 32 0 28 0; #P fasten 0 0 33 0 13 94 603 94; #P connect 33 0 29 0; #P pop; #P newobj 335 270 70 9109513 p radio buttons; #P connect 3 1 5 0; #P connect 3 0 4 0; #P fasten 27 2 18 0 535 292 83 292; #P fasten 22 2 18 0 486 292 83 292; #P connect 2 2 18 0; #P fasten 0 0 18 0 340 301 83 301; #P connect 18 0 17 0; #P connect 18 1 17 1; #P connect 3 2 6 0; #P connect 3 0 10 0; #P connect 10 0 16 0; #P connect 16 0 11 0; #P connect 11 0 13 0; #P connect 2 0 26 0; #P connect 3 1 10 1; #P connect 11 1 12 0; #P connect 30 0 25 0; #P connect 19 0 0 0; #P connect 2 0 24 0; #P connect 28 0 30 0; #P connect 24 0 30 0; #P connect 19 1 2 0; #P connect 31 0 25 1; #P connect 2 1 24 1; #P connect 28 1 31 0; #P connect 24 1 31 0; #P fasten 19 0 2 1 340 224 383 224; #P fasten 19 3 22 0 379 214 428 214; #P connect 32 0 29 0; #P connect 33 0 29 0; #P connect 30 0 29 0; #P connect 2 2 23 0; #P connect 31 0 29 1; #P fasten 19 0 22 1 340 205 486 205; #P connect 27 0 28 0; #P fasten 19 5 27 0 405 209 505 209; #P connect 27 1 28 1; #P fasten 19 0 27 1 340 205 536 205; #P pop;