• 05.04.2026, 15:25
  • Register
  • Login

  • You are not logged in.

 

Aquaero 5/6 LCDHype Scripts

Dear visitor, welcome to Aqua Computer Forum. If this is your first visit here, please read the Help. It explains how this page works. You must be registered before you can use all the page's features. Please use the registration form, to register here or read more information about the registration process. If you are already registered, please login here.

nightlust

Junior Member

Aquaero 5/6 LCDHype Scripts

Monday, January 11th 2016, 4:17am

You will need to have the USB Page added to your Aquaero in order for this to work properly.
You will also need to download a copy of LCDHype: Download Here!


WinAMP:

You will need: Plugins
Place the WinAMP plugin in the WinAMP plugins directory.
Enable the Winamp Data Collector Plugin Visualization
Place the Aquero LCDHype plugin in the LCDHype plugins directory.

Source code

 
1
2
3
4
5
6
7
8
9
10
11
12
13
14

ID=//ScreenDefTitle=WinAMP info with VUSpecCharFile=#Header
%Common.SetPriority(200)%LCD.Gfx_SetTextArea(0,0,256,64)
#EndHeader#GfxMode
%LCD.Gfx_SetOverlayMode()%If(%WinAmp.Status() = -1) Then {%Common.ChangeScreen(0,3)}/SpecAnalyzer/%WinAmp.SpecAnalyzer(FFT, PeakedBars, 64, 25, 5, 9, 2, 1, 1, 110, 15)
/TrackNo/%Common.CreateNewLine()%LCD.Gfx_SetFont('Copperplate Gothic Light',10,1,0)%Format.Offset(Horizontal, 5) %Format.Offset(Vertical,-14)%Inc(%WinAmp.TrackNo(),1)''%WinAmp.Coun­tTracks()
/RawTitle/%Common.CreateNewLine()%LCD.Gfx_SetFont('Copperplate Gothic Bold',10,1,Bold)%Format.Offset(Horizontal,30)%Format.Offset(Vertical,-16)%Param.EnableScrolling(Horizontal,Swing,­1,235,1)%WinAmp.RawTitle()
/TrackPos/%LCD.Gfx_SetFont('Copperplate Gothic Light',6,1,0)%Common.CreateNewLine()%Format.Offset(Horizontal,5)%Format.Offset(Vertical,14)%Format.Time(%Mul(%WinAmp.TrackPos(),1000),'mm:ss')''/TrackLength/%Common.CreateNewLine()%LCD.Gfx_SetFont('Copperplate Gothic Light',6,1,0)%Format.Offset(Horizontal,57)%Format.Offset(Vertical,-10)%Format.Time(%Mul(%WinAmp.TrackLength(),1000),'mm:ss')
/StatusBar/%Format.Bar(Horizontal,235,2,0,%WinAmp.TrackLength(),%WinAmp.TrackPos(),1,0,11,3­2)
/Playlist next 3 title/
%Common.CreateNewLine()%LCD.Gfx_SetFont('Copperplate Gothic Light',6,1,Bold)%Format.Offset(Horizontal,5)%Format.Offset(Vertical,3)%Param.EnableScrolling(Horizontal,Swing,­1,235,1)%WinAmp.RawTitle(%Inc(%WinAmp.TrackNo(), 1))
%Common.CreateNewLine()%LCD.Gfx_SetFont('Arial',6,1,Bold)%Format.Offset(Horizontal,5)%Format.Offset(Vertical,-2)%Param.EnableScrolling(Horizontal,Swing,­1,235,1)%WinAmp.RawTitle(%Inc(%WinAmp.TrackNo(), 2))
%Common.CreateNewLine()%LCD.Gfx_SetFont('Arial',6,1,Bold)%Format.Offset(Horizontal,5)%Format.Offset(Vertical,-2)%Param.EnableScrolling(Horizontal,Swing,­1,235,1)%WinAmp.RawTitle(%Inc(%WinAmp.TrackNo(), 3))
#EndGfxMode
//EndDef




5.1 VU Meter:

You will need: Plugins
You will need: LCDHype Plugins
Place the Aquero LCDHype plugin in the LCDHype plugins directory.Place the VU meter plugin in the LCDHype plugins directory.

Source code

 
1
2
3
4

