Code: Select all
#Canal onde o bot ira avisar sobre SPAMs
set canal "#age_2_ops"
bind msgm -|- *www* malware
bind msgm -|- *http* malware
bind msgm -|- *xit* malware
bind msgm -|- *cheat* malware
proc malware {mad7684 mad8594 mad873 mad8954} {
global canal
putquick "PRIVMSG #age_2_ops :cbrr Nick: $mad7684 Host: 14$mad8594 Tipo de SPAM: 14Home Page Msg: 2$mad8954"
}
putlog "spam.tcl"
Code: Select all
(7) NOTC (stackable)
bind notc <flags> <mask> <proc>
procname <nick> <user@host> <handle> <text> <dest>
Description: dest will be a nickname (the bot's nickname,
obviously) or a channel name. mask is matched against the entire
notice and can contain wildcards. It is considered a breach of
protocol to respond to a /notice on IRC, so this is intended for
internal use (logging, etc.) only. Note that server notices do
| not trigger the NOTC bind. If the proc returns 1, Eggdrop will
| not log the message that triggered this bind.
New Tcl procs should be declared as
proc notcproc {nick uhost hand text {dest ""}} {
global botnick; if {$dest == ""} {set dest $botnick}
...
}
for compatibility.
Module: server
(15) CTCP (stackable)
bind ctcp <flags> <keyword> <proc>
proc-name <nick> <user@host> <handle> <dest> <keyword> <text>
Description: dest will be a nickname (the bot's nickname, obviously)
or channel name. keyword is the ctcp command (which can contain
wildcards), and text may be empty. If the proc returns 0, the bot
will attempt its own processing of the ctcp command.
Module: server