70
|
1 ##########################################################################
|
0
|
2 # Niinuska Help
|
70
|
3 ##########################################################################
|
42
|
4 set nn_message "Niinuska Help v0.2 by ccr/TNSP"
|
0
|
5 set nn_preferredmsg "PRIVMSG"
|
|
6
|
|
7 putlog "$nn_message"
|
|
8 bind pub - !help nn_pubmsg
|
|
9 bind pub - !apua nn_pubmsg
|
|
10
|
70
|
11 # ------------------------------------------------------------------------
|
0
|
12 proc nn_smsg {udest umsg} {
|
|
13 global nn_preferredmsg
|
|
14
|
|
15 putserv "$nn_preferredmsg $udest :$umsg"
|
|
16 }
|
|
17
|
|
18
|
70
|
19 # ------------------------------------------------------------------------
|
42
|
20 proc nn_pubmsg {unick uhost uhand uchan uargs} {
|
94
|
21 nn_smsg $uchan "Lisätietoja Niinuskan toiminnoista: \002http://tnsp.org/irc/\002 ja \002http://tnsp.org/irc/readme.php\002"
|
0
|
22 return 1
|
|
23 }
|
|
24
|
70
|
25 # ------------------------------------------------------------------------
|