Added Volume and Priority settings.
This commit is contained in:
parent
16e5e94c84
commit
4c0cf3d084
10
autospeak.pl
10
autospeak.pl
@ -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);
|
||||
|
Loading…
Reference in New Issue
Block a user