sr = 96000
kr = 96000
nchnls = 2
seed 0 ; random values globally seeded from system clock
itmp ftgen 1, 0, 0, 1, "b1138_bathroom_drop.wav", 0, 0, 0
itmp ftgen 2, 0, 0, 1, "b1138_tuning_fork.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 .076 .006 .0097 473.969122 101.7 .865 .725 -.000307 ;mem:1 ind:0
i1 .326 .076 .006 .0097 481.571562 103.86481 .857058 .717377 -.000302 ;mem:2 ind:1
i1 .402 .076 .006 .0097 481.571562 103.86481 .857058 .717377 -.000302 ;mem:2 ind:2
i1 .478 .076 .006 .0097 501.751178 108.333654 .837018 .698387 -.00029 ;mem:4 ind:3
i1 .554 .076 .006 .0097 542.475321 115.400005 .800148 .664365 -.000266 ;mem:7 ind:4
i1 .63 .076 .006 .0097 542.475321 115.400005 .800148 .664365 -.000266 ;mem:7 ind:5
i1 .706 .076 .006 .0097 527.682833 112.994771 .813028 .676104 -.000275 ;mem:6 ind:6
i1 .782 .076 .006 .0097 527.682833 112.994771 .813028 .676104 -.000275 ;mem:6 ind:7
i1 .858 .076 .006 .0097 632.623481 128.216295 .733991 .607477 -.000219 ;mem:12 ind:8
i1 .934 .076 .006 .0097 612.210957 125.543937 .747169 .618267 -.000229 ;mem:11 ind:9
i1 1.01 .076 .006 .0097 612.210957 125.543937 .747169 .618267 -.000229 ;mem:11 ind:10
i1 1.086 .076 .006 .0097 575.152403 120.365157 .773734 .640893 -.000249 ;mem:9 ind:11
i1 1.162 .076 .006 .0097 837.380706 151.748027 .635917 .540525 -.000118 ;mem:20 ind:12
i1 1.238 .076 .006 .0097 837.380706 151.748027 .635917 .540525 -.000118 ;mem:20 ind:13
i1 1.314 .076 .006 .0097 810.400516 148.585208 .647623 .547102 -.000132 ;mem:19 ind:14
i1 1.39 .076 .006 .0097 810.400516 148.585208 .647623 .547102 -.000132 ;mem:19 ind:15
i1 1.466 .076 .006 .0097 755.600915 142.455958 .671294 .561597 -.00016 ;mem:17 ind:16
i1 1.542 .076 .006 .0097 677.702421 133.732875 .70816 .587354 -.000197 ;mem:14 ind:17
i1 1.618 .076 .006 .0097 677.702421 133.732875 .70816 .587354 -.000197 ;mem:14 ind:18
i1 1.694 .076 .006 .0097 702.526942 136.579544 .695627 .578175 -.000185 ;mem:15 ind:19
i1 1.77 .076 .006 .0097 702.526942 136.579544 .695627 .578175 -.000185 ;mem:15 ind:20
i1 1.846 .076 .006 .0097 1165.361625 199.544739 .467516 .471728 .000088 ;mem:33 ind:21
i1 1.922 .076 .006 .0097 1130.211712 195.385712 .482303 .477116 .000072 ;mem:32 ind:22
i1 1.998 .076 .006 .0097 1130.211712 195.385712 .482303 .477116 .000072 ;mem:32 ind:23
i1 2.074 .076 .006 .0097 1072.506051 187.325907 .51102 .487493 .000041 ;mem:30 ind:24
i1 2.15 .076 .006 .0097 1002.906547 175.855278 .551504 .502474 -.000008 ;mem:27 ind:25
i1 2.226 .076 .006 .0097 1002.906547 175.855278 .551504 .502474 -.000008 ;mem:27 ind:26
i1 2.302 .076 .006 .0097 1025.129374 179.598575 .538395 .497522 .000008 ;mem:28 ind:27
i1 2.378 .076 .006 .0097 1025.129374 179.598575 .538395 .497522 .000008 ;mem:28 ind:28
i1 2.454 .076 .006 .0097 888.519129 158.277074 .612524 .528494 -.000088 ;mem:22 ind:29
i1 2.53 .076 .006 .0097 912.538235 161.646197 .600728 .522937 -.000072 ;mem:23 ind:30
i1 2.606 .076 .006 .0097 912.538235 161.646197 .600728 .522937 -.000072 ;mem:23 ind:31
i1 2.682 .076 .006 .0097 958.447245 168.601118 .576642 .512464 -.000041 ;mem:25 ind:32
i1 2.758 .076 .006 .0097 4435.395456 310.554152 .17 .32 .000307 ;mem:54 ind:33
i1 2.834 .076 .006 .0097 4435.395456 310.554152 .17 .32 .000307 ;mem:54 ind:34
i1 2.91 .076 .006 .0097 4259.533439 304.081404 .178198 .325348 .000302 ;mem:53 ind:35
i1 2.986 .076 .006 .0097 4259.533439 304.081404 .178198 .325348 .000302 ;mem:53 ind:36
i1 3.062 .076 .006 .0097 3831.635957 291.537821 .199101 .338746 .00029 ;mem:51 ind:37
i1 3.138 .076 .006 .0097 3107.644616 273.685927 .238366 .36304 .000266 ;mem:48 ind:38
i1 3.214 .076 .006 .0097 3107.644616 273.685927 .238366 .36304 .000266 ;mem:48 ind:39
i1 3.29 .076 .006 .0097 3350.302101 279.51167 .224522 .354611 .000275 ;mem:49 ind:40
i1 3.366 .076 .006 .0097 3350.302101 279.51167 .224522 .354611 .000275 ;mem:49 ind:41
i1 3.442 .076 .006 .0097 2075.019742 246.328732 .312568 .405024 .000219 ;mem:43 ind:42
i1 3.518 .076 .006 .0097 2251.701779 251.572144 .297268 .396867 .000229 ;mem:44 ind:43
i1 3.594 .076 .006 .0097 2251.701779 251.572144 .297268 .396867 .000229 ;mem:44 ind:44
i1 3.67 .076 .006 .0097 2651.706608 262.39618 .267282 .380093 .000249 ;mem:46 ind:45
i1 3.746 .076 .006 .0097 1253.200223 208.130266 .437236 .460416 .000118 ;mem:35 ind:46
i1 3.822 .076 .006 .0097 1253.200223 208.130266 .437236 .460416 .000118 ;mem:35 ind:47
i1 3.898 .076 .006 .0097 1308.589747 212.560576 .421816 .454444 .000132 ;mem:36 ind:48
i1 3.974 .076 .006 .0097 1308.589747 212.560576 .421816 .454444 .000132 ;mem:36 ind:49
i1 4.05 .076 .006 .0097 1451.302033 221.706117 .390622 .441768 .00016 ;mem:38 ind:50
i1 4.126 .076 .006 .0097 1772.794437 236.16749 .343593 .420631 .000197 ;mem:41 ind:51
i1 4.202 .076 .006 .0097 1772.794437 236.16749 .343593 .420631 .000197 ;mem:41 ind:52
i1 4.278 .076 .006 .0097 1648.857754 231.245151 .359245 .427986 .000185 ;mem:40 ind:53
i1 4.354 .076 .006 .0097 1648.857754 231.245151 .359245 .427986 .000185 ;mem:40 ind:54
i1 + .1 0 0 0 0 0 0 0;