This one is mine
on $@*:TEXT:/^([+-]m)$/S:#: { if (!%flood && $nick(#,$nick,oh)) { inc -u5 %flood mode # $regml(1) } }
And napa182 teaches good :D I'm also a n00b