module Sound.SC3.UGen.Record.PV_BinPlayBuf where
import qualified Sound.SC3.UGen as S
import Sound.SC3.UGen.Record
data PV_BinPlayBuf = PV_BinPlayBuf {
buffer :: S.UGen,
playbuf :: S.UGen,
rate_ :: S.UGen,
offset :: S.UGen,
binStart :: S.UGen,
binSkip :: S.UGen,
numBins :: S.UGen,
loop :: S.UGen,
clear :: S.UGen
} deriving (Show)
pv_BinPlayBuf :: PV_BinPlayBuf
pv_BinPlayBuf = PV_BinPlayBuf {
buffer = 0.0,
playbuf = 0.0,
rate_ = 1.0,
offset = 0.0,
binStart = 0.0,
binSkip = 1.0,
numBins = 1.0,
loop = 0.0,
clear = 0.0
}
mkPV_BinPlayBuf :: PV_BinPlayBuf -> S.UGen
mkPV_BinPlayBuf (PV_BinPlayBuf a' b' c' d' e' f' g' h' i') = S.mkOsc S.KR "PV_BinPlayBuf" [a',b',c',d',e',f',g',h',i'] 1
instance Make PV_BinPlayBuf where
ugen = mkPV_BinPlayBuf