ID=//ScreenDefTitle=System SoundSpecCharFile=#Header%Graph.SetTextArea(0,0,256,64)%Graph.SetRefreshArea(0, 0, 256, 64)%Param.RenderMode(Full)%Common.SetPriority(200)%Graph.SetPixel(12,3,1)%Graph.SetPixel(12,4,1)%Graph.SetPixel(12,5,1)%Graph.SetPixel(12,6,1)%Graph.SetPixel(13,3,1)%Graph.SetPixel(13,6,1)%Graph.SetPixel(14,2,1)%Graph.SetPixel(14,7,1)%Graph.SetPixel(15,1,1)%Graph.SetPixel(15,2,1)%Graph.SetPixel(15,3,1)%Graph.SetPixel(15,4,1)%Graph.SetPixel(15,5,1)%Graph.SetPixel(15,6,1)%Graph.SetPixel(15,7,1)%Graph.SetPixel(15,8,1)#EndHeader
#GfxMode
%If( %System.Input(GetCode) = 8 )Then { %Common.ChangeScreen(0,Next) }%Graph.Font('Lucida Console', 5, 1)%Format.Bar(Vertical, 10, 61, 0, 550000, %Plugin.VolumePeakmeter.GetPeakChannel(1), 1, 0, 0, 1)/Left/%Format.Bar(Vertical, 10, 61, 0, 550000, %Plugin.VolumePeakmeter.GetPeakChannel(2), 1, 0, 244, 1)/Right//%Format.Bar(Horizontal, 150, 5, 0, 50, %Plugin.VolumePeakmeter.GetVolumeStepInfo('Step'), 1, 0, 5, 37)//VolumeStep (51 Steps on my RTL Sound Chip)/%Format.Bar(Horizontal, 52, 6, 0, 1000000, %Plugin.VolumePeakmeter.GetVolumeMasterLevelScalar(), 1, 0, 18, 2)/VolumeLevelScalar/%Format.Bar(Horizontal, 70, 5, 0, 550000, %Plugin.VolumePeakmeter.GetPeakChannel(5), 1, 0, 14, 58)/BackLeft/%Format.Bar(Horizontal, 70, 5, 0, 550000, %Plugin.VolumePeakmeter.GetPeakChannel(6), 1, 0, 170, 58)/BackRight/%Format.Bar(Horizontal, 70, 5, 0, 550000, %Plugin.VolumePeakmeter.GetPeakChannel(3), 1, 0, 92, 1)/Center/%Format.Bar(Horizontal, 70, 5, 0, 550000, %Plugin.VolumePeakmeter.GetPeakChannel(4), 1, 0, 92, 58)/Sub/%Common.CreateNewLine(1,72,2)%Round(%Div(%Plugin.VolumePeakmeter.GetVolumeMasterLevelScalar(),10000))'%'%Common.CreateNewLine(1,22,10)'dB '%Trunc(%Div(%Plugin.VolumePeakmeter.GetVolumeMasterLevel(),1000000),4)%Common.CreateNewLine(1,90,18)%Graph.Font('Cambria', 7, 1)'Sound Blaster ZxR'%Common.CreateNewLine(1,76,28)%Graph.Font('Brush Script MT', 9, 1,)'DTS-HD 5.1 Surround'%Common.CreateNewLine(1,184,12)%Graph.Font('Stencil', 9, 1,)'THX'%Graph.Font('Lucida Console', 5, 1)%Common.CreateNewLine(1,12,30)'Left'%Common.CreateNewLine(1,220,30)'Right'%Common.CreateNewLine(1,30,50)'Rear Left'%Common.CreateNewLine(1,184,50)'Rear Right'%Common.CreateNewLine(1,114,9)'Center'%Common.CreateNewLine(1,108,50)'Subwoofer'%Common.CreateNewLine(1,210,10)/'CPU '%System.CPU(Usage)' %'/%Common.CreateNewLine(1,202,1)%System.GetDateTime('mm/dd/yyyy')%If( %Plugin.VolumePeakmeter.GetMute() = 1 ) Then{%Graph.SetPixel(197,2,1)%Graph.SetPixel(196,3,1)%Graph.SetPixel(194,4,1)%Graph.SetPixel(193,5,1)%Graph.SetPixel(191,6,1)%Graph.SetPixel(190,7,1)} Else{%Graph.SetPixel(197,2,0)%Graph.SetPixel(196,3,0)%Graph.SetPixel(194,4,0)%Graph.SetPixel(193,5,0)%Graph.SetPixel(191,6,0)%Graph.SetPixel(190,7,0)}#EndGfxMode
//EndDef



AC3 Style VU Meter:

You will need: Plugins
You will need: LCDHype Plugins
Place the Aquero LCDHype plugin in the LCDHype plugins directory.Place the VU meter plugin in the LCDHype plugins directory.

Source code

 
1
2
3
4

