spambot script help

[opsb]

Code: Select all

bind msgm -|- *http* spampvt
bind msgm -|- *irc.* spampvt
bind msgm -|- *#* spampvt
bind msgm -|- *kanal* spampvt
bind msgm -|- *soba* spampvt
bind msgm -|- *sobu* spampvt
bind msgm -|- *www* spampvt
bind notc -|- *http* spamnot
bind notc -|- *irc.* spamnot
bind notc -|- *#* spamnot
bind notc -|- *kanal* spamnot
bind notc -|- *soba* spamnot
bind notc -|- *sobu* spamnot
bind notc -|- *www* spamnot

proc spampvt { nick uhost handle arg } {
	putserv "PRIVMSG #chan :¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤";
	putserv "PRIVMSG #chan :SpamDetected - Nick \2$nick\2 - Adresa \2$uhost\2 - Type: \2PRIVMSG\2";
	putserv "PRIVMSG #chan :SpamText - $arg";
	putserv "PRIVMSG #chan :¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤";
}

proc spamnot { nick uhost handle target arg } {
	putserv "PRIVMSG #chan :¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤";
	putserv "PRIVMSG #chan :SpamDetected - Nick \2$nick\2 - Adresa \2$uhost\2 - Type: \2PRIVNOTC\2";
	putserv "PRIVMSG #chan :SpamText - $target";
	putserv "PRIVMSG #chan :¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤";
}

- Can someone please add me option like this if a some user use /invite on my bot nick..

- And make it that not monitoring to #chan if user who spaming is on channel #chan

- Make it so don't spam for users such as ChanServ, MemoServ, NickServ.. and someother nick, which I can add

Regards

[Alchera]

The Tcl Archive is FULL of these types of scripts. Search it an be happy.