From d39eda420e95ed8bb03e88ea665bd6b4e8bb9b07 Mon Sep 17 00:00:00 2001 From: loooph Date: Wed, 1 Mar 2023 00:04:29 +0100 Subject: [PATCH] pls no --- BootTidalVis.hs => BootTidal.hs | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) rename BootTidalVis.hs => BootTidal.hs (95%) diff --git a/BootTidalVis.hs b/BootTidal.hs similarity index 95% rename from BootTidalVis.hs rename to BootTidal.hs index d12c361..6c30904 100644 --- a/BootTidalVis.hs +++ b/BootTidal.hs @@ -8,7 +8,9 @@ hSetEncoding stdout utf8 -- Target and shape for pattern visualizing. patternTarget = Target { oName = "Pattern handler", oAddress = "127.0.0.1", oPort = 5050, oBusPort = Nothing, oLatency = 0.02, oWindow = Nothing, oSchedule = Pre BundleStamp, oHandshake = False } -patternShape = OSC "/trigger/something" $ Named {requiredArgs = []} +edgeShape = OSC "/edge" $ Named {requiredArgs = ["w", "edge_type"]} + +vertexShape = OSC "/vertex" $ Named {requiredArgs = ["vertex"]} -- Target for playing music via SuperCollider. musicTarget = superdirtTarget { oLatency = 0.1, oAddress = "127.0.0.1", oPort = 57120 } @@ -16,7 +18,7 @@ musicTarget = superdirtTarget { oLatency = 0.1, oAddress = "127.0.0.1", oPort = config = defaultConfig {cFrameTimespan = 1/20} -- Send pattern as OSC both to SuperCollider and to tidal-vis. -tidal <- startStream config [(musicTarget, [superdirtShape]), (patternTarget, [patternShape])] +tidal <- startStream config [(musicTarget, [superdirtShape]), (patternTarget, [edgeShape, vertexShape])] -- Send pattern as OSC to SuperCollider only. -- tidal <- startTidal musicTarget config