-- | (Undocumented class)
module Sound.SC3.UGen.Record.AY8910 where
import qualified Sound.SC3.UGen as S
import Sound.SC3.UGen.Record
data AY8910 = AY8910 {
  r0 :: S.UGen,
  r1 :: S.UGen,
  r2 :: S.UGen,
  r3 :: S.UGen,
  r4 :: S.UGen,
  r5 :: S.UGen,
  r6 :: S.UGen,
  r7 :: S.UGen,
  r8 :: S.UGen,
  r9 :: S.UGen,
  rA :: S.UGen,
  rB :: S.UGen,
  rC :: S.UGen,
  rD :: S.UGen,
  rate_ :: S.UGen
  } deriving (Show)
aY8910 :: AY8910
aY8910 = AY8910 {
  r0 = 0.0,
  r1 = 0.0,
  r2 = 0.0,
  r3 = 0.0,
  r4 = 0.0,
  r5 = 0.0,
  r6 = 0.0,
  r7 = 0.0,
  r8 = 0.0,
  r9 = 0.0,
  rA = 0.0,
  rB = 0.0,
  rC = 0.0,
  rD = 0.0,
  rate_ = 1.0
  }
mkAY8910 :: AY8910 -> S.UGen
mkAY8910 (AY8910  a' b' c' d' e' f' g' h' i' j' k' l' m' n' o') = S.mkOsc S.AR "AY8910" [a',b',c',d',e',f',g',h',i',j',k',l',m',n',o'] 3
instance Make AY8910 where
  ugen = mkAY8910