tweak bug3 instrument

5 files changed, 3 insertions, 2194 deletions

diff --git a/BUG3/base.csd b/BUG3/base.csd
deleted file mode 100644
index e7df1af..0000000
--- a/BUG3/base.csd
+++ /dev/null
@@ -1,506 +0,0 @@
-<CsoundSynthesizer>
-<CsOptions>
--g -odac 
--m0
-</CsOptions>
-<CsInstruments>
-/*
-	Debugger - Unfixed Bugs : BUG #3
-
-	By Richard Knight 2021
-			http://1bpm.net
-	mailto:		_@1bpm.net
-
-*/
-
-sr = 44100
-ksmps = 128
-nchnls = 2
-0dbfs = 1
-seed 0
-
-#define BUG_VERSION #1.0#
-
-
-gitempo init -1
-gSprepare[] fillarray "hat909"
-
-gSequenced[] fillarray "hat909", "clap909", "kick", "rim", "chord1", "chord2", "hat909c", "mel1", "chord3"
-
-gisectionlengths ftgen 0, 0, -64, -7, 0 
-gisections[][] init 64, 64
-gisectiondataindex = 0
-gisectiondata[][] init 99, 6
-
-gichordgroups[][] init 16, 12
-gisectionchords[] init 16
-
-gipreparedfns[] init lenarray(gSprepare)
-gipreparedfnindex init 0
-
-gicurrentchordfn init -1
-gkcurrentchordlength init -1
-
-gkpump = 0
-gkreverse init 0
-
-#include "wavetables.udo"
-#include "bussing.udo"
-#include "hat909.src"
-#include "text_tools.udo"
-#include "effects.udo"
-
-gicurrentchordnum = 0
-gilastchordgroup = -1
-gilastsection = -1
-instr setcurrentchord
-	isection = p4
-	ichordincrement = p5
-	ichordgroup = gisectionchords[isection]
-	if (ichordgroup != gilastchordgroup || isection != gilastsection) then
-		gicurrentchordnum = 0
-		gilastchordgroup = ichordgroup
-		gilastsection = isection
-	elseif (ichordincrement == 1) then
-		if (gicurrentchordnum + 1 < lenarray(gichordgroups, 2) - 1) then
-
-			if (gichordgroups[ichordgroup][gicurrentchordnum + 1] == 0) then
-				gicurrentchordnum = 0
-			else
-				gicurrentchordnum += 1
-			endif
-		else
-			gicurrentchordnum = 0
-		endif
-	else 
-		gicurrentchordnum = 0
-	endif
-
-	ifn = gichordgroups[ichordgroup][gicurrentchordnum]
-
-	gkcurrentchordlength = tab:k(0, ifn)
-	gicurrentchordfn = ifn
-	turnoff
-endin
-
-
-
-instr bootstrap
-	iprepareindex = p4
-	if (iprepareindex >= lenarray(gSprepare)) then
-		notify("Parsing events")
-		parsetext("/home/bargepole/bpcheckout/csTech/TechnoPieces/BUG3/source.txt"); "source.txt")
-		notify("Running sequencer")
-		event_i "i", "sequencer", 0, 3600
-		turnoff
-	else 
-		Sprepareinstr = gSprepare[iprepareindex]
-		notify(sprintf("Preparing audio for %s", Sprepareinstr))
-		Srcinstr = sprintf("src_%s", Sprepareinstr)
-		ilen = 0.3
-		p3 = ilen
-		ifn ftgen 0, 0, sr*ilen, 7, 0
-		gipreparedfns[gipreparedfnindex] = ifn
-		gipreparedfnindex += 1
-		ktimek timeinstk
-		if (ktimek == 1) then
-			kcycles = ilen * kr
-			kcount init 0
-loop:
-			apos phasor (1/(ftlen(ifn)/sr))
-			aproc subinstr Srcinstr, 1, 0.1
-			tabw aproc, apos, ifn, 1
-			loop_lt kcount, 1, kcycles, loop
-		elseif (ktimek == 5) then
-			event "i", "bootstrap", 0, 1, iprepareindex+1
-			turnoff
-		endif
-	endif
-endin
-
-
-opcode arrseq, 0, Skk
-	Splayer, kpos, ksection xin
-	idel = 0.3 ; delay for chord update
-	Sinstrument = sprintf("play_%s", Splayer)
-	instrindex = gettextindex(Splayer)
-	kdata = gisections[ksection][instrindex] ;ksection
-
-	if (kdata != -1) then ; null section
-		kon = tablekt:k(kpos, gisectiondata[kdata][0])
-		
-		if (kon == 1) then
-			kchance = tablekt:k(kpos, gisectiondata[kdata][3])
-			if (random:k(0, 1) < kchance) then
-				ktime = (kpos % 2 == 0) ? 0 : 0.04
-				kdur = tablekt:k(kpos, gisectiondata[kdata][1])
-				;kamp = tablekt:k(kpos, gisectiondata[kdata][2])
-				event "i", Sinstrument, idel+ktime, kdur, kpos, kdata
-			endif		
-		endif
-	endif
-endop
-
-
-;gintervals1[] fillarray 0, 4, 6, 7, 11
-gintervals1[] fillarray 0, 3, 7, 9, 10
-instr play_bass
-	iamp = getparameter(p4, p5, 2)
-	iaugment = (random(0, 1) > 0.9) ? 24 : 36
-	inote = tab_i(random(1, ftlen(gicurrentchordfn) - 3), gicurrentchordfn) - iaugment
-	a1 foscil 0.5, cpsmidinn(inote), 1, 2, random(0, 6), gifnSine
-	a1 pareq a1, 150, 0.24, 0.9
-	a1 pareq a1, 80, 1.3, 0.9
-	kenv linseg 1, p3, 0
-	aout = a1*kenv
-	bus_mix("master", aout, aout)
-endin
-
-instr play_mel1
-	iamp = getparameter(p4, p5, 2)
-	ihigher = getparameter(p4, p5, 4)
-	iaugment1 = (ihigher == 1 && random(0, 1) > 0.6) ? 12 : 0
-	ifreq1 = cpsmidinn(tab_i(random(1, ftlen(gicurrentchordfn) - 1), gicurrentchordfn) + iaugment1)
-	ifreq2 = cpsmidinn(tab_i(random(1, ftlen(gicurrentchordfn) - 1), gicurrentchordfn))
-	kfreq linseg ifreq1, p3*0.4, ifreq1, p3*0.2, ifreq2, p3*04, ifreq2
-	kfreq += oscil(10, 6)
-	kcar = abs(oscil(4, 0.001)) + 1
-	a1 foscil 0.5, kfreq, kcar, 1, random(0, 6), gifnSine
-	a1 butterlp a1, 10000
-	a1 butterhp a1, 600
-	kenv linseg 0, p3*0.2, random(0.8, iamp), p3*0.6, random(0.8, iamp), p3*0.2, 0
-	aL, aR pan2 a1*kenv*0.7, random(0.2, 0.8)
-	bus_mix("reverb", aL, aR)
-	bus_mix("master", aL, aR)
-endin
-
-instr play_chorditem1
-	inote = p4
-	kfreq1 linseg cpsmidinn(inote-36), p3*0.1, cpsmidinn(inote+12), p3*0.9, cpsmidinn(inote+12)
-	kindex linseg 1, p3, 5
-	aL1 foscil 0.1, kfreq1 + oscil:k(3, 10), 5, 1, kindex, gifnSquare
-	aR1 foscil 0.1, kfreq1 + oscil:k(4, 6), 5, 1, kindex, gifnSquare
-	aL1 butterlp aL1, abs(oscil(1000, 3)) + 500
-	aR1 butterlp aR1, abs(oscil(1000, 5)) + 500
-	
-	kfreq2 linseg cpsmidinn(inote-12), p3*0.1, cpsmidinn(inote), p3*0.7, cpsmidinn(inote), p3*0.2, cpsmidinn(inote-36)
-	aL2 foscil 0.1, kfreq2 + oscil:k(3, 7), 2, 5, 5-kindex, gifnSine
-	aR2 foscil 0.1, kfreq2 + oscil:k(3, 5), 3, 3, 5-kindex, gifnSine
-	kenv1 linseg 1, p3*0.8, 1, p3*0.2, 0
-	kenv2 linseg 0, p3*0.3, 1, p3*0.69, 1, p3*0.01, 0
-	aL butterhp (aL1*kenv1)+(aL2*kenv2), 500
-	aR butterhp (aR1*kenv1)+(aR2*kenv2), 500
-	
-	bus_mix("reverb", aL*0.4, aR*0.4)
-	aL *= 1-gkpump
-	aR *= 1-gkpump
-	bus_mix("master", aL, aR)
-endin
-
-
-
-instr global_reverb
-	aL, aR bus_read "reverb"
-	;aL nreverb aL, 2.4, 0.3
-	;aR nreverb aR, 2.1, 0.2
-	aL, aR freeverb aL, aR, 0.4, 0.3
-	;outs aL, aR
-	bus_mix("master", aL, aR)
-endin
-
-
-instr play_chorditem2
-	inote = p4
-	a1 fmbell 0.2, cpsmidinn(inote+12), 1, 3, 0.05, 10, gifnSine, gifnSquare, gifnSine, gifnSquare, gifnSine
-	a1 butterhp a1, 700
-	kenv linseg 0, p3*0.5, 1, p3*0.4, 1, p3*0.1, 0
-	aL, aR ensembleChorus a1*10*kenv, .07, .003, .75, 1, 12, gifnSine
-	
-	bus_mix("reverb", aL*0.2, aR*0.2)
-	aL *= 1-gkpump
-	aR *= 1-gkpump
-	bus_mix("master", aL, aR)
-endin
-
-
-instr play_chorditem3
-	inote = p4 - 12
-	aL fmb3 0.2, cpsmidinn(inote), 1, 2, 0.07, 10, gifnSine, gifnSquare, gifnSine, gifnSquare, gifnSine
-	aR fmb3 0.2, cpsmidinn(inote), 1, 1.4, 0.02, 10, gifnSine, gifnSine, gifnSine, gifnSquare, gifnSine
-	aL butterhp aL, 300
-	aR butterhp aR, 300
-	kenv linseg 1, p3*0.5, 1, p3*0.4, 1, p3*0.1, 0
-	aL *= kenv
-	aR *= kenv
-	bus_mix("reverb", aL*0.8, aR*0.8)
-	bus_mix("master", aL, aR)
-endin
-
-
-instr play_chord1
-	iamp = getparameter(p4, p5, 2)
-	index = 1
-	while (index < ftlen(gicurrentchordfn)) do
-		event_i "i", "play_chorditem1", 0, p3, tab_i(index, gicurrentchordfn) 
-		index += 1
-	od
-endin
-
-instr play_chord2
-	iamp = getparameter(p4, p5, 2)
-	index = 1
-	while (index < ftlen(gicurrentchordfn)) do
-		event_i "i", "play_chorditem2", 0, p3, tab_i(index, gicurrentchordfn) 
-		index += 1
-	od
-endin
-
-instr play_chord3
-	iamp = getparameter(p4, p5, 2)
-	index = 1
-	while (index < ftlen(gicurrentchordfn)) do
-		event_i "i", "play_chorditem3", 0, p3, tab_i(index, gicurrentchordfn) 
-		index += 1
-	od
-endin
-
-/*instr play_chord1
-	index = 0
-	Sinstrument = sprintf("play_chorditem%d", p4)
-	while (index < lenarray(gintervals1)) do
-		event_i "i", Sinstrument, 0, p3, gintervals1[index] + 52
-		index += 1
-	od
-endin
-*/
-
-instr global_out
-	imastergain = 0.7
-	aL, aR bus_read "master" 
-	;aL butterhp aL, 150
-	;aR butterhp aR, 150
-	ilooptime = (60/gitempo)*4
-
-	kreverse delayk gkreverse, 0.
-	if (kreverse == 1) then
-		aL butterhp aL, 150
-		aR butterhp aR, 150
-		aL, krecL sndloop aL, -1, kreverse, ilooptime, 0
-		aR, krecR sndloop aR, -1, kreverse, ilooptime, 0
-	endif
-	outs aL*imastergain, aR*imastergain
-endin
-
-instr sequencer
-	isection = 1
-	event_i "i", "setcurrentchord", 0, 1, isection
-	event_i "i", "global_reverb", 0, p3
-	event_i "i", "global_out", 0, p3
-	kmetro metro (gitempo/60)*4
-	kposabs init 0
-	kposchord init 0
-	kpos init 0
-	ksection init isection
-	if (kmetro == 1) then
-		
-
-		/*if (kpos == 0) then
-			event "i", "play_chord1", 0, 2, 1
-		endif
-		if (kpos == 10) then
-			event "i", "play_chord1", 0, 2, 2
-		endif
-*/
-
-		;if (random:k(0, 1) > 0.6) then
-		;	event "i", "play_bass", (kpos % 2 == 0) ? 0 : 0.04, 0.1
-		;endif
-
-		if (random:k(0, 1) > 0.6) then
-			;event "i", "play_fm2", (kpos % 2 == 0) ? 0 : 0.04, 0.1
-		endif
-
-		arrseq "chord1", kpos, ksection
-		arrseq "chord2", kpos, ksection
-		arrseq "chord3", kpos, ksection
-		arrseq "bass", kpos, ksection
-		arrseq "hat909", kpos, ksection
-		arrseq "hat909c", kpos, ksection
-		arrseq "clap909", kpos, ksection
-		arrseq "kick", kpos, ksection
-		arrseq "rim", kpos, ksection
-		arrseq "mel1", kpos, ksection
-
-		if (kpos < 31) then
-			kpos += 1
-		else
-			kpos = 0
-		endif
-		if (kposabs+16 > tab:k(ksection, gisectionlengths)*4) then
-
-			gkreverse = 1
-		endif
-		
-		if (kposabs < tab:k(ksection, gisectionlengths)*4) then
-			kposabs += 1
-		else
-			gkreverse = 0
-			ksection += 1
-			kposabs = 0
-			kposchord = 0
-			event "i", "play_crash", 0, 1
-			event "i", "setcurrentchord", 0, 1, ksection, 0
-		endif
-		
-		if (kposchord < gkcurrentchordlength*4) then
-			kposchord += 1
-		else
-			kposchord = 0
-			event "i", "setcurrentchord", 0, 1, ksection, 1
-		endif
-		
-	endif
-endin	
-
-instr play_rim
-	iamp = getparameter(p4, p5, 2)
-	icps = 490*exp(log(2.0)*(57.0-69.0)/12.0)
-	acps expon icps, 0.0025, icps * 0.5
-	acps = acps + icps
-	iamp = 1
-	a1a phasor acps, 0.0	
-	a1b phasor acps, 0.5
-	afmenv expon 1.0, 0.02, 0.5
-	a1 = (a1a-a1b)*6.0*afmenv
-	acps = acps*(1.0+a1)
-	a0 oscil3 1.0, acps
-	a1 unirand 2.0
-	a1 tone a1-1.0, 2000
-	a0 = a0 + a1*0.1
-	aenv expon 1.0, 0.005, 0.5
-
-	a0 limit 4.0*iamp*a0*aenv, -1.0, 1.0
-	a0 table3 a0*4096.0, gifnSine, 0, 0, 1
-
-	kffrq expseg 2000, 0.07, 100, 1, 100
-
-	a0x tone a0, 10000
-	a0y = a0 - a0x
-	a0x delay a0y, 0.0002
-	a0 = a0 - a0x*4.0
-	a0 pareq a0, kffrq, 0, 0.7071, 2
-
-	a_ linseg 1, p3-0.1, 1, 0.025, 0, 1, 0
-	a0 = a0*a_
-	aL, aR pan2 a0*iamp, random(0.3, 0.8)
-
-	bus_mix("reverb", aL*0.3, aR*0.3)
-	bus_mix("master", aL, aR)
-endin
-
-
-instr play_hat909
-	iamp = getparameter(p4, p5, 2)
-	index = 0
-	ifn = gipreparedfns[index]
-	apos phasor (1/(ftlen(ifn)/sr))
-	aout1 table3 apos*0.4, ifn, 1
-	aout2 table3 apos*0.9, ifn, 1
-	aout3 table3 apos*1.1, ifn, 1
-	amix1 = delay(aout1*0.6, 0.02) + delay(aout2*0.8, 0.01)
-	amix2 = delay(aout1*0.8, 0.01) + delay(aout2*0.6, 0.02)
-	aL = (aout3 + amix1 + (amix2 * 0.3))*0.5*iamp
-	aR = (aout3 + amix2 + (amix1 * 0.3))*0.5*iamp
-	bus_mix("reverb", aL*0.1, aR*0.1)
-	bus_mix("master", aL, aR)
-endin
-
-
-instr play_hat909c
-	iamp = getparameter(p4, p5, 2)
-	index = 0
-	ifn = gipreparedfns[index]
-	apos phasor (1/(ftlen(ifn)/sr))
-	aL table3 apos*0.65, ifn, 1
-	aR table3 apos*0.76, ifn, 1
-	aL *= iamp * 0.6
-	aR *= iamp * 0.6
-	aL *= 1-gkpump
-	aR *= 1-gkpump
-	bus_mix("reverb", aL*0.1, aR*0.1)
-	bus_mix("master", aL, aR)
-endin
-
-
-instr play_crash
-	iamp = 1
-	index = 0
-	ifn = gipreparedfns[index]
-	apos phasor (1/(ftlen(ifn)/sr))
-	aL table3 apos, ifn, 1
-	aR table3 apos, ifn, 1
-	aL reverb aL, 8
-	aR reverb aR, 8
-	kfreq line 1400, p3, 100
-	aL *= oscil(0.9, kfreq) * iamp * 0.2 
-	aR *= oscil(0.9, kfreq) * iamp * 0.2
-	;aL *= 1-gkpump
-	;aR *= 1-gkpump
-	bus_mix("reverb", aL*0.9, aR*0.9)
-	bus_mix("master", aL, aR)
-endin
-
-
-instr play_clap909
-	iamp = getparameter(p4, p5, 2)
-	ilowpass = getparameter(p4, p5, 4)
-	p3 = 0.065
-	aL noise 1, 0.9
-	aR noise 0.5, 0.4
-	aL butterbp aL, 1200, 1100
-	aR butterbp aR, 1200, 1100
-	irevsend = 0.2
-	if (ilowpass == 1) then
-		aL butterlp aL, 900
-		aR butterlp aR, 900
-		irevsend = 0.6
-	endif
-	kamp1 linseg 1, p3*0.1, 0, p3*0.1, 1, p3*0.2, 0.1, p3*0.3, 0.5, p3*0.2, 0, p3*0.05, 0.4, p3*0.05, 0
-	kamp2 linseg 1, p3*0.15, 0, p3*0.15, 1, p3*0.1, 0.1, p3*0.2, 0.5, p3*0.3, 0, p3*0.05, 0.4, p3*0.05, 0
-
-	aL = aL*kamp1*9*iamp
-	aR = aR*kamp2*9*iamp
-
-	bus_mix("reverb", aL*irevsend, aR*irevsend)
-	bus_mix("master", aL, aR)
-endin
-
-instr play_kick	; 808 style kick
-	iamp = getparameter(p4, p5, 2)
-	xtratim    0.1
-	krelease release
-	ktune init 0
-	kmul transeg 0.2, p3*0.5, -15, 0.01, p3*0.5, 0, 0
-	kbend transeg 0.5, 1.2, -4, 0, 1, 0, 0
-	asig gbuzz 0.5, 50*octave(ktune)*semitone(kbend), 20, 1, kmul, gifnCosine
-	aenv transeg 1, p3-0.004, -6, 0
-	gkpump = k(aenv)
-	aatt linseg 0, 0.004, 1
-	asig = asig*aenv*aatt
-	aenv linseg 1, 0.07, 0
-	acps expsega 400, 0.07, 0.001, 1, 0.001
-	aimp oscili aenv, acps*octave(ktune*0.25)
-	amix = ((asig*0.7)+(aimp*0.35))*2*iamp
-	gkpump = min(rms(amix) * 7, 1)
-	amix distort amix, 0.4, gifnSine
-	;amix butterhp amix, 150
-	bus_mix("master", amix, amix)
-endin
-
-
-</CsInstruments>
-<CsScore>
-i"bootstrap" 0 1 0
-
-</CsScore> 
-</CsoundSynthesizer>
\ No newline at end of file
diff --git a/BUG3/hat909.src b/BUG3/hat909.src
deleted file mode 100644
index 3d9cb8e..0000000
--- a/BUG3/hat909.src
+++ /dev/null
@@ -1,1343 +0,0 @@
-#ifndef SRC_HAT909
-#define SRC_HAT909 ##
-
-; one of the more ridiculous things I have done in Csound
-; actually ends up bigger than the original wav, but that's conceptual stuff eh.
-
-instr src_hat909 
-	ilen = p3
-	ipitch = p4
-	ao[] init 1328
-	ao[0] oscil linseg(0.147719501914,ilen, 0),387.59765625*ipitch
-	ao[1] oscil linseg(0.191580726829,ilen, 0),398.364257812*ipitch
-	ao[2] oscil linseg(0.400498423104,0.143337066069*p3,0.0639161162762),10497.4365234*ipitch
-	ao[3] oscil linseg(0.0653721243551,ilen, 0),11261.8652344*ipitch
-	ao[4] oscil linseg(0.104263238792,ilen, 0),1722.65625*ipitch
-	ao[5] oscil linseg(0.140822085921,0.143337066069*p3,0.0678433128457),15514.6728516*ipitch
-	ao[6] oscil linseg(0.149034178561,ilen, 0),11552.5634766*ipitch
-	ao[7] oscil linseg(0.0757929267277,ilen, 0),18949.21875*ipitch
-	ao[8] oscil linseg(0.560400625045,0.143337066069*p3,0.133767148855),7418.18847656*ipitch
-	ao[9] oscil linseg(0.329140685488,ilen, 0),11111.1328125*ipitch
-	ao[10] oscil linseg(0.203143367574,0.143337066069*p3,0.107551501661),12607.6904297*ipitch
-	ao[11] oscil linseg(0.240497254254,0.143337066069*p3,0.0789305331675,0.28555431131*p3,0.062899223355),6373.828125*ipitch
-	ao[12] oscil linseg(0.0652000356482,ilen, 0),19466.015625*ipitch
-	ao[13] oscil linseg(0.326479928488,ilen, 0),3283.81347656*ipitch
-	ao[14] oscil linseg(0.391513913874,0.143337066069*p3,0.226122102471,0.28555431131*p3,0.0751552224712),7030.59082031*ipitch
-	ao[15] oscil linseg(0.0841802326217,ilen, 0),18572.3876953*ipitch
-	ao[16] oscil linseg(0.182486639811,ilen, 0),10960.4003906*ipitch
-	ao[17] oscil linseg(0.131500419099,0.143337066069*p3,0.0683308347114),14071.9482422*ipitch
-	ao[18] oscil linseg(0.0963872442687,ilen, 0),5717.06542969*ipitch
-	ao[19] oscil linseg(0.103720012232,ilen, 0),17883.3251953*ipitch
-	ao[20] oscil linseg(0.649040815915,0.143337066069*p3,0.243129248675,0.28555431131*p3,0.142857907772),9205.44433594*ipitch
-	ao[21] oscil linseg(0.184655922377,0.143337066069*p3,0.184816636031,0.28555431131*p3,0.0752143015204),10809.6679688*ipitch
-	ao[22] oscil linseg(0.665334301982,0.143337066069*p3,0.158344407272),1561.15722656*ipitch
-	ao[23] oscil linseg(0.702647445477,0.143337066069*p3,0.186441300597,0.28555431131*p3,0.116507981809,0.28555431131*p3,0.0774384178786),6223.09570312*ipitch
-	ao[24] oscil linseg(0.0973972649252,ilen, 0),21081.0058594*ipitch
-	ao[25] oscil linseg(0.231971327163,0.143337066069*p3,0.107514124911),10260.5712891*ipitch
-	ao[26] oscil linseg(0.0905339190531,ilen, 0),6772.19238281*ipitch
-	ao[27] oscil linseg(0.146653707019,ilen, 0),17894.0917969*ipitch
-	ao[28] oscil linseg(0.107329561576,ilen, 0),11315.6982422*ipitch
-	ao[29] oscil linseg(0.0775163226638,ilen, 0),10583.5693359*ipitch
-	ao[30] oscil linseg(0.172590149145,0.143337066069*p3,0.0634098350252),4543.50585938*ipitch
-	ao[31] oscil linseg(0.265009728924,ilen, 0),10508.203125*ipitch
-	ao[32] oscil linseg(0.150483956551,0.143337066069*p3,0.0761697820584),12370.8251953*ipitch
-	ao[33] oscil linseg(0.108463903529,ilen, 0),17592.6269531*ipitch
-	ao[34] oscil linseg(0.0653413273481,ilen, 0),6072.36328125*ipitch
-	ao[35] oscil linseg(0.110737033133,ilen, 0),13070.6542969*ipitch
-	ao[36] oscil linseg(0.0692341804639,ilen, 0),14685.6445312*ipitch
-	ao[37] oscil linseg(0.0639767159223,ilen, 0),1927.22167969*ipitch
-	ao[38] oscil linseg(0.347857585421,0.143337066069*p3,0.198817589608,0.28555431131*p3,0.0782353591713,0.28555431131*p3,0.0637560742581),10357.4707031*ipitch
-	ao[39] oscil linseg(0.135020323069,0.143337066069*p3,0.0880232685742),17538.7939453*ipitch
-	ao[40] oscil linseg(0.0783894035009,ilen, 0),17291.1621094*ipitch
-	ao[41] oscil linseg(0.0622435686602,ilen, 0),527.563476562*ipitch
-	ao[42] oscil linseg(0.0692785519037,ilen, 0),17409.5947266*ipitch
-	ao[43] oscil linseg(0.154611674579,0.143337066069*p3,0.073727612073),8968.57910156*ipitch
-	ao[44] oscil linseg(0.343028048287,0.143337066069*p3,0.0837143615994),2325.5859375*ipitch
-	ao[45] oscil linseg(0.0736944584017,ilen, 0),19412.1826172*ipitch
-	ao[46] oscil linseg(0.268949504125,0.143337066069*p3,0.157899149606,0.28555431131*p3,0.0734689974202),10206.7382812*ipitch
-	ao[47] oscil linseg(0.086259330531,ilen, 0),6126.19628906*ipitch
-	ao[48] oscil linseg(0.0770771802459,ilen, 0),16989.6972656*ipitch
-	ao[49] oscil linseg(0.121738717695,ilen, 0),5921.63085938*ipitch
-	ao[50] oscil linseg(0.200133399158,0.143337066069*p3,0.0654822641993),10023.7060547*ipitch
-	ao[51] oscil linseg(0.0707425705117,ilen, 0),16838.9648438*ipitch
-	ao[52] oscil linseg(0.252707090633,ilen, 0),2637.81738281*ipitch
-	ao[53] oscil linseg(0.0943459034553,ilen, 0),10056.0058594*ipitch
-	ao[54] oscil linseg(0.0992482509267,ilen, 0),21188.671875*ipitch
-	ao[55] oscil linseg(0.184366345677,ilen, 0),8010.3515625*ipitch
-	ao[56] oscil linseg(0.0933949871164,0.143337066069*p3,0.0915493755166),11078.8330078*ipitch
-	ao[57] oscil linseg(0.10161311766,ilen, 0),4425.07324219*ipitch
-	ao[58] oscil linseg(0.0653673144682,0.143337066069*p3,0.0733744271004),9905.2734375*ipitch
-	ao[59] oscil linseg(0.129981013456,0.143337066069*p3,0.159210561765),5770.8984375*ipitch
-	ao[60] oscil linseg(0.113062848642,0.143337066069*p3,0.0713530660072),4952.63671875*ipitch
-	ao[61] oscil linseg(0.141440493301,ilen, 0),13759.7167969*ipitch
-	ao[62] oscil linseg(0.088185419138,ilen, 0),13189.0869141*ipitch
-	ao[63] oscil linseg(0.0930169535457,ilen, 0),1851.85546875*ipitch
-	ao[64] oscil linseg(0.154605119011,ilen, 0),9603.80859375*ipitch
-	ao[65] oscil linseg(0.131324770448,ilen, 0),7859.61914062*ipitch
-	ao[66] oscil linseg(0.167629663798,ilen, 0),8204.15039062*ipitch
-	ao[67] oscil linseg(0.0867763366117,0.143337066069*p3,0.0623037758218),14007.3486328*ipitch
-	ao[68] oscil linseg(0.337771630478,0.143337066069*p3,0.110442630304),8731.71386719*ipitch
-	ao[69] oscil linseg(0.141707541027,ilen, 0),13931.9824219*ipitch
-	ao[70] oscil linseg(0.255351048232,0.143337066069*p3,0.086041545312,0.28555431131*p3,0.0642321126529),2314.81933594*ipitch
-	ao[71] oscil linseg(0.248927904169,ilen, 0),7784.25292969*ipitch
-	ao[72] oscil linseg(0.120973716224,ilen, 0),5964.69726562*ipitch
-	ao[73] oscil linseg(0.24152522942,ilen, 0),5620.16601562*ipitch
-	ao[74] oscil linseg(0.257314520435,0.143337066069*p3,0.0918502052233),9786.84082031*ipitch
-	ao[75] oscil linseg(0.160507507732,0.143337066069*p3,0.126617856244),20101.2451172*ipitch
-	ao[76] oscil linseg(0.105134635279,ilen, 0),15363.9404297*ipitch
-	ao[77] oscil linseg(0.147216577568,ilen, 0),6535.32714844*ipitch
-	ao[78] oscil linseg(0.0847668443847,0.143337066069*p3,0.129472420524),8279.51660156*ipitch
-	ao[79] oscil linseg(0.111299265541,ilen, 0),17000.4638672*ipitch
-	ao[80] oscil linseg(0.376558232104,0.143337066069*p3,0.210994902347,0.28555431131*p3,0.0731263274151),7708.88671875*ipitch
-	ao[81] oscil linseg(0.143677565189,ilen, 0),13705.8837891*ipitch
-	ao[82] oscil linseg(0.109362317206,0.143337066069*p3,0.110187116),20112.0117188*ipitch
-	ao[83] oscil linseg(0.116983765087,ilen, 0),1076.66015625*ipitch
-	ao[84] oscil linseg(0.167792169777,0.143337066069*p3,0.110534438875),11897.0947266*ipitch
-	ao[85] oscil linseg(0.0826394429324,ilen, 0),9302.34375*ipitch
-	ao[86] oscil linseg(0.181467337731,0.143337066069*p3,0.0651884543262),7633.52050781*ipitch
-	ao[87] oscil linseg(0.21521889992,ilen, 0),5469.43359375*ipitch
-	ao[88] oscil linseg(0.0933614171264,ilen, 0),3143.84765625*ipitch
-	ao[89] oscil linseg(0.0834554847185,ilen, 0),12952.2216797*ipitch
-	ao[90] oscil linseg(0.0627027011871,ilen, 0),13479.7851562*ipitch
-	ao[91] oscil linseg(0.134601898302,0.143337066069*p3,0.100045794213,0.28555431131*p3,0.0802519203741),9151.61132812*ipitch
-	ao[92] oscil linseg(0.0758947920954,ilen, 0),3369.94628906*ipitch
-	ao[93] oscil linseg(0.0813423194788,0.143337066069*p3,0.0832454350186),990.52734375*ipitch
-	ao[94] oscil linseg(0.0623596499258,ilen, 0),15299.3408203*ipitch
-	ao[95] oscil linseg(0.168706858314,ilen, 0),8494.84863281*ipitch
-	ao[96] oscil linseg(0.121582338391,0.143337066069*p3,0.0779993755803),13329.0527344*ipitch
-	ao[97] oscil linseg(0.128738779335,0.143337066069*p3,0.10972288951),5889.33105469*ipitch
-	ao[98] oscil linseg(0.210280747566,ilen, 0),9000.87890625*ipitch
-	ao[99] oscil linseg(0.138134253603,0.143337066069*p3,0.153935845791,0.57110862262*p3,0.0628780405764),7482.78808594*ipitch
-	ao[100] oscil linseg(0.195223182099,0.143337066069*p3,0.0712652467123),5318.70117188*ipitch
-	ao[101] oscil linseg(0.109967389644,ilen, 0),1604.22363281*ipitch
-	ao[102] oscil linseg(0.112953674669,ilen, 0),13178.3203125*ipitch
-	ao[103] oscil linseg(0.0713957975483,ilen, 0),8850.14648438*ipitch
-	ao[104] oscil linseg(0.213633798218,ilen, 0),10605.1025391*ipitch
-	ao[105] oscil linseg(0.0743197727937,0.143337066069*p3,0.0661925487495),7407.421875*ipitch
-	ao[106] oscil linseg(0.0958472357801,ilen, 0),21737.7685547*ipitch
-	ao[107] oscil linseg(0.188267835492,0.143337066069*p3,0.065393194127),13996.5820312*ipitch
-	ao[108] oscil linseg(0.344649840972,0.143337066069*p3,0.201896158113,0.28555431131*p3,0.173084827374,0.28555431131*p3,0.0915469173586),6944.45800781*ipitch
-	ao[109] oscil linseg(0.0626580553606,ilen, 0),16257.5683594*ipitch
-	ao[110] oscil linseg(0.119010053256,0.143337066069*p3,0.085164194175),11660.2294922*ipitch
-	ao[111] oscil linseg(0.122120854409,0.143337066069*p3,0.0892020132097),8699.4140625*ipitch
-	ao[112] oscil linseg(0.268411128514,0.143337066069*p3,0.0842389279571,0.28555431131*p3,0.0744362432877),7332.05566406*ipitch
-	ao[113] oscil linseg(0.170494963012,ilen, 0),3046.94824219*ipitch
-	ao[114] oscil linseg(0.0786959568667,ilen, 0),2993.11523438*ipitch
-	ao[115] oscil linseg(0.0834897544994,ilen, 0),13942.7490234*ipitch
-	ao[116] oscil linseg(0.0637756231792,ilen, 0),1701.12304688*ipitch
-	ao[117] oscil linseg(0.197655856075,0.143337066069*p3,0.110564570963,0.28555431131*p3,0.0879218426869),5243.33496094*ipitch
-	ao[118] oscil linseg(0.101926154713,ilen, 0),7256.68945312*ipitch
-	ao[119] oscil linseg(0.0655882004379,ilen, 0),7213.62304688*ipitch
-	ao[120] oscil linseg(0.0703159367917,ilen, 0),12801.4892578*ipitch
-	ao[121] oscil linseg(0.271991845781,0.143337066069*p3,0.329655666524,0.28555431131*p3,0.0651329107008),4037.47558594*ipitch
-	ao[122] oscil linseg(0.125788071548,0.143337066069*p3,0.153459796361),1442.72460938*ipitch
-	ao[123] oscil linseg(0.127913664608,ilen, 0),8397.94921875*ipitch
-	ao[124] oscil linseg(0.10186706074,0.143337066069*p3,0.0856988488779),7181.32324219*ipitch
-	ao[125] oscil linseg(0.15507782498,0.143337066069*p3,0.102146688843),9313.11035156*ipitch
-	ao[126] oscil linseg(0.0623327092789,0.143337066069*p3,0.303841749699,0.28555431131*p3,0.217805719724),5017.23632812*ipitch
-	ao[127] oscil linseg(0.135329763428,ilen, 0),11627.9296875*ipitch
-	ao[128] oscil linseg(0.148283303276,ilen, 0),9840.67382812*ipitch
-	ao[129] oscil linseg(0.0773030659444,ilen, 0),20208.9111328*ipitch
-	ao[130] oscil linseg(0.125284392231,0.143337066069*p3,0.0659546437206),12575.390625*ipitch
-	ao[131] oscil linseg(0.13164009838,ilen, 0),8247.21679688*ipitch
-	ao[132] oscil linseg(0.192373978525,0.143337066069*p3,0.132131974031),7105.95703125*ipitch
-	ao[133] oscil linseg(0.0967485068117,ilen, 0),2723.95019531*ipitch
-	ao[134] oscil linseg(0.443637243,0.143337066069*p3,0.162915999334,0.28555431131*p3,0.0627531427885),3962.109375*ipitch
-	ao[135] oscil linseg(0.111246862979,ilen, 0),21576.2695312*ipitch
-	ao[136] oscil linseg(0.129739915316,0.143337066069*p3,0.0629807545262),11423.3642578*ipitch
-	ao[137] oscil linseg(0.104901759858,0.143337066069*p3,0.0763476627015),18335.5224609*ipitch
-	ao[138] oscil linseg(0.239970503186,0.143337066069*p3,0.0904768950963),4597.33886719*ipitch
-	ao[139] oscil linseg(0.0735053329098,ilen, 0),21350.1708984*ipitch
-	ao[140] oscil linseg(0.0968865371494,0.143337066069*p3,0.125425293819),9076.24511719*ipitch
-	ao[141] oscil linseg(0.11909692904,0.143337066069*p3,0.0944954309501),11670.9960938*ipitch
-	ao[142] oscil linseg(0.105200199777,ilen, 0),2842.3828125*ipitch
-	ao[143] oscil linseg(0.0805435153724,ilen, 0),12273.9257812*ipitch
-	ao[144] oscil linseg(0.150761547774,ilen, 0),3251.51367188*ipitch
-	ao[145] oscil linseg(0.122605735763,ilen, 0),15073.2421875*ipitch
-	ao[146] oscil linseg(0.107725250633,0.143337066069*p3,0.0668404404733),13533.6181641*ipitch
-	ao[147] oscil linseg(0.141556442429,0.143337066069*p3,0.142133687538),5652.46582031*ipitch
-	ao[148] oscil linseg(0.0667242818778,0.143337066069*p3,0.0840749967605,0.28555431131*p3,0.0971035746511),12123.1933594*ipitch
-	ao[149] oscil linseg(0.0816866083593,ilen, 0),17624.9267578*ipitch
-	ao[150] oscil linseg(0.0745723991105,ilen, 0),20822.6074219*ipitch
-	ao[151] oscil linseg(0.115538915908,ilen, 0),1065.89355469*ipitch
-	ao[152] oscil linseg(0.129070412578,ilen, 0),12047.8271484*ipitch
-	ao[153] oscil linseg(0.0924671648682,ilen, 0),635.229492188*ipitch
-	ao[154] oscil linseg(0.0792121366272,0.143337066069*p3,0.0663382424853,0.28555431131*p3,0.0720315239414),3779.07714844*ipitch
-	ao[155] oscil linseg(0.1234628017,ilen, 0),16300.6347656*ipitch
-	ao[156] oscil linseg(0.134074032634,ilen, 0),10131.3720703*ipitch
-	ao[157] oscil linseg(0.126095669084,ilen, 0),20790.3076172*ipitch
-	ao[158] oscil linseg(0.139406604041,0.143337066069*p3,0.0814533561696,0.28555431131*p3,0.0811709591616),6804.4921875*ipitch
-	ao[159] oscil linseg(0.15328706798,ilen, 0),10658.9355469*ipitch
-	ao[160] oscil linseg(0.127087374599,0.143337066069*p3,0.0698019681355),17506.4941406*ipitch
-	ao[161] oscil linseg(0.148150522801,ilen, 0),4661.93847656*ipitch
-	ao[162] oscil linseg(0.463692979239,ilen, 0),8301.04980469*ipitch
-	ao[163] oscil linseg(0.0943929961072,ilen, 0),11186.4990234*ipitch
-	ao[164] oscil linseg(0.154243617717,0.143337066069*p3,0.149633433375),6503.02734375*ipitch
-	ao[165] oscil linseg(0.130782878508,ilen, 0),4478.90625*ipitch
-	ao[166] oscil linseg(0.178665829324,ilen, 0),16074.5361328*ipitch
-	ao[167] oscil linseg(0.0730312983137,ilen, 0),21834.6679688*ipitch
-	ao[168] oscil linseg(0.094218070254,ilen, 0),12241.6259766*ipitch
-	ao[169] oscil linseg(0.239793575226,ilen, 0),2691.65039062*ipitch
-	ao[170] oscil linseg(0.0757640211964,0.143337066069*p3,0.11925709201),5006.46972656*ipitch
-	ao[171] oscil linseg(0.886959633684,0.143337066069*p3,0.301010064558),1550.390625*ipitch
-	ao[172] oscil linseg(0.181085272917,0.143337066069*p3,0.163255335683),6653.75976562*ipitch
-	ao[173] oscil linseg(0.0843208775993,ilen, 0),13296.7529297*ipitch
-	ao[174] oscil linseg(0.0713889543611,0.143337066069*p3,0.0991843077009),3736.01074219*ipitch
-	ao[175] oscil linseg(0.106025122211,ilen, 0),3456.07910156*ipitch
-	ao[176] oscil linseg(0.0987045693558,ilen, 0),15848.4375*ipitch
-	ao[177] oscil linseg(0.113923579749,ilen, 0),11520.2636719*ipitch
-	ao[178] oscil linseg(0.135353498024,ilen, 0),8839.37988281*ipitch
-	ao[179] oscil linseg(0.0663939434511,ilen, 0),20574.9755859*ipitch
-	ao[180] oscil linseg(0.0744345889489,ilen, 0),18497.0214844*ipitch
-	ao[181] oscil linseg(0.1624694662,ilen, 0),11810.9619141*ipitch
-	ao[182] oscil linseg(0.106291502982,ilen, 0),9894.50683594*ipitch
-	ao[183] oscil linseg(0.297231088175,0.143337066069*p3,0.0780659519521,0.28555431131*p3,0.0960273521006),9733.0078125*ipitch
-	ao[184] oscil linseg(0.164618162228,ilen, 0),2605.51757812*ipitch
-	ao[185] oscil linseg(0.0753894790366,ilen, 0),21371.7041016*ipitch
-	ao[186] oscil linseg(0.0925890540247,ilen, 0),3660.64453125*ipitch
-	ao[187] oscil linseg(0.125721155996,0.143337066069*p3,0.0638258496231),4780.37109375*ipitch
-	ao[188] oscil linseg(0.105914127078,ilen, 0),15546.9726562*ipitch
-	ao[189] oscil linseg(0.0682970439632,ilen, 0),11218.7988281*ipitch
-	ao[190] oscil linseg(0.293721598801,0.143337066069*p3,0.10052099157),7116.72363281*ipitch
-	ao[191] oscil linseg(0.190612092222,ilen, 0),15493.1396484*ipitch
-	ao[192] oscil linseg(0.297567987016,ilen, 0),13415.1855469*ipitch
-	ao[193] oscil linseg(0.0677299243638,0.143337066069*p3,0.116490220325),4263.57421875*ipitch
-	ao[194] oscil linseg(0.0800772031574,ilen, 0),14448.7792969*ipitch
-	ao[195] oscil linseg(0.127384931069,ilen, 0),19487.5488281*ipitch
-	ao[196] oscil linseg(0.10593553744,ilen, 0),7644.28710938*ipitch
-	ao[197] oscil linseg(0.0699580933264,ilen, 0),15320.8740234*ipitch
-	ao[198] oscil linseg(0.0977022008885,ilen, 0),839.794921875*ipitch
-	ao[199] oscil linseg(0.0691320155695,0.143337066069*p3,0.0805524882686),5415.60058594*ipitch
-	ao[200] oscil linseg(0.0699059981573,ilen, 0),16419.0673828*ipitch
-	ao[201] oscil linseg(0.0968648679028,ilen, 0),10917.3339844*ipitch
-	ao[202] oscil linseg(0.133525071387,0.143337066069*p3,0.158553102737),8602.51464844*ipitch
-	ao[203] oscil linseg(0.127554234339,ilen, 0),18410.8886719*ipitch
-	ao[204] oscil linseg(0.101817759742,ilen, 0),570.629882812*ipitch
-	ao[205] oscil linseg(0.0711386110074,ilen, 0),559.86328125*ipitch
-	ao[206] oscil linseg(0.08346252941,ilen, 0),12941.4550781*ipitch
-	ao[207] oscil linseg(0.168846577934,ilen, 0),9657.64160156*ipitch
-	ao[208] oscil linseg(0.0709051092652,ilen, 0),7751.953125*ipitch
-	ao[209] oscil linseg(0.111139043731,ilen, 0),6470.72753906*ipitch
-	ao[210] oscil linseg(0.0862217710236,0.143337066069*p3,0.106829583474,0.28555431131*p3,0.104259594078),6201.5625*ipitch
-	ao[211] oscil linseg(0.0793197376942,ilen, 0),20897.9736328*ipitch
-	ao[212] oscil linseg(0.248665697956,0.143337066069*p3,0.192266942857),10712.7685547*ipitch
-	ao[213] oscil linseg(0.0651380783178,ilen, 0),1959.52148438*ipitch
-	ao[214] oscil linseg(0.177506066642,ilen, 0),2810.08300781*ipitch
-	ao[215] oscil linseg(0.276094274678,ilen, 0),8548.68164062*ipitch
-	ao[216] oscil linseg(0.0884744872646,ilen, 0),17807.9589844*ipitch
-	ao[217] oscil linseg(0.257579250924,0.143337066069*p3,0.071606117665,0.28555431131*p3,0.0798825165129),11767.8955078*ipitch
-	ao[218] oscil linseg(0.194549302538,0.143337066069*p3,0.072486766797),7525.85449219*ipitch
-	ao[219] oscil linseg(0.133149777006,ilen, 0),19810.546875*ipitch
-	ao[220] oscil linseg(0.146440303338,ilen, 0),10465.1367188*ipitch
-	ao[221] oscil linseg(0.0676509402924,ilen, 0),1399.65820312*ipitch
-	ao[222] oscil linseg(0.129264975344,0.143337066069*p3,0.167026241334),12823.0224609*ipitch
-	ao[223] oscil linseg(0.0803923968306,ilen, 0),6050.83007812*ipitch
-	ao[224] oscil linseg(0.19298755825,ilen, 0),10389.7705078*ipitch
-	ao[225] oscil linseg(0.0738308490782,ilen, 0),3337.64648438*ipitch
-	ao[226] oscil linseg(0.2150658276,0.143337066069*p3,0.184438201191),452.197265625*ipitch
-	ao[227] oscil linseg(0.16618299562,0.143337066069*p3,0.157345239331,0.28555431131*p3,0.0657100530124),10152.9052734*ipitch
-	ao[228] oscil linseg(0.274496809274,ilen, 0),7396.65527344*ipitch
-	ao[229] oscil linseg(0.134833404495,0.143337066069*p3,0.0980210951632),10314.4042969*ipitch
-	ao[230] oscil linseg(0.0676403790721,ilen, 0),17205.0292969*ipitch
-	ao[231] oscil linseg(0.151494108011,ilen, 0),5824.73144531*ipitch
-	ao[232] oscil linseg(0.107848571696,ilen, 0),18313.9892578*ipitch
-	ao[233] oscil linseg(0.0725835887029,0.143337066069*p3,0.0670773406616),9420.77636719*ipitch
-	ao[234] oscil linseg(0.0644808483871,ilen, 0),1970.28808594*ipitch
-	ao[235] oscil linseg(0.246476979518,0.143337066069*p3,0.204979252909),11993.9941406*ipitch
-	ao[236] oscil linseg(0.180624844128,0.143337066069*p3,0.0626037218582),10163.671875*ipitch
-	ao[237] oscil linseg(0.0696142784084,ilen, 0),2487.08496094*ipitch
-	ao[238] oscil linseg(0.534831334664,0.143337066069*p3,0.153297360156),5900.09765625*ipitch
-	ao[239] oscil linseg(0.114650460637,0.143337066069*p3,0.0886015423999),10088.3056641*ipitch
-	ao[240] oscil linseg(0.113645376325,ilen, 0),3359.1796875*ipitch
-	ao[241] oscil linseg(0.0721108057718,0.143337066069*p3,0.0912511057588,0.28555431131*p3,0.0634926162002),4123.60839844*ipitch
-	ao[242] oscil linseg(0.359524120872,0.143337066069*p3,0.124736325972),7988.81835938*ipitch
-	ao[243] oscil linseg(0.0698950222724,ilen, 0),16892.7978516*ipitch
-	ao[244] oscil linseg(0.0727536441169,ilen, 0),11531.0302734*ipitch
-	ao[245] oscil linseg(0.163192988142,0.143337066069*p3,0.136613819657),462.963867188*ipitch
-	ao[246] oscil linseg(0.179884383846,ilen, 0),2239.453125*ipitch
-	ao[247] oscil linseg(0.0704315315168,ilen, 0),12586.1572266*ipitch
-	ao[248] oscil linseg(0.267052689212,ilen, 0),5749.36523438*ipitch
-	ao[249] oscil linseg(0.179810445549,0.143337066069*p3,0.0861669960936,0.28555431131*p3,0.0630854678538),7934.98535156*ipitch
-	ao[250] oscil linseg(0.423694896312,0.143337066069*p3,0.114289092249),14039.6484375*ipitch
-	ao[251] oscil linseg(0.182497618666,0.143337066069*p3,0.211621171448),9711.47460938*ipitch
-	ao[252] oscil linseg(0.141956951212,ilen, 0),7838.0859375*ipitch
-	ao[253] oscil linseg(0.2333499844,0.143337066069*p3,0.0646236586313),2164.08691406*ipitch
-	ao[254] oscil linseg(0.0623426984011,ilen, 0),6879.85839844*ipitch
-	ao[255] oscil linseg(0.104809744301,ilen, 0),17840.2587891*ipitch
-	ao[256] oscil linseg(0.223528013347,ilen, 0),9183.91113281*ipitch
-	ao[257] oscil linseg(0.0658967339768,ilen, 0),13888.9160156*ipitch
-	ao[258] oscil linseg(0.411660322749,0.143337066069*p3,0.0755434509882,0.28555431131*p3,0.112040458),6233.86230469*ipitch
-	ao[259] oscil linseg(0.0773271153541,ilen, 0),7762.71972656*ipitch
-	ao[260] oscil linseg(0.0779321460819,ilen, 0),20122.7783203*ipitch
-	ao[261] oscil linseg(0.0903469315156,ilen, 0),5598.6328125*ipitch
-	ao[262] oscil linseg(0.17452948209,ilen, 0),10239.0380859*ipitch
-	ao[263] oscil linseg(0.0742185303445,ilen, 0),1690.35644531*ipitch
-	ao[264] oscil linseg(0.0777074448824,ilen, 0),9410.00976562*ipitch
-	ao[265] oscil linseg(0.431060943912,0.143337066069*p3,0.136342825274),7687.35351562*ipitch
-	ao[266] oscil linseg(0.110646141884,ilen, 0),5523.26660156*ipitch
-	ao[267] oscil linseg(0.129117806508,ilen, 0),4532.73925781*ipitch
-	ao[268] oscil linseg(0.131987393353,ilen, 0),13587.4511719*ipitch
-	ao[269] oscil linseg(0.106550117949,0.143337066069*p3,0.066204727046,0.28555431131*p3,0.06452188466),7611.98730469*ipitch
-	ao[270] oscil linseg(0.0860909343163,ilen, 0),18098.6572266*ipitch
-	ao[271] oscil linseg(0.570103579522,ilen, 0),5447.90039062*ipitch
-	ao[272] oscil linseg(0.173245852308,0.143337066069*p3,0.106063199446),3219.21386719*ipitch
-	ao[273] oscil linseg(0.136030194323,ilen, 0),17571.09375*ipitch
-	ao[274] oscil linseg(0.174490337223,ilen, 0),13404.4189453*ipitch
-	ao[275] oscil linseg(0.150142683968,0.143337066069*p3,0.0917912237139),13436.71875*ipitch
-	ao[276] oscil linseg(0.14323052327,0.143337066069*p3,0.15861784932),9108.54492188*ipitch
-	ao[277] oscil linseg(0.062932180182,ilen, 0),5587.86621094*ipitch
-	ao[278] oscil linseg(0.156545758115,ilen, 0),13921.2158203*ipitch
-	ao[279] oscil linseg(0.0811183850616,ilen, 0),17818.7255859*ipitch
-	ao[280] oscil linseg(0.244473870058,0.143337066069*p3,0.10138714192,0.28555431131*p3,0.068926247044),8947.04589844*ipitch
-	ao[281] oscil linseg(0.112584304871,ilen, 0),18421.6552734*ipitch
-	ao[282] oscil linseg(0.0925121299866,ilen, 0),13285.9863281*ipitch
-	ao[283] oscil linseg(0.225228041852,ilen, 0),2368.65234375*ipitch
-	ao[284] oscil linseg(0.146239408871,0.143337066069*p3,0.0756692442035),8957.8125*ipitch
-	ao[285] oscil linseg(0.065315727175,ilen, 0),19476.7822266*ipitch
-	ao[286] oscil linseg(0.1525931237,ilen, 0),12177.0263672*ipitch
-	ao[287] oscil linseg(0.124547165107,ilen, 0),5297.16796875*ipitch
-	ao[288] oscil linseg(0.476827097621,0.143337066069*p3,0.0939800277866),8882.44628906*ipitch
-	ao[289] oscil linseg(0.119967531178,ilen, 0),3057.71484375*ipitch
-	ao[290] oscil linseg(0.211887546815,ilen, 0),6642.99316406*ipitch
-	ao[291] oscil linseg(0.118269253623,ilen, 0),20456.5429688*ipitch
-	ao[292] oscil linseg(0.125372177325,0.143337066069*p3,0.0676008098206,0.28555431131*p3,0.0720733913461),1733.42285156*ipitch
-	ao[293] oscil linseg(0.064592502924,ilen, 0),8807.08007812*ipitch
-	ao[294] oscil linseg(0.206609101868,ilen, 0),7385.88867188*ipitch
-	ao[295] oscil linseg(0.126563529007,0.143337066069*p3,0.143892349779),968.994140625*ipitch
-	ao[296] oscil linseg(0.14712728304,ilen, 0),4414.30664062*ipitch
-	ao[297] oscil linseg(0.206559758594,ilen, 0),12984.5214844*ipitch
-	ao[298] oscil linseg(0.090760242801,ilen, 0),12112.4267578*ipitch
-	ao[299] oscil linseg(0.0951374660185,ilen, 0),8656.34765625*ipitch
-	ao[300] oscil linseg(0.328956163311,0.143337066069*p3,0.209942228759),7310.52246094*ipitch
-	ao[301] oscil linseg(0.386526109719,0.143337066069*p3,0.223422356673,0.28555431131*p3,0.0652290395511),7698.12011719*ipitch
-	ao[302] oscil linseg(0.145177606746,0.143337066069*p3,0.0831805305492),689.0625*ipitch
-	ao[303] oscil linseg(0.0881119275801,ilen, 0),2982.34863281*ipitch
-	ao[304] oscil linseg(0.145244492171,0.143337066069*p3,0.110782928165),13167.5537109*ipitch
-	ao[305] oscil linseg(0.141950376959,0.143337066069*p3,0.115527851594),12833.7890625*ipitch
-	ao[306] oscil linseg(0.136457988296,ilen, 0),8505.61523438*ipitch
-	ao[307] oscil linseg(0.10586611203,ilen, 0),1367.35839844*ipitch
-	ao[308] oscil linseg(0.0982272796531,ilen, 0),7235.15625*ipitch
-	ao[309] oscil linseg(0.637481574474,0.143337066069*p3,0.280296459894),4026.70898438*ipitch
-	ao[310] oscil linseg(0.0890188249746,ilen, 0),5996.99707031*ipitch
-	ao[311] oscil linseg(0.148990692926,ilen, 0),19003.0517578*ipitch
-	ao[312] oscil linseg(0.73230252222,0.143337066069*p3,0.26511136049,0.28555431131*p3,0.0981445310304,0.28555431131*p3,0.0839549932744),7159.79003906*ipitch
-	ao[313] oscil linseg(0.194370495791,0.143337066069*p3,0.120553940044),9765.30761719*ipitch
-	ao[314] oscil linseg(0.0755744702387,ilen, 0),21791.6015625*ipitch
-	ao[315] oscil linseg(0.553168718408,0.143337066069*p3,0.144797624403,0.57110862262*p3,0.0877192494974),3951.34277344*ipitch
-	ao[316] oscil linseg(0.0679695996867,ilen, 0),13770.4833984*ipitch
-	ao[317] oscil linseg(0.0928263614643,ilen, 0),18938.4521484*ipitch
-	ao[318] oscil linseg(0.140048623912,0.42889137738*p3,0.0721361449436),10820.4345703*ipitch
-	ao[319] oscil linseg(0.194243631165,0.143337066069*p3,0.0827939043841),7084.42382812*ipitch
-	ao[320] oscil linseg(0.0951164582839,ilen, 0),21565.5029297*ipitch
-	ao[321] oscil linseg(0.209439268038,0.143337066069*p3,0.187640904728,0.28555431131*p3,0.0951564653986),7052.12402344*ipitch
-	ao[322] oscil linseg(0.110856587646,ilen, 0),5189.50195312*ipitch
-	ao[323] oscil linseg(0.0995070989593,ilen, 0),4338.94042969*ipitch
-	ao[324] oscil linseg(0.0987025268914,ilen, 0),11875.5615234*ipitch
-	ao[325] oscil linseg(0.147659994916,0.143337066069*p3,0.0827042991121),7009.05761719*ipitch
-	ao[326] oscil linseg(0.174412360395,ilen, 0),473.73046875*ipitch
-	ao[327] oscil linseg(0.0995805184202,ilen, 0),18970.7519531*ipitch
-	ao[328] oscil linseg(0.124695566925,0.143337066069*p3,0.0946136774813),12930.6884766*ipitch
-	ao[329] oscil linseg(0.0968602446483,0.143337066069*p3,0.11463935725,0.28555431131*p3,0.0723856246156),12230.859375*ipitch
-	ao[330] oscil linseg(0.111815206032,0.143337066069*p3,0.0853910981479),5351.00097656*ipitch
-	ao[331] oscil linseg(0.0728223826052,ilen, 0),21037.9394531*ipitch
-	ao[332] oscil linseg(0.250909437289,0.143337066069*p3,0.197565499271),6933.69140625*ipitch
-	ao[333] oscil linseg(0.0819529444566,ilen, 0),14674.8779297*ipitch
-	ao[334] oscil linseg(0.218703345479,0.143337066069*p3,0.0764471941394),13985.8154297*ipitch
-	ao[335] oscil linseg(0.0842398128519,ilen, 0),2250.21972656*ipitch
-	ao[336] oscil linseg(0.253122899436,ilen, 0),12080.1269531*ipitch
-	ao[337] oscil linseg(0.0955605728947,ilen, 0),20736.4746094*ipitch
-	ao[338] oscil linseg(0.0879110393154,ilen, 0),15040.9423828*ipitch
-	ao[339] oscil linseg(0.0877757641502,0.143337066069*p3,0.0634054665797),4694.23828125*ipitch
-	ao[340] oscil linseg(0.0855928645403,ilen, 0),12360.0585938*ipitch
-	ao[341] oscil linseg(0.230759506052,ilen, 0),6406.12792969*ipitch
-	ao[342] oscil linseg(0.0643652624946,ilen, 0),2756.25*ipitch
-	ao[343] oscil linseg(0.127401958472,ilen, 0),11929.3945312*ipitch
-	ao[344] oscil linseg(0.15680856102,ilen, 0),1582.69042969*ipitch
-	ao[345] oscil linseg(0.0891783890019,ilen, 0),20435.0097656*ipitch
-	ao[346] oscil linseg(0.139115369974,0.143337066069*p3,0.138614788571,0.28555431131*p3,0.0702538481751),6782.95898438*ipitch
-	ao[347] oscil linseg(0.077791900056,ilen, 0),893.627929688*ipitch
-	ao[348] oscil linseg(0.142222964031,0.143337066069*p3,0.101184471481),1044.36035156*ipitch
-	ao[349] oscil linseg(0.168296839455,ilen, 0),11638.6962891*ipitch
-	ao[350] oscil linseg(0.0970954102306,0.143337066069*p3,0.0706208651943),11778.6621094*ipitch
-	ao[351] oscil linseg(0.0733770226934,ilen, 0),20133.5449219*ipitch
-	ao[352] oscil linseg(0.0728654059069,ilen, 0),12166.2597656*ipitch
-	ao[353] oscil linseg(0.108731215698,ilen, 0),16031.4697266*ipitch
-	ao[354] oscil linseg(0.204503538986,ilen, 0),20725.7080078*ipitch
-	ao[355] oscil linseg(0.084357791913,ilen, 0),12693.8232422*ipitch
-	ao[356] oscil linseg(0.121906492459,0.143337066069*p3,0.0733820045307),13964.2822266*ipitch
-	ao[357] oscil linseg(0.146018977519,ilen, 0),16849.7314453*ipitch
-	ao[358] oscil linseg(0.0707665940186,ilen, 0),19907.4462891*ipitch
-	ao[359] oscil linseg(0.0884810299212,ilen, 0),3305.34667969*ipitch
-	ao[360] oscil linseg(0.136671525772,ilen, 0),14567.2119141*ipitch
-	ao[361] oscil linseg(0.167354050605,0.143337066069*p3,0.0996138596503),6632.2265625*ipitch
-	ao[362] oscil linseg(0.137071814788,ilen, 0),13748.9501953*ipitch
-	ao[363] oscil linseg(0.135721213686,ilen, 0),13727.4169922*ipitch
-	ao[364] oscil linseg(0.243807057916,0.143337066069*p3,0.0951310829299),5760.13183594*ipitch
-	ao[365] oscil linseg(0.0801860498949,ilen, 0),17549.5605469*ipitch
-	ao[366] oscil linseg(0.394950268419,0.143337066069*p3,0.174561267115),11477.1972656*ipitch
-	ao[367] oscil linseg(0.188706881378,ilen, 0),13673.5839844*ipitch
-	ao[368] oscil linseg(0.113281963141,ilen, 0),9291.57714844*ipitch
-	ao[369] oscil linseg(0.104008756957,ilen, 0),9969.87304688*ipitch
-	ao[370] oscil linseg(0.069040307834,ilen, 0),19110.7177734*ipitch
-	ao[371] oscil linseg(0.284506818234,ilen, 0),613.696289062*ipitch
-	ao[372] oscil linseg(0.0782531454605,ilen, 0),19379.8828125*ipitch
-	ao[373] oscil linseg(0.131874297696,0.143337066069*p3,0.185524373602),10346.7041016*ipitch
-	ao[374] oscil linseg(0.264475989654,ilen, 0),1507.32421875*ipitch
-	ao[375] oscil linseg(0.0669727437029,0.143337066069*p3,0.0741596349385),21220.9716797*ipitch
-	ao[376] oscil linseg(0.106322769719,0.143337066069*p3,0.0722418153524),6481.49414062*ipitch
-	ao[377] oscil linseg(0.207595331199,ilen, 0),6815.25878906*ipitch
-	ao[378] oscil linseg(0.0788573373028,ilen, 0),11251.0986328*ipitch
-	ao[379] oscil linseg(0.136218320377,ilen, 0),3649.87792969*ipitch
-	ao[380] oscil linseg(0.0727180468572,ilen, 0),2056.42089844*ipitch
-	ao[381] oscil linseg(0.0640298879328,ilen, 0),11401.8310547*ipitch
-	ao[382] oscil linseg(0.0975793392921,ilen, 0),14416.4794922*ipitch
-	ao[383] oscil linseg(0.0782259844161,ilen, 0),11175.7324219*ipitch
-	ao[384] oscil linseg(0.224299470257,0.143337066069*p3,0.0994841330278),4586.57226562*ipitch
-	ao[385] oscil linseg(0.102281673259,ilen, 0),12456.9580078*ipitch
-	ao[386] oscil linseg(0.0670519035256,ilen, 0),20908.7402344*ipitch
-	ao[387] oscil linseg(0.0659848332337,ilen, 0),2530.15136719*ipitch
-	ao[388] oscil linseg(0.115499247977,ilen, 0),15353.1738281*ipitch
-	ao[389] oscil linseg(0.138012150874,ilen, 0),5114.13574219*ipitch
-	ao[390] oscil linseg(0.0819474569589,0.143337066069*p3,0.0739377560718),10938.8671875*ipitch
-	ao[391] oscil linseg(0.0742348394852,ilen, 0),13512.0849609*ipitch
-	ao[392] oscil linseg(0.10648798356,ilen, 0),10949.6337891*ipitch
-	ao[393] oscil linseg(0.0989353486262,ilen, 0),2131.78710938*ipitch
-	ao[394] oscil linseg(0.0697626634132,ilen, 0),1991.82128906*ipitch
-	ao[395] oscil linseg(0.320698039046,ilen, 0),10874.2675781*ipitch
-	ao[396] oscil linseg(0.0625865934453,ilen, 0),9054.71191406*ipitch
-	ao[397] oscil linseg(0.118970761564,0.143337066069*p3,0.0818012248276),18324.7558594*ipitch
-	ao[398] oscil linseg(0.0746379514142,ilen, 0),18636.9873047*ipitch
-	ao[399] oscil linseg(0.0690026133926,ilen, 0),18249.3896484*ipitch
-	ao[400] oscil linseg(0.063811474771,ilen, 0),6169.26269531*ipitch
-	ao[401] oscil linseg(0.103729890435,ilen, 0),2454.78515625*ipitch
-	ao[402] oscil linseg(0.254163965814,ilen, 0),10109.8388672*ipitch
-	ao[403] oscil linseg(0.140268965454,0.143337066069*p3,0.197139548707),10723.5351562*ipitch
-	ao[404] oscil linseg(0.137470151095,0.143337066069*p3,0.179511472619),1431.95800781*ipitch
-	ao[405] oscil linseg(0.105988519303,ilen, 0),18023.2910156*ipitch
-	ao[406] oscil linseg(0.0962331388948,ilen, 0),2659.35058594*ipitch
-	ao[407] oscil linseg(0.0991064606752,0.143337066069*p3,0.0628921296231),11164.9658203*ipitch
-	ao[408] oscil linseg(0.12386201128,ilen, 0),10572.8027344*ipitch
-	ao[409] oscil linseg(0.100279014391,0.143337066069*p3,0.0929391084027),4468.13964844*ipitch
-	ao[410] oscil linseg(0.176008647373,0.143337066069*p3,0.0685163331489),8322.58300781*ipitch
-	ao[411] oscil linseg(0.113173954924,ilen, 0),17646.4599609*ipitch
-	ao[412] oscil linseg(0.135816016428,0.143337066069*p3,0.0776818661256),11369.53125*ipitch
-	ao[413] oscil linseg(0.103866287308,ilen, 0),538.330078125*ipitch
-	ao[414] oscil linseg(0.12443149453,ilen, 0),16225.2685547*ipitch
-	ao[415] oscil linseg(0.0949345638571,0.143337066069*p3,0.0938621892119),4995.703125*ipitch
-	ao[416] oscil linseg(0.0942624105378,ilen, 0),17495.7275391*ipitch
-	ao[417] oscil linseg(0.190678316822,0.143337066069*p3,0.0637357512446),10422.0703125*ipitch
-	ao[418] oscil linseg(0.0860781658353,ilen, 0),13275.2197266*ipitch
-	ao[419] oscil linseg(0.280583990597,0.143337066069*p3,0.0812888746401,0.28555431131*p3,0.0651315138097),6029.296875*ipitch
-	ao[420] oscil linseg(0.148198738276,0.143337066069*p3,0.0877879971455),3423.77929688*ipitch
-	ao[421] oscil linseg(0.0736571572207,ilen, 0),17108.1298828*ipitch
-	ao[422] oscil linseg(0.0911945179546,ilen, 0),1916.45507812*ipitch
-	ao[423] oscil linseg(0.228620062879,0.143337066069*p3,0.154680619226,0.28555431131*p3,0.0870935023956),10271.3378906*ipitch
-	ao[424] oscil linseg(0.335775148468,0.143337066069*p3,0.11313414497,0.28555431131*p3,0.0939936005211),8118.01757812*ipitch
-	ao[425] oscil linseg(0.0654093783593,ilen, 0),17118.8964844*ipitch
-	ao[426] oscil linseg(0.111147058085,0.143337066069*p3,0.0990867935881),9754.54101562*ipitch
-	ao[427] oscil linseg(0.258230151577,ilen, 0),2336.35253906*ipitch
-	ao[428] oscil linseg(0.140208847211,0.143337066069*p3,0.0894927497416),6158.49609375*ipitch
-	ao[429] oscil linseg(0.147585728309,ilen, 0),9872.97363281*ipitch
-	ao[430] oscil linseg(0.213441226618,ilen, 0),10120.6054688*ipitch
-	ao[431] oscil linseg(1.0,0.143337066069*p3,0.117788007468,0.28555431131*p3,0.185173153443),8042.65136719*ipitch
-	ao[432] oscil linseg(0.106385691984,ilen, 0),6578.39355469*ipitch
-	ao[433] oscil linseg(0.0858839274922,ilen, 0),14373.4130859*ipitch
-	ao[434] oscil linseg(0.125595052958,ilen, 0),10928.1005859*ipitch
-	ao[435] oscil linseg(0.136043695975,0.143337066069*p3,0.0893726371342,0.28555431131*p3,0.0629909700072),441.430664062*ipitch
-	ao[436] oscil linseg(0.0633874085846,ilen, 0),2863.91601562*ipitch
-	ao[437] oscil linseg(0.0744110294171,ilen, 0),19670.5810547*ipitch
-	ao[438] oscil linseg(0.214949429536,ilen, 0),7967.28515625*ipitch
-	ao[439] oscil linseg(0.139347477448,0.143337066069*p3,0.171221532911,0.28555431131*p3,0.0800791563892),11983.2275391*ipitch
-	ao[440] oscil linseg(0.197508704319,0.143337066069*p3,0.0798854517781),2228.68652344*ipitch
-	ao[441] oscil linseg(0.0979123817655,ilen, 0),14147.3144531*ipitch
-	ao[442] oscil linseg(0.130643946435,ilen, 0),15277.8076172*ipitch
-	ao[443] oscil linseg(0.318258885151,ilen, 0),9819.140625*ipitch
-	ao[444] oscil linseg(0.0805428009712,ilen, 0),13038.3544922*ipitch
-	ao[445] oscil linseg(0.23876638471,ilen, 0),5727.83203125*ipitch
-	ao[446] oscil linseg(0.0863617647499,ilen, 0),8161.08398438*ipitch
-	ao[447] oscil linseg(0.366178179626,ilen, 0),3273.046875*ipitch
-	ao[448] oscil linseg(0.130350014165,ilen, 0),13469.0185547*ipitch
-	ao[449] oscil linseg(0.067953277611,0.143337066069*p3,0.0937730195556),8580.98144531*ipitch
-	ao[450] oscil linseg(0.0974784037142,ilen, 0),9668.40820312*ipitch
-	ao[451] oscil linseg(0.12558794104,ilen, 0),7816.55273438*ipitch
-	ao[452] oscil linseg(0.343438725112,0.143337066069*p3,0.117823059137,0.28555431131*p3,0.0731210239776),1022.82714844*ipitch
-	ao[453] oscil linseg(0.131175573272,0.143337066069*p3,0.144111117102),5932.39746094*ipitch
-	ao[454] oscil linseg(0.246119533902,0.143337066069*p3,0.0743663686396),17517.2607422*ipitch
-	ao[455] oscil linseg(0.1149835216,ilen, 0),19799.7802734*ipitch
-	ao[456] oscil linseg(0.0744025593975,ilen, 0),9517.67578125*ipitch
-	ao[457] oscil linseg(0.137931494539,ilen, 0),1614.99023438*ipitch
-	ao[458] oscil linseg(0.0660515467993,ilen, 0),5577.09960938*ipitch
-	ao[459] oscil linseg(0.118393422418,ilen, 0),17054.296875*ipitch
-	ao[460] oscil linseg(0.207226187599,0.143337066069*p3,0.0647637562953),10691.2353516*ipitch
-	ao[461] oscil linseg(0.315374126325,0.143337066069*p3,0.151611251669),6987.52441406*ipitch
-	ao[462] oscil linseg(0.07485920553,ilen, 0),20682.6416016*ipitch
-	ao[463] oscil linseg(0.178111420478,0.143337066069*p3,0.0740060024648),7665.8203125*ipitch
-	ao[464] oscil linseg(0.135718422434,ilen, 0),11746.3623047*ipitch
-	ao[465] oscil linseg(0.10867803901,ilen, 0),3068.48144531*ipitch
-	ao[466] oscil linseg(0.0684695265711,ilen, 0),21457.8369141*ipitch
-	ao[467] oscil linseg(0.720584391306,0.143337066069*p3,0.127984004857,0.28555431131*p3,0.161123921235),9216.2109375*ipitch
-	ao[468] oscil linseg(0.0702042265114,ilen, 0),7590.45410156*ipitch
-	ao[469] oscil linseg(0.132136918816,0.143337066069*p3,0.0828321681304),5426.3671875*ipitch
-	ao[470] oscil linseg(0.15408830181,ilen, 0),5286.40136719*ipitch
-	ao[471] oscil linseg(0.100718221913,ilen, 0),16311.4013672*ipitch
-	ao[472] oscil linseg(0.0775309157392,ilen, 0),13393.6523438*ipitch
-	ao[473] oscil linseg(0.106318764517,0.143337066069*p3,0.108899292493),9065.47851562*ipitch
-	ao[474] oscil linseg(0.146082784758,0.143337066069*p3,0.0876043098502,0.28555431131*p3,0.0726729120086),7515.08789062*ipitch
-	ao[475] oscil linseg(0.122199439186,ilen, 0),1453.49121094*ipitch
-	ao[476] oscil linseg(0.255161945266,0.143337066069*p3,0.0928891688229,0.28555431131*p3,0.0787231901369),12015.5273438*ipitch
-	ao[477] oscil linseg(0.068450532065,ilen, 0),18270.9228516*ipitch
-	ao[478] oscil linseg(0.090371706991,0.143337066069*p3,0.0852146302656),9399.24316406*ipitch
-	ao[479] oscil linseg(0.191003770863,0.143337066069*p3,0.122268540786),13242.9199219*ipitch
-	ao[480] oscil linseg(0.165615055854,ilen, 0),8914.74609375*ipitch
-	ao[481] oscil linseg(0.185240004253,0.143337066069*p3,0.0857390219768),7439.72167969*ipitch
-	ao[482] oscil linseg(0.125331252839,0.143337066069*p3,0.177051438867),4112.84179688*ipitch
-	ao[483] oscil linseg(0.070845759913,ilen, 0),13092.1875*ipitch
-	ao[484] oscil linseg(0.177838370207,0.143337066069*p3,0.0662394640768),8764.01367188*ipitch
-	ao[485] oscil linseg(0.0833953922577,ilen, 0),7364.35546875*ipitch
-	ao[486] oscil linseg(0.0943425080532,ilen, 0),13016.8212891*ipitch
-	ao[487] oscil linseg(0.103373615023,0.143337066069*p3,0.0832542428866),4091.30859375*ipitch
-	ao[488] oscil linseg(0.0766075552533,ilen, 0),4640.40527344*ipitch
-	ao[489] oscil linseg(0.0645514854994,ilen, 0),4769.60449219*ipitch
-	ao[490] oscil linseg(0.0716950350596,ilen, 0),8365.64941406*ipitch
-	ao[491] oscil linseg(0.286792073986,0.143337066069*p3,0.0941704657137),12564.6240234*ipitch
-	ao[492] oscil linseg(0.261090793602,0.143337066069*p3,0.212278721407),8613.28125*ipitch
-	ao[493] oscil linseg(0.195148997936,0.143337066069*p3,0.0631296206387),7288.98925781*ipitch
-	ao[494] oscil linseg(0.0669267603563,ilen, 0),818.26171875*ipitch
-	ao[495] oscil linseg(0.121067152557,ilen, 0),11304.9316406*ipitch
-	ao[496] oscil linseg(0.0682134282969,ilen, 0),8462.54882812*ipitch
-	ao[497] oscil linseg(0.187115700186,ilen, 0),5695.53222656*ipitch
-	ao[498] oscil linseg(0.458060944782,0.143337066069*p3,0.199574658272,0.28555431131*p3,0.088801511955),4015.94238281*ipitch
-	ao[499] oscil linseg(0.112419312131,0.143337066069*p3,0.117097378223),9162.37792969*ipitch
-	ao[500] oscil linseg(0.125345366376,ilen, 0),12639.9902344*ipitch
-	ao[501] oscil linseg(0.582819023293,0.143337066069*p3,0.10076752657,0.28555431131*p3,0.0981588073225),3800.61035156*ipitch
-	ao[502] oscil linseg(0.365815219049,0.143337066069*p3,0.0822704072828),8311.81640625*ipitch
-	ao[503] oscil linseg(0.185801578877,0.143337066069*p3,0.0671789467688),7138.25683594*ipitch
-	ao[504] oscil linseg(0.203787693691,0.143337066069*p3,0.327757680435,0.28555431131*p3,0.0776871666629),4974.16992188*ipitch
-	ao[505] oscil linseg(0.0737978813616,ilen, 0),20962.5732422*ipitch
-	ao[506] oscil linseg(0.100931233275,0.143337066069*p3,0.0652535720443),6750.65917969*ipitch
-	ao[507] oscil linseg(0.0921030911415,ilen, 0),12489.2578125*ipitch
-	ao[508] oscil linseg(0.150014093917,0.143337066069*p3,0.115135850114),19573.6816406*ipitch
-	ao[509] oscil linseg(0.0835271916123,ilen, 0),11272.6318359*ipitch
-	ao[510] oscil linseg(0.151774496191,0.143337066069*p3,0.171986835388),7062.890625*ipitch
-	ao[511] oscil linseg(0.0653117050238,ilen, 0),1130.49316406*ipitch
-	ao[512] oscil linseg(0.173972287618,0.143337066069*p3,0.06284767457),5049.53613281*ipitch
-	ao[513] oscil linseg(0.0653481330465,ilen, 0),13382.8857422*ipitch
-	ao[514] oscil linseg(0.138942062054,ilen, 0),12187.7929688*ipitch
-	ao[515] oscil linseg(0.116136972004,0.143337066069*p3,0.071248628114),2099.48730469*ipitch
-	ao[516] oscil linseg(0.105628634421,ilen, 0),6912.15820312*ipitch
-	ao[517] oscil linseg(0.0958360458324,ilen, 0),14276.5136719*ipitch
-	ao[518] oscil linseg(0.132849159228,ilen, 0),8925.51269531*ipitch
-	ao[519] oscil linseg(0.172920062618,ilen, 0),506.030273438*ipitch
-	ao[520] oscil linseg(0.0842377969016,ilen, 0),6104.66308594*ipitch
-	ao[521] oscil linseg(0.105758386217,ilen, 0),16505.2001953*ipitch
-	ao[522] oscil linseg(0.0945478317424,ilen, 0),1055.12695312*ipitch
-	ao[523] oscil linseg(0.266244281565,ilen, 0),9980.63964844*ipitch
-	ao[524] oscil linseg(0.599448088775,0.143337066069*p3,0.156634675311,0.28555431131*p3,0.147249027341),3811.37695312*ipitch
-	ao[525] oscil linseg(0.0835621526989,ilen, 0),20876.4404297*ipitch
-	ao[526] oscil linseg(0.189595305902,ilen, 0),2627.05078125*ipitch
-	ao[527] oscil linseg(0.105666048802,ilen, 0),16214.5019531*ipitch
-	ao[528] oscil linseg(0.167513080504,ilen, 0),20424.2431641*ipitch
-	ao[529] oscil linseg(0.0898021707998,0.143337066069*p3,0.066774495697),11886.328125*ipitch
-	ao[530] oscil linseg(0.132612625309,ilen, 0),16559.0332031*ipitch
-	ao[531] oscil linseg(0.0964758168175,0.143337066069*p3,0.096710012955),6761.42578125*ipitch
-	ao[532] oscil linseg(0.258126505822,ilen, 0),4403.54003906*ipitch
-	ao[533] oscil linseg(0.336903781937,0.143337066069*p3,0.0761855850121),3789.84375*ipitch
-	ao[534] oscil linseg(0.198802421702,0.143337066069*p3,0.0682540334348),16063.7695312*ipitch
-	ao[535] oscil linseg(0.124633406308,ilen, 0),12090.8935547*ipitch
-	ao[536] oscil linseg(0.0759253376262,ilen, 0),11735.5957031*ipitch
-	ao[537] oscil linseg(0.0660098627991,ilen, 0),20047.4121094*ipitch
-	ao[538] oscil linseg(0.111502837107,0.143337066069*p3,0.0672652419696),3154.61425781*ipitch
-	ao[539] oscil linseg(0.0690655244823,ilen, 0),22006.9335938*ipitch
-	ao[540] oscil linseg(0.0759145626835,ilen, 0),4521.97265625*ipitch
-	ao[541] oscil linseg(0.171334491462,0.143337066069*p3,0.0751629389483),13146.0205078*ipitch
-	ao[542] oscil linseg(0.0944426208419,ilen, 0),2670.1171875*ipitch
-	ao[543] oscil linseg(0.210229158114,ilen, 0),8064.18457031*ipitch
-	ao[544] oscil linseg(0.467416134326,0.143337066069*p3,0.0802914701881),5458.66699219*ipitch
-	ao[545] oscil linseg(0.07990872599,ilen, 0),19745.9472656*ipitch
-	ao[546] oscil linseg(0.157175820188,0.143337066069*p3,0.129910756106),6610.69335938*ipitch
-	ao[547] oscil linseg(0.133903816237,ilen, 0),8688.64746094*ipitch
-	ao[548] oscil linseg(0.113781109415,0.143337066069*p3,0.113060457491),3714.47753906*ipitch
-	ao[549] oscil linseg(0.075070691903,ilen, 0),17904.8583984*ipitch
-	ao[550] oscil linseg(0.182058858446,ilen, 0),2304.05273438*ipitch
-	ao[551] oscil linseg(0.149695320202,0.143337066069*p3,0.0880188852922),11434.1308594*ipitch
-	ao[552] oscil linseg(0.128978861495,0.143337066069*p3,0.0728217190043),9173.14453125*ipitch
-	ao[553] oscil linseg(0.271782711774,0.143337066069*p3,0.13098373317),9743.77441406*ipitch
-	ao[554] oscil linseg(0.0950129849853,ilen, 0),19369.1162109*ipitch
-	ao[555] oscil linseg(0.182328803643,ilen, 0),592.163085938*ipitch
-	ao[556] oscil linseg(0.0628060064354,0.143337066069*p3,0.142617096893),6513.79394531*ipitch
-	ao[557] oscil linseg(0.145832625396,ilen, 0),21070.2392578*ipitch
-	ao[558] oscil linseg(0.16052717984,0.143337066069*p3,0.176525690803),10798.9013672*ipitch
-	ao[559] oscil linseg(0.098923394725,ilen, 0),18884.6191406*ipitch
-	ao[560] oscil linseg(0.141048124465,ilen, 0),6459.9609375*ipitch
-	ao[561] oscil linseg(0.138371554858,0.143337066069*p3,0.0740033343538),4285.10742188*ipitch
-	ao[562] oscil linseg(0.0716382058141,0.143337066069*p3,0.104046794471),11208.0322266*ipitch
-	ao[563] oscil linseg(0.0881866321788,ilen, 0),3639.11132812*ipitch
-	ao[564] oscil linseg(0.0664374326785,ilen, 0),20585.7421875*ipitch
-	ao[565] oscil linseg(0.127975261048,ilen, 0),11854.0283203*ipitch
-	ao[566] oscil linseg(0.0643635311805,ilen, 0),2024.12109375*ipitch
-	ao[567] oscil linseg(0.150278610462,ilen, 0),11132.6660156*ipitch
-	ao[568] oscil linseg(0.0650281700288,ilen, 0),4812.67089844*ipitch
-	ao[569] oscil linseg(0.111182823402,ilen, 0),15385.4736328*ipitch
-	ao[570] oscil linseg(0.123830387118,ilen, 0),8516.38183594*ipitch
-	ao[571] oscil linseg(0.0843704849295,ilen, 0),11057.2998047*ipitch
-	ao[572] oscil linseg(0.106880727049,0.143337066069*p3,0.156798038247),13253.6865234*ipitch
-	ao[573] oscil linseg(0.0643051529902,ilen, 0),15310.1074219*ipitch
-	ao[574] oscil linseg(0.0690262505172,ilen, 0),13716.6503906*ipitch
-	ao[575] oscil linseg(0.169934882568,0.143337066069*p3,0.172223758212),5340.234375*ipitch
-	ao[576] oscil linseg(0.0779492354798,ilen, 0),18540.0878906*ipitch
-	ao[577] oscil linseg(0.124938675552,0.143337066069*p3,0.0952019570708),8451.78222656*ipitch
-	ao[578] oscil linseg(0.0791844380315,ilen, 0),14459.5458984*ipitch
-	ao[579] oscil linseg(0.464467537562,0.143337066069*p3,0.147603413038,0.28555431131*p3,0.15275997068,0.28555431131*p3,0.0943582602819),5867.79785156*ipitch
-	ao[580] oscil linseg(0.191450107352,ilen, 0),10831.2011719*ipitch
-	ao[581] oscil linseg(0.0727524677159,0.143337066069*p3,0.104826593711),9506.90917969*ipitch
-	ao[582] oscil linseg(0.122930224123,ilen, 0),8225.68359375*ipitch
-	ao[583] oscil linseg(0.118028267576,ilen, 0),18163.2568359*ipitch
-	ao[584] oscil linseg(0.206696169354,0.143337066069*p3,0.0918232128757),3886.74316406*ipitch
-	ao[585] oscil linseg(0.0756481308423,ilen, 0),21317.8710938*ipitch
-	ao[586] oscil linseg(0.161615493971,ilen, 0),15008.6425781*ipitch
-	ao[587] oscil linseg(0.110332561757,ilen, 0),10562.0361328*ipitch
-	ao[588] oscil linseg(0.167393704714,ilen, 0),10680.46875*ipitch
-	ao[589] oscil linseg(0.104720709851,ilen, 0),4166.67480469*ipitch
-	ao[590] oscil linseg(0.0705032292215,0.143337066069*p3,0.06966095562),11617.1630859*ipitch
-	ao[591] oscil linseg(0.0820885131094,ilen, 0),1948.75488281*ipitch
-	ao[592] oscil linseg(0.197253035787,0.143337066069*p3,0.0645055647399),10529.7363281*ipitch
-	ao[593] oscil linseg(0.114965770093,0.143337066069*p3,0.0691332195128),3036.18164062*ipitch
-	ao[594] oscil linseg(0.0890688709164,ilen, 0),6083.12988281*ipitch
-	ao[595] oscil linseg(0.0947479119207,ilen, 0),12672.2900391*ipitch
-	ao[596] oscil linseg(0.181573808886,ilen, 0),14707.1777344*ipitch
-	ao[597] oscil linseg(0.287113619207,0.143337066069*p3,0.176425565717),5221.80175781*ipitch
-	ao[598] oscil linseg(0.298003013705,0.143337066069*p3,0.069353055813),10379.0039062*ipitch
-	ao[599] oscil linseg(0.0729978313363,ilen, 0),8171.85058594*ipitch
-	ao[600] oscil linseg(0.448207265947,0.143337066069*p3,0.139204707171),6007.76367188*ipitch
-	ao[601] oscil linseg(0.0991107977304,ilen, 0),3563.74511719*ipitch
-	ao[602] oscil linseg(0.0964867592717,ilen, 0),14556.4453125*ipitch
-	ao[603] oscil linseg(0.161126215646,ilen, 0),10228.2714844*ipitch
-	ao[604] oscil linseg(0.069094795169,ilen, 0),9270.04394531*ipitch
-	ao[605] oscil linseg(0.0905738512708,0.143337066069*p3,0.0718281138617),8096.484375*ipitch
-	ao[606] oscil linseg(0.103092594369,ilen, 0),19067.6513672*ipitch
-	ao[607] oscil linseg(0.0686999142613,ilen, 0),14481.0791016*ipitch
-	ao[608] oscil linseg(0.0894861481141,ilen, 0),6276.92871094*ipitch
-	ao[609] oscil linseg(0.0729423597387,ilen, 0),16526.7333984*ipitch
-	ao[610] oscil linseg(0.216898138961,0.143337066069*p3,0.117858343788),10325.1708984*ipitch
-	ao[611] oscil linseg(0.130874413439,0.143337066069*p3,0.0768675750772),21210.2050781*ipitch
-	ao[612] oscil linseg(0.122104393914,0.143337066069*p3,0.081470286861),10077.5390625*ipitch
-	ao[613] oscil linseg(0.235043427812,0.143337066069*p3,0.124632832969,0.28555431131*p3,0.081111700801),8021.11816406*ipitch
-	ao[614] oscil linseg(0.110160316972,ilen, 0),678.295898438*ipitch
-	ao[615] oscil linseg(0.50265942412,0.143337066069*p3,0.100295694662,0.28555431131*p3,0.11738276265,0.28555431131*p3,0.0677015774675),5857.03125*ipitch
-	ao[616] oscil linseg(0.275643550575,0.143337066069*p3,0.14870890554,0.28555431131*p3,0.0662634929753),10002.1728516*ipitch
-	ao[617] oscil linseg(0.102774489174,ilen, 0),11380.2978516*ipitch
-	ao[618] oscil linseg(0.0859256816261,ilen, 0),20951.8066406*ipitch
-	ao[619] oscil linseg(0.132759935649,0.143337066069*p3,0.0700275023926),4575.80566406*ipitch
-	ao[620] oscil linseg(0.0662947193639,0.42889137738*p3,0.0633934908816),7945.75195312*ipitch
-	ao[621] oscil linseg(0.0821299990823,ilen, 0),12435.4248047*ipitch
-	ao[622] oscil linseg(0.0826956811135,ilen, 0),3240.74707031*ipitch
-	ao[623] oscil linseg(0.297709660162,0.143337066069*p3,0.10206229103),9776.07421875*ipitch
-	ao[624] oscil linseg(0.0669353557716,ilen, 0),7870.38574219*ipitch
-	ao[625] oscil linseg(0.0762676625899,ilen, 0),21468.6035156*ipitch
-	ao[626] oscil linseg(0.0838207139497,ilen, 0),9700.70800781*ipitch
-	ao[627] oscil linseg(0.13163239543,ilen, 0),5630.93261719*ipitch
-	ao[628] oscil linseg(0.127193609414,ilen, 0),430.6640625*ipitch
-	ao[629] oscil linseg(0.0850769344032,ilen, 0),12543.0908203*ipitch
-	ao[630] oscil linseg(0.173484238232,0.143337066069*p3,0.0807241824274),13953.515625*ipitch
-	ao[631] oscil linseg(0.199411026644,ilen, 0),9033.17871094*ipitch
-	ao[632] oscil linseg(0.184717456785,ilen, 0),7795.01953125*ipitch
-	ao[633] oscil linseg(0.0717171183518,ilen, 0),18389.3554688*ipitch
-	ao[634] oscil linseg(0.245430904809,ilen, 0),2390.18554688*ipitch
-	ao[635] oscil linseg(0.0806529165231,ilen, 0),9549.97558594*ipitch
-	ao[636] oscil linseg(0.106054217687,ilen, 0),6524.56054688*ipitch
-	ao[637] oscil linseg(0.187099166094,ilen, 0),2142.55371094*ipitch
-	ao[638] oscil linseg(0.104331712287,ilen, 0),20704.1748047*ipitch
-	ao[639] oscil linseg(0.357643194345,0.143337066069*p3,0.0701917502894),9474.609375*ipitch
-	ao[640] oscil linseg(0.081211902346,0.143337066069*p3,0.075979640278),6686.05957031*ipitch
-	ao[641] oscil linseg(0.0669573157511,ilen, 0),14405.7128906*ipitch
-	ao[642] oscil linseg(0.0912893087364,ilen, 0),5555.56640625*ipitch
-	ao[643] oscil linseg(0.351320874502,ilen, 0),11143.4326172*ipitch
-	ao[644] oscil linseg(0.0955284169967,ilen, 0),3186.9140625*ipitch
-	ao[645] oscil linseg(0.238953905343,ilen, 0),10249.8046875*ipitch
-	ao[646] oscil linseg(0.16191148331,ilen, 0),2917.74902344*ipitch
-	ao[647] oscil linseg(0.172960793642,0.143337066069*p3,0.0696134259601),9323.87695312*ipitch
-	ao[648] oscil linseg(0.0683936994389,ilen, 0),1001.29394531*ipitch
-	ao[649] oscil linseg(0.164472391312,ilen, 0),12198.5595703*ipitch
-	ao[650] oscil linseg(0.090899716884,ilen, 0),9248.51074219*ipitch
-	ao[651] oscil linseg(0.309604284054,0.143337066069*p3,0.332025962141,0.28555431131*p3,0.140845643494,0.28555431131*p3,0.0784983860968),4984.93652344*ipitch
-	ao[652] oscil linseg(0.0972685047016,ilen, 0),13501.3183594*ipitch
-	ao[653] oscil linseg(0.135404389302,0.143337066069*p3,0.062163151846),2217.91992188*ipitch
-	ao[654] oscil linseg(0.0777704210602,ilen, 0),4844.97070312*ipitch
-	ao[655] oscil linseg(0.10034140369,ilen, 0),7568.92089844*ipitch
-	ao[656] oscil linseg(0.295630260075,ilen, 0),13425.9521484*ipitch
-	ao[657] oscil linseg(0.0672158422905,ilen, 0),2067.1875*ipitch
-	ao[658] oscil linseg(0.0948291442174,ilen, 0),17065.0634766*ipitch
-	ao[659] oscil linseg(0.30521253696,0.143337066069*p3,0.25307721392),11466.4306641*ipitch
-	ao[660] oscil linseg(0.0880592556853,ilen, 0),8796.31347656*ipitch
-	ao[661] oscil linseg(0.0770479874527,ilen, 0),9022.41210938*ipitch
-	ao[662] oscil linseg(0.100375473822,0.143337066069*p3,0.191640210485,0.28555431131*p3,0.108044222941),7493.5546875*ipitch
-	ao[663] oscil linseg(0.1464700169,ilen, 0),6040.06347656*ipitch
-	ao[664] oscil linseg(0.0907099395745,ilen, 0),18109.4238281*ipitch
-	ao[665] oscil linseg(0.0762828509389,0.143337066069*p3,0.0658359976036),13695.1171875*ipitch
-	ao[666] oscil linseg(0.0638343642314,ilen, 0),9851.44042969*ipitch
-	ao[667] oscil linseg(0.0801027095374,ilen, 0),2594.75097656*ipitch
-	ao[668] oscil linseg(0.11013508922,ilen, 0),15536.2060547*ipitch
-	ao[669] oscil linseg(0.164639264323,0.143337066069*p3,0.0947020957561,0.28555431131*p3,0.0794201721446),5254.1015625*ipitch
-	ao[670] oscil linseg(0.0805602415706,0.143337066069*p3,0.0624403057185),10906.5673828*ipitch
-	ao[671] oscil linseg(0.190421103451,0.143337066069*p3,0.11422038831),7095.19042969*ipitch
-	ao[672] oscil linseg(0.130279501515,0.143337066069*p3,0.0946559793999),8720.94726562*ipitch
-	ao[673] oscil linseg(0.272808820861,0.143337066069*p3,0.0784930128975),7342.82226562*ipitch
-	ao[674] oscil linseg(0.26985325877,0.143337066069*p3,0.113790815453),11961.6943359*ipitch
-	ao[675] oscil linseg(0.11308285798,ilen, 0),12973.7548828*ipitch
-	ao[676] oscil linseg(0.077505986417,ilen, 0),13221.3867188*ipitch
-	ao[677] oscil linseg(0.0908930559723,ilen, 0),1216.62597656*ipitch
-	ao[678] oscil linseg(0.0889252826239,ilen, 0),8570.21484375*ipitch
-	ao[679] oscil linseg(0.496401272349,0.143337066069*p3,0.259106274687,0.28555431131*p3,0.0830526703057),5813.96484375*ipitch
-	ao[680] oscil linseg(0.0997731017102,ilen, 0),5103.36914062*ipitch
-	ao[681] oscil linseg(0.154797376139,ilen, 0),13544.3847656*ipitch
-	ao[682] oscil linseg(0.160725226423,ilen, 0),8559.44824219*ipitch
-	ao[683] oscil linseg(0.117008191158,ilen, 0),15062.4755859*ipitch
-	ao[684] oscil linseg(0.253439282944,ilen, 0),2271.75292969*ipitch
-	ao[685] oscil linseg(0.47135558958,0.143337066069*p3,0.386317070689,0.28555431131*p3,0.123780631344),4005.17578125*ipitch
-	ao[686] oscil linseg(0.167324083038,0.143337066069*p3,0.0643163202645),9614.57519531*ipitch
-	ao[687] oscil linseg(0.0645572351966,0.143337066069*p3,0.124933562042),8591.74804688*ipitch
-	ao[688] oscil linseg(0.224892787018,0.143337066069*p3,0.0714919395156),10615.8691406*ipitch
-	ao[689] oscil linseg(0.164332905453,ilen, 0),12596.9238281*ipitch
-	ao[690] oscil linseg(0.101556340929,ilen, 0),6449.19433594*ipitch
-	ao[691] oscil linseg(0.0963942939152,ilen, 0),8268.75*ipitch
-	ao[692] oscil linseg(0.0893177384802,ilen, 0),16548.2666016*ipitch
-	ao[693] oscil linseg(0.188054220343,ilen, 0),10669.7021484*ipitch
-	ao[694] oscil linseg(0.0641707359206,ilen, 0),19896.6796875*ipitch
-	ao[695] oscil linseg(0.141129615219,ilen, 0),2799.31640625*ipitch
-	ao[696] oscil linseg(0.0959838306461,ilen, 0),12446.1914062*ipitch
-	ao[697] oscil linseg(0.117947571575,0.143337066069*p3,0.107399862129),7536.62109375*ipitch
-	ao[698] oscil linseg(0.368357669148,0.143337066069*p3,0.256661211206),7041.35742188*ipitch
-	ao[699] oscil linseg(0.0687723743774,ilen, 0),925.927734375*ipitch
-	ao[700] oscil linseg(0.0743350186349,ilen, 0),19422.9492188*ipitch
-	ao[701] oscil linseg(0.0849378440487,ilen, 0),4748.07128906*ipitch
-	ao[702] oscil linseg(0.069013167906,ilen, 0),12295.4589844*ipitch
-	ao[703] oscil linseg(0.0956111244783,ilen, 0),12779.9560547*ipitch
-	ao[704] oscil linseg(0.238590189438,0.143337066069*p3,0.0680744510989),5275.63476562*ipitch
-	ao[705] oscil linseg(0.062975396875,0.143337066069*p3,0.10868037955,0.28555431131*p3,0.071443402114),645.99609375*ipitch
-	ao[706] oscil linseg(0.0928036096647,ilen, 0),12037.0605469*ipitch
-	ao[707] oscil linseg(0.0958436646481,ilen, 0),20941.0400391*ipitch
-	ao[708] oscil linseg(0.109150712653,ilen, 0),12144.7265625*ipitch
-	ao[709] oscil linseg(0.653891406031,0.143337066069*p3,0.263103913359,0.28555431131*p3,0.097085475276,0.28555431131*p3,0.0656975683457),5803.19824219*ipitch
-	ao[710] oscil linseg(0.318525664481,0.143337066069*p3,0.104838243807,0.28555431131*p3,0.0855277431007),6890.625*ipitch
-	ao[711] oscil linseg(0.290329411319,ilen, 0),20467.3095703*ipitch
-	ao[712] oscil linseg(0.157457579803,ilen, 0),20714.9414062*ipitch
-	ao[713] oscil linseg(0.131661842544,ilen, 0),13878.1494141*ipitch
-	ao[714] oscil linseg(0.0785864710394,ilen, 0),3854.44335938*ipitch
-	ao[715] oscil linseg(0.103230526,ilen, 0),4651.171875*ipitch
-	ao[716] oscil linseg(0.116595137779,ilen, 0),20413.4765625*ipitch
-	ao[717] oscil linseg(0.103739611282,ilen, 0),4102.07519531*ipitch
-	ao[718] oscil linseg(0.0756974458044,0.143337066069*p3,0.0921954405562),11843.2617188*ipitch
-	ao[719] oscil linseg(0.173453563132,0.143337066069*p3,0.0711633186425),1571.92382812*ipitch
-	ao[720] oscil linseg(0.205972890826,0.143337066069*p3,0.0628217544609),11487.9638672*ipitch
-	ao[721] oscil linseg(0.0821564814681,ilen, 0),6739.89257812*ipitch
-	ao[722] oscil linseg(0.0706280872294,ilen, 0),3003.88183594*ipitch
-	ao[723] oscil linseg(0.219556940446,ilen, 0),495.263671875*ipitch
-	ao[724] oscil linseg(0.100729550248,ilen, 0),16020.703125*ipitch
-	ao[725] oscil linseg(0.0863525555426,ilen, 0),11326.4648438*ipitch
-	ao[726] oscil linseg(0.0885802439915,ilen, 0),7913.45214844*ipitch
-	ao[727] oscil linseg(0.190632212985,ilen, 0),8193.38378906*ipitch
-	ao[728] oscil linseg(0.0797521438823,ilen, 0),16569.7998047*ipitch
-	ao[729] oscil linseg(0.11079402451,ilen, 0),13598.2177734*ipitch
-	ao[730] oscil linseg(0.077919553691,ilen, 0),17420.3613281*ipitch
-	ao[731] oscil linseg(0.118929078855,ilen, 0),11541.796875*ipitch
-	ao[732] oscil linseg(0.259992911734,0.143337066069*p3,0.0750666029505),2153.3203125*ipitch
-	ao[733] oscil linseg(0.078402599062,ilen, 0),19659.8144531*ipitch
-	ao[734] oscil linseg(0.0796806255278,ilen, 0),6589.16015625*ipitch
-	ao[735] oscil linseg(0.0823602037226,0.143337066069*p3,0.0972975048952),19584.4482422*ipitch
-	ao[736] oscil linseg(0.182232601452,ilen, 0),9140.84472656*ipitch
-	ao[737] oscil linseg(0.0817321236048,0.143337066069*p3,0.0707197888091),3703.7109375*ipitch
-	ao[738] oscil linseg(0.113662137703,ilen, 0),19509.0820312*ipitch
-	ao[739] oscil linseg(0.0967360997344,ilen, 0),15719.2382812*ipitch
-	ao[740] oscil linseg(0.463020896299,0.143337066069*p3,0.104692579761,0.28555431131*p3,0.118516569234,0.28555431131*p3,0.063921411983),6212.32910156*ipitch
-	ao[741] oscil linseg(0.143389544736,ilen, 0),11391.0644531*ipitch
-	ao[742] oscil linseg(0.081090845887,ilen, 0),19864.3798828*ipitch
-	ao[743] oscil linseg(0.0905328436168,ilen, 0),19358.3496094*ipitch
-	ao[744] oscil linseg(0.233519797173,0.143337066069*p3,0.106521312381,0.28555431131*p3,0.140927603363),10195.9716797*ipitch
-	ao[745] oscil linseg(0.0906995769798,ilen, 0),20919.5068359*ipitch
-	ao[746] oscil linseg(0.119296297506,ilen, 0),2680.88378906*ipitch
-	ao[747] oscil linseg(0.07498214612,ilen, 0),15568.5058594*ipitch
-	ao[748] oscil linseg(0.0891440642314,ilen, 0),11240.3320312*ipitch
-	ao[749] oscil linseg(0.195723088606,0.143337066069*p3,0.0978848311228),1496.55761719*ipitch
-	ao[750] oscil linseg(0.089455724588,ilen, 0),19056.8847656*ipitch
-	ao[751] oscil linseg(0.087750286408,0.143337066069*p3,0.0874316302393,0.28555431131*p3,0.0853728400406),6438.42773438*ipitch
-	ao[752] oscil linseg(0.110577731049,ilen, 0),4511.20605469*ipitch
-	ao[753] oscil linseg(0.0752719427873,ilen, 0),19519.8486328*ipitch
-	ao[754] oscil linseg(0.108142447377,ilen, 0),14534.9121094*ipitch
-	ao[755] oscil linseg(0.0896295739225,ilen, 0),17711.0595703*ipitch
-	ao[756] oscil linseg(0.381202486938,0.143337066069*p3,0.143346213111,0.28555431131*p3,0.066621862974),11089.5996094*ipitch
-	ao[757] oscil linseg(0.0789401121772,0.143337066069*p3,0.0665484651511),18755.4199219*ipitch
-	ao[758] oscil linseg(0.27807576396,0.143337066069*p3,0.0859777281081),3208.44726562*ipitch
-	ao[759] oscil linseg(0.140351935113,ilen, 0),15342.4072266*ipitch
-	ao[760] oscil linseg(0.0678383346155,ilen, 0),13361.3525391*ipitch
-	ao[761] oscil linseg(0.0657519097443,ilen, 0),18604.6875*ipitch
-	ao[762] oscil linseg(0.128300956721,ilen, 0),15267.0410156*ipitch
-	ao[763] oscil linseg(0.415442832906,0.143337066069*p3,0.161115979988),1539.62402344*ipitch
-	ao[764] oscil linseg(0.134975331422,ilen, 0),8376.41601562*ipitch
-	ao[765] oscil linseg(0.0652020199426,ilen, 0),18453.9550781*ipitch
-	ao[766] oscil linseg(0.0758458531122,ilen, 0),6287.6953125*ipitch
-	ao[767] oscil linseg(0.0627155569744,ilen, 0),8903.97949219*ipitch
-	ao[768] oscil linseg(0.0758947166521,ilen, 0),3552.97851562*ipitch
-	ao[769] oscil linseg(0.0848470094303,ilen, 0),18303.2226562*ipitch
-	ao[770] oscil linseg(0.167094416433,ilen, 0),2357.88574219*ipitch
-	ao[771] oscil linseg(0.157481890157,0.143337066069*p3,0.109085610631),10788.1347656*ipitch
-	ao[772] oscil linseg(0.189636542277,0.143337066069*p3,0.0908130759144),14061.1816406*ipitch
-	ao[773] oscil linseg(0.141787231059,ilen, 0),15471.6064453*ipitch
-	ao[774] oscil linseg(0.0654356775471,ilen, 0),17872.5585938*ipitch
-	ao[775] oscil linseg(0.157221966463,ilen, 0),6621.45996094*ipitch
-	ao[776] oscil linseg(0.0950737917294,0.143337066069*p3,0.0770748209144),2433.25195312*ipitch
-	ao[777] oscil linseg(0.308810067075,0.143337066069*p3,0.0641546544849),10637.4023438*ipitch
-	ao[778] oscil linseg(0.10739293415,ilen, 0),1421.19140625*ipitch
-	ao[779] oscil linseg(0.358486862914,0.143337066069*p3,0.143073634724,0.28555431131*p3,0.0636900885355),12004.7607422*ipitch
-	ao[780] oscil linseg(0.104986177979,ilen, 0),6136.96289062*ipitch
-	ao[781] oscil linseg(0.233822132051,0.143337066069*p3,0.0709713643747),4392.7734375*ipitch
-	ao[782] oscil linseg(0.070610033466,ilen, 0),17700.2929688*ipitch
-	ao[783] oscil linseg(0.300443730849,ilen, 0),12069.3603516*ipitch
-	ao[784] oscil linseg(0.236144003324,0.143337066069*p3,0.0951682390526),10486.6699219*ipitch
-	ao[785] oscil linseg(0.416875030989,0.143337066069*p3,0.202392892658),7676.58691406*ipitch
-	ao[786] oscil linseg(0.0707313192622,ilen, 0),13124.4873047*ipitch
-	ao[787] oscil linseg(0.0713917510839,ilen, 0),21845.4345703*ipitch
-	ao[788] oscil linseg(0.153957709757,0.143337066069*p3,0.168868910123),3413.01269531*ipitch
-	ao[789] oscil linseg(0.126772469797,0.143337066069*p3,0.132478191303),10335.9375*ipitch
-	ao[790] oscil linseg(0.0866202660768,ilen, 0),16806.6650391*ipitch
-	ao[791] oscil linseg(0.136365662119,ilen, 0),5986.23046875*ipitch
-	ao[792] oscil linseg(0.110751302199,ilen, 0),17861.7919922*ipitch
-	ao[793] oscil linseg(0.161042287823,ilen, 0),3402.24609375*ipitch
-	ao[794] oscil linseg(0.107651701455,0.143337066069*p3,0.0995830079824),5975.46386719*ipitch
-	ao[795] oscil linseg(0.135928177023,ilen, 0),14513.3789062*ipitch
-	ao[796] oscil linseg(0.112667540149,ilen, 0),1905.68847656*ipitch
-	ao[797] oscil linseg(0.194593055255,0.143337066069*p3,0.215416219093,0.28555431131*p3,0.136977007905),10185.2050781*ipitch
-	ao[798] oscil linseg(0.194635951987,ilen, 0),8074.95117188*ipitch
-	ao[799] oscil linseg(0.0814914139034,ilen, 0),14362.6464844*ipitch
-	ao[800] oscil linseg(0.0693299124052,ilen, 0),14438.0126953*ipitch
-	ao[801] oscil linseg(0.432925538867,0.143337066069*p3,0.389153385657,0.28555431131*p3,0.193438373704,0.28555431131*p3,0.083661841881),3940.57617188*ipitch
-	ao[802] oscil linseg(0.0676696991415,ilen, 0),16795.8984375*ipitch
-	ao[803] oscil linseg(0.187070315233,ilen, 0),2282.51953125*ipitch
-	ao[804] oscil linseg(0.31714606848,0.143337066069*p3,0.0795735117146),10777.3681641*ipitch
-	ao[805] oscil linseg(0.150123209489,ilen, 0),10034.4726562*ipitch
-	ao[806] oscil linseg(0.300945090396,0.143337066069*p3,0.0638193954862),7999.58496094*ipitch
-	ao[807] oscil linseg(0.12358381319,0.143337066069*p3,0.0963044374646,0.28555431131*p3,0.0938605527144),4274.34082031*ipitch
-	ao[808] oscil linseg(0.318864923604,0.143337066069*p3,0.130592499089),7719.65332031*ipitch
-	ao[809] oscil linseg(0.0863144673887,0.143337066069*p3,0.0656848985688),11832.4951172*ipitch
-	ao[810] oscil linseg(0.181846370459,ilen, 0),14717.9443359*ipitch
-	ao[811] oscil linseg(0.0773126353589,ilen, 0),4801.90429688*ipitch
-	ao[812] oscil linseg(0.166614695393,0.143337066069*p3,0.0726366679948),7924.21875*ipitch
-	ao[813] oscil linseg(0.0640082945489,ilen, 0),20155.078125*ipitch
-	ao[814] oscil linseg(0.168734599936,0.143337066069*p3,0.146863661835),5329.46777344*ipitch
-	ao[815] oscil linseg(0.140298237719,0.143337066069*p3,0.0708491560345),5394.06738281*ipitch
-	ao[816] oscil linseg(0.136390629766,ilen, 0),7848.85253906*ipitch
-	ao[817] oscil linseg(0.213287571553,0.143337066069*p3,0.0712312878876),8430.24902344*ipitch
-	ao[818] oscil linseg(0.25211889503,0.143337066069*p3,0.136043349215),5684.765625*ipitch
-	ao[819] oscil linseg(0.08109044402,ilen, 0),17603.3935547*ipitch
-	ao[820] oscil linseg(0.121993028624,ilen, 0),1464.2578125*ipitch
-	ao[821] oscil linseg(0.0920715254006,ilen, 0),13910.4492188*ipitch
-	ao[822] oscil linseg(0.0662790517469,ilen, 0),1830.32226562*ipitch
-	ao[823] oscil linseg(0.222168348796,ilen, 0),9485.37597656*ipitch
-	ao[824] oscil linseg(0.112970864515,0.143337066069*p3,0.079309932452),7773.48632812*ipitch
-	ao[825] oscil linseg(0.163065615048,ilen, 0),19498.3154297*ipitch
-	ao[826] oscil linseg(0.143248408098,0.143337066069*p3,0.105677634071,0.28555431131*p3,0.0843540272755),10012.9394531*ipitch
-	ao[827] oscil linseg(0.17903521694,0.143337066069*p3,0.0832880254515),20090.4785156*ipitch
-	ao[828] oscil linseg(0.11192659492,ilen, 0),10540.5029297*ipitch
-	ao[829] oscil linseg(0.091068511678,ilen, 0),20811.8408203*ipitch
-	ao[830] oscil linseg(0.08248482205,ilen, 0),2767.01660156*ipitch
-	ao[831] oscil linseg(0.0951453283071,0.143337066069*p3,0.062951196478),5534.03320312*ipitch
-	ao[832] oscil linseg(0.121485224434,0.143337066069*p3,0.095807463374),419.897460938*ipitch
-	ao[833] oscil linseg(0.103775389153,0.143337066069*p3,0.0944233545647),4683.47167969*ipitch
-	ao[834] oscil linseg(0.155228052889,0.143337066069*p3,0.075171222792,0.28555431131*p3,0.0846737244868),7622.75390625*ipitch
-	ao[835] oscil linseg(0.200798359841,ilen, 0),11692.5292969*ipitch
-	ao[836] oscil linseg(0.0870060081528,ilen, 0),18260.15625*ipitch
-	ao[837] oscil linseg(0.157494446357,0.143337066069*p3,0.091173265764),3294.58007812*ipitch
-	ao[838] oscil linseg(0.141916249208,ilen, 0),13458.2519531*ipitch
-	ao[839] oscil linseg(0.192546231651,0.143337066069*p3,0.139552388867),7547.38769531*ipitch
-	ao[840] oscil linseg(0.182429391724,ilen, 0),5383.30078125*ipitch
-	ao[841] oscil linseg(0.100564818196,ilen, 0),14502.6123047*ipitch
-	ao[842] oscil linseg(0.15731751645,0.143337066069*p3,0.0881779768952),5738.59863281*ipitch
-	ao[843] oscil linseg(0.0826542955529,ilen, 0),17969.4580078*ipitch
-	ao[844] oscil linseg(0.116380162266,ilen, 0),13307.5195312*ipitch
-	ao[845] oscil linseg(0.0872974970908,ilen, 0),1754.95605469*ipitch
-	ao[846] oscil linseg(0.124925092995,0.143337066069*p3,0.0703998622014),8979.34570312*ipitch
-	ao[847] oscil linseg(0.0713847971079,ilen, 0),7472.02148438*ipitch
-	ao[848] oscil linseg(0.155471240309,0.143337066069*p3,0.138523812968),979.760742188*ipitch
-	ao[849] oscil linseg(0.101022074951,0.143337066069*p3,0.0783309366615),2444.01855469*ipitch
-	ao[850] oscil linseg(0.0833770768283,ilen, 0),19390.6494141*ipitch
-	ao[851] oscil linseg(0.0780617618066,ilen, 0),20079.7119141*ipitch
-	ao[852] oscil linseg(0.213495023065,0.143337066069*p3,0.0891161887673),13156.7871094*ipitch
-	ao[853] oscil linseg(0.0876223897682,ilen, 0),8828.61328125*ipitch
-	ao[854] oscil linseg(0.0683054201424,0.143337066069*p3,0.144150085433,0.28555431131*p3,0.129714516783),6793.72558594*ipitch
-	ao[855] oscil linseg(0.333750410716,0.143337066069*p3,0.218301076234),5232.56835938*ipitch
-	ao[856] oscil linseg(0.101620335684,ilen, 0),699.829101562*ipitch
-	ao[857] oscil linseg(0.158721823899,ilen, 0),11358.7646484*ipitch
-	ao[858] oscil linseg(0.136550052257,0.143337066069*p3,0.0997937778115),10981.9335938*ipitch
-	ao[859] oscil linseg(0.221975352926,0.143337066069*p3,0.0726385896247),4565.0390625*ipitch
-	ao[860] oscil linseg(0.15881257772,0.143337066069*p3,0.067985001388),8677.88085938*ipitch
-	ao[861] oscil linseg(0.235875443383,0.143337066069*p3,0.190982813708),7321.2890625*ipitch
-	ao[862] oscil linseg(0.0676206815681,ilen, 0),19315.2832031*ipitch
-	ao[863] oscil linseg(0.138371720143,ilen, 0),4069.77539062*ipitch
-	ao[864] oscil linseg(0.0970252498061,ilen, 0),5092.60253906*ipitch
-	ao[865] oscil linseg(0.071841104641,ilen, 0),12855.3222656*ipitch
-	ao[866] oscil linseg(0.166041520368,0.143337066069*p3,0.159488243036),8527.1484375*ipitch
-	ao[867] oscil linseg(0.0642870230122,ilen, 0),7245.92285156*ipitch
-	ao[868] oscil linseg(0.180089772535,0.143337066069*p3,0.0701031153461),5081.8359375*ipitch
-	ao[869] oscil linseg(0.0969267159245,ilen, 0),2121.02050781*ipitch
-	ao[870] oscil linseg(0.145173569197,0.143337066069*p3,0.0698973479546),2928.515625*ipitch
-	ao[871] oscil linseg(0.159382875362,0.143337066069*p3,0.12139121099),12220.0927734*ipitch
-	ao[872] oscil linseg(0.1196117072,ilen, 0),9011.64550781*ipitch
-	ao[873] oscil linseg(0.0805708232632,ilen, 0),1679.58984375*ipitch
-	ao[874] oscil linseg(0.0651396459577,ilen, 0),18550.8544922*ipitch
-	ao[875] oscil linseg(0.141905277236,0.143337066069*p3,0.078348030071,0.28555431131*p3,0.0721736924298),7170.55664062*ipitch
-	ao[876] oscil linseg(0.0996114694811,0.143337066069*p3,0.0759308954746),6147.72949219*ipitch
-	ao[877] oscil linseg(0.195469678479,0.143337066069*p3,0.40249979353),3994.40917969*ipitch
-	ao[878] oscil linseg(0.0824171135412,ilen, 0),14427.2460938*ipitch
-	ao[879] oscil linseg(0.166117137151,ilen, 0),10066.7724609*ipitch
-	ao[880] oscil linseg(0.220403436429,0.143337066069*p3,0.12156463894),12553.8574219*ipitch
-	ao[881] oscil linseg(0.166337726575,ilen, 0),2648.58398438*ipitch
-	ao[882] oscil linseg(0.121438922846,ilen, 0),20930.2734375*ipitch
-	ao[883] oscil linseg(0.0684406141782,ilen, 0),21177.9052734*ipitch
-	ao[884] oscil linseg(0.134983162764,ilen, 0),13856.6162109*ipitch
-	ao[885] oscil linseg(0.0757275943287,ilen, 0),20176.6113281*ipitch
-	ao[886] oscil linseg(0.173687104786,ilen, 0),4446.60644531*ipitch
-	ao[887] oscil linseg(0.0772857304419,0.143337066069*p3,0.0717461288763),21382.4707031*ipitch
-	ao[888] oscil linseg(0.230348468085,0.143337066069*p3,0.169418955529),7019.82421875*ipitch
-	ao[889] oscil linseg(0.077713672398,ilen, 0),3919.04296875*ipitch
-	ao[890] oscil linseg(0.122756638234,ilen, 0),3176.14746094*ipitch
-	ao[891] oscil linseg(0.0916256832162,ilen, 0),21156.3720703*ipitch
-	ao[892] oscil linseg(0.119366671678,ilen, 0),12252.3925781*ipitch
-	ao[893] oscil linseg(0.164054665546,0.143337066069*p3,0.115205359905),13232.1533203*ipitch
-	ao[894] oscil linseg(0.0876425510116,ilen, 0),17829.4921875*ipitch
-	ao[895] oscil linseg(0.0945528591323,0.143337066069*p3,0.0795689538296),6180.02929688*ipitch
-	ao[896] oscil linseg(0.116025579584,ilen, 0),5501.73339844*ipitch
-	ao[897] oscil linseg(0.0933336047004,ilen, 0),16494.4335938*ipitch
-	ao[898] oscil linseg(0.157098469144,ilen, 0),8387.18261719*ipitch
-	ao[899] oscil linseg(0.0788414730792,ilen, 0),16462.1337891*ipitch
-	ao[900] oscil linseg(0.125665254537,ilen, 0),8774.78027344*ipitch
-	ao[901] oscil linseg(0.132273226324,ilen, 0),12101.6601562*ipitch
-	ao[902] oscil linseg(0.0774374097539,ilen, 0),581.396484375*ipitch
-	ao[903] oscil linseg(0.111834021935,ilen, 0),9560.7421875*ipitch
-	ao[904] oscil linseg(0.0687363362137,ilen, 0),3671.41113281*ipitch
-	ao[905] oscil linseg(0.102223712721,ilen, 0),3843.67675781*ipitch
-	ao[906] oscil linseg(0.27813506294,ilen, 0),9829.90722656*ipitch
-	ao[907] oscil linseg(0.0752169246383,ilen, 0),19756.7138672*ipitch
-	ao[908] oscil linseg(0.0930629681902,ilen, 0),16279.1015625*ipitch
-	ao[909] oscil linseg(0.120357243609,0.143337066069*p3,0.0899780129593),11950.9277344*ipitch
-	ao[910] oscil linseg(0.211970405475,ilen, 0),6556.86035156*ipitch
-	ao[911] oscil linseg(0.184308344573,0.143337066069*p3,0.0653498286647),20478.0761719*ipitch
-	ao[912] oscil linseg(0.078935476557,ilen, 0),21242.5048828*ipitch
-	ao[913] oscil linseg(0.100457911992,ilen, 0),16203.7353516*ipitch
-	ao[914] oscil linseg(0.182636564341,0.143337066069*p3,0.0766596788709),10885.0341797*ipitch
-	ao[915] oscil linseg(0.189301056951,0.143337066069*p3,0.0906843833879),624.462890625*ipitch
-	ao[916] oscil linseg(0.136825574519,ilen, 0),2853.14941406*ipitch
-	ao[917] oscil linseg(0.121360550611,0.143337066069*p3,0.0644460452492),16053.0029297*ipitch
-	ao[918] oscil linseg(0.0879186386958,0.143337066069*p3,0.0829800613607),11940.1611328*ipitch
-	ao[919] oscil linseg(0.0935287598191,ilen, 0),6718.359375*ipitch
-	ao[920] oscil linseg(0.0627300836703,ilen, 0),4855.73730469*ipitch
-	ao[921] oscil linseg(0.065944376551,ilen, 0),19616.7480469*ipitch
-	ao[922] oscil linseg(0.0706563587021,ilen, 0),11649.4628906*ipitch
-	ao[923] oscil linseg(0.0952995507911,ilen, 0),20801.0742188*ipitch
-	ao[924] oscil linseg(0.100200567692,ilen, 0),19875.1464844*ipitch
-	ao[925] oscil linseg(0.0906384825109,ilen, 0),13006.0546875*ipitch
-	ao[926] oscil linseg(0.0635082634931,ilen, 0),3380.71289062*ipitch
-	ao[927] oscil linseg(0.176473177471,0.143337066069*p3,0.134887905081),8537.91503906*ipitch
-	ao[928] oscil linseg(0.0896482292677,ilen, 0),11498.7304688*ipitch
-	ao[929] oscil linseg(0.165755367477,0.143337066069*p3,0.0635107298431),1528.85742188*ipitch
-	ao[930] oscil linseg(0.534589829749,0.143337066069*p3,0.203673312351,0.28555431131*p3,0.112322514817),5910.86425781*ipitch
-	ao[931] oscil linseg(0.166275005052,ilen, 0),6567.62695312*ipitch
-	ao[932] oscil linseg(0.0655780385056,ilen, 0),9593.04199219*ipitch
-	ao[933] oscil linseg(0.202447944095,ilen, 0),484.497070312*ipitch
-	ao[934] oscil linseg(0.0696724567187,ilen, 0),19713.6474609*ipitch
-	ao[935] oscil linseg(0.126958727524,0.143337066069*p3,0.112596294655),3908.27636719*ipitch
-	ao[936] oscil linseg(0.0807848220024,ilen, 0),20768.7744141*ipitch
-	ao[937] oscil linseg(0.115678397715,ilen, 0),15019.4091797*ipitch
-	ao[938] oscil linseg(0.242129177317,0.143337066069*p3,0.0783928572539),10648.1689453*ipitch
-	ao[939] oscil linseg(0.0855892249923,ilen, 0),19196.8505859*ipitch
-	ao[940] oscil linseg(0.0936429246697,0.143337066069*p3,0.0815486514939),6965.99121094*ipitch
-	ao[941] oscil linseg(0.0837922995085,ilen, 0),17301.9287109*ipitch
-	ao[942] oscil linseg(0.0853067811191,ilen, 0),11197.265625*ipitch
-	ao[943] oscil linseg(0.169031645884,ilen, 0),11703.2958984*ipitch
-	ao[944] oscil linseg(0.168314892038,ilen, 0),17581.8603516*ipitch
-	ao[945] oscil linseg(0.22324271029,ilen, 0),6416.89453125*ipitch
-	ao[946] oscil linseg(0.0749889806634,ilen, 0),18895.3857422*ipitch
-	ao[947] oscil linseg(0.123088638239,ilen, 0),4737.3046875*ipitch
-	ao[948] oscil linseg(0.130943204307,ilen, 0),15374.7070312*ipitch
-	ao[949] oscil linseg(0.0724162183714,ilen, 0),2013.35449219*ipitch
-	ao[950] oscil linseg(0.0621838554292,ilen, 0),16408.3007812*ipitch
-	ao[951] oscil linseg(0.17996102021,0.143337066069*p3,0.10824523208),5264.86816406*ipitch
-	ao[952] oscil linseg(0.0741708909409,ilen, 0),18593.9208984*ipitch
-	ao[953] oscil linseg(0.111858754268,ilen, 0),4177.44140625*ipitch
-	ao[954] oscil linseg(0.0726398453469,ilen, 0),2497.8515625*ipitch
-	ao[955] oscil linseg(0.0883650518322,0.143337066069*p3,0.0867704029336),20854.9072266*ipitch
-	ao[956] oscil linseg(0.0625246814802,ilen, 0),10895.8007812*ipitch
-	ao[957] oscil linseg(0.0854012457395,ilen, 0),2207.15332031*ipitch
-	ao[958] oscil linseg(0.147777302413,ilen, 0),6266.16210938*ipitch
-	ao[959] oscil linseg(0.0893893716005,ilen, 0),829.028320312*ipitch
-	ao[960] oscil linseg(0.0839874303832,ilen, 0),9356.17675781*ipitch
-	ao[961] oscil linseg(0.124304741748,0.143337066069*p3,0.0998952711737),7192.08984375*ipitch
-	ao[962] oscil linseg(0.0685805782371,ilen, 0),14545.6787109*ipitch
-	ao[963] oscil linseg(0.0975084710477,0.143337066069*p3,0.0733168072243),9883.74023438*ipitch
-	ao[964] oscil linseg(0.182716642649,ilen, 0),10745.0683594*ipitch
-	ao[965] oscil linseg(0.0856176045017,ilen, 0),13662.8173828*ipitch
-	ao[966] oscil linseg(0.23034141692,0.143337066069*p3,0.0737675570911),10411.3037109*ipitch
-	ao[967] oscil linseg(0.283852907514,0.143337066069*p3,0.155298022372),11972.4609375*ipitch
-	ao[968] oscil linseg(0.0654288946302,ilen, 0),17990.9912109*ipitch
-	ao[969] oscil linseg(0.123913390736,0.143337066069*p3,0.0642814175773),549.096679688*ipitch
-	ao[970] oscil linseg(0.100762660324,ilen, 0),2734.71679688*ipitch
-	ao[971] oscil linseg(0.0648219446183,ilen, 0),2422.48535156*ipitch
-	ao[972] oscil linseg(0.14204251185,0.143337066069*p3,0.089380972029),10594.3359375*ipitch
-	ao[973] oscil linseg(0.16073088676,ilen, 0),11347.9980469*ipitch
-	ao[974] oscil linseg(0.217011623178,0.143337066069*p3,0.0663792716433),15503.90625*ipitch
-	ao[975] oscil linseg(0.0788136023776,ilen, 0),4618.87207031*ipitch
-	ao[976] oscil linseg(0.103995507437,ilen, 0),16182.2021484*ipitch
-	ao[977] oscil linseg(0.135967309161,0.143337066069*p3,0.0625198930647),17614.1601562*ipitch
-	ao[978] oscil linseg(0.0925631972094,ilen, 0),14771.7773438*ipitch
-	ao[979] oscil linseg(0.0792796299832,ilen, 0),1937.98828125*ipitch
-	ao[980] oscil linseg(0.199797278452,ilen, 0),3262.28027344*ipitch
-	ao[981] oscil linseg(0.0781037439555,ilen, 0),14696.4111328*ipitch
-	ao[982] oscil linseg(0.103056659289,ilen, 0),17097.3632812*ipitch
-	ao[983] oscil linseg(0.404558014343,0.143337066069*p3,0.15173744556),10368.2373047*ipitch
-	ao[984] oscil linseg(0.102769846423,ilen, 0),13576.6845703*ipitch
-	ao[985] oscil linseg(0.189737149694,ilen, 0),9582.27539062*ipitch
-	ao[986] oscil linseg(0.164530395359,0.143337066069*p3,0.253459196597),5673.99902344*ipitch
-	ao[987] oscil linseg(0.0842365317779,0.143337066069*p3,0.0719310738143),8128.78417969*ipitch
-	ao[988] oscil linseg(0.120859252905,ilen, 0),5404.83398438*ipitch
-	ao[989] oscil linseg(0.0653087016038,ilen, 0),5480.20019531*ipitch
-	ao[990] oscil linseg(0.223782706991,0.143337066069*p3,0.130683251969),10217.5048828*ipitch
-	ao[991] oscil linseg(0.085395327936,ilen, 0),17011.2304688*ipitch
-	ao[992] oscil linseg(0.0728208063747,ilen, 0),947.4609375*ipitch
-	ao[993] oscil linseg(0.114939052686,ilen, 0),14470.3125*ipitch
-	ao[994] oscil linseg(0.127284782844,ilen, 0),10142.1386719*ipitch
-	ao[995] oscil linseg(0.442989016193,0.143337066069*p3,0.0682930540552,0.28555431131*p3,0.145834047904),8053.41796875*ipitch
-	ao[996] oscil linseg(0.077667788668,ilen, 0),14394.9462891*ipitch
-	ao[997] oscil linseg(0.134815954946,0.143337066069*p3,0.0720272933946),6729.12597656*ipitch
-	ao[998] oscil linseg(0.348330641807,0.143337066069*p3,0.116287785288),9991.40625*ipitch
-	ao[999] oscil linseg(0.19235636647,0.143337066069*p3,0.101292255108),7978.05175781*ipitch
-	ao[1000] oscil linseg(0.133910709571,0.143337066069*p3,0.0722343452467),4500.43945312*ipitch
-	ao[1001] oscil linseg(0.120089260932,0.143337066069*p3,0.0772381324788),10400.5371094*ipitch
-	ao[1002] oscil linseg(0.0702868932043,ilen, 0),3316.11328125*ipitch
-	ao[1003] oscil linseg(0.103510680311,ilen, 0),12284.6923828*ipitch
-	ao[1004] oscil linseg(0.083533040788,ilen, 0),14168.8476562*ipitch
-	ao[1005] oscil linseg(0.109289796969,ilen, 0),1862.62207031*ipitch
-	ao[1006] oscil linseg(0.145109534048,0.143337066069*p3,0.064139337233),19605.9814453*ipitch
-	ao[1007] oscil linseg(0.118784901575,0.143337066069*p3,0.337505944568,0.28555431131*p3,0.191267857562),5028.00292969*ipitch
-	ao[1008] oscil linseg(0.0797883233335,ilen, 0),19649.0478516*ipitch
-	ao[1009] oscil linseg(0.0863573360603,0.143337066069*p3,0.0718960958517),13339.8193359*ipitch
-	ao[1010] oscil linseg(0.103918107549,ilen, 0),14018.1152344*ipitch
-	ao[1011] oscil linseg(0.084319949299,ilen, 0),3466.84570312*ipitch
-	ao[1012] oscil linseg(0.160752564115,0.143337066069*p3,0.157662979971),9689.94140625*ipitch
-	ao[1013] oscil linseg(0.224179175217,ilen, 0),5663.23242188*ipitch
-	ao[1014] oscil linseg(0.0708704716409,ilen, 0),15708.4716797*ipitch
-	ao[1015] oscil linseg(0.0771812463203,ilen, 0),1711.88964844*ipitch
-	ao[1016] oscil linseg(0.0952434143311,ilen, 0),13867.3828125*ipitch
-	ao[1017] oscil linseg(0.100255718725,ilen, 0),9539.20898438*ipitch
-	ao[1018] oscil linseg(0.0924379935958,ilen, 0),15450.0732422*ipitch
-	ao[1019] oscil linseg(0.16339887082,0.143337066069*p3,0.0636900729848,0.28555431131*p3,0.108248848442),6244.62890625*ipitch
-	ao[1020] oscil linseg(0.172114923593,ilen, 0),2616.28417969*ipitch
-	ao[1021] oscil linseg(0.065132170037,ilen, 0),20607.2753906*ipitch
-	ao[1022] oscil linseg(0.134532782175,0.143337066069*p3,0.0807222252931),10992.7001953*ipitch
-	ao[1023] oscil linseg(0.0794680698108,ilen, 0),9388.4765625*ipitch
-	ao[1024] oscil linseg(0.270844649506,0.143337066069*p3,0.111446262335,0.28555431131*p3,0.102043627649,0.28555431131*p3,0.0652069646625),4382.00683594*ipitch
-	ao[1025] oscil linseg(0.0650024085666,ilen, 0),17667.9931641*ipitch
-	ao[1026] oscil linseg(0.0905944048145,ilen, 0),3165.38085938*ipitch
-	ao[1027] oscil linseg(0.129613808273,ilen, 0),9453.07617188*ipitch
-	ao[1028] oscil linseg(0.104907904388,ilen, 0),13565.9179688*ipitch
-	ao[1029] oscil linseg(0.0700920477392,ilen, 0),1227.39257812*ipitch
-	ao[1030] oscil linseg(0.0922618236616,ilen, 0),13102.9541016*ipitch
-	ao[1031] oscil linseg(0.0698534453837,ilen, 0),13372.1191406*ipitch
-	ao[1032] oscil linseg(0.337069588144,0.143337066069*p3,0.0955840250057),5437.13378906*ipitch
-	ao[1033] oscil linseg(0.325225618534,0.143337066069*p3,0.129606523648),9087.01171875*ipitch
-	ao[1034] oscil linseg(0.0758389947502,ilen, 0),8645.58105469*ipitch
-	ao[1035] oscil linseg(0.231157286639,ilen, 0),5361.76757812*ipitch
-	ao[1036] oscil linseg(0.114372376603,ilen, 0),2293.28613281*ipitch
-	ao[1037] oscil linseg(0.111943805568,ilen, 0),9625.34179688*ipitch
-	ao[1038] oscil linseg(0.0647340173919,0.143337066069*p3,0.131883603237),13264.453125*ipitch
-	ao[1039] oscil linseg(0.0758257437651,0.143337066069*p3,0.0770731247471),8936.27929688*ipitch
-	ao[1040] oscil linseg(0.0749547601064,ilen, 0),21759.3017578*ipitch
-	ao[1041] oscil linseg(0.0872354763842,0.143337066069*p3,0.0998599076375),7450.48828125*ipitch
-	ao[1042] oscil linseg(0.115606580129,ilen, 0),6492.26074219*ipitch
-	ao[1043] oscil linseg(0.0742213400339,ilen, 0),8860.91308594*ipitch
-	ao[1044] oscil linseg(0.225001932374,ilen, 0),10755.8349609*ipitch
-	ao[1045] oscil linseg(0.0656211760952,0.143337066069*p3,0.095020686885),13113.7207031*ipitch
-	ao[1046] oscil linseg(0.109511775347,ilen, 0),8785.546875*ipitch
-	ao[1047] oscil linseg(0.064137478115,ilen, 0),2820.84960938*ipitch
-	ao[1048] oscil linseg(0.0985679809048,0.143337066069*p3,0.113105512233),5211.03515625*ipitch
-	ao[1049] oscil linseg(0.0677075603822,ilen, 0),8710.18066406*ipitch
-	ao[1050] oscil linseg(0.0707534258625,ilen, 0),3014.6484375*ipitch
-	ao[1051] oscil linseg(0.0666849900224,ilen, 0),17140.4296875*ipitch
-	ao[1052] oscil linseg(0.105978055403,ilen, 0),12962.9882812*ipitch
-	ao[1053] oscil linseg(0.100017174291,0.143337066069*p3,0.0714170731803),4791.13769531*ipitch
-	ao[1054] oscil linseg(0.0649589785334,ilen, 0),8634.81445312*ipitch
-	ao[1055] oscil linseg(0.244210465407,0.143337066069*p3,0.116338610273),7299.75585938*ipitch
-	ao[1056] oscil linseg(0.115062587746,0.143337066069*p3,0.0778251168877),958.227539062*ipitch
-	ao[1057] oscil linseg(0.0749486597464,ilen, 0),20219.6777344*ipitch
-	ao[1058] oscil linseg(0.146105546565,0.143337066069*p3,0.106999581119),4059.00878906*ipitch
-	ao[1059] oscil linseg(0.13070788999,0.143337066069*p3,0.0708945284543),19013.8183594*ipitch
-	ao[1060] oscil linseg(0.0997681707016,ilen, 0),3348.41308594*ipitch
-	ao[1061] oscil linseg(0.115309548773,0.143337066069*p3,0.098069141383),12812.2558594*ipitch
-	ao[1062] oscil linseg(0.0852423924096,ilen, 0),18238.6230469*ipitch
-	ao[1063] oscil linseg(0.155928822019,ilen, 0),8484.08203125*ipitch
-	ao[1064] oscil linseg(0.102165530073,ilen, 0),7224.38964844*ipitch
-	ao[1065] oscil linseg(0.117958310213,ilen, 0),5060.30273438*ipitch
-	ao[1066] oscil linseg(0.0870731307477,ilen, 0),14997.8759766*ipitch
-	ao[1067] oscil linseg(0.331427223688,0.143337066069*p3,0.109276144007),5846.26464844*ipitch
-	ao[1068] oscil linseg(0.0896983910005,ilen, 0),14265.7470703*ipitch
-	ao[1069] oscil linseg(0.143327439469,ilen, 0),8236.45019531*ipitch
-	ao[1070] oscil linseg(0.0803963536091,ilen, 0),16871.2646484*ipitch
-	ao[1071] oscil linseg(0.197518265644,0.143337066069*p3,0.128026062421),9463.84277344*ipitch
-	ao[1072] oscil linseg(0.0835710732907,ilen, 0),8333.34960938*ipitch
-	ao[1073] oscil linseg(0.0697959296194,0.143337066069*p3,0.0817175946963),7375.12207031*ipitch
-	ao[1074] oscil linseg(0.627541044758,0.143337066069*p3,0.258233752717,0.28555431131*p3,0.0972651093272),7149.0234375*ipitch
-	ao[1075] oscil linseg(0.0864366552163,ilen, 0),3875.9765625*ipitch
-	ao[1076] oscil linseg(0.0702841594313,0.143337066069*p3,0.109990173205),3983.64257812*ipitch
-	ao[1077] oscil linseg(0.105662863176,ilen, 0),21748.5351562*ipitch
-	ao[1078] oscil linseg(0.155153355116,ilen, 0),10518.9697266*ipitch
-	ao[1079] oscil linseg(0.15510170667,ilen, 0),12510.7910156*ipitch
-	ao[1080] oscil linseg(0.0831177815543,ilen, 0),4145.14160156*ipitch
-	ao[1081] oscil linseg(0.110887888367,ilen, 0),14761.0107422*ipitch
-	ao[1082] oscil linseg(0.093904826121,ilen, 0),17635.6933594*ipitch
-	ao[1083] oscil linseg(0.189735218674,0.143337066069*p3,0.0791491119367),4672.70507812*ipitch
-	ao[1084] oscil linseg(0.0686975069215,ilen, 0),21296.3378906*ipitch
-	ao[1085] oscil linseg(0.218194406806,ilen, 0),6998.29101562*ipitch
-	ao[1086] oscil linseg(0.163770268384,0.143337066069*p3,0.0632766887386,0.28555431131*p3,0.0631869885248),12629.2236328*ipitch
-	ao[1087] oscil linseg(0.102387539029,ilen, 0),5200.26855469*ipitch
-	ao[1088] oscil linseg(0.17123050442,ilen, 0),12209.3261719*ipitch
-	ao[1089] oscil linseg(0.158559991422,ilen, 0),13684.3505859*ipitch
-	ao[1090] oscil linseg(0.132663577003,0.143337066069*p3,0.0994152898047),6922.92480469*ipitch
-	ao[1091] oscil linseg(0.118306386678,0.143337066069*p3,0.0632858582364),12133.9599609*ipitch
-	ao[1092] oscil linseg(0.0964172241099,ilen, 0),2174.85351562*ipitch
-	ao[1093] oscil linseg(0.081571149017,ilen, 0),20844.140625*ipitch
-	ao[1094] oscil linseg(0.0699751589776,ilen, 0),19433.7158203*ipitch
-	ao[1095] oscil linseg(0.416384007468,0.143337066069*p3,0.0893637213996),9226.97753906*ipitch
-	ao[1096] oscil linseg(0.191372484452,ilen, 0),12058.59375*ipitch
-	ao[1097] oscil linseg(0.130794573257,ilen, 0),20693.4082031*ipitch
-	ao[1098] oscil linseg(0.189482782795,0.143337066069*p3,0.136433411159,0.28555431131*p3,0.0853688991455),6255.39550781*ipitch
-	ao[1099] oscil linseg(0.176513930187,ilen, 0),3832.91015625*ipitch
-	ao[1100] oscil linseg(0.111774212532,0.143337066069*p3,0.0989148863715),10282.1044922*ipitch
-	ao[1101] oscil linseg(0.0870555199828,ilen, 0),16236.0351562*ipitch
-	ao[1102] oscil linseg(0.108368563268,ilen, 0),13081.4208984*ipitch
-	ao[1103] oscil linseg(0.184432956467,0.143337066069*p3,0.0961952343823),11907.8613281*ipitch
-	ao[1104] oscil linseg(0.136209988823,ilen, 0),4080.54199219*ipitch
-	ao[1105] oscil linseg(0.107204780259,0.143337066069*p3,0.0768967332376),18959.9853516*ipitch
-	ao[1106] oscil linseg(0.0986188382026,ilen, 0),7741.18652344*ipitch
-	ao[1107] oscil linseg(0.0642548520999,ilen, 0),17161.9628906*ipitch
-	ao[1108] oscil linseg(0.0666827403978,ilen, 0),2713.18359375*ipitch
-	ao[1109] oscil linseg(0.223579516026,0.143337066069*p3,0.0827378689446),4554.27246094*ipitch
-	ao[1110] oscil linseg(0.246367806734,0.143337066069*p3,0.077509634581,0.28555431131*p3,0.0654592328601),11757.1289062*ipitch
-	ao[1111] oscil linseg(0.161569961423,ilen, 0),16860.4980469*ipitch
-	ao[1112] oscil linseg(0.0656806760668,ilen, 0),18486.2548828*ipitch
-	ao[1113] oscil linseg(0.093042655964,ilen, 0),16009.9365234*ipitch
-	ao[1114] oscil linseg(0.077573425139,ilen, 0),882.861328125*ipitch
-	ao[1115] oscil linseg(0.0697743868514,ilen, 0),20015.1123047*ipitch
-	ao[1116] oscil linseg(0.214866224875,0.143337066069*p3,0.116358952677,0.28555431131*p3,0.0823861227715),3757.54394531*ipitch
-	ao[1117] oscil linseg(0.0699736325273,ilen, 0),3229.98046875*ipitch
-	ao[1118] oscil linseg(0.101032852686,ilen, 0),15256.2744141*ipitch
-	ao[1119] oscil linseg(0.0843287586406,ilen, 0),11606.3964844*ipitch
-	ao[1120] oscil linseg(0.0716819847987,0.143337066069*p3,0.0650542460369),13447.4853516*ipitch
-	ao[1121] oscil linseg(0.100821330871,ilen, 0),18012.5244141*ipitch
-	ao[1122] oscil linseg(0.0786538395589,ilen, 0),15859.2041016*ipitch
-	ao[1123] oscil linseg(0.218498842628,ilen, 0),5609.39941406*ipitch
-	ao[1124] oscil linseg(0.306493470444,ilen, 0),602.9296875*ipitch
-	ao[1125] oscil linseg(0.115032343487,ilen, 0),20865.6738281*ipitch
-	ao[1126] oscil linseg(0.168748637252,0.143337066069*p3,0.0624689956299),8990.11230469*ipitch
-	ao[1127] oscil linseg(0.187254649008,0.143337066069*p3,0.0739709864331),19562.9150391*ipitch
-	ao[1128] oscil linseg(0.223458492972,0.143337066069*p3,0.21040933437),11455.6640625*ipitch
-	ao[1129] oscil linseg(0.0800097653463,0.143337066069*p3,0.0726111751987),2379.41894531*ipitch
-	ao[1130] oscil linseg(0.163474597464,ilen, 0),6546.09375*ipitch
-	ao[1131] oscil linseg(0.106184045111,ilen, 0),10292.8710938*ipitch
-	ao[1132] oscil linseg(0.0858349507638,ilen, 0),3682.17773438*ipitch
-	ao[1133] oscil linseg(0.0626157324131,ilen, 0),19336.8164062*ipitch
-	ao[1134] oscil linseg(0.076515565679,ilen, 0),2045.65429688*ipitch
-	ao[1135] oscil linseg(0.197359635574,0.143337066069*p3,0.231656699099),6664.52636719*ipitch
-	ao[1136] oscil linseg(0.126539823907,ilen, 0),16289.8681641*ipitch
-	ao[1137] oscil linseg(0.0868348445966,ilen, 0),15557.7392578*ipitch
-	ao[1138] oscil linseg(0.682886558295,0.143337066069*p3,0.0714609796719),11100.3662109*ipitch
-	ao[1139] oscil linseg(0.0636847118514,ilen, 0),21091.7724609*ipitch
-	ao[1140] oscil linseg(0.0937276970738,ilen, 0),4435.83984375*ipitch
-	ao[1141] oscil linseg(0.276908926445,ilen, 0),11154.1992188*ipitch
-	ao[1142] oscil linseg(0.162663524147,0.143337066069*p3,0.222129097449),1485.79101562*ipitch
-	ao[1143] oscil linseg(0.129138265447,0.143337066069*p3,0.0660327532084),12155.4931641*ipitch
-	ao[1144] oscil linseg(0.185940932947,0.143337066069*p3,0.0635290701227),6395.36132812*ipitch
-	ao[1145] oscil linseg(0.18560632283,ilen, 0),4963.40332031*ipitch
-	ao[1146] oscil linseg(0.0872103037269,0.143337066069*p3,0.0654219892428),18733.8867188*ipitch
-	ao[1147] oscil linseg(0.0906977462687,ilen, 0),15331.640625*ipitch
-	ao[1148] oscil linseg(0.0812568997939,ilen, 0),13210.6201172*ipitch
-	ao[1149] oscil linseg(0.123005212854,ilen, 0),18583.1542969*ipitch
-	ao[1150] oscil linseg(0.13223629016,ilen, 0),13738.1835938*ipitch
-	ao[1151] oscil linseg(0.0750398010553,0.143337066069*p3,0.0712652967761),3434.54589844*ipitch
-	ao[1152] oscil linseg(0.102043447029,ilen, 0),4155.90820312*ipitch
-	ao[1153] oscil linseg(0.240066934145,0.143337066069*p3,0.0681406859969),8753.24707031*ipitch
-	ao[1154] oscil linseg(0.0698710903446,ilen, 0),18034.0576172*ipitch
-	ao[1155] oscil linseg(0.37728153613,0.143337066069*p3,0.0723244120772),10852.734375*ipitch
-	ao[1156] oscil linseg(0.489575917574,0.143337066069*p3,0.160794909144,0.28555431131*p3,0.101668222799),6018.53027344*ipitch
-	ao[1157] oscil linseg(0.0984299636582,ilen, 0),5071.06933594*ipitch
-	ao[1158] oscil linseg(0.117221227093,ilen, 0),8408.71582031*ipitch
-	ao[1159] oscil linseg(0.26212278651,ilen, 0),9808.37402344*ipitch
-	ao[1160] oscil linseg(0.0634245434561,ilen, 0),3531.4453125*ipitch
-	ao[1161] oscil linseg(0.086907286295,0.143337066069*p3,0.0665721241934),18130.9570312*ipitch
-	ao[1162] oscil linseg(0.131481854845,0.143337066069*p3,0.0717091312469),409.130859375*ipitch
-	ao[1163] oscil linseg(0.311182206027,0.143337066069*p3,0.0758756149006),10702.0019531*ipitch
-	ao[1164] oscil linseg(0.135633024157,ilen, 0),21199.4384766*ipitch
-	ao[1165] oscil linseg(0.0986517338358,ilen, 0),17980.2246094*ipitch
-	ao[1166] oscil linseg(0.234822582261,ilen, 0),10863.5009766*ipitch
-	ao[1167] oscil linseg(0.208027557663,0.143337066069*p3,0.145096036512,0.28555431131*p3,0.0638718145978),7073.65722656*ipitch
-	ao[1168] oscil linseg(0.225883989827,ilen, 0),5835.49804688*ipitch
-	ao[1169] oscil linseg(0.186099187105,ilen, 0),11918.6279297*ipitch
-	ao[1170] oscil linseg(0.0916875540182,ilen, 0),6093.89648438*ipitch
-	ao[1171] oscil linseg(0.0866394498915,ilen, 0),15105.5419922*ipitch
-	ao[1172] oscil linseg(0.154841840872,ilen, 0),7601.22070312*ipitch
-	ao[1173] oscil linseg(0.313790408672,0.143337066069*p3,0.0877667598897),17528.0273438*ipitch
-	ao[1174] oscil linseg(0.118182045959,ilen, 0),7267.45605469*ipitch
-	ao[1175] oscil linseg(0.228361387366,0.143337066069*p3,0.0832998591852),8871.6796875*ipitch
-	ao[1176] oscil linseg(0.236199773691,0.143337066069*p3,0.074262294492),10766.6015625*ipitch
-	ao[1177] oscil linseg(0.100498985524,ilen, 0),8182.6171875*ipitch
-	ao[1178] oscil linseg(0.300170465159,ilen, 0),5372.53417969*ipitch
-	ao[1179] oscil linseg(0.155417929276,0.143337066069*p3,0.114830646516),14028.8818359*ipitch
-	ao[1180] oscil linseg(0.0984877598574,ilen, 0),14577.9785156*ipitch
-	ao[1181] oscil linseg(0.0836834094031,ilen, 0),17151.1962891*ipitch
-	ao[1182] oscil linseg(0.156038541328,0.143337066069*p3,0.150268961172),1475.02441406*ipitch
-	ao[1183] oscil linseg(0.211950802614,0.143337066069*p3,0.125408092641,0.28555431131*p3,0.072582046174),8107.25097656*ipitch
-	ao[1184] oscil linseg(0.0681346048872,ilen, 0),18615.4541016*ipitch
-	ao[1185] oscil linseg(0.144348676322,0.143337066069*p3,0.163917436086),5943.1640625*ipitch
-	ao[1186] oscil linseg(0.150133605292,ilen, 0),2400.95214844*ipitch
-	ao[1187] oscil linseg(0.0654105812215,0.143337066069*p3,0.158587853213,0.28555431131*p3,0.0770396163439),10174.4384766*ipitch
-	ao[1188] oscil linseg(0.174125478846,0.143337066069*p3,0.0683181942384),10475.9033203*ipitch
-	ao[1189] oscil linseg(0.21226093506,0.143337066069*p3,0.101238636762),7558.15429688*ipitch
-	ao[1190] oscil linseg(0.1417007362,ilen, 0),6427.66113281*ipitch
-	ao[1191] oscil linseg(0.0733217080847,ilen, 0),1894.921875*ipitch
-	ao[1192] oscil linseg(0.261429279939,0.143337066069*p3,0.0639099575477),10099.0722656*ipitch
-	ao[1193] oscil linseg(0.712254410272,0.143337066069*p3,0.0748015966809),8031.88476562*ipitch
-	ao[1194] oscil linseg(0.224871565181,0.143337066069*p3,0.0669595724708),10626.6357422*ipitch
-	ao[1195] oscil linseg(0.0639127083264,ilen, 0),21780.8349609*ipitch
-	ao[1196] oscil linseg(0.0930904617704,ilen, 0),21587.0361328*ipitch
-	ao[1197] oscil linseg(0.328207665504,0.143337066069*p3,0.0790864227182,0.28555431131*p3,0.15814174608,0.28555431131*p3,0.0732346414063),6955.22460938*ipitch
-	ao[1198] oscil linseg(0.163056367895,ilen, 0),2260.98632812*ipitch
-	ao[1199] oscil linseg(0.0674708354446,ilen, 0),11681.7626953*ipitch
-	ao[1200] oscil linseg(0.202731736349,ilen, 0),7956.51855469*ipitch
-	ao[1201] oscil linseg(0.242014535615,ilen, 0),5792.43164062*ipitch
-	ao[1202] oscil linseg(0.0702301567255,ilen, 0),4726.53808594*ipitch
-	ao[1203] oscil linseg(0.102576793996,0.143337066069*p3,0.0695763584257),14158.0810547*ipitch
-	ao[1204] oscil linseg(0.172825393979,0.143337066069*p3,0.0635157568955),11821.7285156*ipitch
-	ao[1205] oscil linseg(0.206555419722,ilen, 0),9797.60742188*ipitch
-	ao[1206] oscil linseg(0.0734662192381,ilen, 0),2002.58789062*ipitch
-	ao[1207] oscil linseg(0.0864156360037,ilen, 0),15999.1699219*ipitch
-	ao[1208] oscil linseg(0.365394384754,0.143337066069*p3,0.0993011125175),14050.4150391*ipitch
-	ao[1209] oscil linseg(0.223092052178,0.143337066069*p3,0.242861171718,0.28555431131*p3,0.0858611504553),9722.24121094*ipitch
-	ao[1210] oscil linseg(0.0719718834734,ilen, 0),13792.0166016*ipitch
-	ao[1211] oscil linseg(0.14562218863,0.143337066069*p3,0.0880545851393),19595.2148438*ipitch
-	ao[1212] oscil linseg(0.133046725244,ilen, 0),13975.0488281*ipitch
-	ao[1213] oscil linseg(0.229472923926,0.143337066069*p3,0.193135204654),5781.66503906*ipitch
-	ao[1214] oscil linseg(0.126752399933,ilen, 0),9646.875*ipitch
-	ao[1215] oscil linseg(0.176549075194,ilen, 0),18141.7236328*ipitch
-	ao[1216] oscil linseg(0.113227552113,ilen, 0),9334.64355469*ipitch
-	ao[1217] oscil linseg(0.0933969384953,ilen, 0),5124.90234375*ipitch
-	ao[1218] oscil linseg(0.186891806246,ilen, 0),9571.50878906*ipitch
-	ao[1219] oscil linseg(0.0893304587422,ilen, 0),2465.55175781*ipitch
-	ao[1220] oscil linseg(0.224235725771,0.143337066069*p3,0.0831486380521),7730.41992188*ipitch
-	ao[1221] oscil linseg(0.186651052148,ilen, 0),1012.06054688*ipitch
-	ao[1222] oscil linseg(0.0731924903224,ilen, 0),21307.1044922*ipitch
-	ao[1223] oscil linseg(0.0855802976869,ilen, 0),6836.79199219*ipitch
-	ao[1224] oscil linseg(0.159874113534,0.143337066069*p3,0.0716576643517),2110.25390625*ipitch
-	ao[1225] oscil linseg(0.165155799613,0.143337066069*p3,0.0855167189734,0.28555431131*p3,0.0720950718007),11444.8974609*ipitch
-	ao[1226] oscil linseg(0.142785008011,0.143337066069*p3,0.111338857168),7655.05371094*ipitch
-	ao[1227] oscil linseg(0.0988057596042,ilen, 0),5490.96679688*ipitch
-	ao[1228] oscil linseg(0.137977962005,ilen, 0),16096.0693359*ipitch
-	ao[1229] oscil linseg(0.0997378164051,ilen, 0),15288.5742188*ipitch
-	ao[1230] oscil linseg(0.176845041888,ilen, 0),12500.0244141*ipitch
-	ao[1231] oscil linseg(0.0790934540196,ilen, 0),13522.8515625*ipitch
-	ao[1232] oscil linseg(0.383414607237,0.143337066069*p3,0.193784187835,0.28555431131*p3,0.0718531338848),9194.67773438*ipitch
-	ao[1233] oscil linseg(0.133277813404,0.143337066069*p3,0.0631605834104),13027.5878906*ipitch
-	ao[1234] oscil linseg(0.0792885106909,ilen, 0),7579.6875*ipitch
-	ao[1235] oscil linseg(0.068516907901,ilen, 0),6847.55859375*ipitch
-	ao[1236] oscil linseg(0.149240317958,ilen, 0),13555.1513672*ipitch
-	ao[1237] oscil linseg(0.0813198894976,0.143337066069*p3,0.102603582505),18744.6533203*ipitch
-	ao[1238] oscil linseg(0.0827388824065,ilen, 0),3520.67871094*ipitch
-	ao[1239] oscil linseg(0.142776519298,0.143337066069*p3,0.081824970466),9043.9453125*ipitch
-	ao[1240] oscil linseg(0.338982930383,0.143337066069*p3,0.226738136368),7504.32128906*ipitch
-	ao[1241] oscil linseg(0.255613033579,0.143337066069*p3,0.205309285134),9097.77832031*ipitch
-	ao[1242] oscil linseg(0.0696006905873,ilen, 0),18723.1201172*ipitch
-	ao[1243] oscil linseg(0.102783536631,0.143337066069*p3,0.138240443939),6190.79589844*ipitch
-	ao[1244] oscil linseg(0.0816925913084,ilen, 0),19821.3134766*ipitch
-	ao[1245] oscil linseg(0.13890589968,ilen, 0),8257.98339844*ipitch
-	ao[1246] oscil linseg(0.116121188947,ilen, 0),1744.18945312*ipitch
-	ao[1247] oscil linseg(0.344992794415,ilen, 0),8893.21289062*ipitch
-	ao[1248] oscil linseg(0.548055572272,0.143337066069*p3,0.070380874866,0.28555431131*p3,0.0782641609358),7428.95507812*ipitch
-	ao[1249] oscil linseg(0.125586530188,ilen, 0),667.529296875*ipitch
-	ao[1250] oscil linseg(0.0756210466875,ilen, 0),2906.98242188*ipitch
-	ao[1251] oscil linseg(0.401813025054,ilen, 0),8742.48046875*ipitch
-	ao[1252] oscil linseg(0.147421322722,0.143337066069*p3,0.0630825746951),7353.58886719*ipitch
-	ao[1253] oscil linseg(0.136331640301,ilen, 0),4489.67285156*ipitch
-	ao[1254] oscil linseg(0.138781394207,ilen, 0),12995.2880859*ipitch
-	ao[1255] oscil linseg(0.195900841489,ilen, 0),8667.11425781*ipitch
-	ao[1256] oscil linseg(0.106382286175,ilen, 0),12263.1591797*ipitch
-	ao[1257] oscil linseg(0.0817728219509,0.143337066069*p3,0.0710947554712),19347.5830078*ipitch
-	ao[1258] oscil linseg(0.0718316413118,ilen, 0),3197.68066406*ipitch
-	ao[1259] oscil linseg(0.14942094541,0.143337066069*p3,0.163560078715),7278.22265625*ipitch
-	ao[1260] oscil linseg(0.115469798082,0.143337066069*p3,0.069952819283),12844.5556641*ipitch
-	ao[1261] oscil linseg(0.246302291467,0.143337066069*p3,0.177450981566),4048.2421875*ipitch
-	ao[1262] oscil linseg(0.0682512327713,ilen, 0),18927.6855469*ipitch
-	ao[1263] oscil linseg(0.080085392767,ilen, 0),5544.79980469*ipitch
-	ao[1264] oscil linseg(0.0965876522639,ilen, 0),12769.1894531*ipitch
-	ao[1265] oscil linseg(0.0662928283042,ilen, 0),17194.2626953*ipitch
-	ao[1266] oscil linseg(0.241445166062,0.143337066069*p3,0.107454802776),8441.015625*ipitch
-	ao[1267] oscil linseg(0.0745074622904,0.143337066069*p3,0.0822329037578,0.28555431131*p3,0.0665898763346),7202.85644531*ipitch
-	ao[1268] oscil linseg(0.146840617092,ilen, 0),5038.76953125*ipitch
-	ao[1269] oscil linseg(0.0950264686554,0.143337066069*p3,0.132179499589),3725.24414062*ipitch
-	ao[1270] oscil linseg(0.147334408287,0.143337066069*p3,0.113408783865),3768.31054688*ipitch
-	ao[1271] oscil linseg(0.13161858661,ilen, 0),12618.4570312*ipitch
-	ao[1272] oscil linseg(0.286858672042,0.143337066069*p3,0.0759859158284),8290.28320312*ipitch
-	ao[1273] oscil linseg(0.190762433411,ilen, 0),7127.49023438*ipitch
-	ao[1274] oscil linseg(0.081071990475,ilen, 0),936.694335938*ipitch
-	ao[1275] oscil linseg(0.08820335289,ilen, 0),6599.92675781*ipitch
-	ao[1276] oscil linseg(0.288535108455,0.143337066069*p3,0.0906604783314),3972.87597656*ipitch
-	ao[1277] oscil linseg(0.102654218576,ilen, 0),14728.7109375*ipitch
-	ao[1278] oscil linseg(0.130181326056,ilen, 0),10971.1669922*ipitch
-	ao[1279] oscil linseg(0.0909632924237,ilen, 0),12467.7246094*ipitch
-	ao[1280] oscil linseg(0.135310402551,0.143337066069*p3,0.130142335208),4371.24023438*ipitch
-	ao[1281] oscil linseg(0.0849510859165,0.143337066069*p3,0.0725459301642),18400.1220703*ipitch
-	ao[1282] oscil linseg(0.128399463137,ilen, 0),656.762695312*ipitch
-	ao[1283] oscil linseg(0.112247978822,ilen, 0),12026.2939453*ipitch
-	ao[1284] oscil linseg(0.0901652419336,ilen, 0),21360.9375*ipitch
-	ao[1285] oscil linseg(0.0963168851806,ilen, 0),4898.80371094*ipitch
-	ao[1286] oscil linseg(0.0866020504639,ilen, 0),17043.5302734*ipitch
-	ao[1287] oscil linseg(0.351612160304,0.143337066069*p3,0.167696222936),6976.7578125*ipitch
-	ao[1288] oscil linseg(0.0774634385496,ilen, 0),1625.75683594*ipitch
-	ao[1289] oscil linseg(0.211973441224,0.143337066069*p3,0.149468801888),3897.50976562*ipitch
-	ao[1290] oscil linseg(0.0873502111017,ilen, 0),21059.4726562*ipitch
-	ao[1291] oscil linseg(0.0632378862296,ilen, 0),1356.59179688*ipitch
-	ao[1292] oscil linseg(0.0873999211416,ilen, 0),17032.7636719*ipitch
-	ao[1293] oscil linseg(0.173849275655,0.143337066069*p3,0.148547506021),8624.04785156*ipitch
-	ao[1294] oscil linseg(0.258464714057,0.143337066069*p3,0.10055652553,0.28555431131*p3,0.0935205452634),6901.39160156*ipitch
-	ao[1295] oscil linseg(0.156848008305,0.143337066069*p3,0.115933154301),5953.93066406*ipitch
-	ao[1296] oscil linseg(0.0664582991068,0.143337066069*p3,0.0809684369113),20758.0078125*ipitch
-	ao[1297] oscil linseg(0.102886932256,ilen, 0),9679.17480469*ipitch
-	ao[1298] oscil linseg(0.149376076685,ilen, 0),1593.45703125*ipitch
-	ao[1299] oscil linseg(0.442819062456,ilen, 0),10841.9677734*ipitch
-	ao[1300] oscil linseg(0.145553187464,ilen, 0),6826.02539062*ipitch
-	ao[1301] oscil linseg(0.328696309761,0.143337066069*p3,0.242985331134,0.28555431131*p3,0.118777298289),3929.80957031*ipitch
-	ao[1302] oscil linseg(0.530808019167,0.143337066069*p3,0.112261952939,0.28555431131*p3,0.111182440571),3822.14355469*ipitch
-	ao[1303] oscil linseg(0.0984803765786,ilen, 0),13318.2861328*ipitch
-	ao[1304] oscil linseg(0.0984469561626,0.143337066069*p3,0.0839028811279),10734.3017578*ipitch
-	ao[1305] oscil linseg(0.124435471333,ilen, 0),16192.96875*ipitch
-	ao[1306] oscil linseg(0.114864012476,ilen, 0),11864.7949219*ipitch
-	ao[1307] oscil linseg(0.0682086753936,0.143337066069*p3,0.0712622994055),4252.80761719*ipitch
-	ao[1308] oscil linseg(0.326207054733,0.143337066069*p3,0.129844719447),1033.59375*ipitch
-	ao[1309] oscil linseg(0.0729131088427,ilen, 0),16117.6025391*ipitch
-	ao[1310] oscil linseg(0.164764124612,ilen, 0),12683.0566406*ipitch
-	ao[1311] oscil linseg(0.213065020484,ilen, 0),2702.41699219*ipitch
-	ao[1312] oscil linseg(0.0906982861633,ilen, 0),3079.24804688*ipitch
-	ao[1313] oscil linseg(0.0776318383168,ilen, 0),11714.0625*ipitch
-	ao[1314] oscil linseg(0.101639251567,ilen, 0),14524.1455078*ipitch
-	ao[1315] oscil linseg(0.0904548100238,ilen, 0),17689.5263672*ipitch
-	ao[1316] oscil linseg(0.13780083457,0.143337066069*p3,0.137887577854),6675.29296875*ipitch
-	ao[1317] oscil linseg(0.0683835670509,ilen, 0),19928.9794922*ipitch
-	ao[1318] oscil linseg(0.103464012465,0.143337066069*p3,0.0847022556555,0.28555431131*p3,0.076809265188),3746.77734375*ipitch
-	ao[1319] oscil linseg(0.0914930986405,ilen, 0),5307.93457031*ipitch
-	ao[1320] oscil linseg(0.0898935152395,0.143337066069*p3,0.0874055801292),13899.6826172*ipitch
-	ao[1321] oscil linseg(0.0707707273812,ilen, 0),3606.81152344*ipitch
-	ao[1322] oscil linseg(0.129436897315,ilen, 0),19552.1484375*ipitch
-	ao[1323] oscil linseg(0.184377220656,ilen, 0),18152.4902344*ipitch
-	ao[1324] oscil linseg(0.083784998919,ilen, 0),9442.30957031*ipitch
-	ao[1325] oscil linseg(0.150555394956,ilen, 0),11412.5976562*ipitch
-	ao[1326] oscil linseg(0.268713117941,ilen, 0),1518.09082031*ipitch
-	ao[1327] oscil linseg(0.144580059749,ilen, 0),6363.06152344*ipitch
-	aout = sumarray(ao)
-	out aout*p5
-endin
-
-#end 
diff --git a/BUG3/instruments.udo b/BUG3/instruments.udo
index ea7d694..195e3eb 100644
--- a/BUG3/instruments.udo
+++ b/BUG3/instruments.udo
@@ -146,7 +146,9 @@ instr chord2
 	a1 fmbell 0.2*iamp, cpsmidinn(inote+12), 1, 3, 0.05, 10, gifnSine, gifnSquare, gifnSine, gifnSquare, gifnSine
 	a1 butterhp a1, 700
 	kenv linseg 0, p3*0.5, 1, p3*0.4, 1, p3*0.1, 0
