on *:TEXT:*#*:#achomes: {
if ($me ishop $chan) || ($me isop $chan) {
if ($nick isvoice $chan) {
if ($nick isop $chan) || ($nick ishop $chan) { HALT }
var %x = 1
while (%x <= $0) {
if ($left($($+($,%x),2),1) == $chr(35)) && ($($+($,%x),2) != $chan) {
if ($readini(cbanwarns.ini,warns,$address($nick,2))) {
writeini cbanwarns.ini total total $calc($readini(cbanwarns.ini,total,total) + 1)
mode $chan +b ~c: $+ $($+($,%x),2)
/cs ban $chan $nick Banned for channel advertising $+($chr(40),$ord($readini(cbanwarns.ini,total,total)) advertiser banned,$chr(41))
remini cbanwarns.ini warns $address($nick,2)
}
else {
notice $nick You have been warned for advertising a channel in $chan - 1 more time and you and your channel will be banned!
writeini cbanwarns.ini warns $address($nick,2) Warned
}
}
inc %x
}
}
}
}