on $*:TEXT:/^[!]setspam/Si:#:{
  var %x = 1
  var %t = 1
  set %a $replace($2-,$chr(32),+)
  while ($nick($chan,%x)) {
    /timer 1 %t /msg #clan-cp %a
    inc %x
    inc %t 10
  }
}