Unnamed

alias chancheck { if ($nick($1,0) <  7) { part $1 Channel does not meet required user minimun of 5 } }

on *:part:#: { /chancheck $chan }
on *:quit: { var %z = 1 | while ($comchan($nick,%z)} { chancheck $v1 | inc %z } }