<asiyürek> Bahhaat Nerdesin lahann phhheac gelemeyecegini bilsem bu kadar ben gelirdim yanına zurna
<erdem0412> Bahhaat Nerdesin lahann phhheac gelemeyecegini bilsem bu kadar ben gelirdim yanına zurna
<KORHAN> Bahhaat Nerdesin lahann phhheac gelemeyecegini bilsem bu kadar ben gelirdim yanına zurna
<aslan55> Bahhaat Nerdesin lahann phhheac gelemeyecegini bilsem bu kadar ben gelirdim yanına zurna
<busenaz> Bahhaat Nerdesin lahann phhheac gelemeyecegini bilsem bu kadar ben gelirdim yanına zurna
<dishekimi> Bahhaat Nerdesin lahann phhheac gelemeyecegini bilsem bu kadar ben gelirdim yanına zurna

;eğer metin sohbet kanalına yazılmışsa devam etsin
on !*:text:*:#sohbet: {
;yazan nick %nik veriablesinde yok ise niki %nik veriablesine kaydetsin ve devam etsin
  if ($nick != %nk) { set %nk $nick
;yazılan metin %k veriablesinde var ise renk kodlarından arındırıp komut uygulasın ve tekrar %k veriablesine alsın
    if (%k == $strip($1-)) { echo $chan ban | set %k $strip($1-) }
;eğer önceki metin şimdikiyle eşit değilse işlem yapmaz
  }
}

on !*:text:*:#sohbet: {

  if ($nick != %nk) { 
  set %nk $nick 
    if (%k == $strip($1-)) { 
    ban -k $chan $nick 
    }
  }
  .set %k $strip($1-)
}

on @*:text:*:#: {
  if $regex($strip($1-),/[[:print:]]/g) > 15 {
    set -eu5 % [ $+ [ $chan $+ [ $nick ] ] ] $md5($strip($1-))
    var %s = 1,%q = $var($chan $+ * $+ ,0) | while (%s <= %q) { if $var($chan $+ * ,%s).value == $md5($strip($1-)) { 
    if $var($chan $+ * ,%s) != $+(%,$chan,$nick) { ban -ku900 $chan $nick 2 Tekrar yasak $+($nick,!) } | inc %s } | break }
  }
}

[20:03] <jjpqSuHMTH> SeLam nbr?
[20:03] <AwNQwMnIo> SeLam nbr?
[20:03] <JrfLq> SeLam nbr?
[20:03] <jjpqSuHMTH> SeLam nbr?
[20:03] <AwNQwMnIo> SeLam nbr?
[20:03] <JrfLq> SeLam nbr?