storm/irssi-sound
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Added a sound for quits

Browse Source
This commit is contained in:
Jeremiah Ticket 2016-08-24 12:28:55 -08:00
parent 5f8092a52e
commit e05f6f502d
1 changed files with 7 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
sound.pl
View File

@ -6,7 +6,7 @@ $VERSION = '0.0.3';
%IRSSI = ( %IRSSI = (
authors => 'Chrelad', authors => 'Chrelad',
contact => 'blah@blah.blah', contact => 'blah@blah.blah',
name => 'alert', name => 'sound',
description => 'Play sounds for different events in IRSSI.', description => 'Play sounds for different events in IRSSI.',
url => 'http://google.com', url => 'http://google.com',
license => 'GNU General Public License', license => 'GNU General Public License',
@ -35,6 +35,11 @@ sub part_msg {
system("play -qnV0 synth tri 1800 tri 1500 delay 0 .12 fade h 0 .2 remix - &> /dev/null&"); system("play -qnV0 synth tri 1800 tri 1500 delay 0 .12 fade h 0 .2 remix - &> /dev/null&");
} }
sub quit_msg {
my ($server,$msg,$nick,$address,$target) = @_;
system("play -qnV0 synth tri 1000 tri 800 delay 0 .12 fade h 0 .2 remix - &. /dev/null&")
}
sub pub_msg { sub pub_msg {
my ($server,$msg,$nick,$address,$target) = @_; my ($server,$msg,$nick,$address,$target) = @_;
system("play -qn -V0 synth 0.09 tri E3:B3 &"); system("play -qn -V0 synth 0.09 tri E3:B3 &");
@ -66,7 +71,6 @@ Irssi::signal_add("beep", "nick_msg");Irssi::signal_add_last("message public", "
Irssi::signal_add_last("message private", "pri_msg"); Irssi::signal_add_last("message private", "pri_msg");
Irssi::signal_add_last("message hilight", "nick_msg"); Irssi::signal_add_last("message hilight", "nick_msg");
Irssi::signal_add("event join", 'join_msg'); Irssi::signal_add("event join", 'join_msg');
# Irssi::signal_add("event quit", 'on_quit'); Irssi::signal_add("event quit", 'quit_msg');
Irssi::signal_add("event part", 'part_msg'); Irssi::signal_add("event part", 'part_msg');
#- end #- end