zzkt/rsc3
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

added sample.rkt

Browse source
This commit is contained in:
Mustafa 2014-05-20 11:04:42 -07:00
parent 4a82d72d3f
commit e8464bca98
1 changed files with 20 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

20
oregano/sample.rkt Normal file
View file

@ -0,0 +1,20 @@
#lang racket
(require rsc3 rhs/rhs)
(with-sc3 reset)
(send-msg (dump-osc 1))
;; load a smple in a buffer
; (send-async-msg (b-alloc-read 42 "./Samples/Synth Hits/Synth Hit 01.wav" 0 0))
(define fname "./Samples/Synth Hits/Synth Hit 01.wav")
(send-async-msg (b-alloc 0 16380 2))
(send-async-msg (b-read 0 fname 0 -1 0 1))
(audition (out 0 (disk-in 2 ar 0)))