Fragments Jacob Joaquin March 7, 2010 jacobjoaquin@gmail.com csound.noisepages.com The Bohlen-Pierce Symposium, Boston, March 7th-9th, 2010 bohlen-pierce-conference.org Program Notes Fragments is the final product from a series of short etudes and generative instrument experiments conducted in order to gain an understanding of the Bohlen-Pierce scale. This direction emulates the way in which a hacker approaches the challenge of dissecting a piece of software or electronic device. The piece is composed, programmed and generated with the Csound computer music language. The evolution of Fragments is documented at The Csound Blog: http://csound.noisepages.com/. Bio Jacob Joaquin started tinkering with music on a Commodore 64 while in elementary school. From 1994 - 1996 he ran the Digital Dissonance BBS, an online Fresno community where musicians traded orginal tracker-based electronic compositions. He received his BA in Music Synthesis from Berklee College of Music in 1999. During his time at Berklee he recieved his first C programming lesson from Max Mathews and was the first recipient of Berklee's Max Mathews' award. Jacob completed his Masters Degree in Composition New Media and Integrated Media at California Institute of the Arts in 2002. He has studied composition with Dr. Richard Boulanger, Mark Trayle and Morton Subotnick. Jacob actively blogs about computer instrument design at The Csound Blog. He currently resides in Fresno, California. This work is licensed under the Creative Commons Attribution-Noncommercial-Share Alike 3.0 United States License. To view a copy of this license, visit http://creativecommons.org/licenses/by-nc-sa/3.0/us/ or send a letter to Creative Commons, 171 Second Street, Suite 300, San Francisco, California, 94105, USA. sr = 44100 kr = 44100 ksmps = 1 nchnls = 2 0dbfs = 1.0 ; Tune Instruments # define TUNE # 264.99816498389697 # ; 440 * 3 ^ (-6 / 13) ; Instruments # define Init # 1 # # define Fade_Player # 2 # # define Fade_Synth # 3 # # define Fade_Player_2 # 4 # # define Fade_Synth_2 # 5 # # define Fade_Reverb # 6 # # define FM_Brass_Cycler # 7 # # define FM_Brass_Phase # 8 # # define FM_Brass # 9 # # define FM_Brass_Plus # 10 # # define FM_Brass_Echo # 11 # # define Foo # 12 # # define Foo_Fx # 13 # # define Bar # 14 # # define Bar_Fx # 15 # ; F-Tables # define T_Sine # 1 # ; Sine wave # define T_BP # 13 # ; Just intonation Bohlen-Pierce scale # define T_Theme_Pitches # 20 # ; Theme pitches # define T_Theme_2 # 21 # ; Theme pitches # define T_Phase # 22 # ; Phase table of notes and pauses ; Sine wave gitemp ftgen $T_Sine, 0, 2 ^ 16, 10, 1 ; Just Intonation Bohlen-Pierce Tuning gitemp ftgen $T_BP, 0, 64, -2, 13, 3, $TUNE, 60, \ 1, \ 27 / 25, \ 25 / 21, \ 9 / 7, \ 7 / 5, \ 75 / 49, \ 5 / 3, \ 9 / 5, \ 49 / 25, \ 15 / 7, \ 7 / 3, \ 63 / 25, \ 25 / 9, \ 3 ; Note tables gitemp ftgen $T_Theme_Pitches, 0, -5, -2, 0, 1, 3, 6, 7 gitemp ftgen $T_Theme_2, 0, 8, -2, 6, 3, 0, 1, 3, 4, -1, -1 ; -1 == don't play ; Note table for FM_Phase gitemp ftgen $T_Phase, 0, -12, -2, 0, 1, -1, 7, -1, 6, 3, -1, 8, 10, 13, -1 opcode Get_Ratio, i, i i_interval xin iratio cpstuni 60 + i_interval, 13 iratio = iratio / $TUNE xout iratio endop instr $Init a0 = 0 ; Fade chn_a "verb_left", 3 chn_a "verb_right", 3 chnset a0, "verb_left" chnset a0, "verb_right" ; FM_Brass chn_a "FM_Brass_send", 3 chnset a0, "FM_Brass_send" ; Foo chn_a "Foo_send_left", 3 chn_a "Foo_send_right", 3 chnset a0, "Foo_send_left" chnset a0, "Foo_send_right" ; Bar chn_a "Bar_send_left", 3 chn_a "Bar_send_right", 3 chnset a0, "Bar_send_left" chnset a0, "Bar_send_right" turnoff endin instr $Fade_Player itime = p4 ; Time the Player instr is active ibase_dur = p5 ; Base duration of notes generated ibase_interval = p6 ; Base interval ibase_width = p7 ; Base interval width ; Play Synth iratio Get_Ratio int(rnd(14)) idur = ibase_dur * iratio iamp = rnd(0.7) + 0.2 ibase = ibase_interval + int(rnd(ibase_width)) i_interval = int(rnd(14)) iratio Get_Ratio int(rnd(14)) i_index = iratio idistance = 0.6 + rnd(0.4) ipan = rnd(1) event_i "i", $Fade_Synth, 0, idur, iamp, ibase, i_interval, i_index, \ idistance, ipan ; Play Player inext = idur * 0.4 itime = itime - inext if (itime > 0) then event_i "i", $Fade_Player, inext, 1, itime, ibase_dur, \ ibase_interval, ibase_width endif turnoff endin instr $Fade_Synth idur = p3 ; Duration iamp = p4 ; Amplitude ibase = p5 ; Base note iratio_interval = p6 ; Modulation ratio i_index = p7 ; Modulation index idistance = p8 ; Front to back, 0 .. 1 ipan = p9 ; Pan position ; Stream Bohlen-Pierce ratios iratio Get_Ratio iratio_interval ; Amp envelope iratio_env Get_Ratio int(rnd(12)) + 1 iratio_env = (iratio_env - 1) / 2 kenv expseg 0.001, idur * iratio_env, 1, idur * (1 - iratio_env), 0.001 ; FM synth kfreq cpstun 1, ibase, 13 a1 foscil iamp, kfreq, 1, iratio, i_index, $T_Sine a1 = a1 * kenv ; Pan aleft = a1 * sqrt(1 - ipan) aright = a1 * sqrt(ipan) ; Send to out and bus outs aleft * sqrt(1 - idistance), aright * sqrt(1 - idistance) chnmix aleft * sqrt(idistance), "verb_left" chnmix aright * sqrt(idistance), "verb_right" endin instr $Fade_Player_2 ibeat = p3 ; Duration itime = p4 * ibeat ; Time the Player instr is active ibase_dur = p5 ; Base duration of notes generated ibase_interval = p6 ; Base interval itable = p7 ; Table of stored pitches ; Play Synth iratio Get_Ratio int(rnd(14)) idur = ibase_dur * iratio iamp = rnd(0.7) + 0.2 ibase tab_i int(rnd(ftlen(itable))), itable ibase = ibase + ibase_interval i_interval = int(rnd(14)) iratio Get_Ratio int(rnd(14)) i_index = iratio idistance = 0.6 + rnd(0.4) ipan = rnd(1) event_i "i", $Fade_Synth, 0, idur, iamp, ibase, i_interval, i_index, \ idistance, ipan ; Play Player inext = idur * 0.4 itime = itime - inext if (itime > 0) then event_i "i", $Fade_Player_2, inext, 1, itime, ibase_dur, \ ibase_interval, itable endif turnoff endin instr $Fade_Synth_2 idur = p3 ; Duration iamp = p4 ; Amplitude ibase = p5 ; Base note iratio_interval = p6 ; Modulation ratio i_index = p7 ; Modulation index idistance = p8 ; Front to back, 0 .. 1 ienv_peak = p9 ; Peak of amp envelope, 0 .. 1 ipan = p10 ; Pan position ; Stream Bohlen-Pierce ratios iratio Get_Ratio iratio_interval ; Amp envelope kenv expseg 0.001, idur * ienv_peak, 1, idur * (1 - ienv_peak), 0.001 ; FM synth kfreq cpstun 1, ibase, 13 a1 foscil iamp, kfreq, 1, iratio, i_index, $T_Sine a1 = a1 * kenv ; Pan aleft = a1 * sqrt(1 - ipan) aright = a1 * sqrt(ipan) ; Send to out and bus outs aleft * sqrt(1 - idistance), aright * sqrt(1 - idistance) chnmix aleft * sqrt(idistance), "verb_left" chnmix aright * sqrt(idistance), "verb_right" endin instr $Fade_Reverb iroom_size = p4 ; Size of room idamp = p5 ; High frequency dampening aleft chnget "verb_left" aright chnget "verb_right" aleft delay aleft, 0.22 aright delay aright, 0.2 al, ar freeverb aright, aleft, iroom_size, idamp outs al, ar chnclear "verb_left" chnclear "verb_right" endin instr $FM_Brass_Cycler idur = p3 ; Duration iamp = p4 ; Amplitude ibase = p5 ; Base note itable = p6 ; Table of notes istart_rate = p7 ; Start rate of cycler iend_rate = p8 ; End rate of cycler ilength = ftlen(itable) arate expon istart_rate, idur, iend_rate aphasor phasor arate / ilength, 0.5 - 1 / sr kphasor downsamp aphasor ktrig trigger kphasor, 0.5, 1 kctr init 0 ktable tab kctr, itable ipeak = 0.5 kamp_env linseg iamp, idur * ipeak, iamp, idur * (1 - ipeak), iamp * 0.8 ksend_env linseg 0.6, idur * ipeak, 0.6, idur * (1 - ipeak), 0.3 if (ktrig == 1) then kctr = (kctr + 1) % ilength if (ktable >= 0) then kdel_r random 0, 0.03 kvel_r random 0.4, 0.55 kpan_r random 0, 1 event "i", $FM_Brass_Plus, kdel_r, 2, kamp_env, ktable + ibase, \ kvel_r, kpan_r, ksend_env endif endif endin instr $FM_Brass_Phase idur = p3 ; Duration iamp = p4 ; Amplitude ibase = p5 ; Base note itable = p6 ; Table of notes irate = p7 ; Rate of cycler idiv = 8 ilength = ftlen(itable) aphasor phasor irate / ilength * idiv, 0 kphasor downsamp aphasor ktrig trigger kphasor, 0.5, 1 kctr init 0 kc2 init 0 km2 init 2 ktable tab kctr, itable ktable2 tab kc2 % ilength, itable ktrig_inner init 0 ktrig_inner_2 init 0 ksubctr init 0 ipeak = 0.7 istart_send = 0.01 kenv_send linseg istart_send, idur * ipeak, istart_send, \ idur * (1 - ipeak), 1.8 if (ktrig == 1) then if (ktrig_inner) == 0 then if (kctr == 0) then event "i", $FM_Brass, 0, 0.125, iamp * 2, ibase - 13, 0.5, 0.9 endif if (ktable >= 0) then event "i", $FM_Brass_Plus, 0, 0.25, iamp, ktable + ibase, \ 0.5, 0.333, kenv_send endif kctr = (kctr + 1) % ilength endif if (ktrig_inner_2) == 0 then if (ktable2 >= 0) then event "i", $FM_Brass_Plus, 0, 0.25, iamp, ktable2 + ibase, \ 0.5, 0.666, kenv_send endif kc2 = (kc2 + 1) % ilength endif ; Offset second looper if (kc2 == 0) then ktrig_inner_2 = (ktrig_inner_2 + 1) % idiv endif ktrig_inner = (ktrig_inner + 1) % idiv ktrig_inner_2 = (ktrig_inner_2 + 1) % idiv endif endin instr $FM_Brass idur = p3 ; Duration iamp = p4 ; Amplitude ipch = p5 ; Pitch (in MIDI keynote) ivelocity = p6 ; Velocity of simulated key-stroke isend = p7 ; Fx send amount event_i "i", $FM_Brass_Plus, 0, idur, iamp, ipch, ivelocity, 0.5, isend endin instr $FM_Brass_Plus idur = p3 ; Duration iamp = p4 ; Amplitude ipch = p5 ; Pitch (in MIDI keynote) ivelocity = p6 ; Velocity of simulated key-stroke ipan = p7 ; Pan position ksend = p8 ; Fx send amount ; Frequency ifreq = $TUNE * 3 ^ ((ipch - 60) / 13) kindex linseg 1, idur, 0 ; FM Synth a1 foscil ivelocity, ifreq, 1, 1, 12 * ivelocity * kindex, $T_Sine ; Amp Envelope kamp linseg 0, 0.05, iamp, idur - 0.1, iamp, 0.05, 0 a1 = a1 * kamp ; Outputs outs a1 * sqrt(1 - ipan), a1 * sqrt(ipan) chnmix a1 * ksend, "FM_Brass_send" endin instr $FM_Brass_Echo iamp = p4 ; Amplitude itime = p5 ; Time of delay ifb = p6 ; Delay feedback amount iroom_size = p7 ; Size of room, for reverb idamp = p8 ; High frequency dampening of reverb ; Receive send signal from Synth a0 chnget "FM_Brass_send" ; Effects adelay delayr itime delayw a0 + adelay * ifb al, ar freeverb adelay, adelay, 0.1, 0.2 ; Outputs outs al * iamp, ar * iamp chnclear "FM_Brass_send" endin instr $Foo idur = p3 iamp = p4 * 0.7 ipch = p5 ivelocity = p6 isend = p7 ipan = 1 - ((70 - ipch) / (70 - 54)) irelease = 0.3 ; Frequency ifreq = $TUNE * 3 ^ ((ipch - 60) / 13) ifreq2 cpstuni ipch, 13 ; Envelopes kamp linsegr 0, 0.01, iamp, 0.08, iamp * 0.9, 0.6, 0.2, irelease, 0 kindex linsegr 1, idur, 0.1, irelease, 0 kindex2 expsegr 1, idur, 0.1, irelease, 0.001 ; FM Synth ivel_curve = ivelocity * 0.8 + 0.2 a1 foscil ivel_curve, ifreq, 1, 1, 10.5 * ivelocity * kindex, $T_Sine a2 foscil ivel_curve, ifreq2, 1, 2, 7 * ivelocity * kindex2, $T_Sine ; Mix a1 = (a1 + a2 * 0.45) * kamp * 0.75 ; Outputs aleft = a1 * sqrt(1 - ipan) aright = a1 * sqrt(ipan) outs aleft, aright chnmix aleft * isend, "Foo_send_left" chnmix aright * isend, "Foo_send_right" endin instr $Foo_Fx iamp = p4 ; Amplitude itime = p5 ; Time of delay ifb = p6 ; Delay feedback amount iroom_size = p7 ; Size of room, for reverb idamp = p8 ; High frequency dampening of reverb ; Receive send signal from Synth a0 chnget "Foo_send_left" a1 chnget "Foo_send_right" ; Effects adelay0 delayr itime delayw a0 + adelay0 * ifb adelay1 delayr itime * 0.995 delayw a1 + adelay1 * ifb al, ar freeverb adelay1, adelay0, iroom_size, idamp ; Outputs outs al * iamp, ar * iamp chnclear "Foo_send_left" chnclear "Foo_send_right" endin instr $Bar idur = p3 ; Duration iamp = p4 ; Amplitude ipch = p5 ; Pitch ivelocity = p6 ; Velocity ksend = p7 ; Fx Send ipan random 0.4, 0.6 irelease = idur * 0.1 ; Frequency ifreq = $TUNE * 3 ^ ((ipch - 60) / 13) ;kindex linseg 1, idur, 0 kindex linsegr 1, idur, 0.2, irelease, 0 ; FM Synth a1 foscil ivelocity, ifreq * 1.002, 1, 1, 12 * ivelocity * kindex, $T_Sine a2 foscil ivelocity, ifreq * 0.998 * 2, 1, 1, 7 * ivelocity * kindex, \ $T_Sine ; Amplitude envelope kamp linsegr 0, 0.05, iamp, idur, iamp, irelease, 0 a1 = (a1 + a2) * kamp * 0.5 ; Outputs aleft = a1 * sqrt(1 - ipan) aright = a1 * sqrt(ipan) outs aleft, aright chnmix aleft, "Bar_send_left" chnmix aright, "Bar_send_right" endin instr $Bar_Fx iamp = p4 ; Amplitude itime = p5 ; Time of delay ifb = p6 ; Delay feedback amount iroom_size = p7 ; Size of room, for reverb idamp = p8 ; High frequency dampening of reverb ; Receive send signal from Synth a0 chnget "Bar_send_left" ; Effects adelay delayr itime delayw a0 + adelay * ifb al, ar freeverb adelay, adelay, 0.1, 0.2 ; Outputs outs al * iamp, ar * iamp chnclear "Bar_send_left" chnclear "Bar_send_right" endin ; Instruments # define Init # 1 # # define Fade_Player # 2 # # define Fade_Synth # 3 # # define Fade_Player_2 # 4 # # define Fade_Synth_2 # 5 # # define Fade_Reverb # 6 # # define FM_Brass_Cycler # 7 # # define FM_Brass_Phase # 8 # # define FM_Brass # 9 # # define FM_Brass_Plus # 10 # # define FM_Brass_Echo # 11 # # define Foo # 12 # # define Foo_Fx # 13 # # define Bar # 14 # # define Bar_Fx # 15 # ; F-Tables # define T_Sine # 1 # ; Sine wave # define T_BP # 13 # ; Just intonation Bohlen-Pierce scale # define T_Theme_Pitches # 20 # ; Theme pitches # define T_Theme_2 # 21 # ; Theme pitches # define T_Phase # 22 # ; Phase table of notes and pauses i $Init 0 1 ; ---- Fragment 1 ---- t 0 80 ; Turn on echo effects i $FM_Brass_Echo 0 160 1 0.333 0.5 0.2 0.2 i $Fade_Reverb 0 160 0.7 0.7 i $FM_Brass 0 1 1 56 0.3 0.5 i $FM_Brass 1 1.5 1 63 0.35 . i $FM_Brass 2.5 0.5 1 62 0.3 . i $FM_Brass 3 1 0.9 59 0.28 0.9 i $FM_Brass 8 0.5 1.2 59 0.32 0.5 i $FM_Brass 8.5 1 . 57 0.3 . i $FM_Brass 9.5 0.5 . 62 0.32 0.3 i $FM_Brass 10 2 1.02 62 0.35 0.2 i $Fade_Synth_2 9.25 3 0.5 62 11 4 0.7 0.9 0.7 i $FM_Brass 16 1 1 56 0.3 0.5 i $FM_Brass 17 1.5 1 63 0.35 . i $FM_Brass 18.5 0.5 1 62 0.3 . i $FM_Brass 19 1 0.9 59 0.28 0.9 i $FM_Brass 24 0.5 1.2 59 0.32 0.5 i $FM_Brass 24.5 1 . 57 0.3 . i $FM_Brass 25.5 0.5 . 62 0.32 0.3 i $FM_Brass 26 2 1.02 62 0.35 0.2 i $Fade_Synth_2 19 1 0.2 59 6 4 0.7 0.01 0.8 i $Fade_Synth_2 25.5 12 0.5 67 6 4 0.7 0.5 0.3 i $FM_Brass 32 1 1 56 0.3 0.5 i $FM_Brass 33 1.5 1 63 0.35 . i $FM_Brass 34.5 0.5 1 62 0.3 . i $FM_Brass 35 1 0.9 59 0.28 0.9 i $FM_Brass 40 0.5 1.2 59 0.32 0.5 i $FM_Brass 40.5 1 . 57 0.3 . i $FM_Brass 41.5 0.5 . 62 0.32 0.3 i $FM_Brass 42 2 1.02 62 0.35 0.8 i $Fade_Synth_2 32 8 0.5 43 0 4 0.7 0.4 0.1 i $Fade_Synth_2 38 4 0.5 62 0 10 0.7 0.9 0.9 i $FM_Brass 48 1 1 56 0.3 0.5 i $FM_Brass 49 1.5 1 63 0.35 . i $FM_Brass 50.5 0.5 1 62 0.3 . i $FM_Brass 51 4 0.9 59 0.28 0.9 i $Fade_Synth_2 42 14 0.5 46 0 4 0.7 0.95 0.5 ; ---- Fragment 2 ---- i $Fade_Player_2 56 1 6 0.6 56 $T_Theme_Pitches i $FM_Brass 60 1 1 42 0.3 0.8 i $FM_Brass 61 3 1 40 0.3 0.8 i $FM_Brass 64 0.5 1 42 0.3 0.8 i $FM_Brass 64.5 0.5 1 40 0.3 0.8 i $FM_Brass 65 3 1 39 0.3 0.8 i $Fade_Player_2 68 1 2 0.2 69 $T_Theme_Pitches i $FM_Brass 76 1 1 42 0.3 0.8 i $FM_Brass 77 3 1 40 0.3 0.8 i $FM_Brass 80 0.5 1 42 0.3 0.8 i $FM_Brass 80.5 0.5 1 40 0.3 0.8 i $FM_Brass 81 4 1 45 0.3 0.8 i $FM_Brass 82.5 1 0.4 63 0.3 0.8 i $FM_Brass 83.0 1 0.4 62 0.3 0.8 i $FM_Brass 83.5 1 0.4 57 0.3 0.8 i $FM_Brass 84.0 1 0.4 59 0.3 0.8 i $FM_Brass 84.5 1 0.4 63 0.3 0.8 i $FM_Brass 85.0 3 0.4 62 0.3 0.8 i $Fade_Synth_2 76 9 0.5 66 10 10 0.7 0.95 0.8 i $Fade_Synth_2 87 9 0.5 45 6 6 0.7 0.01 0.45 i $Fade_Synth_2 87.5 9 0.7 45 1 2 0.1 0.01 0.55 i $Fade_Synth_2 90 11 0.1 60 11 6 0.8 0.99 0.2 ; ---- Fragment 3 ---- i $FM_Brass 98.5 1 0.4 62 0.3 0.8 i $FM_Brass 99.0 1 0.4 59 0.3 0.8 i $FM_Brass 99.5 1 0.4 56 0.3 0.8 i $FM_Brass 100.0 1 0.4 57 0.3 0.8 i $FM_Brass 100.5 1 0.4 59 0.3 0.8 i $FM_Brass 101.0 4 0.4 60 0.3 0.8 i $FM_Brass 103.0 3 0.8 43 0.3 0.8 i $FM_Brass_Cycler 103 32 0.125 56 $T_Theme_2 12 100 i $Fade_Synth_2 135 9 0.5 45 6 6 0.7 0.01 0.3 i $Fade_Synth_2 135.5 9 0.63 45 1 2 0.1 0.01 0.7 i $FM_Brass 142.0 1 0.4 63 0.3 0.8 i $FM_Brass 142.5 1 0.4 62 0.3 0.8 i $FM_Brass 143.0 1 0.4 57 0.3 0.8 i $FM_Brass 143.5 1 0.4 59 0.3 0.8 i $FM_Brass 144.0 1 0.4 63 0.3 0.8 i $FM_Brass 144.5 3 0.4 62 0.3 0.8 i $FM_Brass 150.0 1 0.4 62 0.3 0.8 i $FM_Brass 150.5 1 0.4 59 0.3 0.8 i $FM_Brass 151.0 1 0.4 56 0.3 0.8 i $FM_Brass 151.5 1 0.4 57 0.3 0.8 i $FM_Brass 152.0 1 0.4 59 0.3 0.8 i $FM_Brass 153.0 0.5 0.4 57 0.3 0.8 i $FM_Brass 153.5 3 0.4 62 0.3 0.8 s 160 ; ---- Fragment 4 ---- t 0 55 i $Foo_Fx 0 43 1 0.373 0.5 0.6 0.9 i $Foo 0.0 0.371657 0.5 57 0.155118 0.4 i $Foo 0.348267 0.371657 0.5 59 0.193701 0.4 i $Foo 0.674378 0.347393 0.5 62 0.281102 0.4 i $Foo 1.021729 0.324943 0.5 57 0.225197 0.4 i $Foo 1.34668 0.416103 0.5 59 0.307087 0.4 i $Foo 1.671875 0.325170 0.5 62 0.307087 0.4 i $Foo 1.997009 0.371430 0.5 57 0.496063 0.4 i $Foo 2.321961 0.371657 0.5 59 0.519685 0.4 i $Foo 2.623779 0.348300 0.5 62 0.566929 0.4 i $Foo 2.972107 0.464404 0.5 57 0.574803 0.4 i $Foo 3.320374 0.394787 0.5 59 0.409449 0.4 i $Foo 3.668701 0.905637 0.5 62 0.433071 0.4 i $Foo 5.688843 0.394787 0.5 64 0.393701 0.4 i $Foo 6.03717 0.328118 0.5 66 0.409449 0.4 i $Foo 6.362305 0.278683 0.5 69 0.291339 0.4 i $Foo 6.664124 0.394787 0.5 64 0.409449 0.4 i $Foo 6.989319 0.371430 0.5 66 0.496063 0.4 i $Foo 7.31427 0.301813 0.5 69 0.519685 0.4 i $Foo 7.639404 0.441047 0.5 64 0.566929 0.4 i $Foo 8.010864 0.364400 0.5 66 0.173228 0.4 i $Foo 8.359131 0.185713 0.5 69 0.354331 0.4 i $Foo 8.800415 1.044853 0.5 69 0.149606 0.4 i $Foo 10.286377 0.394787 0.5 57 0.440945 0.4 i $Foo 10.634644 0.371657 0.5 59 0.188976 0.4 i $Foo 10.936707 0.324943 0.5 62 0.440945 0.4 i $Foo 11.285034 0.371430 0.5 57 0.511811 0.4 i $Foo 11.609924 0.417917 0.5 59 0.393701 0.4 i $Foo 11.958252 0.301813 0.5 62 0.196850 0.4 i $Foo 12.283447 0.441047 0.5 57 0.496063 0.4 i $Foo 12.608337 0.371657 0.5 59 0.566929 0.4 i $Foo 12.933533 0.301813 0.5 64 0.566929 0.4 i $Foo 13.28186 0.371430 0.5 62 0.433071 0.4 i $Foo 13.669768 0.378683 0.5 64 0.518110 0.4 i $Foo 13.978455 0.325170 0.5 66 0.629921 0.4 i $Foo 14.303589 0.394560 0.5 64 0.554331 0.4 i $Foo 14.651917 0.371430 0.5 66 0.566929 0.4 i $Foo 14.953735 0.278683 0.5 69 0.491339 0.4 i $Foo 15.255554 0.417917 0.5 64 0.425197 0.4 i $Foo 15.603821 0.353969 0.5 66 0.566929 0.4 i $Foo 15.919006 0.334921 0.5 69 0.574803 0.4 i $Foo 16.253967 0.371657 0.5 64 0.519685 0.4 i $Foo 16.579102 0.371430 0.5 66 0.566929 0.4 i $Foo 16.904053 0.394787 0.5 69 0.519685 0.4 i $Foo 17.298828 1.207423 0.5 70 0.519685 0.9 i $Foo 19.644165 0.394560 0.5 62 0.449606 0.4 i $Foo 19.992493 0.371430 0.5 64 0.409449 0.4 i $Foo 20.317444 0.348300 0.5 66 0.393701 0.4 i $Foo 20.665711 0.371657 0.5 62 0.519685 0.4 i $Foo 20.967529 0.348300 0.5 64 0.511811 0.4 i $Foo 21.292725 0.348300 0.5 66 0.511811 0.4 i $Foo 21.6875 0.487534 0.5 61 0.473228 0.4 i $Foo 22.05896 0.371657 0.5 64 0.393701 0.4 i $Foo 22.476868 0.418144 0.5 66 0.386614 0.4 i $Foo 22.871643 0.882283 0.5 61 0.519685 0.4 i $Foo 23.730835 0.394787 0.5 59 0.496063 0.4 i $Foo 24.079102 0.371430 0.5 57 0.440945 0.4 i $Foo 24.450562 0.441274 0.5 59 0.357480 0.4 i $Foo 24.822205 0.301813 0.5 62 0.291339 0.4 i $Foo 25.170471 0.394787 0.5 57 0.496063 0.4 i $Foo 25.541931 0.441274 0.5 59 0.393701 0.4 i $Foo 25.913574 0.348300 0.5 62 0.393701 0.4 i $Foo 26.331482 0.394787 0.5 56 0.496063 0.4 i $Foo 26.702942 0.417917 0.5 59 0.440945 0.4 i $Foo 27.051209 0.394787 0.5 62 0.496063 0.4 i $Foo 27.445984 0.487534 0.5 56 0.496063 0.4 i $Foo 27.863892 0.371657 0.5 59 0.511811 0.4 i $Foo 28.28186 0.418144 0.5 62 0.354331 0.4 i $Foo 28.676636 0.464404 0.5 55 0.226614 0.4 i $Foo 29.112915 0.422906 0.5 59 0.222992 0.4 i $Foo 29.512695 0.371430 0.5 62 0.149606 0.4 i $Foo 29.953735 0.417917 0.5 55 0.131496 0.4 i $Foo 30.302002 0.534017 0.5 59 0.291339 0.4 i $Foo 30.696777 0.348300 0.5 62 0.275591 0.4 i $Foo 31.091614 0.534017 0.5 55 0.519685 0.4 i $Foo 31.532654 0.510890 0.5 59 0.496063 0.4 i $Foo 31.950745 0.464404 0.5 62 0.519685 0.4 i $Foo 32.391785 0.557370 0.5 55 0.637795 0.4 i $Foo 32.879578 0.464404 0.5 59 0.574803 0.4 i $Foo 33.367127 0.580498 0.5 62 0.307087 0.4 i $Foo 33.924439 0.696586 0.5 54 0.519685 0.4 i $Foo 34.644165 0.882283 0.5 57 0.433071 0.4 i $Foo 35.456909 0.789548 0.5 59 0.511811 0.4 i $Foo 36.269592 1.323512 0.5 57 0.291339 0.4 i $Foo 37.593201 2.623616 0.5 62 0.149606 0.9 s 45 ; ---- Fragment 5 ---- t 0 80 i $FM_Brass_Echo 0 85 1 0.666 0.7 0.2 0.2 i $Fade_Reverb 0 136 0.7 0.7 i $FM_Brass_Phase 0 71 0.15 56 $T_Phase 64 i $Fade_Synth_2 4 5 0.5 69 0 4 0.7 0.9 1.0 i $Fade_Synth_2 4 5 0.5 66 0 4 0.7 0.9 0.8 i $Fade_Synth_2 13 5 0.5 66 0 4 0.7 0.9 0.8 i $Fade_Synth_2 13 5 0.5 64 0 4 0.7 0.9 0.6 i $Fade_Synth_2 21 5 0.5 64 0 4 0.7 0.9 0.6 i $Fade_Synth_2 21 5 0.5 62 0 4 0.7 0.9 0.4 i $Fade_Synth_2 30 5 0.5 62 0 4 0.7 0.9 0.4 i $Fade_Synth_2 30 5 0.5 59 0 4 0.7 0.9 0.2 i $Fade_Synth_2 39 5 0.5 59 0 4 0.7 0.9 0.2 i $Fade_Synth_2 39 5 0.5 57 0 4 0.7 0.9 0.0 i $Fade_Synth_2 48 20 0.5 59 0 6 0.7 0.3 0.0 i $Fade_Synth_2 48 20 0.5 54 0 6 0.7 0.3 1.0 i $Fade_Synth_2 66.03129 3 0.5 70 11 6 0.9 0.999 0.25 i $Fade_Synth_2 69.03129 10 0.7 57 11 6 0.9 0.001 0.5 i $FM_Brass 69.03129 1 0.5 43 0.5 0.9 ; ---- Fragment 6 ---- i $Bar_Fx 79 60 1 0.333 0.5 0.2 0.2 i $Fade_Synth_2 76 20 0.5 43 0 6 0.9 0.2 0.5 i $Bar 79 1 1 56 0.3 0.5 i $Bar 80 1.5 1 63 0.35 . i $Bar 81.5 0.5 1 62 0.3 . i $Bar 82 1.5 0.9 59 0.28 0.9 i $Fade_Synth_2 82.25 10 1 49 0 4 0.7 0.9 0.7 i $Bar 87 0.5 1.2 59 0.32 0.5 i $Bar 87.5 1 . 57 0.3 . i $Bar 88.5 0.5 . 62 0.32 0.3 i $Bar 89 3 1.02 62 0.35 0.2 i $Fade_Synth_2 92 18 0.5 50 0 6 0.9 0.2 0.5 i $Bar 95 1 1 56 0.3 0.5 i $Bar 96 1.5 1 63 0.35 . i $Bar 97.5 0.5 1 62 0.3 . i $Bar 98 2 0.9 59 0.28 0.9 i $Fade_Synth_2 100 13 0.5 46 0 6 0.9 0.2 0.5 i $Bar 103 0.5 1.2 59 0.32 0.5 i $Bar 103.5 1.2 . 57 0.28 . i $Bar 104.7 0.75 . 62 0.25 0.3 i $Bar 105.27 7.5 1.02 62 0.20 0.2 i $Fade_Synth_2 106 24 0.5 43 0 6 0.9 0.2 0.5 i $Bar 117 1.5 1 56 0.13 0.8 i $Bar 118.55 5 1 54 0.1 0.9