From 57e6b3735787f8136ad344a8d170dbf2981d0509 Mon Sep 17 00:00:00 2001
From: LLLL Colonq <llll@colonq>
Date: Mon, 18 Nov 2024 03:24:01 -0500
Subject: Change mode configuration, added initial menu

---
 src/Audio.js    | 14 +++++++-------
 src/Config.purs |  2 +-
 src/Main.purs   | 27 ++++++++++++++++-----------
 src/Model.js    |  2 +-
 4 files changed, 25 insertions(+), 20 deletions(-)

(limited to 'src')

diff --git a/src/Audio.js b/src/Audio.js
index 2a9ae54..57bc131 100644
--- a/src/Audio.js
+++ b/src/Audio.js
@@ -8,13 +8,13 @@ function initializeCtx() {
       initialized = true;
       ctx = new window.AudioContext();
       voiceTracks = [
-        document.getElementById("lcolonq-audio-voice-0"),
-        document.getElementById("lcolonq-audio-voice-1"),
-        document.getElementById("lcolonq-audio-voice-2"),
-        document.getElementById("lcolonq-audio-voice-3"),
-        document.getElementById("lcolonq-audio-voice-4"),
-        document.getElementById("lcolonq-audio-voice-5"),
-        document.getElementById("lcolonq-audio-voice-6"),
+        document.getElementById("lcolonq-pubnix-index-audio-voice-0"),
+        document.getElementById("lcolonq-pubnix-index-audio-voice-1"),
+        document.getElementById("lcolonq-pubnix-index-audio-voice-2"),
+        document.getElementById("lcolonq-pubnix-index-audio-voice-3"),
+        document.getElementById("lcolonq-pubnix-index-audio-voice-4"),
+        document.getElementById("lcolonq-pubnix-index-audio-voice-5"),
+        document.getElementById("lcolonq-pubnix-index-audio-voice-6"),
       ];
     } catch (e) {
       initialized = false;
diff --git a/src/Config.purs b/src/Config.purs
index 536f163..20b0ec2 100644
--- a/src/Config.purs
+++ b/src/Config.purs
@@ -1,6 +1,6 @@
 module Config where
 
-foreign import mode :: Int
+foreign import mode :: String
 foreign import apiServer :: String
 foreign import clientID :: String
 foreign import authRedirectURL :: String
diff --git a/src/Main.purs b/src/Main.purs
index a7c9726..858d289 100644
--- a/src/Main.purs
+++ b/src/Main.purs
@@ -113,7 +113,7 @@ toggleClass c e = do
 
 updateSubtitle :: Aff Unit
 updateSubtitle = do
-  subtitle <- byId "lcolonq-subtitle"
+  subtitle <- byId "lcolonq-pubnix-index-subtitle"
   { text: catchphrase } <- fetch (Config.apiServer <> "/catchphrase") {}
   catchphrase >>= setText subtitle
 
@@ -135,7 +135,7 @@ mainPubnix :: Effect Unit
 mainPubnix = launchAff_ do
   liftEffect $ log "hi"
   startModel
-  marq <- byId "lcolonq-marquee"
+  marq <- byId "lcolonq-pubnix-index-marquee"
   { text: motd } <- fetch (Config.apiServer <> "/motd") {}
   motd >>= setText marq
 
@@ -147,13 +147,13 @@ mainPubnix = launchAff_ do
     _ -> pure unit
 
   updateSubtitle
-  subtitle <- byId "lcolonq-subtitle"
+  subtitle <- byId "lcolonq-pubnix-index-subtitle"
   listen subtitle "click" \_ev -> do
     -- startTwitchAuth
     launchAff_ updateSubtitle
   
   for_ (Array.range 0 6) \i -> do
-    letter <- byId $ "lcolonq-letter-" <> show i
+    letter <- byId $ "lcolonq-pubnix-index-letter-" <> show i
     listen letter "click" \_ev -> do
       Audio.playVoice true i
     listen letter "mouseover" \_ev -> do
@@ -219,12 +219,17 @@ mainRegister = launchAff_ do
         liftEffect $ log "register"
         startTwitchAuth
 
+mainMenu :: Effect Unit
+mainMenu = launchAff_ do
+  liftEffect $ log "hello from menu"
+
 main :: Effect Unit
 main = case Config.mode of
-  0 -> mainApi
-  1 -> mainPubnix
-  2 -> mainExtension
-  3 -> mainObs
-  4 -> mainButton
-  5 -> mainRegister
-  _ -> throw "unknown mode"
+  "api" -> mainApi
+  "pubnix" -> mainPubnix
+  "extension" -> mainExtension
+  "obs" -> mainObs
+  "button" -> mainButton
+  "register" -> mainRegister
+  "menu" -> mainMenu
+  _ -> throw $ "unknown mode: " <> Config.mode
diff --git a/src/Model.js b/src/Model.js
index 797bae4..2b49efb 100644
--- a/src/Model.js
+++ b/src/Model.js
@@ -1,4 +1,4 @@
-let canvas = document.getElementById("lcolonq-canvas");
+let canvas = document.getElementById("lcolonq-pubnix-index-canvas");
 let socket = null;
 let currentFrame = null;
 
-- 
cgit v1.2.3