alias c1 { return $+(,$1-) }
alias c2 { return $+(,$1-) }
alias c3 { return $+(,$1-) }
alias -l Allowlist { return #prayer #BoomBot}
alias -l Moreusers { return 3 }
alias -l Notopicchans { return }
alias -l Leavemsg { return Sorry, I Require At Least 3 Users To Be In Any Channel, Unless Its On The Exeptions List. You don't have the sufficent number, please try again when you get the right amount.. }
on *:kick:#: {
if ($knick == $me) {
inc $+(%,kick.,$chan)
if ($($+(%,kick.,$chan),2) > 4) {
/writeini black.ini bans $chan banned
unset $+(%,kick.,$chan)
}
}
}
on me:*:join:#: {
if $ini(black.ini,bans,$chan) {
part $chan $c1 This channel has Been blacklisted To have this removed please contact $c2 ukbadboy in the channel #BoomBot.
}
if ($istok($Notopicchans,$Chan,32)) { HALT }
if ($($+(%,kick.,$chan),2)) var %left = $+($calc(5 - $v1),/5)
else var %left = 5/5
msg $chan $c1 [WARNING] This is the betabot. If i am kicked $c2 5 $c1 Times this channel will be blacklisted. $c2 %left kicks left . To make me part: ~LEAVE $me.
if ($istok($Allowlist,$Chan,32)) { HALT }
else {
.timer 1 5 PplCheck $Chan
}
}
alias -l PplCheck {
if ($nick($1,0) < $moreusers ) {
part $1 $leavemsg
}
else { HALT }
}
on *:!PART:#:{
if ($istok($allowlist,$Chan,32)) { HALT }
if ($nick != $me) && ($nick(#,0) <= $Moreusers) {
part $chan $leavemsg
}
}