; Copy the following code into your remotes (Alt+R)
; Tye @ Undernet #Test-IRC
on @*:TEXT:*:#: {
; The list of Urls/emails. Items should be separated by commas
var %swears = www,www.,http,http:,http://,.com,.nl,.com,.net,.tk,eu,@hotmail,@live
; Number of times to warn before banning
var %warns = 2
var %x = $numtok(%swears,44)
tokenize 32 $strip($1-)
while (%x) && ($nick isreg $chan) {
if ($istok($1-,$gettok(%swears,%x,44),32)) {
inc $+(%,swear.,$wildsite)
var %n = $($+(%,swear.,$wildsite),2)
if (%n <= %warns) {
.msg $chan 4 $nick $+ , 14dit is waarschuwing nr:4 $(%n) 14om geen website URL's/Emailadressen in de room te typen, na.4 3 x14 volgt er een ban.) 3@ 12Room-Bot 3@
}
elseif (%n > %warns) {
ban -ku300 $chan $nick 2 14Je was gewaarschuwd4 $nick . 14Geen Website's/Emailadressen plaatsen in de room. 3@ 12Room-Bot 3@
unset $+(%,swear.,$wildsite)
}
}
dec %x
}
}
; Reset all of the swear data on mIRC start
on *:START: { unset %swear.* }