sr = 44100 kr = 441 ksmps = 100 nchnls = 2 instr 1 kreadline line 0, p3, p3 lorisread kreadline, "crotale-Bb7.sdif", 1, 1, 1, 1, 0.001 lorisfrqwarp 1, 2, p4, p5, p6 ar lorisplay 2, 1, 1, 1 kenvelope linseg 0, 0.01, 1, p3-0.01, 0 outs ar*kenvelope, ar*kenvelope endin i1 0 3 900 -1 1 i1 2 3 900 -0.6 1 i1 4 3 900 -0.2 1 i1 6 3 900 0.2 1 i1 8 3 900 0.6 1 i1 10 3 900 1 1 i1 13 3 900 -1 0 i1 15 3 900 -0.6 0 i1 17 3 900 -0.2 0 i1 19 3 900 0.2 0 i1 21 3 900 0.6 0 i1 23 3 900 1 0 i1 26 3 400 -0.8 0 i1 28 3 720 -0.8 0 i1 30 3 1040 -0.8 0 i1 32 3 1360 -0.8 0 i1 34 3 1680 -0.8 0 i1 36 6 2000 -0.8 0