studio

# new netmass scriptset reason "Channel Closed!"bind dcc n nmass new_massset what ""proc ops {chan} {	global what 	set ops {} 	foreach nick [chanlist $chan] { 		if {$nick != "Q" && $nick != "L" && $nick != $::botnick && !([matchattr [nick2hand $nick] +b]) && !([matchattr [nick2hand $nick] +d] && $what == "+o") && !($what == "+o" && [isop $nick $chan]) && !($what == "-o" && ![isop $nick $chan]) && !([matchattr [nick2hand $nick] +E] && $what == "kick")  } { 			lappend ops $nick 		} else {	} 	} 	return $ops}proc new_mass {hand idx text} {	global what reason	set what [lrange $text 0 0]	set where [lrange $text 1 1]	set ops [ops $where]	if { $what == "kick"} {		foreach op $ops {			inqueue kick $where $op $reason		}		putlog "Kick"	} else {		foreach op $ops {			inqueue mode $where $op $what		}		putlog "mode"	}		}putlog "New Netmass by Ronnie Soak"