1 files changed, 51 insertions, 0 deletions
diff --git a/toxicinvaders_misc/musicplayer/update_music.lua b/toxicinvaders_misc/musicplayer/update_music.lua
new file mode 100644
index 0000000..3e79211
--- /dev/null
+++ b/toxicinvaders_misc/musicplayer/update_music.lua
@@ -0,0 +1,51 @@
+--similar math elements grouped to lower tokens
+flashtime = (ceil(t()*10%2) == 1) --for flashing elements (ship, score)
+circletimex = sin(t())*3 -- for elements that move in a circle (respawn timer)
+circletimey = cos(t())*3
+
+gt += scrollspeed + 1/600
+fadeouttimer -= ft
+
+if t() < 2 then -- weird if because of freezing bubbles in the menu
+    updateobjs() --update all objects
+end
+
+if tracknumber < 0 then
+    tracknumber = 4
+elseif tracknumber > 4 then
+    tracknumber = 0
+end
+
+if btnp(0) then
+    tracknumber-=1
+    updatetracktitlepos()
+    fadeoutsong()
+elseif btnp(1) then
+    tracknumber+=1
+    updatetracktitlepos()
+    fadeoutsong()
+end
+
+if fadeouttimer <= 0 then
+    fadeouttimer = 0
+    selectmusic()
+    updatetracktitlepos()
+end
+
+if autoplay then
+    autoplaytimer -= ft
+    if autoplaytimer <= 0 then
+        autoplaytimer = 90
+        tracknumber+=1
+        fadeoutsong()
+    end
+    autoplaymenutext = "(♪) autoplay"
+else 
+    autoplaymenutext = "(◆) autoplay"
+end
+menuitem(2, autoplaymenutext, function() autoplay = not autoplay end)
+
+
+if btnp(4) and btnp(5) then music(-1,3000) end
+
+tracktitleposition = lerp(tracktitleposition,newtracktitleposition,0.03)
+\ No newline at end of file