module Sound.SC3.UGen.Record.PV_PlayBuf where
import qualified Sound.SC3.UGen as S
import Sound.SC3.UGen.Record
data PV_PlayBuf = PV_PlayBuf {
buffer :: S.UGen,
playbuf :: S.UGen,
rate_ :: S.UGen,
offset :: S.UGen,
loop :: S.UGen
} deriving (Show)
pv_PlayBuf :: PV_PlayBuf
pv_PlayBuf = PV_PlayBuf {
buffer = 0.0,
playbuf = 0.0,
rate_ = 1.0,
offset = 0.0,
loop = 0.0
}
mkPV_PlayBuf :: PV_PlayBuf -> S.UGen
mkPV_PlayBuf (PV_PlayBuf a' b' c' d' e') = S.mkOsc S.KR "PV_PlayBuf" [a',b',c',d',e'] 1
instance Make PV_PlayBuf where
ugen = mkPV_PlayBuf