Sound.SC3.Server.Status

Request and display status information from the synthesis server.

Documentation

extractStatusField :: Floating n => Int -> [Datum] -> n

Get nth field of status as Floating.

statusFields :: [String]

Names of status fields.

statusFormat :: [Datum] -> [String]

Status pretty printer.

Query Group

type Query_Ctl = (Either String Int, Either Double Int)

Name or index and value or bus mapping.

data Query_Node

Nodes are either groups of synths.

Constructors

Query_Group Int [Query_Node]

Query_Synth Int String (Maybe [Query_Ctl])

Instances

Eq Query_Node

Show Query_Node

query_ctl_pp :: Query_Ctl -> String

query_node_pp :: Query_Node -> String

queryTree_ctl :: (Datum, Datum) -> Query_Ctl

Control (parameter) data may be given as names or indices and as values or bus mappings.

queryTree_ctl (string "freq",float 440) == (Left "freq",Left 440.0)
queryTree_ctl (int32 1,string "c0") == (Right 1,Right 0)

queryTree_synth :: Bool -> Int -> String -> [Datum] -> (Query_Node, [Datum])

queryTree_group :: Bool -> Int -> Int -> [Datum] -> (Query_Node, [Datum])

queryTree_child :: Bool -> [Datum] -> (Query_Node, [Datum])

queryTree :: [Datum] -> Query_Node

Parse result of g_queryTree.

let r = [int32 1,int32 0,int32 2,int32 1,int32 1
        ,int32 100,int32 1
        ,int32 1000,int32 (-1),string "saw"
        ,int32 1,string "freq",float 440.0
        ,int32 2,int32 0]
in queryTree r

queryTree_rt :: Query_Node -> Tree Query_Node

Transform Query_Node to Tree.

putStrLn (T.drawTree (fmap query_node_pp (queryTree_rt (queryTree r))))
> 0
> |
> +- 1
> |  |
> |  `- 100
> |     |
> |     `- (1000,"saw","freq:440.0")
> |
> `- 2