INTERFACE 1000,100
VSTVARS 15
VSTVAR 0, .94, "LPROOMSIZE", "", .8, .9999, 0
VSTVAR 1, .92, "HPROOMSIZE", "", .8, .9999, 0
VSTVAR 2, 5000, "F Thres", "Hz", 10, 20000, 0
VSTVAR 3, 50, "Dry/Wet", "%", 0, 100, 1
VSTVAR 4, 1, "STEREO", "Primes", -20, 20, 2
VSTVAR 5, 120, "FIRST_DLY", "Primes", 0, 1027, 2
VSTVAR 6, 12, "NUM_DLY", "", 1, 32, 2
VSTVAR 7, 40, "FIRST_AP", "Primes", 0, 1027, 2
VSTVAR 8, 6, "NUM_AP", "", 1, 8, 2
VSTVAR 9, .618, "DIFFUSION", "", -.9999, .9999, 1
VSTVAR 10,.2,"VOLUME","",0,1,1
VSTVAR 11,0,"x","",0,16,2
VSTVAR 12, 24, "QUANTIZE", "bits", 0, 24, 1
VSTVAR 13, .1, "GLIDE TIME","", 0, 10,1
VSTVAR 14, 2.5, "Pre-Delay", "ms", 0, 100, 1

//MIDICC 135,0,13
//DEBUG 3
POLY 256,0,2,&613
//DEBUG 1
//UIMOD 0, -30

TEMPERAMENTCC 611
//SAMPLE <slot_number>;"filename";<normalization_mode>;<center_note>;<loops>;<direction>;<startw>;<endw>;<relstart>;<loopstartw>;<loopendw>;<crossfade>;<crossfaderel>;<crossfadefwbw>
//sample 0,"A.wav",4,69,0,0,0,-1400000,1e10,10000,-10,5000,5000,5000
//SAMPLE <slot_number>; <numeric_code>; <2nd_harmonic_numeric_code>; <2nd_harmonic_amplitude>; <2nd_harmonic_frequency>; <2nd_harmonic_phase>; <3rd...
//sample 1,9,9,1,1.00015,0,9,1,1.0001,0
//sample 1,1
//sample 1,2,2,1,1.00015,0,2,1,1.0001,0
sample 1,2
debug 1
//eq3db 5,200,2000,-120,20,-120, .0, sample 1,"old/chorus-male-c3.wav",4,60,1
debug 1
//eq1db 2,10,40,60, eq1db 2,100,400,-60, eq1db 2,1000,4000,60, sample 1,"old/chorus-male-c3.wav",4,60,1
//debug 1
//widepan 0, 0, sample 1,"old/chorus-male-c3.wav",4,60,1
//samples 1, 10, 2, 48000, 69, 0, "old/chorus-male-c3.wav",1,1,60

GAINENV &610,0,.1,0,0,1,15

//VELOCITY <cc>;<min key>;<max key>;<min vel in>;<max vel in>;<min vel out>;<max vel out>;<drive>;<spread>;<velocity flag>;<mul0>;<mul63>;<mul127>
//VELOCITY -1;0;127;0;127;0;127;1;50;2;1;1;1
//VELOCITY -1;0;127;0;127;0;127;$600;$601;2;$602;$603;$604
//PITCH <cc>;<min key>;<max key>;<shift>;<spread>;<chance>;<rounding>;<qstrength>
//PITCH -1;0,127,0,10,1,0,100
//PITCH -1;0,127,0,$600,$601,$602,$603
//DEBUG 3
//TIMING <cc>;<min key>;<max key>;<shift>;<on spread>;<duration spread>;<quantize>;<qstrength>
//TIMING 614;0;127;.0;.0;.0;0.125;100
//TIMING 614;0;127;$600;$601;$602;$603;$604
DEBUG 1

//        cc   k1 k2   siz      0 semi       4 semi          7 semi         12 semi          7 semi        4 semi       then repeat from start...
//ARPEGGIO -1,  0, 127, 1.5,    0,0,.125,1,  4,.25,.125,1,   7,.5,.125,1,   12,.75,.125,1,   7,1,.125,1,   4,1.25,.125,1
//ARPEGGIO -1,  0, 127, 2,    0,0,.125,1,  4,.3333,.125,1,   7,.6666,.125,1,   12,1,.125,1,   7,1.3333,.125,1,   4,1.6666,.125,1

//     cc   k1 k2   0 semi   4 semi    7 semi  11 semi
//CHORD -1,  0, 127, 0,0,     4,1,      7,1//,    11,1
//hideui 0
//KEYSWITCH "Name";<type>;<initial_value>;<key1>;<key2>;<min>;<max>;"Name 1";"Name 2";...;"Name max-min+1"
//KEYSWITCH "Test1";0;0;0;5;0;0;"Name 1";"Name 2";"Name 3";"Name 4";"Name 5";"Name 6"
//KEYSWITCH "Test2";0;6;6;11;0;0;"Name 1";"Name 2";"Name 3";"Name 4";"Name 5";"Name 6"
//KEYSWITCH "Test3";0;12;12;17;0;0;"Name 1";"Name 2";"Name 3";"Name 4";"Name 5";"Name 6"
//KEYSWITCH "Test4";0;18;18;23;0;0;"Name 1";"Name 2";"Name 3";"Name 4";"Name 5";"Name 6"
//KEYSWITCH "Test5";0;24;24;29;0;0;"Name 1";"Name 2";"Name 3";"Name 4";"Name 5";"Name 6"
//KEYSWITCH "Test6";0;30;30;35;0;0;"Name 1";"Name 2";"Name 3";"Name 4";"Name 5";"Name 6"
//KEYSWITCH "Test7";0;36;36;41;0;0;"Name 1";"Name 2";"Name 3";"Name 4";"Name 5";"Name 6"
//KEYSWITCH "Test8";0;42;42;47;0;0;"Name 1";"Name 2";"Name 3";"Name 4";"Name 5";"Name 6"

//KEYSWITCH "Namexx";<type>;<initial_value>;<key1>;<key2>;<min>;<max>;<channel>;"Name 1";"Name 2";...;"Name max-min+1"
//DEBUG 3
//KEYSWITCH "TestCH";0     ;0              ;0     ;5     ;0    ;0    ;1        ;"Name 1";"Name 2";"Name 3";"Name 4";"Name 5";"Name 6"
DEBUG 2, 350,20
QUALITY 4096, 7, 0, 1, 1, 257, 16, 0
DEBUG 1

POST

//DEBUG 2
//IF 1 > 1 EXIT
//DEBUG 1
OUT=MOOGG(0,OUT,10*MCC602,.0,.3)
IF MCC(603)<.1 EXIT
OUT=.01*((100-MCC(603))*OUT+DELAY(REVERB3(OUT,MCC(600),MCC(601),MCC(602),MCC(604),MCC(605),MCC(606),MCC(607),MCC(608),MCC(609))*MCC(603),MCC(614)*.001))
//LABEL QUANTIZE
//OUT=QUANTIZE2(OUT,MCC(612))
debug 2
//OUT=OUT+PPDELAY2D(OUT,-.1875,.3,.99,.3,700,1000,10)
debug 1

LAYER
OUT=OSCG("Mg",1)
//OUT=EQ3DB2(5,OSCG("Mg",1),100,1000,-150,10,-150,0.5)
//OUT=EQ1DB(5,OSCG("Mg",1),100,3000,-120,0.7,0.7)
debug 1

