on @*:text:!warn*:#cdrsc:{
  if ($nick !isop $chan) halt
  if ($2 ison $chan) {
    inc $+(%,warn,.,$2)
    if ($($+(%,warn,.,$2),2) >= 3) {
      .kick $chan $2 You have been warned many times.
      unset $+(%,warn,.,$2)
    }
    else msg $chan $2 $+ , You have been warned by $nick for: $3- $+([,$($+(%,warn,.,$2),2),/,3,$chr(32),times])
  }
  else msg $chan $2 is not in the channel.
}