IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

Konuyu birazcik daha anlatırmısın?

!adayekle Nick yaptığında bir odaya access ekleyecekmi? Yoksa Bilgimi ekleyecek?

!puan nick dediğinde neye göre puan verecek? kanaldaki konuşmasına göremi?

Yoksa puan'ı Belirtilen kişimi ekleyecek bunlarıda açıklarsan daha güzel olur, ayrıca tam olarak bunu neyde kullanacaksın. Eğer ki, şöyle bir sistem var daha önceden verilmiş(tim).

RC Sistemine göre Difuzyon'un yazdığı bir Code mevcut. Aşağıdaki gibi.

Kod:

on *:Text:*:#KANAL: {

  if $1 == !iptal && %rcsil { msg $chan İşlem iptal edildi. | unset %rcsil | return }

  if $1 == !devam && %rcsil { msg $chan [RCDepo/ $+ %rcsil $+ / $+ $nick $+ ] $2 nickine ait RC girdileri silinmiştir. | .remove RC/ $+ %rcsil $+ .txt | unset %rcsil }

  if $1 == !bilgi {

    if !$2 { 

      .msg $chan Kullanım şekli: 

      .msg $chan !bilgi list (RC bilgilerini Listeler)

      .msg $chan !bilgi ekle Nick mesajınız (Nick'e RC bilgisi ekler)

      .msg $chan !bilgi oku Nick (Nick'in RC bilgisini okur)

      .msg $chan !bilgi sil Nick (Nick'e ait RC dosyasını siler)

      return 

    }

    if $2 == list {

      if $findfile($mircdirrc,*.txt,0) == 0 {

        .msg $chan Hata! RC Deposu boş.

      }

      else {

        .msg $chan [RCDepo/ $+ $nick $+ ] - RC Deposu kontrol ediliyor..

        var %a = 1

        while $findfile($mircdirrc,*.txt,%a) {

          msg $chan  $+ $gettok($nopath($v1),1,46) $+  kayıtlı RC dosyası

          inc %a

        }

      }

    }

    if $2 == ekle {

      if !$exists(RC) { mkdir RC }

      .write RC/ $+ $3 $+ .txt [ $+ $date $+ - $+ $time $+ - $+ $3 $+ ] : $4- [Ekleyen: $nick ]

      .write RC/ $+ $3 $+ .txt -

      .msg $chan [RCDepo/ $+ $3 $+ / $+ $nick $+ ] $3 nickine RC geçilmiştir.

    }

    if $2 == oku {

      if !$file(RC/ $+ $3- $+ .txt) {

        .msg $chan  $+ $3 $+  kayıtlı bilgi girdisi bulunamadı.

      }

      else {

        .msg $chan [RCDepo/ $+ $nick $+ ] - $3- kayıtlı RC dosyası kontrol ediliyor..

        saydır $2-

      }

    }      

    if $2 == sil {

      if !$isfile(RC/ $+ $3- $+ .txt) {

        .msg $chan Hata! $2 kayıtlı RC dosyası bulunamadı.

      }

      else {

        .msg $chan UYARI! Bu komut ile $2 kaydına ait bütün girdileri silersiniz.

        .msg $chan Uygulamaya devam etmek istiyorsanız ; !Devam ,

        .msg $chan Uygulamayı iptal etmek istiyorsanız ; !iptal yazınız.

        .set -e %rcsil $3

      }

    }

  }

}

 

alias saydır {

  .timersaydır.* off

  var %s 1

  var %a 1

  while %s <= $lines(RC/ $+ $2- $+ .txt) {

    .timersaydır. $+ %s 1 %a msg $chan $read(RC/ $+ $2- $+ .txt,%s)

    inc %s

    inc %a 2

  }

}

Sadece belirli kişiler Kullansın diyorsan 1.satırın altına şunu ekliyorsun, çoğaltmak içinde seperatörleri kullanabilirsin.;

Kod:

if !$regex($nick,/(Csop|Admin|Nickler)/i) { return }

#kanal 'a !bilgi yazılması halinde listeleyecektir.

Kullanım şekli:
!bilgi list (RC bilgilerini Listeler)
!bilgi ekle Nick mesajınız (Nick'e RC bilgisi ekler)
!bilgi oku Nick (Nick'in RC bilgisini okur)
!bilgi sil Nick (Nick'e ait RC dosyasını siler)

+ilave : RC klasörü yoksa,klasör açması sağlandı.
+ilave : RC ekleyen nickde kayda geçirildi.Böylelikle "Kim Eklemiş?" bilinecek.

Kod Difuzyon tarafından daha önceden yapılmıştır. İşine yarayacağına inanıyorum İyi forumlar...