resync command for Chanbot
Posted by Coag
Friday, May 27, 2005
Description: need some help with it
on *:TEXT:*:#: {
if ($1 == ?resync) {
var %x 1
while (%x <= $nick($chan,0,a)) {
if ($nick($chan,%x,a) isvoice $chan) && ($ulevel($chan,$nick($chan,%x,a)) <= 99) {
mode # -v $nick($chan,%x,a)
inc %x
}
elseif ($nick($chan,%x,a) isop $chan) && ($ulevel($chan,$nick($chan,%x,a)) <= 299) {
mode # -o $nick($chan,%x,a)
inc %x
}
elseif ($nick($chan,%x,a) !isvoice $chan) && ($ulevel($chan,$nick($chan,%x,a)) >= 100) {
mode # +v $nick($chan,%x,a)
inc %x
}
elseif ($nick($chan,%x,a) !isop $chan) && ($ulevel($chan,$nick($chan,%x,a)) >= 300) {
mode # +o $nick($chan,%x,a)
inc %x
}
}
}
}