module Sound.SC3.UGen.Record.ScopeOut2 where
import qualified Sound.SC3.UGen as S
import Sound.SC3.UGen.Record
data ScopeOut2 = ScopeOut2 {
rate :: S.Rate,
inputArray :: S.UGen,
scopeNum :: S.UGen,
maxFrames :: S.UGen,
scopeFrames :: S.UGen
} deriving (Show)
scopeOut2 :: ScopeOut2
scopeOut2 = ScopeOut2 {
rate = S.AR,
inputArray = 0.0,
scopeNum = 0.0,
maxFrames = 4096.0,
scopeFrames = 0.0
}
mkScopeOut2 :: ScopeOut2 -> S.UGen
mkScopeOut2 (ScopeOut2 r a' b' c' d') = S.mkOsc r "ScopeOut2" [a',b',c',d'] 1
instance Make ScopeOut2 where
ugen = mkScopeOut2