sr = 96000 kr = 96000 nchnls = 2 seed 0 ; random values globally seeded from system clock itmp ftgen 1, 0, 0, 1, "b1108_gtr_harm.wav", 0, 0, 0 itmp ftgen 2, 0, 0, 1, "b1108_gtr.wav", 0, 0, 0 instr 1 irnd gauss p6/250 ; random value scaled to amplitude idur = p3 iatt = p4 irel = p5 iamp = p6 + irnd icps = p7 iw1s = p8 ilft = p9 idel = p10 itmp ftgen 3, 0, 8192, 30, 1, 1, floor((sr/2)/icps) itmp ftgen 4, 0, 8192, 30, 2, 1, floor((sr/2)/icps) kenv linen iamp, iatt, idur, irel aw1 poscil3 kenv, icps, 3 aw2 poscil3 kenv, icps, 4 asig sum aw1*iw1s, aw2*(1-iw1s) if (abs(0-idel)*2<1/sr) goto mid kenvd linseg 1, idur-abs(idel)-irel, 1, irel, 0 adel delay asig*kenvd, abs(idel) if (idel<0) goto left goto right left: outs asig*ilft, adel*(1-ilft) goto end mid: outs asig*ilft, asig*(1-ilft) goto end right: outs adel*ilft, asig*(1-ilft) end: endin ;i ent dur att rel amp cps w1 lft del i1 .25 .044 .0055 .0089 7267.114627 1706 .895 .29 .0008 ;mem:1 ind:0 i1 .294 .044 .0055 .0089 6887.098189 1711.298188 .886633 .299128 .000779 ;mem:2 ind:1 i1 .338 .044 .0055 .0089 7267.114627 1706 .895 .29 .0008 ;mem:1 ind:2 i1 .382 .044 .0055 .0089 6418.122136 1716.61283 .875727 .310715 .000753 ;mem:3 ind:3 i1 .426 .044 .0055 .0089 5910.219685 1721.943977 .863065 .32373 .000723 ;mem:4 ind:4 i1 .47 .044 .0055 .0089 5412.279888 1727.29168 .849402 .337175 .00069 ;mem:5 ind:5 i1 .514 .044 .0055 .0089 6887.098189 1711.298188 .886633 .299128 .000779 ;mem:2 ind:6 i1 .558 .044 .0055 .0089 4957.658581 1732.655992 .835127 .35046 .000658 ;mem:6 ind:7 i1 .602 .044 .0055 .0089 4568.517069 1738.036963 .820366 .363286 .000625 ;mem:7 ind:8 i1 .646 .044 .0055 .0089 6418.122136 1716.61283 .875727 .310715 .000753 ;mem:3 ind:9 i1 .69 .044 .0055 .0089 4266.634762 1743.434646 .80524 .375364 .000592 ;mem:8 ind:10 i1 .734 .044 .0055 .0089 4057.485918 1748.849091 .789861 .386522 .00056 ;mem:9 ind:11 i1 .778 .044 .0055 .0089 3914.87776 1754.280352 .774333 .396815 .000528 ;mem:10 ind:12 i1 .822 .044 .0055 .0089 5910.219685 1721.943977 .863065 .32373 .000723 ;mem:4 ind:13 i1 .866 .044 .0055 .0089 3808.979169 1759.72848 .758756 .406327 .000497 ;mem:11 ind:14 i1 .91 .044 .0055 .0089 3712.676002 1765.193528 .743225 .415146 .000466 ;mem:12 ind:15 i1 .954 .044 .0055 .0089 3614.720294 1770.675548 .727805 .423396 .000436 ;mem:13 ind:16 i1 .998 .044 .0055 .0089 5412.279888 1727.29168 .849402 .337175 .00069 ;mem:5 ind:17 i1 1.042 .044 .0055 .0089 3509.606952 1776.174594 .71255 .431212 .000405 ;mem:14 ind:18 i1 1.086 .044 .0055 .0089 3391.571088 1781.690717 .69751 .438726 .000375 ;mem:15 ind:19 i1 1.13 .044 .0055 .0089 4957.658581 1732.655992 .835127 .35046 .000658 ;mem:6 ind:20 i1 1.174 .044 .0055 .0089 3248.69023 1787.223972 .682703 .445978 .000344 ;mem:16 ind:21 i1 1.218 .044 .0055 .0089 3062.884328 1792.77441 .66811 .452914 .000314 ;mem:17 ind:22 i1 1.262 .044 .0055 .0089 2815.827799 1798.342086 .653713 .459479 .000283 ;mem:18 ind:23 i1 1.306 .044 .0055 .0089 4568.517069 1738.036963 .820366 .363286 .000625 ;mem:7 ind:24 i1 1.35 .044 .0055 .0089 2505.280223 1803.927053 .639492 .465616 .000253 ;mem:19 ind:25 i1 1.394 .044 .0055 .0089 2173.440611 1809.529365 .625422 .471273 .000223 ;mem:20 ind:26 i1 1.438 .044 .0055 .0089 4266.634762 1743.434646 .80524 .375364 .000592 ;mem:8 ind:27 i1 1.482 .044 .0055 .0089 1870.11792 1815.149076 .611483 .476397 .000194 ;mem:21 ind:28 i1 1.526 .044 .0055 .0089 1640.341576 1820.786239 .59765 .480944 .000165 ;mem:22 ind:29 i1 1.57 .044 .0055 .0089 1487.5414 1826.440909 .583892 .484956 .000136 ;mem:23 ind:30 i1 1.614 .044 .0055 .0089 4057.485918 1748.849091 .789861 .386522 .00056 ;mem:9 ind:31 i1 1.658 .044 .0055 .0089 1393.727838 1832.113141 .570173 .488519 .000109 ;mem:24 ind:32 i1 1.702 .044 .0055 .0089 1340.764615 1837.802988 .55646 .491719 .000081 ;mem:25 ind:33 i1 1.746 .044 .0055 .0089 1311.887839 1843.510506 .542717 .494642 .000054 ;mem:26 ind:34 i1 1.79 .044 .0055 .0089 3914.87776 1754.280352 .774333 .396815 .000528 ;mem:10 ind:35 i1 1.834 .044 .0055 .0089 1292.237897 1849.235749 .528909 .497373 .000027 ;mem:27 ind:36 i1 1.878 .044 .0055 .0089 1267.095446 1854.978773 .515 .5 0 ;mem:28 ind:37 i1 1.922 .044 .0055 .0089 3808.979169 1759.72848 .758756 .406327 .000497 ;mem:11 ind:38 i1 1.966 .044 .0055 .0089 1225.112206 1860.739632 .50096 .502609 -.000027 ;mem:29 ind:39 i1 2.01 .044 .0055 .0089 1168.424163 1866.518382 .486772 .505292 -.000054 ;mem:30 ind:40 i1 2.054 .044 .0055 .0089 1102.538364 1872.315079 .472425 .508142 -.000081 ;mem:31 ind:41 i1 2.098 .044 .0055 .0089 3712.676002 1765.193528 .743225 .415146 .000466 ;mem:12 ind:42 i1 2.142 .044 .0055 .0089 1032.929505 1878.129778 .457908 .511252 -.000109 ;mem:32 ind:43 i1 2.186 .044 .0055 .0089 964.633058 1883.962535 .443209 .514716 -.000136 ;mem:33 ind:44 i1 2.23 .044 .0055 .0089 902.367952 1889.813407 .428316 .518625 -.000165 ;mem:34 ind:45 i1 2.274 .044 .0055 .0089 3614.720294 1770.675548 .727805 .423396 .000436 ;mem:13 ind:46 i1 2.318 .044 .0055 .0089 850.826679 1895.68245 .413218 .523073 -.000194 ;mem:35 ind:47 i1 2.362 .044 .0055 .0089 812.348457 1901.569719 .397908 .528095 -.000223 ;mem:36 ind:48 i1 2.406 .044 .0055 .0089 3509.606952 1776.174594 .71255 .431212 .000405 ;mem:14 ind:49 i1 2.45 .044 .0055 .0089 784.702098 1907.475272 .382387 .533623 -.000253 ;mem:37 ind:50 i1 2.494 .044 .0055 .0089 765.1313 1913.399165 .366657 .539572 -.000283 ;mem:38 ind:51 i1 2.538 .044 .0055 .0089 750.874719 1919.341456 .350719 .545861 -.000314 ;mem:39 ind:52 i1 2.582 .044 .0055 .0089 3391.571088 1781.690717 .69751 .438726 .000375 ;mem:15 ind:53 i1 2.626 .044 .0055 .0089 739.141537 1925.302201 .334578 .552402 -.000344 ;mem:40 ind:54 i1 2.67 .044 .0055 .0089 727.13027 1931.281458 .318241 .559111 -.000375 ;mem:41 ind:55 i1 2.714 .044 .0055 .0089 3248.69023 1787.223972 .682703 .445978 .000344 ;mem:16 ind:56 i1 2.758 .044 .0055 .0089 712.10304 1937.279285 .301713 .565905 -.000405 ;mem:42 ind:57 i1 2.802 .044 .0055 .0089 692.785261 1943.295738 .285022 .572839 -.000436 ;mem:43 ind:58 i1 2.846 .044 .0055 .0089 669.365635 1949.330876 .268219 .580103 -.000466 ;mem:44 ind:59 i1 2.89 .044 .0055 .0089 3062.884328 1792.77441 .66811 .452914 .000314 ;mem:17 ind:60 i1 2.934 .044 .0055 .0089 642.096542 1955.384757 .251354 .587892 -.000497 ;mem:45 ind:61 i1 2.978 .044 .0055 .0089 611.268668 1961.457439 .234491 .596389 -.000528 ;mem:46 ind:62 i1 3.022 .044 .0055 .0089 577.278535 1967.548981 .217725 .605742 -.00056 ;mem:47 ind:63 i1 3.066 .044 .0055 .0089 2815.827799 1798.342086 .653713 .459479 .000283 ;mem:18 ind:64 i1 3.11 .044 .0055 .0089 540.540787 1973.65944 .201158 .616093 -.000592 ;mem:48 ind:65 i1 3.154 .044 .0055 .0089 501.494394 1979.788876 .184893 .627551 -.000625 ;mem:49 ind:66 i1 3.198 .044 .0055 .0089 2505.280223 1803.927053 .639492 .465616 .000253 ;mem:19 ind:67 i1 3.242 .044 .0055 .0089 460.790012 1985.937348 .169047 .639945 -.000658 ;mem:50 ind:68 i1 3.286 .044 .0055 .0089 419.187299 1992.104915 .153746 .652954 -.00069 ;mem:51 ind:69 i1 3.33 .044 .0055 .0089 377.46718 1998.291636 .13912 .666252 -.000723 ;mem:52 ind:70 i1 3.374 .044 .0055 .0089 2173.440611 1809.529365 .625422 .471273 .000223 ;mem:20 ind:71 i1 3.418 .044 .0055 .0089 337.333281 2004.49757 .125582 .679218 -.000753 ;mem:53 ind:72 i1 3.462 .044 .0055 .0089 301.769539 2010.722778 .113932 .690821 -.000779 ;mem:54 ind:73 i1 3.506 .044 .0055 .0089 1870.11792 1815.149076 .611483 .476397 .000194 ;mem:21 ind:74 i1 3.55 .044 .0055 .0089 273.854195 2016.967319 .105 .7 -.0008 ;mem:55 ind:75 i1 + .1 0 0 0 0 0 0 0;