1.0 (24 March 2015)

- Initial release

Layouts/Ocean/Rainmeter.ini

@@ -0,0 +1,8 @@
+[Ocean]
+Active=1
+AnchorX=50.00000%
+AnchorY=50.00000%
+WindowX=50.00000%
+WindowY=50.00000%
+
+[Rainmeter]

RMSKIN.ini

@@ -0,0 +1,9 @@
+[rmskin]
+Name=Ocean
+Author=alatsombath
+Version=24 March 2015
+LoadType=Layout
+Load=Ocean
+VariableFiles=Ocean\@Resources\Variables.inc
+MinimumRainmeter=3.2
+MinimumWindows=6.0

Skins/Ocean/@Resources/Ocean.lua

@@ -0,0 +1,29 @@
+-- Ocean v1.0
+-- LICENSE: Creative Commons Attribution-Non-Commercial-Share Alike 3.0
+
+local Measure,MeasureBuffer,cos,PI={},{},math.cos,math.pi
+function Initialize()
+	local Width=SKIN:ParseFormula(SKIN:ReplaceVariables("#Width#"))
+	InterWidth=math.ceil(Width/SKIN:ReplaceVariables("#Bands#")) Mu=1/InterWidth
+	Sub,Index,Limit=SELF:GetOption("Sub"),SKIN:ParseFormula(SELF:GetOption("Index")),SKIN:ParseFormula(SELF:GetOption("Limit"))
+	local MeasureName,gsub=SKIN:ReplaceVariables("#MeasureName#"),string.gsub
+	for i=Index,Limit do Measure[i]=SKIN:GetMeasure((gsub(MeasureName,Sub,i))) end end
+
+-- http://paulbourke.net/miscellaneous/interpolation/
+local function CosineInterpolate(y1,y2,mu)
+	local mu2=(1-cos(mu*PI))/2 return (y1*(1-mu2)+y2*mu2) end
+
+function Update()
+	for i=Index,Limit do MeasureBuffer[i]=Measure[i]:GetValue() end 
+	for i=Index,Limit-1 do
+		SKIN:Bang("!SetOption","MeasureHistogramIter","Formula",Measure[i]:GetValue())
+		SKIN:Bang("[!UpdateMeasure MeasureHistogramIter][!UpdateMeter MeterHistogram]")
+
+		local y1,y2,LocalMu=MeasureBuffer[i],MeasureBuffer[i+1],0
+		for j=1,InterWidth do
+			LocalMu=LocalMu+Mu
+			SKIN:Bang("!SetOption","MeasureHistogramIter","Formula",CosineInterpolate(y1,y2,LocalMu))
+			SKIN:Bang("[!UpdateMeasure MeasureHistogramIter][!UpdateMeter MeterHistogram]")
+		end
+	end
+end

Skins/Ocean/@Resources/ReadBands.inc

@@ -0,0 +1,6 @@
+[MeasureAudioRepeat]
+Measure=Plugin
+Plugin=AudioLevel
+Parent=MeasureAudio
+Type=Band
+BandIdx=Repeat

Skins/Ocean/@Resources/RepeatSection.lua

@@ -0,0 +1,7 @@
+-- RepeatSection v1.0
+-- LICENSE: Creative Commons Attribution-Non-Commercial-Share Alike 3.0
+function Initialize()
+	local w,ini,gsub,Sub,Index,Limit={},io.input(SKIN:ReplaceVariables(SELF:GetOption("ReadFile"))):read("*all"),string.gsub,SELF:GetOption("Sub"),SKIN:ParseFormula(SELF:GetOption("Index")),SKIN:ParseFormula(SELF:GetOption("Limit"))
+	for i=Index,Limit do w[i]=gsub(ini,Sub,i) end
+	io.open(SKIN:ReplaceVariables(SELF:GetOption("WriteFile")),"w"):write(table.concat(w,"\n\n"))
+end

Skins/Ocean/@Resources/Variables.inc

@@ -0,0 +1,20 @@
+[Variables]
+FFTAttack=350
+FFTDecay=350
+FFTSize=2048
+FreqMin=40
+FreqMax=16000
+; Audio settings
+; http://docs.rainmeter.net/manual-beta/plugins/audiolevel#FFTOptions
+
+MeasureName=MeasureAudioRepeat
+
+Bands=96
+Sensitivity=42
+
+X=0
+Y=0
+Width=(#WORKAREAWIDTH#/2)
+Height=(#WORKAREAHEIGHT#/4)
+
+Color=161,186,220,255