sr = 44100 kr = 441 ksmps = 100 nchnls = 1 ;THIS INSTRUMENT IS A KICK DRUM, I USED NOISE AND A SINE WAVE WITH A SHORT ATTACK AND RELEASE AND IN A LOW FREQUENCY. instr 1 idur = p3 iamp = ampdb(p4) ifrq = cpspch(p5) ifun = p6 iatk = p7 irel = p8 kenv linen iamp, iatk, idur, irel asig1 oscil kenv, ifrq, 1 ;THIS RANDOM SIGNALS WERE FOUND RESEARCHING ON THE INTERNET asig2 rand iamp, .5, 1 ; High quality random number asig3 randh iamp, sr/2, .5, 1 ; Hold random number for 2 samples asig4 randh iamp, sr/4, .5, 1 ; Hold for 4 samples asig5 randh iamp, sr/8, .5, 1 ; Hold for 8 samples asig6 randh iamp, sr/16, .5, 1 ; Hold for 16 samples asig7 randh iamp, sr/32, .5, 1 ; Hold for 32 samples asig8 randh iamp, sr/64, .5, 1 ; Hold for 64 samples asig9 randh iamp, sr/128, .5, 1 ; Hold for 128 samples amix = asig1+(asig2+asig3+asig4+asig5+asig6+asig7+asig8+asig9-644/iamp)/950 out amix endin ;THIS INSTRUMENT IS A SNARE DRUM WHICH HAS THE SAME ATTRIBUTES AS THE KICK DRUM BUT THE SINE WAVE AMP IS DIVIDED BY 10 SO IT HAS MORE NOISE QUALITY. instr 2 idur = p3 iamp = ampdb(p4) ifrq = cpspch(p5) ifun = p6 iatk = p7 irel = p8 kenv linen iamp, iatk, idur, irel asig1 oscil kenv, ifrq, 1 ;THIS RANDOM SIGNALS WERE FOUND RESEARCHING ON THE INTERNET, PARAMETERS WERE MODIFIED. asig2 rand iamp, .5, 1 ; High quality random number asig3 randh iamp, sr/2, .5, 1 ; Hold random number for 2 samples asig4 randh iamp, sr/4, .5, 1 ; Hold for 4 samples amix = (asig1/20)+(asig2+asig3+asig4)/50 out amix endin ;THIS INSTRUMENT IS A BASS SYNTH THAT TRIES TO CREATE AN UNUSUAL MELODIC PATTERN. I AM USING A BUZZ AND A PLUCK OPCODES. instr 3 idur = p3 iamp = ampdb(p4) ifrq = cpspch(p5) ifun = p6 iatk = p7 irel = p8 iatkfun = p9 index1 = p10 index2 = p11 kenv oscil iamp, idur, ifun kmodswp expon index1, idur, index2 kbuzswp expon 1, idur, 5 asig2 buzz kenv, ifrq*1.5, kbuzswp+10, ifun asig1 pluck iamp, ifrq/2, ifrq, 0, 1 amix = asig1+asig2 out amix endin f 1 0 1024 10 200 ;KICK DRUM ;instr str dur amp freq fn atk rel i 1 0 .2 90 6 1 .01 .1 i 1 1 .2 90 6 1 .01 .1 i 1 2 .2 90 6 1 .01 .1 i 1 3 .2 90 6 1 .01 .1 i 1 4 .2 90 6 1 .01 .1 i 1 5 .2 90 6 1 .01 .1 i 1 6 .2 90 6 1 .01 .1 i 1 7 .2 90 6 1 .01 .1 i 1 9 .2 90 6 1 .01 .1 i 1 10 .2 90 6 1 .01 .1 i 1 11 .2 90 6 1 .01 .1 i 1 12 .2 90 6 1 .01 .1 i 1 13 .2 90 6 1 .01 .1 i 1 14 .2 90 6 1 .01 .1 i 1 15 .2 90 6 1 .01 .1 i 1 19 .2 90 6 1 .01 .1 ;SNARE DRUM ;instr str dur amp freq fn atk rel i 2 .5 .1 95 7 1 .01 .001 i 2 1.5 .1 95 7 1 .01 .001 i 2 2.5 .1 95 7 1 .01 .001 i 2 3.5 .1 95 7 1 .01 .001 i 2 4.5 .1 95 7 1 .01 .001 i 2 5.5 .1 95 7 1 .01 .001 i 2 6.5 .1 95 7 1 .01 .001 i 2 7.5 .1 95 7 1 .01 .001 i 2 8.5 .1 95 7 1 .01 .001 i 2 9.5 .1 95 7 1 .01 .001 i 2 10.5 .1 95 7 1 .01 .001 i 2 11.5 .1 95 7 1 .01 .001 i 2 12.5 .1 95 7 1 .01 .001 i 2 13.5 .1 95 7 1 .01 .001 i 2 14.5 .1 95 7 1 .01 .001 i 2 15.5 .1 95 7 1 .01 .001 i 2 18 .1 95 7 1 .01 .001 i 2 18.25 .1 95 7 1 .01 .001 i 2 18.75 .1 95 7 1 .01 .001 ;BASS DRUM ;instr str dur amp freq fn atk rel atkfun indx1 indx2 i 3 7.75 .20 80 8 1 .5 1 .1 3 25 i 3 8 .50 80 7 1 .5 1 .1 30 2 i 3 8.75 .20 80 7.5 1 .5 1 .1 1 5 i 3 9 .20 80 5.1 1 .5 1 .1 46 3 i 3 9.25 .40 80 6.2 1 .5 1 .1 28 61 i 3 9.75 .20 80 4.3 1 .5 1 .1 91 25 i 3 10 .90 80 8.6 1 .5 1 .1 1 8 i 3 11 2 80 6 1 .5 1 .1 2 74 i 3 11.5 1 80 5.5 1 .5 1 .1 52 164 i 3 12.5 .5 80 7 1 .5 1 .1 19 5 i 3 13 .20 80 5.9 1 .5 1 .1 61 91 i 3 13.25 .25 80 3.5 1 .5 10 .1 5 24 i 3 13.50 .25 80 4.5 1 .5 10 .1 46 4 i 3 13.75 5 80 5.5 1 .5 10 .1 55 2 e Version: 3 Render: Real Ask: Yes Functions: ioObject Listing: Window WindowBounds: 1040 397 400 433 CurrentView: io IOViewEdit: On Options: -b128 -A -s -m167 -R ioView background {32125, 41634, 41120} ioSlider {266, 7} {20, 98} 0.000000 1.000000 0.122449 amp ioSlider {10, 29} {239, 22} 100.000000 1000.000000 258.158996 freq ioGraph {8, 112} {265, 116} table 0.000000 1.000000 ioListing {279, 112} {266, 266} ioText {293, 44} {41, 24} label 0.000000 0.00100 "" left "Lucida Grande" 8 {0, 0, 0} {65280, 65280, 65280} background noborder Amp: ioText {333, 44} {70, 24} display 0.000000 0.00100 "amp" left "Lucida Grande" 8 {0, 0, 0} {65280, 65280, 65280} background noborder 0.1837 ioText {66, 57} {41, 24} label 0.000000 0.00100 "" left "Lucida Grande" 8 {0, 0, 0} {65280, 65280, 65280} background noborder Freq: ioText {106, 57} {69, 24} display 0.000000 0.00100 "freq" left "Lucida Grande" 8 {0, 0, 0} {65280, 65280, 65280} background noborder 261.9247 ioText {425, 6} {120, 100} label 0.000000 0.00100 "" left "Lucida Grande" 8 {0, 0, 0} {65280, 65280, 65280} nobackground border ioText {449, 68} {78, 24} display 0.000000 0.00100 "freqsweep" center "DejaVu Sans" 8 {0, 0, 0} {14080, 31232, 29696} background border 999.6769 ioButton {435, 24} {100, 30} event 1.000000 "Button 1" "Sweep" "/" i1 0 10 ioGraph {8, 233} {266, 147} scope 2.000000 -1.000000