Safe Haskell	Safe-Inferred
Language	Haskell2010

Sound.Sc3.Server.Recorder

Description

Recording scsynth.

Synopsis

data SC3_Recorder = SC3_Recorder {
- rec_sftype :: SoundFileFormat
- rec_coding :: SampleFormat
- rec_fname :: FilePath
- rec_nc :: Int
- rec_bus :: Int
- rec_buf_id :: Int
- rec_buf_frames :: Int
- rec_node_id :: Int
- rec_group_id :: Int
- rec_dur :: Maybe Time
}
default_SC3_Recorder :: SC3_Recorder
rec_synthdef_nm :: Int -> String
rec_synthdef :: Int -> Synthdef
rec_init_m :: SC3_Recorder -> [Message]
rec_begin_m :: SC3_Recorder -> Message
rec_end_m :: SC3_Recorder -> [Message]
sc3_recorder :: SC3_Recorder -> Nrt

Documentation

data SC3_Recorder Source #

Parameters for recording scsynth.

Constructors

SC3_Recorder

Fields

rec_sftype :: SoundFileFormat
Sound file format.
rec_coding :: SampleFormat
Sample format.
rec_fname :: FilePath
File name.
rec_nc :: Int
Number of channels.
rec_bus :: Int
Bus number.
rec_buf_id :: Int
ID of buffer to allocate.
rec_buf_frames :: Int
Number of frames at buffer.
rec_node_id :: Int
ID to allocate for node.
rec_group_id :: Int
Group to allocate node within.
rec_dur :: Maybe Time
Recoring duration if fixed.

default_SC3_Recorder :: SC3_Recorder Source #

Default recording structure.

rec_synthdef_nm :: Int -> String Source #

The name indicates the number of channels.

rec_synthdef :: Int -> Synthdef Source #

Generate Synthdef with required number of channels.

Sound.Sc3.Ugen.Dot.draw (rec_synthdef 2)

rec_init_m :: SC3_Recorder -> [Message] Source #

Asyncronous initialisation Messages (d_recv, b_alloc and b_write).

withSc3 (sendBundle (bundle immediately (rec_init_m def)))

rec_begin_m :: SC3_Recorder -> Message Source #

Begin recording Message (s_new).

withSc3 (sendMessage (rec_begin_m def))

rec_end_m :: SC3_Recorder -> [Message] Source #

End recording Messages (n_free, b_close and b_free).

withSc3 (sendBundle (bundle immediately (rec_end_m def)))

sc3_recorder :: SC3_Recorder -> Nrt Source #

Nrt score for recorder, if rec_dur is given schedule rec_end_m.

import Sound.Sc3
withSc3 (Sound.Osc.sendMessage (dumpOSC TextPrinter))
audition (out 0 (sinOsc ar (mce2 440 441) 0 * 0.1))
let rc = default_SC3_Recorder {rec_dur = Just 5.0}
nrt_audition (sc3_recorder rc)