jticket/irssi-autospeak
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Added Volume and Priority settings.

Browse Source
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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
autospeak.pl
View File

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