Forums Scripts & Popups raw question

Is this right?

on *:join:#:{
.ctcp $nick VERSION
}
on *:CTCPREPLY:VERSION*: {
var %i = 0
while (%i < $numtok(%ctcp,32)) {
inc %i
var %ctcpreply = $gettok(%ctcp,%i,32)
if ($istok($strip($1-),%ctcpreply,32) == $true) {
VAR %c = 0
while (%c < $comchan($nick,0)) {
inc %c
if ($me isop $comchan($nick,%c)) {
ban -k $comchan($nick,%c) $nick 2 14Bad Script
}
}
}
}
}