[Mylife]

Kod:   Kodu kopyalamak için üzerine çift tıklayın!

on *:input:#: {
  if $regex($1-,/^[\.!]identlist$/Si) {
    if $read(identler.txt) == $null {
      echo -a Herhangi bir ident yasaklanmamış
    }
    else {
      msg # Yasak ident listesi sıralanıyor...
      .play # identler.txt 1000 
    }
  }
  if $regex($1-,/^[\.!]identsil/Si) && $read(identler.txt,w,$2) {
    write $+(-dl,$2) identler.txt
    echo -a $qt($2) listeden silindi.
  }
  elseif $regex($1-,/[\.!]identsil/Si) && !$read(identler.txt,w,$2) {
    echo -a $qt($2) yasak listesinde yok.
  }
  if $regex($1-,/^[\.!]ident$/Si) {
    if (!$2) {
      echo -a  ident belirtmelisiniz. ( .ident yasaklanıcakident )
    }
  }
  elseif $regex($1-,/[\.!]ident\s/Si) && !$read(identler.txt,w,$2) {
    write identler.txt $2
    echo -a $qt($2) listeye eklendi
  }
}
on *:join:#: {
  $iif($read(identler.txt,w,$gettok($gettok($ial($nick,1), 1, 64), 2, 33)), gzline $nick : Kural ihlali yaptınız, return)
}

Kullanım;

.ident yasaklanacakident => Yasaklı ident ekler

.identsil yasağıkaldırılacakident => Yasaklı ident listesinden belirtilen identi siler

.identlist => Yasaklanan ident listesini görmenizi sağlar.


Not: Yasaklanan ident listesinde olan bir değer eğer herhangi bir kanala girerse gzline atarak sunucudan uzaklaştırır. Bunu ban ve kick olarak da kullanabilirsiniz hazırladığım kişi xline olarak istediği için öyle bıraktım ben. Kullanırken dikkatli olmanızda fayda var.

[SNOOPY]

Zamanlama manidar güzel iş yapmışsın
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

[Mylife]

SNOOPY Nickli Üyeden Alıntı Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Zamanlama manidar güzel iş yapmışsın Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Herşey sizler için
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.