module Sound.SC3.UGen.Record.PV_RecordBuf where
import qualified Sound.SC3.UGen as S
import Sound.SC3.UGen.Record
data PV_RecordBuf = PV_RecordBuf {
buffer :: S.UGen,
recbuf :: S.UGen,
offset :: S.UGen,
run :: S.UGen,
loop :: S.UGen,
hop :: S.UGen,
wintype :: S.UGen
} deriving (Show)
pv_RecordBuf :: PV_RecordBuf
pv_RecordBuf = PV_RecordBuf {
buffer = 0.0,
recbuf = 0.0,
offset = 0.0,
run = 0.0,
loop = 0.0,
hop = 0.5,
wintype = 0.0
}
mkPV_RecordBuf :: PV_RecordBuf -> S.UGen
mkPV_RecordBuf (PV_RecordBuf a' b' c' d' e' f' g') = S.mkOsc S.KR "PV_RecordBuf" [a',b',c',d',e',f',g'] 1
instance Make PV_RecordBuf where
ugen = mkPV_RecordBuf