on *:start: {
hmake Bad 10
if ($exists(Bad.txt)) hload Bad Bad.txt
}
on *:TEXT:*:#: {
if (!adbt == $1) && ($nick isop $chan) {
hadd -m Bad Text $addtok($hget(Bad,Text),$2-,32)
msg $nick $2- Added To Text Table Boss
hsave -o Bad Bad.txt
}
}
on ^*:TEXT:*:*: {
var %r = 1
while (%r <= $calc($count($1-,$chr(32)) +1)) {
if ($istok($hget(Bad,Text),[ $eval($+($chr(36),%r),2) ],32)) && ($nick != $me) {
access # add deny $ial($nick,1).addr 15 : Bad Word
kick $chan $nick Please Dont Use That Word Here (15 Minute ban.)
halt
}
inc %r
}
}