on 1:voice:#: {
  if ($vnick != $me) { halt }
  else { /echo -a 11,1 – 15,1 Dikkat! 11,1 –  11,1 – 0,1 # 15Kanalında $nick tarafından 0voice 15oldunuz. 11,1 –  | halt }
}

on 1:devoice:#: {
  if ($vnick != $me) { halt }
  else { /echo -a 11,1 – 15,1 Dikkat! 11,1 –  11,1 – 0,1 # 15Kanalında $nick tarafından 0devoice 15oldunuz. 11,1 –  | halt }
}

on 1:op:#: {
  if ($opnick != $me) { halt }
  else { /echo -a 11,1 – 15,1 Dikkat! 11,1 –  11,1 – 0,1 # 15Kanalında $nick tarafından 0op 15oldunuz. 11,1 –  | halt }
}

on 1:deop:#: {
  if ($opnick != $me) { halt }
  else { /echo -a 11,1 – 15,1 Dikkat! 11,1 –  11,1 – 0,1 # 15Kanalında $nick tarafından 0deop 15oldunuz. 11,1 –  | halt }
}

Popularity: 4% [?]

ON ^*:TEXT:*:*: {
  var %coco = 1
  var %metin = $strip($1-)
  if (%kelime = http://www.,.net,.com,a.k,köpek,piç,deneme/) {
    ;kelimeler örnek olarak eklendi bunları while yada hget ile de faklı biçimlerde kullanbilirsiniz.
    while $gettok(%kelime,%coco,44) {
      if ($v1 isin %metin) {
        var %metin = $replace(%metin,$v1,14*****)
        ;**** lı olan kısma alt+160 boş TAB karekterini kullanarak hiç bir yazı da görüntületmeyebilirsiniz. Tavsiye etmem. kişinin ne yazdıgı merak edilebilir
        inc %coco
      }
    }
  }
  if (***** isin %metin) {
    ;eger karakteri alt+160 ile ayarlarsanı yukarıdaki **** ları da aynı yapmalısınız.
    echo -tbf $iif($chan,$v1,$nick) $+(<,$nick,>) %metin
    ;$+(<,$nick,>) kısmını $+([,$nick,]) yukardaki örnekdeki gibi yapabilirsiniz.
    haltdef
  }
}

Popularity: 1% [?]

on ^1:SNOTICE:*:{
  if (exiting isin $1-) {
    if (!$window(@Giris/Cikis)) { window -en @Giris/Cikis }
    echo 4 -t @Giris/Cikis Çıkış : $1- | halt
  }
  if (Connecting isin $1-) {
    if (!$window(@Giris/Cikis)) { window -en @Giris/Cikis }
    echo 3 -t @Giris/Cikis Giriş : $1- | halt
  }
  halt
}
on ^1:HOTLINK:*.*.*:*:{
  if ( $active = #) { halt }
  else {
    if (@ isin $1) {
      $x:mircreal($1,2)
      return $1
    }
  }
  halt
}
on *:HOTLINK:*.*.*:*:{
  if ($active = #) { halt }
  else {
    if (@ isin $1) {
      $x:mircreal($1,1)
    }
  }
}

alias -l X:mircreal {
  if ($2 = 1 ) {
    var %q $mid($1,$pos($1,@),$len($1))
    var %x $calc($len(%q) – 1 )
    ;S:ban secenegi (Kline)
    .Kline $+(*,$left(%q,%x)) http://kurallar.mircreal.com
    echo 4:lined ip $+(*,$left(%q,%x))
  }
  if ($2 = 2 ) {
    var %q $mid($1,$pos($1,@),$len($1))
    var %x $calc($len(%q) – 1 )
    Titlebar: K:LINED EDILECEK! $+(*,$left(%q,%x))
  }
}

Popularity: 4% [?]

on @1:BAN:*:{
  if ( $nick == $me ) { halt }
  if ( $bnick == $me ) { goto banaction }
  if ( $banmask iswm $address($me,5)) { goto banaction }
  else { halt }
  :banaction
  mode $chan -o $nick
  ban $chan $nick 2 | kick $chan $nick 4Anti.Ban
  mode $chan -b $banmask
}

Kanalda sizi banlayanları +b alıp kicklersiniz.

Popularity: 1% [?]