on $*:TEXT:/^!floodprotect (on|off)/Si:#: { $iif($2 == on, var %fp mode $chan +f, var %fp mode $chan -f)
  if ($me isop $chan) { %fp [4j#i4,5k,5m#M,3n#N3,4t#b]:4 }
  else { notice $nick I cannot set mode +f because I am not opped.
/notice $nick To set flood protection manually, type $h(/ $+ %fp [4j#i4,5k,5m#M,3n#N3,4t#b]:4) } }