From ec1b28bf67fd66fef2b0d39ac577c60ad31ca130 Mon Sep 17 00:00:00 2001 From: Rinnegatamante Date: Wed, 19 Oct 2016 18:29:18 +0200 Subject: [PATCH] Added CHMM2-like background effect. Added CHMM2-like background effect. --- app/index.lua | 122 +++++++++++++++++++++++++++++++++++++++++++++++++- 1 file changed, 120 insertions(+), 2 deletions(-) diff --git a/app/index.lua b/app/index.lua index e3e81a8..2ae39f4 100644 --- a/app/index.lua +++ b/app/index.lua @@ -1,5 +1,8 @@ -- Scanning TrackPlug folder local tbl = System.listDirectory("ux0:/data/TrackPlug") +if tbl == nil then + tbl = {} +end -- Convert a 32 bit binary string to a integer function bin2int(str) @@ -99,6 +102,114 @@ end Timer.destroy(tmr) Graphics.freeImage(splash) +-- Background wave effect +local colors = { + {Color.new(0,132,255), Color.new(72,185,255), Color.new(0,132,255)}, -- Cyan + {Color.new(255,132,0), Color.new(255,185,72), Color.new(255,132,0)}, -- Orange + {Color.new(255,72,72), Color.new(255,132,132), Color.new(255,72,72)}, -- Pink + {Color.new(255,0,0), Color.new(255,72,72), Color.new(255,0,0)}, -- Red + {Color.new(255,72,255), Color.new(255,185,255), Color.new(255,72,255)}, -- Magenta + {Color.new(72,72,72), Color.new(0,0,0), Color.new(0,255,0)} -- Black'N'Green +} +col_idx = 1 +local function LoadWave(height,dim,f,style,x_dim) + if style == 1 then + f=f or 0.1 + local onda={pi=math.pi,Frec=f,Long_onda=dim,Amplitud=height} + function onda:color(a,b,c) self.a=a self.b=b self.c=c end + function onda:init(desfase) + desfase=desfase or 0 + if not self.contador then + self.contador=Timer.new() + end + if not self.a or not self.b or not self.c then + self.a = 0 + self.b = 0 + self.c = 255 + end + local t,x,y,i + t = Timer.getTime(self.contador)/1000+desfase + for x = 0,x_dim,4 do + y = 252+self.Amplitud*math.sin(2*self.pi*(t*self.Frec-x/self.Long_onda)) + i = self.Amplitud*(-2*self.pi/self.Long_onda)*math.cos(2*self.pi*(t*self.Frec-x/self.Long_onda)) + Graphics.drawLine(x-200,x+200,y-i*200,y+i*200,Color.new(self.a,self.b,self.c,math.floor(x/40))) + end + collectgarbage() + end + function onda:destroy() + Timer.destroy(self.contador) + end + return onda + end + if style == 2 then + f=f or 0.1 + local onda={pi=math.pi,Frec=f,Long_onda=dim,Amplitud=height} + function onda:color(a,b,c) self.a=a self.b=b self.c=c end + function onda:init(desfase) + desfase=desfase or 0 + if not self.contador then + self.contador=Timer.new() + end + if not self.a or not self.b or not self.c then + self.a = 0 + self.b = 0 + self.c = 255 + end + local t,x,y,i,a + t = Timer.getTime(self.contador)/1000+desfase + if self.Amplitud <= 5 then + self.aumento = true + elseif self.Amplitud >= 110 then + self.aumento = false + end + if self.aumento then + self.Amplitud = self.Amplitud+0.1 + else + self.Amplitud = self.Amplitud-0.1 + end + for x = 0,x_dim,10 do + y = 272+self.Amplitud*math.sin(2*self.pi*(t*self.Frec-x/self.Long_onda)) + i = self.Amplitud*(-2*self.pi/self.Long_onda)*math.cos(2*self.pi*(t*self.Frec-x/self.Long_onda)) + for a = -3,3 do + Graphics.drawLine(x-20,x+20,a+y-i*20,a+y+i*20,Color.new(self.a,self.b,self.c,25-math.abs(a*5))) + end + end + collectgarbage() + end + function onda:destroy() + Timer.destroy(self.contador) + end + return onda + end + if style == 3 then + f=f or 0.1 + local onda={pi=math.pi,Frec=f,Long_onda=dim,Amplitud=height} + function onda:color(a,b,c) self.Color=Color.new(a,b,c,40) end + function onda:init(desfase) + desfase=desfase or 0 + if not self.contador then + self.contador=Timer.new() + end + if not self.Color then + self.Color=Color.new(0,0,255,40) + end + local t,x,y,i + t = Timer.getTime(self.contador)/1000+desfase + for x = 0,x_dim do + y = 252+self.Amplitud*math.sin(2*self.pi*(t*self.Frec-x/self.Long_onda)) + Graphics.drawLine(x,x,y,240,self.Color) + end + collectgarbage() + end + function onda:destroy() + Timer.destroy(self.contador) + end + return onda + end +end +wav = LoadWave(15,1160, 0.1, 2, 960) +wav:color(Color.getR(colors[col_idx][3]),Color.getG(colors[col_idx][3]),Color.getB(colors[col_idx][3])) + -- Internal stuffs local list_idx = 1 local order_idx = 1 @@ -168,7 +279,7 @@ function RenderList() end end end - local sclr = Color.new(sel_val, sel_val, sel_val) + local sclr = Color.new(sel_val, sel_val, sel_val, 100) Graphics.fillRect(0, 960, 4, 138, sclr) Graphics.debugPrint(800, 520, "Order: " .. orders[order_idx], white) while i <= list_idx + 3 do @@ -190,7 +301,8 @@ local f_idx = 1 local oldpad = Controls.read() while #tbl > 0 do Graphics.initBlend() - Screen.clear() + Graphics.fillRect(0,960,0,544,colors[col_idx][2]) + wav:init() RenderList() if freeze then showAlarm("Do you want to delete this record permanently?", f_idx) @@ -241,6 +353,12 @@ while #tbl > 0 do list_idx = list_idx - 1 end end + elseif Controls.check(pad, SCE_CTRL_SELECT) and not Controls.check(oldpad, SCE_CTRL_SELECT) then + col_idx = col_idx + 1 + if col_idx > #colors then + col_idx = 1 + end + wav:color(Color.getR(colors[col_idx][3]),Color.getG(colors[col_idx][3]),Color.getB(colors[col_idx][3])) end oldpad = pad end