max v2; #N vpatcher 460 178 1072 559; #P window setfont Times 10.; #P window linecount 1; #P comment 81 275 41 1310730 Volume; #P user gain~ 48 262 30 36 158 0 1.071519 7.94321 10.; #P comment 396 114 101 1310730 DC offset of modulator; #P comment 414 238 119 1310730 scale the over-all amplitude; #P window linecount 2; #P comment 338 178 171 1310730 DC offset changes opposite to the depth of tremolo \, to keep amplitude at 1.; #P window setfont "Fixedwidth Serif" 10.; #P window linecount 1; #P newex 404 49 38 1441802 r amp; #P flonum 404 70 68 10 0. 1. 3 22 0 0 0 221 221 221 222 222 222 0 0 0; #P window setfont Times 10.; #P comment 286 35 69 1310730 Tremolo Depth; #P window setfont "Fixedwidth Serif" 10.; #P flonum 328 114 68 10 0. 1. 163 22 0 0 0 221 221 221 222 222 222 0 0 0; #P newex 48 212 129 1441802 *~; #P newex 328 157 38 1441802 line~; #P message 328 135 38 1441802 \$1 50; #P message 286 114 38 1441802 \$1 50; #P newex 286 133 38 1441802 line~; #P newex 167 181 171 1441802 +~; #P newex 328 92 73 1441802 expr 1.-$f1; #P window setfont Times 10.; #P comment 27 35 79 1310730 Carrier Frequency; #P user ezdac~ 48 331 92 364 0; #P window setfont "Fixedwidth Serif" 10.; #P newex 48 236 366 1441802 *~; #P newex 167 88 43 1441802 cycle~; #P newex 48 88 50 1441802 cycle~; #P newex 167 157 129 1441802 *~; #P flonum 48 70 68 10 0 0 0 22 0 0 0 221 221 221 222 222 222 0 0 0; #P flonum 167 70 68 10 0 0 0 22 0 0 0 221 221 221 222 222 222 0 0 0; #P flonum 286 70 68 10 0. 1. 3 22 0 0 0 221 221 221 222 222 222 0 0 0; #P newex 48 49 44 1441802 r freq; #P newex 167 49 62 1441802 r modrate; #P newex 286 49 68 1441802 r moddepth; #P newex 4 236 38 1441802 r dac; #P window setfont Times 10.; #P comment 150 35 98 1310730 Modulating Frequency; #P comment 398 35 51 1310730 Amplitude; #P window linecount 2; #P comment 177 208 174 1310730 modulate the amplitude of one oscillator by multiplying it with another oscillator; #P comment 185 131 92 1310730 scale the level of the modulating oscillator; #P window setfont "Fixedwidth Serif" 10.; #P window linecount 5; #P message 498 70 90 1441802 \; amp 0.5 \; moddepth 0.25 \; modrate 1. \; freq 1000.; #P window linecount 1; #P newex 498 49 53 1441802 loadbang; #P window setfont Times 10.; #P comment 499 134 71 1310730 initialize values; #P window setfont "Fixedwidth Serif" 10.; #P newex 333 314 62 1441802 s modrate; #P message 207 279 14 1441802 1; #P message 224 279 14 1441802 2; #P message 241 279 14 1441802 4; #P message 258 279 14 1441802 8; #P message 275 279 20 1441802 16; #P message 375 278 20 1441802 32; #P message 398 278 20 1441802 50; #P message 421 278 26 1441802 100; #P message 450 278 26 1441802 150; #P message 479 278 26 1441802 200; #P message 537 278 26 1441802 500; #P message 508 278 26 1441802 250; #P window setfont Times 10.; #P comment 165 265 174 1310730 sub-audio modulating frequencies: tremolo; #P comment 373 264 193 1310730 audio modulating frequencies: difference tones; #P connect 25 0 28 0; #P connect 28 0 30 0; #P connect 30 0 41 0; #P connect 41 0 32 0; #P connect 32 0 49 0; #P connect 49 0 33 0; #P fasten 22 0 33 0 9 326 53 326; #P connect 49 0 33 1; #P connect 24 0 27 0; #P connect 27 0 31 0; #P connect 31 0 29 0; #P connect 29 0 36 0; #P connect 36 0 41 1; #P connect 23 0 26 0; #P connect 26 0 38 0; #P connect 38 0 37 0; #P connect 37 0 29 1; #P fasten 26 0 35 0 291 88 333 88; #P connect 35 0 42 0; #P connect 42 0 39 0; #P connect 39 0 40 0; #P connect 40 0 36 1; #P connect 2 0 14 0; #P connect 3 0 14 0; #P connect 4 0 14 0; #P connect 5 0 14 0; #P connect 6 0 14 0; #P connect 7 0 14 0; #P connect 8 0 14 0; #P connect 9 0 14 0; #P connect 10 0 14 0; #P connect 11 0 14 0; #P connect 12 0 14 0; #P connect 13 0 14 0; #P connect 45 0 44 0; #P connect 44 0 32 1; #P connect 16 0 17 0; #P pop;