ID=//ScreenDefTitle=AC3 StyleSpecCharFile=#Header%Graph.SetTextArea(0,0,256,64)%Graph.SetRefreshArea(0, 0, 256, 64)%Param.RenderMode(Full)%Common.SetPriority(100)%Graph.SetPixel(92,3,1)%Graph.SetPixel(92,4,1)%Graph.SetPixel(92,5,1)%Graph.SetPixel(92,6,1)%Graph.SetPixel(93,3,1)%Graph.SetPixel(93,6,1)%Graph.SetPixel(94,2,1)%Graph.SetPixel(94,7,1)%Graph.SetPixel(95,1,1)%Graph.SetPixel(95,2,1)%Graph.SetPixel(95,3,1)%Graph.SetPixel(95,4,1)%Graph.SetPixel(95,5,1)%Graph.SetPixel(95,6,1)%Graph.SetPixel(95,7,1)%Graph.SetPixel(95,8,1)#EndHeader
#GfxMode
%If( %System.Input(GetCode) = 8 )Then { %Common.ChangeScreen(0,Next) }%Graph.Font('Lucida Console', 5, 1)%Format.Bar(Vertical, 10, 51, 0, 500000, %Plugin.VolumePeakmeter.GetPeakChannel(1), 1, 0, 0, 1)/Left/%Format.Bar(Vertical, 10, 51, 0, 500000, %Plugin.VolumePeakmeter.GetPeakChannel(2), 1, 0, 10, 1)/Right//%Format.Bar(Vertical, 150, 5, 0, 50, %Plugin.VolumePeakmeter.GetVolumeStepInfo('Step'), 1, 0, 5, 37)//VolumeStep (51 Steps on my RTL Sound Chip)/%Format.Bar(Horizontal, 52, 6, 0, 1000000, %Plugin.VolumePeakmeter.GetVolumeMasterLevelScalar(), 1, 0, 100, 2)/VolumeLevelScalar/%Format.Bar(Vertical, 10, 51, 0, 500000, %Plugin.VolumePeakmeter.GetPeakChannel(5), 1, 0, 20, 1)/BackLeft/%Format.Bar(Vertical, 10, 51, 0, 500000, %Plugin.VolumePeakmeter.GetPeakChannel(6), 1, 0, 30, 1)/BackRight/%Format.Bar(Vertical, 10, 51, 0, 500000, %Plugin.VolumePeakmeter.GetPeakChannel(3), 1, 0, 40, 1)/Center/%Format.Bar(Vertical, 10, 51, 0, 500000, %Plugin.VolumePeakmeter.GetPeakChannel(4), 1, 0, 50, 1)/Sub/%Common.CreateNewLine(1,154,2)%Round(%Div(%Plugin.VolumePeakmeter.GetVolumeMasterLevelScalar(),10000))' %'%Common.CreateNewLine(1,104,10)'dB '%Trunc(%Div(%Plugin.VolumePeakmeter.GetVolumeMasterLevel(),1000000),4)%Common.CreateNewLine(1,88,28)%Graph.Font('Brush Script MT', 9, 1,)'DTS-HD 5.1 Surround'%Common.CreateNewLine(1,228,52)%Graph.Font('Stencil', 9, 1,)'THX'%Graph.Font('Lucida Console', 5, 1)%Common.CreateNewLine(1,2,54)'L'%Common.CreateNewLine(1,12,54)'R'%Common.CreateNewLine(1,21,54)'RL'%Common.CreateNewLine(1,31,54)'RR'%Common.CreateNewLine(1,42,54)'C'%Common.CreateNewLine(1,50,54)'SW'%Common.CreateNewLine(1,210,10)/'CPU '%System.CPU(Usage)' %'/%Common.CreateNewLine(1,212,1)%System.GetDateTime('mm/dd/yyyy')%If( %Plugin.VolumePeakmeter.GetMute() = 1 ) Then{%Graph.SetPixel(197,2,1)%Graph.SetPixel(196,3,1)%Graph.SetPixel(194,4,1)%Graph.SetPixel(193,5,1)%Graph.SetPixel(191,6,1)%Graph.SetPixel(190,7,1)} Else{%Graph.SetPixel(197,2,0)%Graph.SetPixel(196,3,0)%Graph.SetPixel(194,4,0)%Graph.SetPixel(193,5,0)%Graph.SetPixel(191,6,0)%Graph.SetPixel(190,7,0)}#EndGfxMode
//EndDef





Enjoy!!!

This post has been edited 9 times, last edit by "nightlust" (Jan 13th 2016, 1:43am)

----
Nightlust

GTXJackBauer

Full Member

Monday, January 11th 2016, 1:26pm

Wow, thank you for this. Could you possibly show us in images as well. That would be greatly appreciated.

nightlust

Junior Member

Monday, January 11th 2016, 3:06pm

Here is the Surround VU Meter:



I will post the other 2 when I get home tonight!

This post has been edited 1 times, last edit by "nightlust" (Jan 11th 2016, 3:07pm)

----
Nightlust

nightlust

Junior Member

Tuesday, January 12th 2016, 10:45pm

Screenshots added. (Post edited.)







This post has been edited 1 times, last edit by "nightlust" (Jan 12th 2016, 10:46pm)

----
Nightlust

Similar threads