Files
squeezelite-esp32/plugin/SqueezeESP32/Graphics.pm
2020-01-13 22:13:44 -08:00

66 lines
1.2 KiB
Perl

package Plugins::SqueezeESP32::Graphics;
use strict;
use base qw(Slim::Display::Squeezebox2);
my $VISUALIZER_NONE = 0;
my @modes = (
# mode 0
{ desc => ['BLANK'],
bar => 0, secs => 0, width => 128,
params => [$VISUALIZER_NONE] },
# mode 1
{ desc => ['PROGRESS_BAR'],
bar => 1, secs => 0, width => 128,
params => [$VISUALIZER_NONE] },
# mode 2
{ desc => ['ELAPSED'],
bar => 0, secs => 1, width => 128,
params => [$VISUALIZER_NONE] },
# mode 3
{ desc => ['ELAPSED', 'AND', 'PROGRESS_BAR'],
bar => 1, secs => 1, width => 128,
params => [$VISUALIZER_NONE] },
# mode 4
{ desc => ['REMAINING'],
bar => 0, secs => -1, width => 128,
params => [$VISUALIZER_NONE] },
# mode 5
{ desc => ['CLOCK'],
bar => 0, secs => 0, width => 128, clock => 1,
params => [$VISUALIZER_NONE] },
# mode 6
{ desc => ['SETUP_SHOWBUFFERFULLNESS'],
bar => 0, secs => 0, width => 128, fullness => 1,
params => [$VISUALIZER_NONE] },
);
sub modes {
return \@modes;
}
sub nmodes {
return $#modes;
}
=comment
sub bytesPerColumn {
return 4;
}
=cut
sub displayHeight {
return 32;
}
sub displayWidth {
return shift->widthOverride(@_) || 128;
}
sub vfdmodel {
return 'graphic-128x32';
}
1;