#Header /Priorität setzten/ %Common.SetPriority(50) #EndHeader #GfxMode /Grafische Anzeige löschen/ %CleanUp.ClearVRAM() /Schriftart/ %LCD.Gfx_SetFont('Verdana',8,1, Bold) /Zeile scrollen mit Tracknummer und Interpret und Titel/ /Textausgabe/ %Param.EnableScrolling(Horizontal,Ticker,1,96) %Inc(%WinAmp.TrackNo(), 1)'. '%WinAmp.RawTitle()' *** ' /neue Zeile/ %Common.CreateNewLine() /Equalizer/ /Equalizer zeichnen/ %WinAmp.SpecAnalyzer(FTT,PeakedBars,35,18,100,2,0.7,1,0,0,14) /Abfrage Status Zeit/ %LCD.Gfx_SetFont('Verdana', 9, 3, Bold) %Common.Compare(%WinAmp.TrackPos() < 60) Then { %Common.Compare(%WinAmp.TrackPos() < 10) Then { ' 00:0'%WinAmp.TrackPos() } Else { ' 00:'%WinAmp.TrackPos() } } Else { %Common.Compare(%Div(%WinAmp.TrackPos(), 60) < 10) Then { ' 0' } Else { ' ' } %Common.Compare(%Mod(%WinAmp.TrackPos(), 60) < 10) Then { %Trunc(%Div(%WinAmp.TrackPos(), 60)):0%Mod(%WinAmp.TrackPos(), 60) } Else { %Trunc(%Div(%WinAmp.TrackPos(), 60)):%Mod(%WinAmp.TrackPos(), 60) } } #EndGfxMode
Wyszukiwarka