egghelp/eggheads community

Write msg from notice

2009-02-23T07:51:47-04:00

@speechles, yeah right

Code:

# Author: tomekk# e-mail:  tomekk/@/oswiecim/./eu/./org# home page: http://tomekk.oswiecim.eu.org/## Version 0.1## This file is Copyrighted under the GNU Public License.# http://www.gnu.org/copyleft/gpl.html# output channelsset output_chans {#channel1 #channel2}# user host:# *user@*.host.com,# user@some.host.com# user@some.*.com# *@some.host.comset user_host "user@some.host.com"#################################################bind notc - * notc_procproc notc_proc { nick uhost hand arg {dest ""}} {global output_chans user_host botnickif {$dest == ""} {set dest $botnick}if {$dest == $botnick} {if {[string match $user_host $uhost]} {       foreach nchan [split $output_chans] {if {$nchan != ""} {if {[botonchan $nchan]} {putquick "PRIVMSG $nchan :$arg"}}}}}}putlog "simple-notice.tcl ver 0.1 by tomekk loaded"

@Robertus
You have to decrypt it or something.

Statistics: Posted by tomekk — Mon Feb 23, 2009 7:51 am

Write msg from notice

2009-02-22T15:18:27-04:00

nice it works, but i use blowfish and when bot write in channel, it write crypted

Statistics: Posted by Robertus — Sun Feb 22, 2009 3:18 pm

Write msg from notice

2009-02-22T14:40:22-04:00

You don't check if the notice is sent to a channel or the bot. So anyone matching the host will have their notice relayed by the bot even in a channel notice. A channel notice by that user, in another channel will be sent to the output_chans which might not be wanted. You may want to add a check against $dest ( [string index $dest 0] == # ) to detect if it's to a channel or to the bot.

Statistics: Posted by speechles — Sun Feb 22, 2009 2:40 pm

Write msg from notice

2009-02-22T08:44:54-04:00

try:

Code:

# Author: tomekk# e-mail:  tomekk/@/oswiecim/./eu/./org# home page: http://tomekk.oswiecim.eu.org/## Version 0.1## This file is Copyrighted under the GNU Public License.# http://www.gnu.org/copyleft/gpl.html# output channelsset output_chans {#channel1 #channel2}# user host:# *user@*.host.com,# user@some.host.com# user@some.*.com# *@some.host.comset user_host "user@some.host.com"#################################################bind notc - * notc_procproc notc_proc { nick uhost hand arg {dest ""}} {global output_chans user_hostif {[string match $user_host $uhost]} {       foreach nchan [split $output_chans] {if {$nchan != ""} {if {[botonchan $nchan]} {putquick "PRIVMSG $nchan :$arg"}}}}}putlog "simple-notice.tcl ver 0.1 by tomekk loaded"

Is this enough for you?

Statistics: Posted by tomekk — Sun Feb 22, 2009 8:44 am

Write msg from notice

2009-02-21T14:03:36-04:00

hi everybody

i have a little problem, i want a simple tcl that write a message from a notice of a particular user with particular host.

example:

/notice mybot TEST1

on irc:

TEST1

thanks in advance to all

Statistics: Posted by Robertus — Sat Feb 21, 2009 2:03 pm