aboutsummaryrefslogtreecommitdiff
path: root/toxicinvaders_misc/musicplayer/update_music.lua
diff options
context:
space:
mode:
authorRibbon <ambiguousmachine@gmail.com>2022-02-26 23:40:32 -0800
committerRibbon <ambiguousmachine@gmail.com>2022-02-26 23:40:32 -0800
commit8d67710e19c0755659633109c45ec90e92b88042 (patch)
treed223cf18fa4f5883f5ada670eb045bee09a7ffeb /toxicinvaders_misc/musicplayer/update_music.lua
parent41d9dcc9ab65724858d75a3be45134e527d09108 (diff)
file organization
Diffstat (limited to 'toxicinvaders_misc/musicplayer/update_music.lua')
-rw-r--r--toxicinvaders_misc/musicplayer/update_music.lua51
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