diff --git a/plugin/SqueezeESP32.zip b/plugin/SqueezeESP32.zip index 6f4d6791..f251d2a2 100644 Binary files a/plugin/SqueezeESP32.zip and b/plugin/SqueezeESP32.zip differ diff --git a/plugin/SqueezeESP32/Player.pm b/plugin/SqueezeESP32/Player.pm index 2e0b903d..0fd20681 100644 --- a/plugin/SqueezeESP32/Player.pm +++ b/plugin/SqueezeESP32/Player.pm @@ -13,6 +13,19 @@ my $sprefs = preferences('server'); my $prefs = preferences('plugin.squeezeesp32'); my $log = logger('plugin.squeezeesp32'); +{ + __PACKAGE__->mk_accessor('rw', 'tone_update'); +} + +sub new { + my $class = shift; + my $client = $class->SUPER::new(@_); + $client->init_accessor( + tone_update => 0, + ); + return $client; +} + our $defaultPrefs = { 'analogOutMode' => 0, 'bass' => 0, @@ -54,6 +67,9 @@ sub init { my $client = shift; if (!$handlersAdded) { + + $sprefs->setChange( \&change_tone, 'bass'); + $sprefs->setChange( \&change_tone, 'treble'); # Add a handler for line-in/out status changes Slim::Networking::Slimproto::addHandler( LIOS => \&lineInOutStatus ); @@ -116,26 +132,48 @@ sub playerSettingsFrame { $client->SUPER::playerSettingsFrame($data_ref); } -sub bass { - return tone(2, @_); -} +sub change_tone { + my ($type, $new, $client, $old) = @_; + return $client->$type($new) unless $client->isa('Plugins::SqueezeESP32::Player') && !$client->tone_update; -sub treble { - return tone(8, @_); + my ($c, $minValue, $maxValue); + my $equalizer = $prefs->client($client)->get('equalizer'); + + if ($type eq 'bass') { + $c = 2; + $minValue = minBass; + $maxValue = maxBass; + } else { + $c = 8; + $minValue = minTreble; + $maxValue = maxTreble; + } + + $new = $minValue if $new < $minValue; + $new = $minValue if $new < $minValue; + + if ($old - $minValue) { + my $ratio = ($new - $minValue) / ($old - $minValue) - 1; + $equalizer->[$c-1] = min(int(($equalizer->[$c-1] - $minValue) * (1 + 0.2 * $ratio) + 0.5 + $minValue), $maxValue); + $equalizer->[$c] = min(int(($equalizer->[$c] - $minValue) * (1 + 0.7 * $ratio) + 0.5 + $minValue), $maxValue); + $equalizer->[$c+1] = min(int(($equalizer->[$c+1] - $minValue) * (1 + 0.1 * $ratio) + 0.5 + $minValue), $maxValue); + } else { + $equalizer->[$c-1] = int($new * 0.2 + 0.5); + $equalizer->[$c] = int($new * 0.7 + 0.5); + $equalizer->[$c+1] = int($new * 0.1 + 0.5); + } + + $prefs->client($client)->set('equalizer', $equalizer); + $sprefs->client($client)->set($type, $new); } -sub tone { - my ($center, $client, $value) = @_; - my $equalizer = $prefs->client($client)->get('equalizer'); - - if (defined($value)) { - $equalizer->[$center-1] = int($value * 0.2 + 0.5); - $equalizer->[$center] = int($value * 0.7 + 0.5); - $equalizer->[$center+1] = int($value * 0.1 + 0.5); - $prefs->client($client)->set('equalizer', $equalizer); - } +sub update_tones { + my ($client, $equalizer) = @_; - return int($equalizer->[$center-1] * 0.2 + $equalizer->[$center] * 0.7 + $equalizer->[$center+1] * 0.1); + $client->tone_update(1); + $sprefs->client($client)->set('bass', int($equalizer->[1]*0.2 + $equalizer->[2]*0.7 + $equalizer->[3]*0.1 + 0.5)); + $sprefs->client($client)->set('treble', int($equalizer->[7]*0.2 + $equalizer->[8]*0.7 + $equalizer->[9]*0.1 + 0.5)); + $client->tone_update(0); } sub update_artwork { diff --git a/plugin/SqueezeESP32/PlayerSettings.pm b/plugin/SqueezeESP32/PlayerSettings.pm index 4f0af9cf..d4a4e2d6 100644 --- a/plugin/SqueezeESP32/PlayerSettings.pm +++ b/plugin/SqueezeESP32/PlayerSettings.pm @@ -73,6 +73,7 @@ sub handler { $equalizer->[$i] = $paramRef->{"pref_equalizer.$i"} || 0; } $cprefs->set('equalizer', $equalizer); + $client->update_tones($equalizer); } if ($client->displayWidth) { diff --git a/plugin/SqueezeESP32/install.xml b/plugin/SqueezeESP32/install.xml index d422c209..999b3d54 100644 --- a/plugin/SqueezeESP32/install.xml +++ b/plugin/SqueezeESP32/install.xml @@ -10,6 +10,6 @@ PLUGIN_SQUEEZEESP32 PLUGIN_SQUEEZEESP32_DESC Plugins::SqueezeESP32::Plugin - 0.101 + 0.102 Philippe diff --git a/plugin/repo.xml b/plugin/repo.xml index a41c5f07..63f82785 100644 --- a/plugin/repo.xml +++ b/plugin/repo.xml @@ -1,10 +1,10 @@ - + https://github.com/sle118/squeezelite-esp32 Philippe - 49cb70db3a3d4359360332f1f49a845e2e4970b8 + f9c8fbc60812bed4e3989e6dfa3e99fb1a2869c3 philippe_44@outlook.com SqueezeESP32 additional player id (100) http://github.com/sle118/squeezelite-esp32/raw/master/plugin/SqueezeESP32.zip