Added Volume and Priority settings.

This commit is contained in:
Jeremiah Ticket 2023-10-08 06:28:47 -06:00
parent 16e5e94c84
commit 4c0cf3d084
1 changed files with 8 additions and 2 deletions

View File

@ -43,18 +43,22 @@ sub speak_message {
$summary = decode(ENCODING, $summary);
$body = decode(ENCODING, $body);
my $SpeechRate = Irssi::settings_get_int("speech_rate");
my $SpeechVolume = Irssi::settings_get_int("speech_volume");
my $SpeechVoice = Irssi::settings_get_str("speech_voice");
my $SpeechModule = Irssi::settings_get_str("speech_module");
my $SpeechPriority = Irssi::settings_get_str("speech_priority");
# Speak The Message
my @spd = ("spd-say",
"-P",
"message",
$SpeechPriority,
"-o",
$SpeechModule,
"-y",
$SpeechVoice,
"-r",
$SpeechRate,
"-i",
$SpeechVolume,
"$summary $body");
system(@spd);
}
@ -200,9 +204,11 @@ sub dcc_chat_message {
}
# Register configuration options:
Irssi::settings_add_int("autospeak", "speech_rate", 50);
Irssi::settings_add_int("autospeak", "speech_rate", 0);
Irssi::settings_add_int("autospeak", "speech_volume", 0);
Irssi::settings_add_str("autospeak", "speech_voice", "en-us");
Irssi::settings_add_str("autospeak", "speech_module", "espeak-ng");
Irssi::settings_add_str("autospeak", "speech_priority", "text");
Irssi::settings_add_bool('autospeak', 'speak_private_messages', 1);
Irssi::settings_add_bool('autospeak', 'speak_public_messages', 1);
Irssi::settings_add_bool('autospeak', 'speak_all_public_messages', 0);