hello I need a tcl that bans user that invites via NOTICE

laynuks · Post by **laynuks** » Thu Jun 19, 2003 1:35 am

hello I need a tcl that bans user that invites when they notice the channel and the user's nickname for example

/notice #channel go to# channel please

and

/notice Nickname please join #channel

Thank You

LAYNUKS

Post by **caesar** » Thu Jun 19, 2003 1:46 am

For the channel notices:

Code: Select all

bind notc - * spam:notice

proc spam:notice {nick uhost hand text dest} {
  if {[lindex [split $dest "@"] 0] == $::botnick || [string index $dest 0]== "@"} {
    return
  }
  if {[string match "*#*" $text]} {
    set mask "*!*@[lindex [split $uhost @] 1]"
    newchanban $dest $mask Spam "\00224\002 hours ban for using channel notices within $dest" 1440
  }
}

As for the private notices, it's impossible to see if other users, just the notices that he (the eggdrop) recives. If you would like one for the notices sent to your bot just say so.

laynuks · Post by **laynuks** » Thu Jun 19, 2003 2:15 am

thanks caesar!

is there a way that I can add some notice ban words to the script like:

"*please join #*"
"*support #*"
"join channel USA"

Thank You

Post by **caesar** » Thu Jun 19, 2003 2:36 am

Won't this be more easier if he bans on a channel notice for any message?

laynuks · Post by **laynuks** » Thu Jun 19, 2003 2:37 am

Hi caesar I tried to load ru script and I got this error message:

[01:32] Tcl error in file 'Sapatos':
[01:32] invalid command name "\rtf1\ansi\ansicpg1252\deff0\deflang1033{\fonttbl{\f0\froman\fcharset0 Times New Roman;}{\f1\fswiss\fcharset0 Arial;}}
\viewkind4\uc1\pard\sb100\sa100\f0\fs24 bind notc - * spam:notice \line\line proc spam:notice \{nick uhost hand text dest\} \{ \line if \{[lindex [split $dest "@"] 0] == $::botnick || [string index $dest 0]== "@"\} \{ \line return \line\} \line if \{[string match "*#*" $text]\} \{ \line set mask "*!*@[lindex [split $uhost @] 1]" \line newchanban $dest $mask Spam "\\00224\\002 hours ban for using channel notices within $dest" 1440 \line\} \line\} \par
\pard\f1\fs20\par
"
while executing
"{\rtf1\ansi\ansicpg1252\deff0\deflang1033{\fonttbl{\f0\froman\fcharset0 Times New Roman;}{\f1\fswiss\fcharset0 Arial;}}
\
[01:32] * CONFIG FILE NOT LOADED (NOT FOUND, OR ERROR)

Hmm I wonder why I got that error

Post by **user** » Thu Jun 19, 2003 2:40 am

Why did you save it as rtf?

laynuks · Post by **laynuks** » Thu Jun 19, 2003 2:57 am

upps hehe I got to load correctly now

Thank You

Post by **caesar** » Thu Jun 19, 2003 3:02 am

Hahaha, that shure was funny.