運用顫音、抖音、鼓組伴奏技巧,來簡單完成秋夜吟、美麗島、甜蜜的家庭,這三首歌。
秋夜吟
<CsoundSynthesizer>
<CsOptions>
</CsOptions>
<CsInstruments>
sr = 44100 ;sample rate
ksmps = 1 ;samples in a control period
nchnls = 1 ;number of channels
0dbfs = 100 ;value of 0db
instr 1
;tremolo
;p4=pitch
;p3=duration
iamp = 50
im = 0.25
ifm = 6
ifc = cpspch(p4)
aenv linen iamp, 0.1, p3, 0.1
amod oscili aenv*im, ifm, 2
asig oscili aenv+amod, ifc, 1
out asig
endin
instr 2
;vibrato
;p4=pitch
;p3=duration
iamp = 10
irate = 6
iwidth = 0.1
ifc = cpspch(p4)
aenv linen iamp, 0.1, p3, 0.1
amod oscili aenv*iwidth, irate, 2
asig oscili aenv, ifc+amod, 3
out asig
endin
instr 20
ininstr = 100 ;number of loop cycles
index = 0 ;loop counter
istart = 0
iradio = 60./p4
ib_half_half = 0.25 * iradio;
ib_half = 0.5 * iradio;
ib_one = 1 * iradio;
ib_one_half = 1.5 * iradio;
ib_two = 2.0 * iradio;
ib_two_half = 2.5 * iradio;
ib_three = 3.0 * iradio;
ib_three_half = 3.5 * iradio;
ib_four = 4.0 * iradio;
loop:
;------Put your instruments here------
event_i "i", 10, istart, ib_half, 8.00, 13
istart = istart + ib_half
event_i "i", 10, istart, ib_half, 8.00, 17
istart = istart + ib_half
event_i "i", 10, istart, ib_one, 8.00, 17
istart = istart + ib_one
event_i "i", 10, istart, ib_half, 8.00, 13
istart = istart + ib_half
event_i "i", 10, istart, ib_half, 8.00, 17
istart = istart + ib_half
event_i "i", 10, istart, ib_one, 8.00, 17
istart = istart + ib_one
event_i "i", 10, istart, ib_half, 8.00, 13
istart = istart + ib_half
event_i "i", 10, istart, ib_half, 8.00, 17
istart = istart + ib_half
event_i "i", 10, istart, ib_half, 8.00, 17
istart = istart + ib_half
event_i "i", 10, istart, ib_half, 8.00, 17
istart = istart + ib_half
event_i "i", 10, istart, ib_half, 8.00, 13
istart = istart + ib_half
event_i "i", 10, istart, ib_half, 8.00, 17
istart = istart + ib_half
event_i "i", 10, istart, ib_one, 8.00, 17
istart = istart + ib_one
;-------------------------------------
loop_lt index, 1, ininstr, loop
endin
instr 10
;Settings
iTable init p5 ;Funcation table number
iTableLen tableng iTable ;Funcation table length
iFreq init sr / iTableLen * (cpspch(p4)/cpspch(8.0)) ;Cycle per second
aenv linseg 1, 1./iFreq, 1, 0, 0, p3-1./iFreq, 0
asig oscil 50, iFreq, iTable
out aenv*asig
endin
</CsInstruments>
<CsScore>
f1 0 16384 10 1 1 1 1 1 0.8 0.6 0.4 0.2 0
f2 0 16384 10 1
f3 0 16384 10 1
f13 0 32768 1 3 0 0 2
f17 0 32768 1 7 0 0 2
t 0 108
;One
;ins strt dur pitch
i1 1.5 0.5 7.11
i. + 0.5 8.00
i. + 0.5 8.02
i. + 1.5 8.04
i. + 0.5 8.02
i. + 0.5 8.04
i. + 0.5 8.09
i. + 0.5 8.07
i. + 0.5 8.04
i. + 0.5 8.02
i. + 0.5 8.00
i. + 1 7.09
i. ^+1.5 0.5 8.00
i. + 0.5 8.04
i. + 0.5 8.05
i. + 1.5 8.07
i. + 0.5 8.09
i. + 0.5 8.07
i. + 0.5 8.04
i. + 0.5 8.00
i. + 0.5 8.04
i. + 2 8.02
i. ^+2.5 0.5 7.11
i. + 0.5 8.00
i. + 0.5 8.02
i. + 1.5 8.04
i. + 0.5 8.02
i. + 0.5 8.04
i. + 0.5 8.09
i. + 0.5 8.07
i. + 0.5 8.04
i. + 0.5 8.02
i. + 0.5 8.00
i. + 0.5 7.09
i. + 0.5 7.07
i. + 0.5 7.09
i. + 0.5 7.11
i. + 0.5 8.00
i. + 0.5 8.02
i. + 1.5 8.04
i. + 0.5 8.05
i. + 0.5 8.04
i. + 0.5 8.02
i. + 1 8.00
i. + 0.5 8.02
i. + 2 8.00
i. ^+2.5 0.5 8.07
i. + 0.5 8.09
i. + 0.5 8.11
i. + 1.5 9.00
i. + 0.5 8.11
i. + 0.5 8.11
i. + 0.5 8.09
i. + 0.5 8.07
i. + 0.5 8.04
i. + 0.5 8.07
i. + 0.5 8.04
i. + 1 8.00
i. ^+1.5 0.5 8.07
i. + 0.5 8.09
i. + 0.5 8.11
i. + 1.5 9.00
i. + 0.5 8.11
i. + 0.5 8.11
i. + 0.5 8.09
i. + 0.5 8.07
i. + 0.5 8.04
i. + 2 8.02
i. ^+2.5 0.5 8.07
i. + 0.5 8.07
i. + 0.5 8.07
i. + 1.5 9.04
i. + 0.5 9.02
i. + 0.5 9.02
i. + 0.5 9.00
i. + 0.5 8.09
i. + 0.5 9.00
i. + 0.5 8.07
i. + 0.5 8.04
i. + 1 9.00
i. ^+1.5 0.5 7.11
i. + 0.5 8.00
i. + 0.5 8.02
i. + 0.5 8.04
i. + 0.5 8.09
i. + 0.5 8.07
i. + 0.5 8.04
i. + 0.5 8.02
i. + 0.5 8.00
i. + 0.5 7.07
i. + 0.5 7.11
i. + 4 8.00
;Two
;ins strt dur pitch
i2 0 0.5 7.00
i. + 0.5 7.07
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.07
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.07
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.07
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.07
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.07
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.07
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.07
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.07
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.07
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.07
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.07
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.07
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.07
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.07
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.07
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.07
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.07
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.07
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.07
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.07
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.07
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.07
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.07
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.07
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.07
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.07
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.07
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.07
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.07
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.07
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.07
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.07
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.07
i. + 0.5 7.04
i. + 0.5 7.07
;drums
;ins strt dur tempo
i20 0 68 108
e
</CsScore>
</CsoundSynthesizer>
美麗島
<CsoundSynthesizer>
<CsOptions>
</CsOptions>
<CsInstruments>
sr = 44100 ;sample rate
ksmps = 1 ;samples in a control period
nchnls = 1 ;number of channels
0dbfs = 100 ;value of 0db
instr 1
;tremolo
;p4=pitch
;p3=duration
iamp = 50
im = 0.25
ifm = 6
ifc = cpspch(p4)
aenv linen iamp, 0.1, p3, 0.1
amod oscili aenv*im, ifm, 2
asig oscili aenv+amod, ifc, 1
out asig
endin
instr 2
;vibrato
;p4=pitch
;p3=duration
iamp = 10
irate = 6
iwidth = 0.1
ifc = cpspch(p4)
aenv linen iamp, 0.1, p3, 0.1
amod oscili aenv*iwidth, irate, 2
asig oscili aenv, ifc+amod, 3
out asig
endin
instr 20
ininstr = 100 ;number of loop cycles
index = 0 ;loop counter
istart = 0
iradio = 60./p4
ib_half_half = 0.25 * iradio;
ib_half = 0.5 * iradio;
ib_one = 1 * iradio;
ib_one_half = 1.5 * iradio;
ib_two = 2.0 * iradio;
ib_two_half = 2.5 * iradio;
ib_three = 3.0 * iradio;
ib_three_half = 3.5 * iradio;
ib_four = 4.0 * iradio;
loop:
;------Put your instruments here------
istart2 = istart
event_i "i", 10, istart2, ib_half, 8.00, 14
istart2 = istart2 + ib_half
event_i "i", 10, istart2, ib_half, 8.00, 14
istart2 = istart2 + ib_half
event_i "i", 10, istart2, ib_half, 8.00, 14
istart2 = istart2 + ib_half
event_i "i", 10, istart2, ib_half, 8.00, 14
istart2 = istart2 + ib_half
event_i "i", 10, istart2, ib_half, 8.00, 14
istart2 = istart2 + ib_half
event_i "i", 10, istart2, ib_half, 8.00, 14
istart2 = istart2 + ib_half
event_i "i", 10, istart, ib_half, 8.00, 17
istart = istart + ib_half
event_i "i", 10, istart, ib_half, 8.00, 13
istart = istart + ib_half
event_i "i", 10, istart, ib_half, 8.00, 13
istart = istart + ib_half
event_i "i", 10, istart, ib_half, 8.00, 17
istart = istart + ib_half
event_i "i", 10, istart, ib_one, 8.00, 13
istart = istart + ib_one
;-------------------------------------
loop_lt index, 1, ininstr, loop
endin
instr 10
;Settings
iTable init p5 ;Funcation table number
iTableLen tableng iTable ;Funcation table length
iFreq init sr / iTableLen * (cpspch(p4)/cpspch(8.0)) ;Cycle per second
aenv linseg 1, 1./iFreq, 1, 0, 0, p3-1./iFreq, 0
asig oscil 25, iFreq, iTable
out aenv*asig
endin
</CsInstruments>
<CsScore>
f1 0 16384 10 1 1 1 1 1 0.8 0.6 0.4 0.2 0
f2 0 16384 10 1
f3 0 16384 10 1
f13 0 32768 1 3 0 0 2
f14 0 32768 1 4 0 0 2
f17 0 32768 1 7 0 0 2
t 0 108
;One
;ins strt dur pitch
i1 0 2 8.04
i. + 1 8.04
i. + 1 8.02
i. + 1 8.07
i. + 1 8.02
i. + 2 8.00
i. + 1 8.00
i. + 2 7.09
i. ^+2.5 0.5 7.09
i. + 2 7.07
i. + 1 7.11
i. + 1 7.11
i. + 1 8.02
i. + 1 8.05
i. + 2 8.09
i. + 1 8.06
i. + 3 8.07
i. + 2 8.04
i. + 0.5 8.04
i. + 0.5 8.04
i. + 1 8.02
i. + 1 8.07
i. + 1 8.02
i. + 2 8.00
i. + 1 8.00
i. + 3 7.09
i. + 1 7.07
i. + 1 7.09
i. + 1 8.02
i. + 1 8.05
i. + 1 8.04
i. + 1 8.02
i. + 2 8.02
i. + 1 7.11
i. + 2 8.00
i. + 0.5 8.00
i. + 0.5 8.00
i. + 2 8.05
i. + 0.5 8.05
i. + 0.5 8.05
i. + 1 8.09
i. + 1 9.00
i. + 1 8.09
i. + 3 8.07
i. + 2 8.04
i. + 1 8.07
i. + 2 8.02
i. + 1 8.02
i. + 2 8.02
i. + 1 8.09
i. + 2 8.07
i. + 1 8.04
i. + 2 8.04
i. + 0.5 8.00
i. + 0.5 8.00
i. + 2 8.05
i. + 0.5 8.05
i. + 0.5 8.05
i. + 1 8.09
i. + 1 9.00
i. + 1 8.09
i. + 3 8.07
i. + 2 8.04
i. + 1 8.07
i. + 2 8.02
i. + 1 8.02
i. + 2 8.02
i. + 1 8.05
i. + 2 8.04
i. + 1 8.02
i. + 3 8.00
i. + 2 8.04
i. + 1 8.07
i. + 2 8.02
i. + 1 8.07
i. + 2 8.04
i. + 1 8.09
i. + 2 8.07
i. + 1 8.09
i. + 2 8.07
i. + 1 8.07
i. + 2 8.02
i. + 1 8.07
i. + 1 8.02
i. + 1 8.02
i. + 1 7.11
i. + 3 8.00
;Two
;ins strt dur pitch
i2 0 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
i. + 0.5 7.00
i. + 0.5 7.04
i. + 0.5 7.07
;drums
;ins strt dur tempo
i20 0 120 108
e
</CsScore>
</CsoundSynthesizer>
甜蜜的家庭
<CsoundSynthesizer>
<CsOptions>
</CsOptions>
<CsInstruments>
sr = 44100 ;sample rate
ksmps = 1 ;samples in a control period
nchnls = 1 ;number of channels
0dbfs = 100 ;value of 0db
instr 1
;tremolo
;p4=pitch
;p3=duration
iamp = 50
im = 0.25
ifm = 6
ifc = cpspch(p4)
aenv linen iamp, 0.1, p3, 0.1
amod oscili aenv*im, ifm, 2
asig oscili aenv+amod, ifc, 1
out asig
endin
instr 2
;vibrato
;p4=pitch
;p3=duration
iamp = 10
irate = 6
iwidth = 0.1
ifc = cpspch(p4)
aenv linen iamp, 0.1, p3, 0.1
amod oscili aenv*iwidth, irate, 2
asig oscili aenv, ifc+amod, 3
out asig
endin
instr 20
ininstr = 100 ;number of loop cycles
index = 0 ;loop counter
istart = 0
iradio = 60./p4
ib_half_half = 0.25 * iradio;
ib_half = 0.5 * iradio;
ib_one = 1 * iradio;
ib_one_half = 1.5 * iradio;
ib_two = 2.0 * iradio;
ib_two_half = 2.5 * iradio;
ib_three = 3.0 * iradio;
ib_three_half = 3.5 * iradio;
ib_four = 4.0 * iradio;
loop:
;------Put your instruments here------
istart2 = istart
event_i "i", 10, istart2, ib_half, 8.00, 14
istart2 = istart2 + ib_half
event_i "i", 10, istart2, ib_half, 8.00, 14
istart2 = istart2 + ib_half
event_i "i", 10, istart2, ib_half, 8.00, 14
istart2 = istart2 + ib_half
event_i "i", 10, istart2, ib_half, 8.00, 14
istart2 = istart2 + ib_half
event_i "i", 10, istart2, ib_half, 8.00, 14
istart2 = istart2 + ib_half
event_i "i", 10, istart2, ib_half, 8.00, 14
istart2 = istart2 + ib_half
event_i "i", 10, istart2, ib_half, 8.00, 13
istart2 = istart2 + ib_half
event_i "i", 10, istart2, ib_half, 8.00, 14
istart2 = istart2 + ib_half
event_i "i", 10, istart, ib_half, 8.00, 17
istart = istart + ib_half
event_i "i", 10, istart, ib_half, 8.00, 17
istart = istart + ib_half
event_i "i", 10, istart, ib_one, 8.00, 13
istart = istart + ib_one_half
event_i "i", 10, istart, ib_half, 8.00, 17
istart = istart + ib_one_half
;-------------------------------------
loop_lt index, 1, ininstr, loop
endin
instr 10
;Settings
iTable init p5 ;Funcation table number
iTableLen tableng iTable ;Funcation table length
iFreq init sr / iTableLen * (cpspch(p4)/cpspch(8.0)) ;Cycle per second
aenv linseg 1, 1./iFreq, 1, 0, 0, p3-1./iFreq, 0
asig oscil 25, iFreq, iTable
out aenv*asig
endin
</CsInstruments>
<CsScore>
f1 0 16384 10 1 1 1 1 1 0.8 0.6 0.4 0.2 0
f2 0 16384 10 1
f3 0 16384 10 1
f13 0 32768 1 3 0 0 2
f14 0 32768 1 4 0 0 2
f17 0 32768 1 7 0 0 2
t 0 108
;One
;ins strt dur pitch
i1 3 0.75 8.00
i. + 0.25 8.02
i. + 1.5 8.04
i. + 0.5 8.05
i. + 1.5 8.05
i. + 0.5 8.07
i. + 2 8.07
i. + 1 8.04
i. + 1 8.07
i. + 1.5 8.05
i. + 0.5 8.04
i. + 1 8.05
i. + 0.5 8.02
i. + 0.5 8.02
i. + 3 8.04
i. + 0.75 8.00
i. + 0.25 8.02
i. + 1.5 8.04
i. + 0.5 8.05
i. + 1.5 8.05
i. + 0.5 8.07
i. + 2 8.07
i. + 1 8.04
i. + 1 8.07
i. + 1.5 8.05
i. + 0.5 8.04
i. + 1 8.05
i. + 1 8.02
i. + 2 8.00
i. ^+3 0.5 8.07
i. + 0.5 8.07
i. + 1.5 9.00
i. + 0.5 8.11
i. + 1.5 8.09
i. + 0.5 8.07
i. + 2 8.07
i. + 1 8.04
i. + 0.5 8.07
i. + 0.5 8.07
i. + 1.5 8.05
i. + 0.5 8.04
i. + 1 8.05
i. + 1 8.02
i. + 3 8.04
i. + 0.5 8.07
i. + 0.5 8.07
i. + 1.5 9.00
i. + 0.5 8.11
i. + 1.5 8.09
i. + 0.5 8.07
i. + 2 8.07
i. + 1 8.04
i. + 0.5 8.07
i. + 0.5 8.07
i. + 1.5 8.05
i. + 0.5 8.04
i. + 1 8.05
i. + 1 8.02
i. + 3 8.00
i. ^+4 4 8.07
i. + 2 8.05
i. + 2 8.02
i. + 4 8.00
i. + 4 8.02
i. + 2 8.04
i. ^+3 1 8.07
i. + 1.5 9.00
i. + 0.5 8.11
i. + 1.5 8.09
i. + 0.5 8.07
i. + 2 8.07
i. + 1 8.04
i. + 0.5 8.07
i. + 0.5 8.07
i. + 1.5 8.05
i. + 0.5 8.04
i. + 1 8.05
i. + 1 8.02
i. + 4 8.00
;Two
;ins strt dur pitch
i2 3 0.75 7.00
i. + 0.25 7.11
i. + 1.5 7.00
i. + 0.5 7.02
i. + 1.5 7.02
i. + 0.5 7.04
i. + 2 7.04
i. + 1 7.00
i. + 1 7.04
i. + 1.5 7.02
i. + 0.5 7.00
i. + 1 7.02
i. + 0.5 7.11
i. + 0.5 7.11
i. + 3 7.00
i. + 0.75 7.00
i. + 0.25 7.11
i. + 1.5 7.00
i. + 0.5 7.02
i. + 1.5 7.02
i. + 0.5 7.04
i. + 2 7.04
i. + 1 7.00
i. + 1 7.04
i. + 1.5 7.05
i. + 0.5 7.00
i. + 1 7.02
i. + 1 6.11
i. + 2 7.00
i. ^+3 0.5 7.04
i. + 0.5 7.04
i. + 1.5 7.04
i. + 0.5 7.07
i. + 1.5 7.05
i. + 0.5 7.04
i. + 2 7.04
i. + 1 7.00
i. + 0.5 7.04
i. + 0.5 7.04
i. + 1.5 7.05
i. + 0.5 7.00
i. + 1 7.02
i. + 1 6.11
i. + 3 7.00
i. + 0.5 7.04
i. + 0.5 7.04
i. + 1.5 7.04
i. + 0.5 7.07
i. + 1.5 7.05
i. + 0.5 7.04
i. + 2 7.04
i. + 1 7.00
i. + 0.5 7.04
i. + 0.5 7.04
i. + 1.5 7.02
i. + 0.5 7.00
i. + 1 7.02
i. + 1 6.11
i. + 3 7.00
i. ^+4 4 7.04
i. + 2 7.02
i. + 2 6.11
i. + 4 7.00
i. + 4 6.11
i. + 2 7.00
i. ^+3 1 7.04
i. + 1.5 7.04
i. + 0.5 7.07
i. + 1.5 7.05
i. + 0.5 7.04
i. + 2 7.04
i. + 1 7.00
i. + 0.5 7.04
i. + 0.5 7.04
i. + 1.5 7.02
i. + 0.5 7.00
i. + 1 7.02
i. + 1 6.11
i. + 4 7.00
;drums
;ins strt dur tempo
i20 0 104 108
e
</CsScore>
</CsoundSynthesizer>