-	aL, aR ensembleChorus a1*10*kenv, .07, .003, .75, 1, 12, gifnSine
+	aL, aR ensembleChorus a1*9*kenv, .07, .003, .75, 1, 12, gifnSine
+	aL pareq aL, 1000, 0.4, 0.6
+	aR pareq aR, 1000, 0.4, 0.6
 	bus_mix("reverb", aL*0.2, aR*0.2)
 	aL *= 1-gkpump
 	aR *= 1-gkpump
diff --git a/BUG3/source.txt b/BUG3/source.txt
deleted file mode 100644
index bebe5ab..0000000
--- a/BUG3/source.txt
+++ /dev/null
@@ -1,159 +0,0 @@
-; bug infested directive format
-v 1.0
-
-; tempo
-b 125
-
-; chord groups
-c 1
-  8, 62, 65, 69, 72
-  8, 61, 65, 68, 72, 67
-
-;  8, 40, 43, 47, 49, 54
-;  8, 37, 43, 45, 49, 50
-;  8, 40, 43, 47, 49, 50
-;  8, 47, 50, 54, 56, 57
-
-c 2
-  8, 62, 65, 69, 72
-  8, 61, 65, 68, 72, 67
-  8, 61, 64, 68, 71
-  8, 65, 69, 72, 76, 71
-
-
-; sections: section number, length, chordgroup
-s 1, 32, 1
-s 2, 32, 1
-s 3, 64, 1
-s 4, 64, 1
-
-
-; patterns: trig , dur, amp, chance
-
-i hat909, 1
-; 1  -  -  -  2  -  -  -  3  -  -  -  4  -  -  -  5  -  -  -  6  -  -  -  7  -  -  -  8  -  -  -
-  0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1, 1, 1, 0, 1, 1, 0, 0, 1, 0, 0, 0, 1, 0, 1, 0, 1, 0, 0, 0, 1, 0
-  0, 0,.1, 0, 0, 0,.1, 0, 0, 0,.1,.1,.3, 0,.2,.1, 0, 0,.1, 0, 0, 0,.1, 0,.4, 0,.1, 0, 0, 0,.1, 0
-  0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1,.5,.4, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1, 0,.4, 0, 1, 0, 0, 0, 1, 0
-  1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,.1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1
-i hat909, 2, 1
-i hat909, 3, 1
-i hat909, 4, 1
-
-
-i mel1, 1, -1
-i mel1, 2
-; 1  -  -  -  2  -  -  -  3  -  -  -  4  -  -  -  5  -  -  -  6  -  -  -  7  -  -  -  8  -  -  -
-  0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0
-  0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,.3, 0, 0
-  1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1
-  1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1
-  0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
-i mel1, 3
-; 1  -  -  -  2  -  -  -  3  -  -  -  4  -  -  -  5  -  -  -  6  -  -  -  7  -  -  -  8  -  -  -
-  0, 0, 0, 1, 0, 0, 1, 0, 0, 0, 0, 1, 1, 0, 1, 1, 0, 0, 0, 1, 0, 0, 1, 0, 1, 0, 0, 0, 1, 0, 1, 0
-  0, 0, 0,.1, 0, 0,.3, 0, 0, 0, 0,.1,.3, 0,.5,.1, 0, 0, 0,.2, 0, 0,.4, 0,.4, 0, 0, 0,.6, 0,.1, 0
-  1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,.1, 1, 1,.1, 1, 1, 1,.9, 1, 1,.7, 1,.2, 1, 1, 1,.5, 1, 1, 1
-  1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,.1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1
-  1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1
-i mel1, 4, -1
-
-
-i hat909c, 1, -1
-i hat909c, 2
-; 1  -  -  -  2  -  -  -  3  -  -  -  4  -  -  -  5  -  -  -  6  -  -  -  7  -  -  -  8  -  -  -
-  1, 1, 0, 1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1, 0, 1
-  .02,.02,.02,.02,.02,.02,.02,.02,.02,.02,.02,.02,.02,.02,.02,.02,.02,.02,.02,.02,.02,.02,.02,.02,.02,.02,.02,.02,.02,.02,.02,.02
-  1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,.1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1
- .6,.6,.6,.6,.6,.6,.6,.6,.6,.6,.6,.6,.6,.6,.6,.6,.6,.6,.6,.6,.6,.6,.6,.6,.6,.6,.6,.6,.6,.6,.6,.6
-i hat909c, 3
-; 1  -  -  -  2  -  -  -  3  -  -  -  4  -  -  -  5  -  -  -  6  -  -  -  7  -  -  -  8  -  -  -
-  1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1
-  .02,.02,.02,.02,.02,.02,.02,.02,.02,.02,.02,.02,.02,.02,.02,.02,.02,.02,.02,.02,.02,.02,.02,.02,.02,.02,.02,.02,.02,.02,.02,.02
-  1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,.1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1
- .8,.8,.8,.8,.8,.8,.8,.8,.8,.8,.8,.8,.8,.8,.8,.8,.8,.8,.8,.8,.8,.8,.8,.8,.8,.8,.8,.8,.8,.8,.8,.8
-i hat909c, 4, -1
-
-
-
-; clap	trig , dur, amp, chance, lowpasson
-i clap909, 1
-; 1  -  -  -  2  -  -  -  3  -  -  -  4  -  -  -  5  -  -  -  6  -  -  -  7  -  -  -  8  -  -  -
-  0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 1, 0, 1, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0
-  0, 0, 0, 0,.1, 0, 0, 0, 0, 0, 0, 0,.1, 0, 0,.1, 0,.1, 0, 0,.1, 0, 0, 0, 0, 0, 0, 0,.1, 0, 0, 0
-  1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1
-  1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,.7, 1,.6, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1
-  0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
-i clap909, 2, 1
-i clap909, 3, 1
-i clap909, 4, 1
-
-
-i rim, 1, -1
-i rim, 2
-; 1  -  -  -  2  -  -  -  3  -  -  -  4  -  -  -  5  -  -  -  6  -  -  -  7  -  -  -  8  -  -  -
-  0, 0, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1
-  0, 0, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1
-  1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,.6, 1, 1, 1, 1, 1, 1, 1, 1
-  1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,.6, 1,.4, 1, 1, 1, 1, 1, 1, 1, 1
-i rim, 3, 2
-i rim, 4, 2
-
-
-
-i kick, 1
-; 1  -  -  -  2  -  -  -  3  -  -  -  4  -  -  -  5  -  -  -  6  -  -  -  7  -  -  -  8  -  -  -
-  1, 0, 1, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1, 0, 1, 1
- .4,.4,.4,.4,.4,.4,.4,.4,.4,.4,.4,.4,.4,.4,.4,.4,.4,.4,.4,.4,.4,.4,.4,.4,.4,.4,.4,.4,.4,.4,.3,.3
-  1, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1, 0,.6,.6
-  1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,.6,.2
-i kick, 2, 1
-i kick, 3, 1
-i kick, 4, 1
-
-
-
-i bass, 1, -1
-i bass, 2
-; 1  -  -  -  2  -  -  -  3  -  -  -  4  -  -  -  5  -  -  -  6  -  -  -  7  -  -  -  8  -  -  -
-  0, 0, 1, 0, 0, 1, 1, 1, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 1, 1, 1
- .1,.1,.3,.1,.1,.1,.1,.1,.1,.1,.1,.1,.1,.1,.1,.1,.1,.1,.1,.1,.1,.1,.1,.1,.1,.1,.1,.1,.1,.1,.2,.1
-  1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1
-  1, 1, 1, 1, 1, 1, 1, 1, 1, 1,.5, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,.5, 1,.6,.5,.7
-i bass, 3, 2
-i bass, 4, 2
-
-
-
-i chord1, 1, -1
-i chord1, 2, -1
-i chord1, 3, -1
-i chord1, 4
-; 1  -  -  -  2  -  -  -  3  -  -  -  4  -  -  -  5  -  -  -  6  -  -  -  7  -  -  -  8  -  -  -
-  1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
-  2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
-  1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1
-  1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1
-
-
-
-i chord2, 1, -1
-i chord2, 2, -1
-i chord2, 3
-; 1  -  -  -  2  -  -  -  3  -  -  -  4  -  -  -  5  -  -  -  6  -  -  -  7  -  -  -  8  -  -  -
-  0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
-  0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
-  1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1
-  1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1
-i chord2, 4, 3
-
-
-i chord3, 1, -1
-i chord3, 2, -1
-i chord3, 3
-; 1  -  -  -  2  -  -  -  3  -  -  -  4  -  -  -  5  -  -  -  6  -  -  -  7  -  -  -  8  -  -  -
-  0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 1, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0
-  0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,.2, 0, 0,.1, 0, 0,.2, 0, 0, 0, 0, 0, 0, 0, 0, 0
-  1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1
-  1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1
-i chord3, 4, -1
\ No newline at end of file
diff --git a/BUG3/text_tools.udo b/BUG3/text_tools.udo
deleted file mode 100644
index 63cc2a8..0000000
--- a/BUG3/text_tools.udo
+++ /dev/null
@@ -1,185 +0,0 @@
-#ifndef UDO_TEXTTOOLS
-#define UDO_TEXTTOOLS ##
-
-opcode notify, 0, S
-	Stext xin
-	Snew = "\n"
-	iwidth = 60
-	index = 0
-	while (index < iwidth) do
-		Snew = strcat(Snew, "*");
-		index += 1
-	od
-	prints strcat(strcat(Snew, "\n"), strcat(Stext, "\n\n"))
-endop
-
-
-#ifndef BUG_VERSION
-#define BUG_VERSION #-1#
-	notify("No BUG_VERSION specified: must match directive file")
-	exitnow
-#end
-
-opcode gettextindex, i, S
-	Sname xin
-	ifinalindex = -1
-	index = 0
-	while (index < lenarray(gSequenced)) do
-		if (strcmp(gSequenced[index], Sname) == 0) then
-			ifinalindex = index
-			igoto complete
-		endif
-		index += 1
-	od
-
-complete:
-	xout ifinalindex
-endop
-
-
-opcode stripnewline, S, S
-	Sline xin
-	index = strindex(Sline, "\n")
-	if (index != -1) then
-		Sline = strsub(Sline, 0, index)
-	endif
-	xout Sline
-endop
-
-opcode parserowitems, i, Siii
-	Sline, ix1, ix2, imode xin ; mode 0 = count, 1 = write sections, 2 = write chords
-	inum = 0
-	while (strlen(Sline) > 0) do
-		icomma = strindex(Sline, ",")
-		Stemp = strsub(Sline, 0, icomma)
-		icomma = (icomma == -1) ? 0 : icomma
-		Sline = strsub(Sline, icomma + 1)
-		if (imode == 1) then
-			tabw_i strtod(Stemp), inum, gisectiondata[ix1][ix2]
-		elseif (imode == 2) then
-			tabw_i strtod(Stemp), inum, gichordgroups[ix1][ix2]
-		endif
-		inum += 1
-	od
-	xout inum
-endop
-
-
-
-
-opcode getparameter, i, iii
-	ipos, idataindex, iparameter xin
-	xout tab_i(ipos, gisectiondata[idataindex][iparameter])
-endop
-
-/*
-opcode getparameter, i, iiii
-	isection, instrindex, iparameter, ipos xin
-	isectiondataindex = gisections[isection][instrindex]
-	ifn = gisectiondata[isectiondataindex][iparameter]
-	xout tab_i(ipos, ifn)
-endop
-*/
-opcode getparameterfn, i, iii
-	isection, instrindex, iparameter xin
-	isectiondataindex = gisections[isection][instrindex]
-	xout gisectiondata[isectiondataindex][iparameter]
-endop
-
-opcode getparameterfns, i[], ii
-	isection, instrindex xin
-	isectiondataindex = gisections[isection][instrindex]
-	xout getrow(gisectiondata, isectiondataindex)
-endop
-
-opcode parserow, 0, Siii
-	Sline, ix1, ix2, imode xin ; mode 1 = section patterns , 2 = chords
-	isize = parserowitems(Sline, ix1, ix2, 0)
-	if (imode == 1) then
-		gisectiondata[ix1][ix2] ftgen 0, 0, -isize, -7, 0
-	elseif (imode == 2) then
-		gichordgroups[ix1][ix2] ftgen 0, 0, -isize, -7, 0
-	endif
-	isize = parserowitems(Sline, ix1, ix2, imode)
-endop
-
-
-
-opcode parsetext, 0, S
-	Sfile xin
-	iparameter = -1
-	isection = -1
-	ichordnum = -1
-	isectiondataindex = -1
-	imode = -1
-read:
-	Sline, ilinenum readfi Sfile
-	Sline = stripnewline(Sline)
-	if (strlen(Sline) > 0) then
-		Sfirstchar = strsub(Sline, 0, 1)
-		if (strcmp(Sfirstchar, ";") == 0) then ; comment
-			; no action
-		elseif (strcmp(Sfirstchar, "v") == 0) then ; version
-			imode = 0
-			iversion = strtod(strsub(Sline, 2))
-			if (iversion != $BUG_VERSION) then
-				notify(sprintf("Incompatible directive file version: got %.2f , expected %.2f", iversion, $BUG_VERSION))
-				exitnow
-			endif
-		elseif (strcmp(Sfirstchar, "s") == 0) then ; section
-			imode = 1
-			icomma = strindex(Sline, ",")
-			isectionnum = strtod(strsub(Sline, 2, icomma))
-			Sub = strsub(Sline, icomma+1)
-			icomma = strindex(Sub, ",")
-			isectionlength = strtod(strsub(Sub, 0, icomma))
-			ichordgroup = strtod(strsub(Sub, icomma+1))
-			gisectionchords[isectionnum] = ichordgroup
-			tabw_i isectionlength, isectionnum, gisectionlengths
-
-		elseif (strcmp(Sfirstchar, "b") == 0) then ; bpm
-			imode = -1
-			gitempo = strtod(strsub(Sline, 2))
-
-		elseif (strcmp(Sfirstchar, "c") == 0) then ; chord group
-			imode = 3
-			ichordgroup = strtod(strsub(Sline, 2))
-			ichordnum = 0
-
-		elseif (strcmp(Sfirstchar, "i") == 0) then ; pattern
-			imode = 4
-			iparameter = 0
-			
-			icomma = strindex(Sline, ",")
-			instrindex = gettextindex(strsub(Sline, 2, icomma))
-			Sub = strsub(Sline, icomma+1)
-			icomma2 = strindex(Sub, ",")
-			isection = strtod(strsub(Sub, 0, icomma2))
-			if (icomma2 != -1) then ; repeat or null section
-				irepeatsection = strtod(strsub(Sub, icomma2+1))
-				if (irepeatsection == -1) then
-					inewsection = -1
-				else
-					inewsection = gisections[irepeatsection][instrindex]
-				endif
-				gisections[isection][instrindex] = inewsection
-			else
-				isectiondataindex += 1
-				gisections[isection][instrindex] = isectiondataindex
-			endif
-		elseif (imode == 3) then ; chords
-			parserow(Sline, ichordgroup, ichordnum, 2)
-			ichordnum += 1
-
-		elseif (imode == 4) then
-			parserow(Sline, isectiondataindex, iparameter, 1)
-			iparameter += 1
-		endif
-	endif
-	if (ilinenum != -1) igoto read
-endop
-
-
-
-#end
-