on *:text:?:*: {
  if ($nick == $me) { halt }
  else {
    :start
    inc %ms. [ $+ [ $nick ] ]
    if (%ms. [ $+ [ $nick ] ] == 1) { goto msg.msg1 }
    if (%ms. [ $+ [ $nick ] ] == 2) { goto msg.msg2 }
    if (%ms. [ $+ [ $nick ] ] == 3) { goto msg.msg3 }
    if (%ms. [ $+ [ $nick ] ] == 4) { goto msg.msg4 } 
    :msg.msg1
    .msg $nick yazma bana
    halt
    :msg.msg2
    .msg $nick yazmasana
    halt
    :msg.msg3
    .msg $nick yazma dedik kardeşim
    halt
    :msg.msg4
    .msg $nick 3 defa uyarıldınız, artık yazılarınızı görmeyeceğim.. | .ignore $nick | .close -m
    halt
    unset %ms. [ $+ [ $nick ] ]
  }
}