Code:
 on @*:text;!warn &*:#:{
  inc $+(%,warn,.,$address)
  if $($+(%,warn,.,$address),2) < 3 {
    .msg $chan $nick have $($+(%,warn,.,$address),2) warning now after $calc(3 - $($+(%,warn,.,$address),2)) more warning(s) you will be kicked
  }
  elseif $($+(%,kick,.,$address),2) == 3 {
    .msg $chan 3rd of 3 warnings
    if $2 isin $chan {
      kick $chan $2
    }
  }
  elseif $($+(%,kick,.,$address),2) < 6 {
    .msg $chan $nick have $($+(%,warn,.,$address),2) warning now after $calc(3 - $($+(%,warn,.,$address),2)) more warning(s) you will be banned
  }
  elseif $($+(%,kick,.,$address),2) == 6 {
    .msg $chan 6 out of 6 warnings
    if $2 isin $chan {
      .ban -k $chan $2 $3-
    }
  }
}