[CM] extract track regions

[Anders Vinjar]

Heres a version of Ricks parse-samples to do similar things with
Snd.  It works in the same manner: placing marks at the onsets,
ready to edit if needed, leaving to mark-explode or some such to
actually cut out the samples to sound-files.

; might be useful to do some normalizing or something first

(compand-channel) ; from examp.scm or somewhere


(map (lambda (x) (add-mark (seconds->samples (car x))))
   (parse-attacks #:len 1000 #:on 0.1 :off 0.1))

;; edit placement if needed, and do the splicing out

(mark-explode)

; ive used a modified version of mark-explode which splices from
; first mark onwards, and takes last cut from last mark to
; end-of-file, as well as small enveloping on start and end.

This leaves file-0.snd, file-1.snd... etc

-------------- next part --------------
A non-text attachment was scrubbed...
Name: parse-attacks.scm
Type: application/octet-stream
Size: 1702 bytes
Desc: parse-attacks for Snd
URL: <https://cm-mail.stanford.edu/pipermail/cmdist/attachments/20040906/60dbfbf1/attachment.obj>
-------------- next part --------------

I need the functions 'seconds->samples and 'samples->seconds
included here because the default ones in snd seem to be
hardwired at srate=22050 or something.

Heres the version of mark-explode ive used here:

-------------- next part --------------
A non-text attachment was scrubbed...
Name: mark-explode.scm
Type: application/octet-stream
Size: 1681 bytes
Desc: tilted mark-explode
URL: <https://cm-mail.stanford.edu/pipermail/cmdist/attachments/20040906/60dbfbf1/attachment-0001.obj>