Evolver Type G v1.1 The Evolver instruments are created because i was looking for string/pad sounds and textures that could evolve in time, with (small or radical) variations in timbre. The instruments are of a modular design, built with ftmorf as a basis module; so you can stream fluidly from one timbre to another within a single note. Other standard modules in these instruments are: Phaser, Swell, Output. The Evolver Type G uses the grain3 opcode. The G in the name represents 'grain3'. scheme: FTMORF ---------GRAIN3--------(PHASER)--------(SWELL)-------OUTS I l I (LFOs for phasing) I ( LFOs for deviation ) version 1.1, december 2017 - added Arpeggio module (UDO) version 1, december 2017 - choose from a list of timbre presets - evolve from one timbre to another up to 16 sounds, forwards or backwards - scale fuction to scale wavesequencer sounds over the note - determine where to start the scaling in the note - morphing can also be done manually by drawing an Automation Line (wavedraw) - mono or stereo with setting different seed values with XY controller for Left and Right channel - optional dirt gives the deviation pitch irregular accents - phaser effect implemented with on/off switch and mixing, lots of options to slowly evolve the timbre even more - Swell for amplitude to give an amp accent in the note - exp or linear envelope score in Generic Object may look like: i1 0 2 190 1 where p4 = freq p5 = amp (0-1) ;==================system tables number <INSTR_ID>====================================== isize = 16384 gi_empty<INSTR_ID> ftgen 11000+<INSTR_ID> , 0, isize, 10, 1 ; table is used to be overwritten by morphed sounds ;[once]{ giBartlett ftgen 3, 0, isize, 20, 3, 1 ; Bartlett window giHanning ftgen 4, 0, isize, 20, 2 ; Hanning window ;============preset sound tables1================================== gi_sn1 ftgen 20, 0, isize, 10, 1 gi_sn2 ftgen 21, 0, isize, 10, 0, 1 gi_sn3 ftgen 22, 0, isize, 10, 0, 0, 1 gi_sn4 ftgen 23, 0, isize, 10, 0, 0, 0, 1 gi_sn5 ftgen 24, 0, isize, 10, 0, 0, 0, 0, 1 gi_sn6 ftgen 25, 0, isize, 10, 0, 0, 0, 0, 0, 1 gi_sn7 ftgen 26, 0, isize, 10, 0, 0, 0, 0, 0, 0, 1 gi_sn8 ftgen 27, 0, isize, 10, 1, 1, 1, 1, 1, 1, 1 gisaw ftgen 30, 0, isize, 7, 1, isize, -1 gisquare ftgen 31, 0, isize,10, 1,0, 1/3,0, 1/5,0, 1/7,0, 1/9,0, 1/11,0, 1/13,0, 1/15,0, 1/17,0, 1/19,0, 1/21,0, 1/23,0, 1/25,0, 1/27,0, 1/29,0, 1/31,0, 1/33,0, 1/35,0, 1/37,0, 1/39 giahh ftgen 32, 0, isize, 10, 1, 0.615880,0.089582,0.201498,0.202694,0.249961,0.225852,0.199864,0.029378,0.012306,0.007803,0.007846,0.007454,0.008827,0.007466,0.007495,0.007979,0.017837,0.061000,0.059055,0.039181,0.038364,0.032715,0.048415,0.029643,0.010094 giorg ftgen 33,0,isize,9, 1,1,rnd(1), 2,1/2,rnd(1), 4,1/4,rnd(1), 8,1/8,rnd(1), 16,1/16,rnd(1), 32,1/32,rnd(1), 64,1/64,rnd(1), 128,1/128,rnd(1) gitromb ftgen 34,0,isize,10,0.104682,0.077444,0.175816,0.178469,0.192922,0.167695,0.127283,0.094343,0.073856,0.045425,0.030985,0.027993,0.019936,0.013950,0.010611,0.007164,0.006458,0.003987,0.002664,0.002030,0.001435,0.001274,0.001036,0.000975,0.000876 gitrpt ftgen 35,0,isize,10,0.346469,0.852732,0.693941,0.494616,0.677656,0.590592,0.441108,0.626951,0.588338,0.416046,0.198161,0.107710,0.085130,0.075318,0.052485,0.050367,0.041515,0.039286,0.027532,0.023320,0.016384,0.012677,0.009971,0.006867,0.004900 gibassoon ftgen 36,0,isize,10, 0.130954,0.157859,0.302897,0.190190,0.890855,0.427124,0.039988,0.105341,0.011869,0.102000,0.115308,0.039058,0.131398,0.081308,0.047672,0.026006,0.010927,0.034420,0.033017,0.014769,0.014178,0.023091,0.023960,0.013178,0.004946 gioboe ftgen 37,0,isize,10, 0.258272,0.920123,0.458442,0.445704,0.088446,0.177257,0.063786,0.140382,0.031660,0.021808,0.048812,0.007823,0.004163,0.004775,0.002608,0.001464,0.001702,0.004168,0.003318,0.003878,0.002319,0.002505,0.002480,0.003416,0.002453 giclarinet ftgen 38,0,isize,10, 0.820044,0.009787,0.242206,0.034475,0.058957,0.021330,0.028307,0.053692,0.006131,0.002513,0.002370,0.001698,0.001269,0.000933,0.002758,0.001387,0.000831,0.000953,0.000658,0.000892,0.000687,0.000479,0.000481,0.000310,0.000425 gieee ftgen 39,0,isize,10, 0.430487,0.778043,0.090552,0.011467,0.030632,0.017911,0.006520,0.006820,0.007109,0.006437,0.008527,0.009083,0.016774,0.058922,0.070507,0.116728,0.045479,0.060107,0.069023,0.036487,0.047350,0.049526,0.036678,0.022550,0.022550 giooh ftgen 40,0,isize,10, 0.110941,0.606890,0.046168,0.040510,0.031310,0.007323,0.003115,0.002749,0.002420,0.002253,0.002853,0.002337,0.002672,0.002061,0.002202,0.002410,0.002615,0.005079,0.003192,0.002699,0.003708,0.003501,0.002264,0.001713,0.001713 ;} ;=====generate random sound tables number <INSTR_ID>============================= seed <INSTR_ID> irnd1 random 0, 1 irnd2 random 0, 1 irnd3 random 0, 1 irnd4 random 0, 1 irnd5 random 0, 1 irnd6 random 0, 1 irnd7 random 0, 1 irnd8 random 0, 1 irnd9 random 0, 1 irnd10 random 0, 1 ;[once]{ girnd1 ftgen 50, 0, isize, 10, 1, irnd2, 0, irnd4, 0, irnd6, 0, irnd8, 0, irnd10 girnd2 ftgen 51, 0, isize, 10, 1, irnd3, 0, irnd5, 0, irnd7, 0, irnd9, 0, irnd1 girnd3 ftgen 52, 0, isize, 10, 0, irnd4, 0, irnd6, 0, irnd8, 0, irnd10, 0, irnd2 girnd4 ftgen 53, 0, isize, 10, 0, irnd5, 0, irnd7, 0, irnd9, 0, irnd1, 0, irnd3 girnd5 ftgen 54, 0, isize, 10, 1, irnd6, 1, irnd8, 0, irnd10, 0, irnd2, 0, irnd4 girnd6 ftgen 55, 0, isize, 10, 1, irnd7, 1, irnd9, 0, irnd1, 0, irnd3, 0, irnd5 girnd7 ftgen 56, 0, isize, 10, 1, irnd8, 1, irnd10, 1, irnd2, 0, irnd4, 0, irnd6 girnd8 ftgen 57, 0, isize, 10, 1, irnd9, 1, irnd1, 1, irnd3, 0, irnd5, 0, irnd7 girnd9 ftgen 58, 0, isize, 10, 0, irnd10, 1, irnd2, 1, irnd4, 1, irnd6, 1, irnd8 girnd10 ftgen 59, 0, isize, 10, irnd10, irnd1, irnd2, irnd3, irnd4, irnd5, irnd6, irnd7, irnd8, irnd9 ;================================================================================================================================================================================= giwave1 ftgen 60, 0, isize, 9, 1000/32,1.000,0, 2000/32,1.000,0, 3000/32,1.000,0, 4000/32,1.000,0, 5000/32,1.000,0, 6000/32,1.000,0, 7000/32,1.000,0, 8000/32,1.000,0, 9000/32,1.000,0, 10000/32,1.000,0, 11000/32,1.000,0, 12000/32,1.000,0, 13000/32,1.000,0, 14000/32,1.000,0, 15000/32,1.000,0, 16000/32,1.000,0, 17000/32,1.000,0, 18000/32,1.000,0, 19000/32,1.000,0, 20000/32,1.000,0 giwave2 ftgen 61, 0, isize, 9, 1000/32,1.000,0, 2890/32,1.000,0, 4950/32,1.000,0, 6990/32,1.000,0, 8010/32,1.000,0, 9020/32,1.000,0 giwave3 ftgen 62, 0, isize, 9, 1000/32,1.000,0, 2000/32,1.000,0, 3010/32,1.000,0, 4010/32,1.000,0, 4690/32,1.000,0, 5630/32,1.000,0 giwave4 ftgen 63, 0, isize, 9, 1000/32,1.000,0, 3932/32,1.000,0, 9538/32,1.000,0, 16688/32,1.000,0, 24566/32,1.000,0, 31147/32,1.000,0 giwave5 ftgen 64, 0, isize, 9, 1000/32,1.000,0, 2778/32,0.500,0, 5180/32,0.250,0, 8162/32,0.125,0, 11660/32,0.062,0, 15638/32,0.031,0, 19990/32,0.016,0 giwave6 ftgen 65, 0, isize, 9, 1000/32,1.000,0, 1026/32,1.000,0, 1422/32,1.000,0, 1447/32,1.000,0, 1466/32,1.000,0, 1499/32,1.000,0, 1789/32,1.000,0, 1876/32,1.000,0, 1964/32,1.000,0, 1978/32,1.000,0, 2033/32,1.000,0, 2145/32,1.000,0, 2156/32,1.000,0, 2253/32,1.000,0, 2290/32,1.000,0, 2333/32,1.000,0, 2456/32,1.000,0, 2492/32,1.000,0, 2566/32,1.000,0, 2605/32,1.000,0, 2669/32,1.000,0, 2714/32,1.000,0 giwave7 ftgen 66, 0, isize, 9, 1000/32,1.000,0, 3200/32,1.000,0, 6230/32,1.000,0, 6270/32,1.000,0, 9920/32,1.000,0, 14150/32,1.000,0 giwave8 ftgen 67, 0, isize, 9, 1000/32,1.000,0, 1470/32,1.000,0, 2090/32,1.000,0, 2560/32,1.000,0 giwave9 ftgen 68, 0, isize, 9, 622/32,1.000,0, 1231/32,1.000,0, 2000/32,1.000,0, 2931/32,1.000,0, 4016/32,1.000,0, 5180/32,1.000,0, 6437/32,1.000,0, 7755/32,1.000,0, 11034/32,1.000,0, 12025/32,1.000,0 giwave10 ftgen 69, 0, isize, 9, 1000/32,1.000,0, 1470/32,1.000,0, 2110/32,1.000,0, 2570/32,1.000,0 giwave11 ftgen 70, 0, isize, 9, 1000/32,1.000,0, 1420/32,1.000,0, 2110/32,1.000,0, 2470/32,1.000,0 giwave12 ftgen 71, 0, isize, 9, 1000/32,1.000,0, 2572/32,1.000,0, 4644/32,1.000,0, 6984/32,1.000,0, 9723/32,1.000,0, 12000/32,1.000,0 giwave13 ftgen 72, 0, isize, 9, 1000/32,1.000,0, 2756/32,1.000,0, 5423/32,1.000,0, 8988/32,1.000,0, 13448/32,1.000,0, 18680/32,1.000,0 giwave14 ftgen 73, 0, isize, 9, 1000/32,1.000,0, 3984/32,1.000,0, 10668/32,1.000,0, 17979/32,1.000,0, 23679/32,1.000,0, 33642/32,1.000,0 giwave15 ftgen 74, 0, isize, 9, 1000/32,1.000,0, 3997/32,1.000,0, 9469/32,1.000,0, 15566/32,1.000,0, 20863/32,1.000,0, 29440/32,1.000,0 giwave16 ftgen 75, 0, isize, 9, 1000/32,1.000,0, 1725/32,1.000,0, 5806/32,1.000,0, 7419/32,1.000,0, 13919/32,1.000,0 giwave17 ftgen 76, 0, isize, 9, 1000/32,1.000,0, 2662/32,1.000,0, 4837/32,1.000,0, 7515/32,1.000,0, 10640/32,1.000,0, 14210/32,1.000,0, 18140/32,1.000,0 giwave18 ftgen 77, 0, isize, 9, 1000/32,1.000,0, 2765/32,1.000,0, 5121/32,1.000,0, 7806/32,1.000,0, 10784/32,1.000,0 giwave19 ftgen 78, 0, isize, 9, 1000/32,1.000,0, 2320/32,1.000,0, 4250/32,1.000,0, 6630/32,1.000,0, 9380/32,1.000,0 giwave20 ftgen 79, 0, isize, 9, 1000/32,1.000,0, 1001/32,0.833,0, 1793/32,0.694,0, 1800/32,0.579,0, 2520/32,0.482,0, 2522/32,0.402,0, 2990/32,0.335,0, 2994/32,0.279,0, 3785/32,0.233,0, 3806/32,0.194,0, 4568/32,0.162,0, 4575/32,0.135,0, 5029/32,0.112,0, 5045/32,0.093,0, 6075/32,0.078,0, 5909/32,0.065,0, 6412/32,0.054,0, 6443/32,0.045,0, 7082/32,0.038,0, 7092/32,0.031,0, 7318/32,0.026,0, 7555/32,0.022,0 ;================================================================================================================================================================================= ;} klog = log2(<density> + <graindur>) ; try to compensate for volume variations if more density and grain size kfreq = p4 ; frequency kvolume = p5 * (1/klog) ; amplitude 0 - 1 with volume compensation ;=======Arpeggio============== kArp k_ArpeggioMini <ArpON>, <Arpdepth>, <Arpspeed>, i(<Arptype>) ;=============envelope============================== if i(<exponential>) == 0 then ; choose for amp envelope exp or linear aenv madsr i(<attack>), i(<decay>), i(<sustain>), i(<release>) else aenv mxadsr i(<attack>), i(<decay>), i(<sustain>), i(<release>) endif kswell k_Zwel_m <SwellOn>, <SwellPosition>, <Swellamp> ; UDO k_Zwel_m aenv *= kswell ;===============input wave tables=========================== i_arr<INSTR_ID> ftgenonce 10000+<INSTR_ID>, 0, 16, -2, <wave1>, <wave2>, <wave3>, <wave4>, <wave5>, <wave6>, <wave7>, <wave8>, <wave9>, <wave10>, <wave11>, <wave12>, <wave13>, <wave14>, <wave15>, <wave16> ;===================morphing======================================= if i(<wavedrawON>) == 1 then prints "morphing is drawn manually!\n" ; draw morphing manually ftmorf <wavedraw>, i_arr<INSTR_ID>, 11000+<INSTR_ID> else kndx transeg i(<wavesnostart>)-1, p3 * i(<stretch_begin>), 1, i(<wavesnostart>)-1, p3 * (1 - i(<stretch_begin>)), i(<stretch>), i(<wavesno>)-1 ; or use the sequencer ftmorf kndx, i_arr<INSTR_ID>, 11000+<INSTR_ID> endif ;========================oscilators==================================== iseed = 0 ; random seed iwindow = i(<grain_window>) if iwindow == 0 then ; choose grain window type igrwin = 3 else igrwin = 4 endif if <dirt_deviation> == 1 then ; add 3 LF oscillators to randomize deviation klfo2 jitter2 <deviationLFOdepthtotal>, <deviation_LFOdepth1>, <deviation_LFOspeed1>, <deviation_LFOdepth2>, <devaition_LFOspeed2>, <deviation_LFOdepth3>, <devaition_LFOspeed3>, 1 else klfo2 init 1 endif klogdur logcurve <graindur>, 0.5 ; nicer scale division for grains duration if <stereo> == 1 then ; stereo or asigL grain3 kfreq * <detune> * kArp, <faseX>, kfreq * <deviation> * klfo2, 0.5, klogdur, <density>, 500, 11000+<INSTR_ID>, igrwin, 0.5, 0, iseed, 2 asigR grain3 kfreq * <detune> * kArp, <faseY>, kfreq * <deviation> * klfo2, 0 , klogdur, <density>, 500, 11000+<INSTR_ID>, igrwin, 0.5, 0, iseed, 2 else ; mono asigL grain3 kfreq * <detune> * kArp, <faseX>, kfreq * <deviation> * klfo2, 0.5, klogdur, <density>, 500, 11000+<INSTR_ID>, igrwin, 0.5, 0, iseed, 2 asigR = asigL endif ;=======================filter yucci stuff====================================== asigL buthp asigL, 10 ; no DC please! asigR buthp asigR, 10 asigL butlp asigL, 15000 ; no aliasing either! asigR butlp asigR, 15000 ;====================phaser============================================== if <phasing_on> == 1 then ; switch for phaser klfo jitter2 <phaselfodepth>, <phaselfodepth1>, <phaselfospeed1>, <phaselfodepth2>, <phaselfospeed2>, <phaselfodepth3>, <phaselfospeed3>, 1 klfo += 1 ; set center frequency aoutL phaser2 asigL, <phasefreq> * klfo, <phaseq>, <phasenotches>, <phasemode>, <phasescale>, <phasefeedback> aoutR phaser2 asigR, <phasefreq> * (klfo + 0.01), <phaseq>, <phasenotches>, <phasemode>, <phasescale>, <phasefeedback> kx = <phasemix> ; crossfade between direct and effect asigL ntrpol aoutL, asigL, kx ; direct/wet mix asigR ntrpol aoutR, asigR, kx endif ;==================outs======================================= blueMixerOut asigL * aenv * <volume> * kvolume, asigR * aenv * <volume> * kvolume 5 5 DOT true 0 0 Group 0x00000033 0x000000ff 0xffffffff true 20 20 0 0 Group 0x669966ff 0x000000ff 0xffffffff false 20 20 10 10 wave sequencer 0x669966ff 0x000000ff 0xffffffff true 1240 20 930 5 13 System Bold 18.0 stretch_begin 870 115 true 1.0E-5 1.0 0.01 1.0E-5 300 true true 880 130 position of scaled waves System Regular 12.0 wave2 80 25 false 20 12 true sine 20 sine_1 21 sine_2 22 sine_3 23 sine_4 24 sine_5 25 sine_6 26 sine_7 27 saw 30 square 31 ahh 32 organ 33 tromb 34 trump 35 basso 36 oboe 37 clarin 38 eeh 39 ooh 40 rand1 50 rand2 51 rand3 52 rand4 53 rand5 54 rand6 55 rand7 56 rand8 57 rand9 58 rand10 59 inhar1 60 inhar2 61 inhar3 62 inhar4 63 inhar5 64 inhar6 65 inhar7 66 inhar8 67 inhar9 68 inhar10 69 inhar11 70 inhar12 71 inhar13 72 inhar14 73 inhar15 74 inhar16 75 inhar17 76 inhar18 77 inhar19 78 inhar20 79 wave3 155 25 false 37 12 true sine 20 sine_1 21 sine_2 22 sine_3 23 sine_4 24 sine_5 25 sine_6 26 sine_7 27 saw 30 square 31 ahh 32 organ 33 tromb 34 trump 35 basso 36 oboe 37 clarin 38 eeh 39 ooh 40 rand1 50 rand2 51 rand3 52 rand4 53 rand5 54 rand6 55 rand7 56 rand8 57 rand9 58 rand10 59 inhar1 60 inhar2 61 inhar3 62 inhar4 63 inhar5 64 inhar6 65 inhar7 66 inhar8 67 inhar9 68 inhar10 69 inhar11 70 inhar12 71 inhar13 72 inhar14 73 inhar15 74 inhar16 75 inhar17 76 inhar18 77 inhar19 78 inhar20 79 wave15 1060 25 false 0 12 true sine 20 sine_1 21 sine_2 22 sine_3 23 sine_4 24 sine_5 25 sine_6 26 sine_7 27 saw 30 square 31 ahh 32 organ 33 tromb 34 trump 35 basso 36 oboe 37 clarin 38 eeh 39 ooh 40 rand1 50 rand2 51 rand3 52 rand4 53 rand5 54 rand6 55 rand7 56 rand8 57 rand9 58 rand10 59 inhar1 60 inhar2 61 inhar3 62 inhar4 63 inhar5 64 inhar6 65 inhar7 66 inhar8 67 inhar9 68 inhar10 69 inhar11 70 inhar12 71 inhar13 72 inhar14 73 inhar15 74 inhar16 75 inhar17 76 inhar18 77 inhar19 78 inhar20 79 wave10 680 25 false 0 12 true sine 20 sine_1 21 sine_2 22 sine_3 23 sine_4 24 sine_5 25 sine_6 26 sine_7 27 saw 30 square 31 ahh 32 organ 33 tromb 34 trump 35 basso 36 oboe 37 clarin 38 eeh 39 ooh 40 rand1 50 rand2 51 rand3 52 rand4 53 rand5 54 rand6 55 rand7 56 rand8 57 rand9 58 rand10 59 inhar1 60 inhar2 61 inhar3 62 inhar4 63 inhar5 64 inhar6 65 inhar7 66 inhar8 67 inhar9 68 inhar10 69 inhar11 70 inhar12 71 inhar13 72 inhar14 73 inhar15 74 inhar16 75 inhar17 76 inhar18 77 inhar19 78 inhar20 79 35 90 end wave System Regular 12.0 1150 5 16 System Bold 18.0 wave5 305 25 false 4 12 true sine 20 sine_1 21 sine_2 22 sine_3 23 sine_4 24 sine_5 25 sine_6 26 sine_7 27 saw 30 square 31 ahh 32 organ 33 tromb 34 trump 35 basso 36 oboe 37 clarin 38 eeh 39 ooh 40 rand1 50 rand2 51 rand3 52 rand4 53 rand5 54 rand6 55 rand7 56 rand8 57 rand9 58 rand10 59 inhar1 60 inhar2 61 inhar3 62 inhar4 63 inhar5 64 inhar6 65 inhar7 66 inhar8 67 inhar9 68 inhar10 69 inhar11 70 inhar12 71 inhar13 72 inhar14 73 inhar15 74 inhar16 75 inhar17 76 inhar18 77 inhar19 78 inhar20 79 wavedrawON 870 100 true morph manually false true 855 5 12 System Bold 18.0 185 5 3 System Bold 18.0 35 5 1 System Bold 18.0 wavesno 30 75 true 1.0 16.0 1 7.0 1140 true true 110 5 2 System Bold 18.0 wave14 980 25 false 0 12 true sine 20 sine_1 21 sine_2 22 sine_3 23 sine_4 24 sine_5 25 sine_6 26 sine_7 27 saw 30 square 31 ahh 32 organ 33 tromb 34 trump 35 basso 36 oboe 37 clarin 38 eeh 39 ooh 40 rand1 50 rand2 51 rand3 52 rand4 53 rand5 54 rand6 55 rand7 56 rand8 57 rand9 58 rand10 59 inhar1 60 inhar2 61 inhar3 62 inhar4 63 inhar5 64 inhar6 65 inhar7 66 inhar8 67 inhar9 68 inhar10 69 inhar11 70 inhar12 71 inhar13 72 inhar14 73 inhar15 74 inhar16 75 inhar17 76 inhar18 77 inhar19 78 inhar20 79 1000 5 14 System Bold 18.0 wave4 230 25 false 14 12 true sine 20 sine_1 21 sine_2 22 sine_3 23 sine_4 24 sine_5 25 sine_6 26 sine_7 27 saw 30 square 31 ahh 32 organ 33 tromb 34 trump 35 basso 36 oboe 37 clarin 38 eeh 39 ooh 40 rand1 50 rand2 51 rand3 52 rand4 53 rand5 54 rand6 55 rand7 56 rand8 57 rand9 58 rand10 59 inhar1 60 inhar2 61 inhar3 62 inhar4 63 inhar5 64 inhar6 65 inhar7 66 inhar8 67 inhar9 68 inhar10 69 inhar11 70 inhar12 71 inhar13 72 inhar14 73 inhar15 74 inhar16 75 inhar17 76 inhar18 77 inhar19 78 inhar20 79 wave9 605 25 false 0 12 true sine 20 sine_1 21 sine_2 22 sine_3 23 sine_4 24 sine_5 25 sine_6 26 sine_7 27 saw 30 square 31 ahh 32 organ 33 tromb 34 trump 35 basso 36 oboe 37 clarin 38 eeh 39 ooh 40 rand1 50 rand2 51 rand3 52 rand4 53 rand5 54 rand6 55 rand7 56 rand8 57 rand9 58 rand10 59 inhar1 60 inhar2 61 inhar3 62 inhar4 63 inhar5 64 inhar6 65 inhar7 66 inhar8 67 inhar9 68 inhar10 69 inhar11 70 inhar12 71 inhar13 72 inhar14 73 inhar15 74 inhar16 75 inhar17 76 inhar18 77 inhar19 78 inhar20 79 wave12 830 25 false 0 12 true sine 20 sine_1 21 sine_2 22 sine_3 23 sine_4 24 sine_5 25 sine_6 26 sine_7 27 saw 30 square 31 ahh 32 organ 33 tromb 34 trump 35 basso 36 oboe 37 clarin 38 eeh 39 ooh 40 rand1 50 rand2 51 rand3 52 rand4 53 rand5 54 rand6 55 rand7 56 rand8 57 rand9 58 rand10 59 inhar1 60 inhar2 61 inhar3 62 inhar4 63 inhar5 64 inhar6 65 inhar7 66 inhar8 67 inhar9 68 inhar10 69 inhar11 70 inhar12 71 inhar13 72 inhar14 73 inhar15 74 inhar16 75 inhar17 76 inhar18 77 inhar19 78 inhar20 79 wave13 905 25 false 0 12 true sine 20 sine_1 21 sine_2 22 sine_3 23 sine_4 24 sine_5 25 sine_6 26 sine_7 27 saw 30 square 31 ahh 32 organ 33 tromb 34 trump 35 basso 36 oboe 37 clarin 38 eeh 39 ooh 40 rand1 50 rand2 51 rand3 52 rand4 53 rand5 54 rand6 55 rand7 56 rand8 57 rand9 58 rand10 59 inhar1 60 inhar2 61 inhar3 62 inhar4 63 inhar5 64 inhar6 65 inhar7 66 inhar8 67 inhar9 68 inhar10 69 inhar11 70 inhar12 71 inhar13 72 inhar14 73 inhar15 74 inhar16 75 inhar17 76 inhar18 77 inhar19 78 inhar20 79 wave8 530 25 false 33 12 true sine 20 sine_1 21 sine_2 22 sine_3 23 sine_4 24 sine_5 25 sine_6 26 sine_7 27 saw 30 square 31 ahh 32 organ 33 tromb 34 trump 35 basso 36 oboe 37 clarin 38 eeh 39 ooh 40 rand1 50 rand2 51 rand3 52 rand4 53 rand5 54 rand6 55 rand7 56 rand8 57 rand9 58 rand10 59 inhar1 60 inhar2 61 inhar3 62 inhar4 63 inhar5 64 inhar6 65 inhar7 66 inhar8 67 inhar9 68 inhar10 69 inhar11 70 inhar12 71 inhar13 72 inhar14 73 inhar15 74 inhar16 75 inhar17 76 inhar18 77 inhar19 78 inhar20 79 260 5 4 System Bold 18.0 635 5 9 System Bold 18.0 40 130 scale waves over note System Regular 12.0 stretch 30 115 true -50.0 10.0 0.1 1.0 750 true true wave6 380 25 false 5 12 true sine 20 sine_1 21 sine_2 22 sine_3 23 sine_4 24 sine_5 25 sine_6 26 sine_7 27 saw 30 square 31 ahh 32 organ 33 tromb 34 trump 35 basso 36 oboe 37 clarin 38 eeh 39 ooh 40 rand1 50 rand2 51 rand3 52 rand4 53 rand5 54 rand6 55 rand7 56 rand8 57 rand9 58 rand10 59 inhar1 60 inhar2 61 inhar3 62 inhar4 63 inhar5 64 inhar6 65 inhar7 66 inhar8 67 inhar9 68 inhar10 69 inhar11 70 inhar12 71 inhar13 72 inhar14 73 inhar15 74 inhar16 75 inhar17 76 inhar18 77 inhar19 78 inhar20 79 wave7 455 25 false 6 12 true sine 20 sine_1 21 sine_2 22 sine_3 23 sine_4 24 sine_5 25 sine_6 26 sine_7 27 saw 30 square 31 ahh 32 organ 33 tromb 34 trump 35 basso 36 oboe 37 clarin 38 eeh 39 ooh 40 rand1 50 rand2 51 rand3 52 rand4 53 rand5 54 rand6 55 rand7 56 rand8 57 rand9 58 rand10 59 inhar1 60 inhar2 61 inhar3 62 inhar4 63 inhar5 64 inhar6 65 inhar7 66 inhar8 67 inhar9 68 inhar10 69 inhar11 70 inhar12 71 inhar13 72 inhar14 73 inhar15 74 inhar16 75 inhar17 76 inhar18 77 inhar19 78 inhar20 79 wavesnostart 30 50 true 1.0 16.0 1 1.0 1140 true true wave16 1135 25 false 0 12 true sine 20 sine_1 21 sine_2 22 sine_3 23 sine_4 24 sine_5 25 sine_6 26 sine_7 27 saw 30 square 31 ahh 32 organ 33 tromb 34 trump 35 basso 36 oboe 37 clarin 38 eeh 39 ooh 40 rand1 50 rand2 51 rand3 52 rand4 53 rand5 54 rand6 55 rand7 56 rand8 57 rand9 58 rand10 59 inhar1 60 inhar2 61 inhar3 62 inhar4 63 inhar5 64 inhar6 65 inhar7 66 inhar8 67 inhar9 68 inhar10 69 inhar11 70 inhar12 71 inhar13 72 inhar14 73 inhar15 74 inhar16 75 inhar17 76 inhar18 77 inhar19 78 inhar20 79 35 65 start wave System Regular 12.0 wave1 5 25 false 19 12 true sine 20 sine_1 21 sine_2 22 sine_3 23 sine_4 24 sine_5 25 sine_6 26 sine_7 27 saw 30 square 31 ahh 32 organ 33 tromb 34 trump 35 basso 36 oboe 37 clarin 38 eeh 39 ooh 40 rand1 50 rand2 51 rand3 52 rand4 53 rand5 54 rand6 55 rand7 56 rand8 57 rand9 58 rand10 59 inhar1 60 inhar2 61 inhar3 62 inhar4 63 inhar5 64 inhar6 65 inhar7 66 inhar8 67 inhar9 68 inhar10 69 inhar11 70 inhar12 71 inhar13 72 inhar14 73 inhar15 74 inhar16 75 inhar17 76 inhar18 77 inhar19 78 inhar20 79 1080 5 15 System Bold 18.0 wave11 755 25 false 42 12 true sine 20 sine_1 21 sine_2 22 sine_3 23 sine_4 24 sine_5 25 sine_6 26 sine_7 27 saw 30 square 31 ahh 32 organ 33 tromb 34 trump 35 basso 36 oboe 37 clarin 38 eeh 39 ooh 40 rand1 50 rand2 51 rand3 52 rand4 53 rand5 54 rand6 55 rand7 56 rand8 57 rand9 58 rand10 59 inhar1 60 inhar2 61 inhar3 62 inhar4 63 inhar5 64 inhar6 65 inhar7 66 inhar8 67 inhar9 68 inhar10 69 inhar11 70 inhar12 71 inhar13 72 inhar14 73 inhar15 74 inhar16 75 inhar17 76 inhar18 77 inhar19 78 inhar20 79 wavedraw 340 105 true 1.0 16.0 1.0 485 5 7 System Bold 18.0 560 5 8 System Bold 18.0 335 5 5 System Bold 18.0 410 5 6 System Bold 18.0 705 5 10 System Bold 18.0 780 5 11 System Bold 18.0 660 130 l System Regular 12.0 870 570 Evolver System Bold 36.0 10 410 phaser 0x669966ff 0x000000ff 0xffffffff true 765 196 35 60 LFO 0x00000033 0x000000ff 0xffffffff true 20 20 phaselfospeed1 95 10 true 0.0 1.0 0.001 0.19500001 250 true false phaselfodepth2 355 25 true 0.0 1.0 0.001 0.9990001 70 true false phaselfodepth 25 10 true 0.0 1.0 1.0 41 true true label false System Regular 12.0 phaselfospeed2 95 25 true 0.0 1.0 0.001 0.28800002 250 true false 195 55 slow speeds System Regular 12.0 phaselfodepth3 355 40 true 0.0 1.0 0.001 0.9990001 70 true false phaselfodepth1 355 10 true 0.0 1.0 0.001 0.9990001 70 true false 365 55 amount System Regular 12.0 phaselfospeed3 95 40 true 0.0 1.0 0.001 0.14400001 250 true false 15 65 total depth System Regular 12.0 485 120 mode System Regular 12.0 635 125 notches System Regular 12.0 phasescale 480 140 true 0.0 2.0 0.001 0.555 250 true false phasenotches 630 15 true 1.0 10.0 0.1 9.5 80 true true 560 85 feedback System Regular 12.0 phasefeedback 560 15 true -0.98 0.98 -0.09800992999999991 51 true true label false System Regular 12.0 60 30 centre frequency System Regular 12.0 phasefreq 55 15 true 50.0 3000.0 0.1 1377.9 365 true true phasing_on 5 5 true phasing false true 485 155 scaling System Regular 12.0 695 125 mix System Regular 12.0 phasemode 525 115 true 1 12 true 1 1 2 2 550 155 l System Regular 12.0 phaseq 485 15 true 0.0 1.5 1.0948599999999997 51 true true label false System Regular 12.0 495 85 quality System Regular 12.0 710 20 direct System Regular 12.0 phasemix 680 15 true 0.0 1.0 0.1 0.6 80 true true 710 75 wet System Regular 12.0 1015 410 arpeggio 0x669966ff 0x000000ff 0xffffffff true 235 20 80 110 Frequency System Regular 12.0 ArpON 5 5 true Arpeggio true true Arpspeed 85 30 true 0.0 25.0 15.078563908431793 55 true true label false System Regular 12.0 20 110 Octave System Regular 12.0 165 110 type System Regular 12.0 Arpdepth 15 30 true 1.0 8.0 1 3.0 50 true true Arptype 155 30 true 0.0 5.0 1 5.0 50 true true 10 185 grain parameters 0x669966ff 0x000000ff 0xffffffff true 20 20 15 50 duration System Regular 12.0 deviation 10 60 true 0.0 2.0 0.001 0.0 1170 true true density 10 10 true 2.0 1000.0 1 43.0 1170 true true 15 105 window System Regular 12.0 15 75 random deviation (Hz) System Regular 12.0 grain_window 75 100 true 1 12 true Bartlett 0 Hanning 1 15 25 density System Regular 12.0 675 90 3 LFOs for deviation 0x00000033 0x000000ff 0xffffffff true 20 20 deviation_LFOspeed1 155 10 true 0.0 1.0 0.001 0.347 250 true false deviation_LFOdepth1 420 10 true 0.0 1.0 0.001 1.0 70 true false 230 55 slow speeds System Regular 12.0 devaition_LFOspeed2 155 25 true 0.0 1.0 0.001 0.118 250 true false 430 55 amount System Regular 12.0 deviation_LFOdepth2 420 25 true 0.0 1.0 0.001 1.0 70 true false deviation_LFOdepth3 420 40 true 0.0 1.0 0.001 1.0 70 true false devaition_LFOspeed3 155 40 true 0.0 1.0 0.001 0.495 250 true false 35 60 deviation LFO depth System Regular 12.0 dirt_deviation 10 20 true dirt false true deviationLFOdepthtotal 80 15 true 0.0 3.0 3.0 45 true false label false System Regular 12.0 graindur 10 35 true 0.001 2.0 0.001 0.145 1170 true true 1035 570 Type G System Bold 36.0 780 410 Swell 0x669966ff 0x000000ff 0xffffffff true 230 136 Swellamp 5 85 true 1.0 2.0 0.001 2.0 200 true false SwellOn 5 5 true activate false true 10 60 position in note System Regular 12.0 10 100 amount System Regular 12.0 SwellPosition 5 45 true 1.0E-5 0.96 0.05 0.9500099999999999 200 true false 1255 10 output 0x669966ff 0x000000ff 0xffffffff true 20 591 detune 45 400 true 0.0 2.0 0.001 1.0 130 true true 5 5 envelope 0x00000033 0x000000ff 0xffffffff true 20 20 decay 70 25 true 0.0 10.0 10.0 50 true true label false System Regular 12.0 11 175 Sustain System Regular 12.0 attack 10 25 true 0.001 10.0 3.10069 50 true true label false System Regular 12.0 sustain 10 110 true 0.0 1.0 1.0 50 true true label false System Regular 12.0 15 90 Attack System Regular 12.0 release 70 110 true 0.0 10.0 3.200000000000001 50 true true label false System Regular 12.0 75 90 Decay System Regular 12.0 70 175 Release System Regular 12.0 exponential 5 5 true exponential false true stereo 20 320 true stereo true true fase 20 340 true 100 50 0.0 1.0 0.0 1.0 0.44 0.33999999999999997 true false 15 560 frequency detune System Regular 12.0 volume 45 230 true 0.0 0.7 0.7 52 true true label false System Regular 12.0 45 300 volume System Regular 12.0 k_Zwel_m K KKK kOnSwell,kposition, ksw xin if kOnSwell == 1 then ; switch Swell on/off irise = p3 * i(kposition) ; relative position 0 > position < 1 inside note ifall = p3 - irise kswell linseg 1, irise, i(ksw) , ifall, 1 else kswell = 1 ; if switch = OFF, no effect endif xout kswell use to put a amplitude accent inside the note - switch to activate - where to position the amp accent - amount of amplitude for accent to be used with amplitude envelope generator like this: envelope * k_Zwell_m Because of depenedency on the note duration (p3), use it with envelope type of the r type or madsr. Ohterwise it is okay to use k_Zwell k_ArpeggioMini k KKKi kOnArpeggio, koct, kspeed, itype xin kpitch = 1 if kOnArpeggio == 1 then ; switch Arpeggio on/off klfo lfo koct, kspeed, itype ; klfo lfo <oct>, <spd>, i(<typeLFO>) koc = int(klfo) ; produce only whole numbers kfactor = octave(koc) ; create octave number kpitch = kfactor * kpitch kpitch = abs(kpitch) else kpitch = 1 ; no change in frequency endif xout kpitch Arpeggio moves the frequency several times octave-wise, in the rythm of the LFO. - 5 types of LFO waveforms