[RmX78]

İyi Günler...
Reklam Kayıt Kodu İstek İsteyecektim.
Şöyle Açıklayım.
Mesela Botun Özeline !Reklam Nick Reklam Yazacam.
Botta Bunu Hemen reklam.txt kayıtlayacak.
ve #X Kanalınada X Nickli Kişi Reklam Bildirisi Yaptı Yazacak.
Kanala Daha Sonrada Oper Geldiğinde !ReklamList Yapacak Ve Reklamlar Kanala Yansıtılacak...
-
Diyecektiniz reklam.txt kayıt etmesinin ne anlamı var diye şöyle istiyorum.
ircde o anda oper bulunmaya bilir bu şekilde reklam yapanları kayıt altına alacak ve !reklamlist diyince reklam bildirisi yapanları #X Kanalına Listeleyecek.
----

Teşekkürler Şimdiden.

[Mudin]

Sürekli olarak bişeyleri istemek yerine neden kendiniz birşeyler yapmıyorsunuz? yapacağınız şeylerin en başında forumda bu konuyu aramak olurdu. Forum içeriğinde yüzlerce txt'ye kayıt,okutma vb. gibi şeyler mevcut. En azından forumda arayıp bulduğunuz kodları buraya yapıştırıp böyle birşey isteseydiniz bunları yazmak yerine yapmanız gerekenleri söyleyebilirdim.

Lütfen öncelikle forumda arama yapın , arama yapılmadan örnek kod gösterilmeden açılan konular bundan sonra tarafımca silinecektir.

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

[RmX78]

Zaten Örnek Bir Kod Bulabilseydim Yardıma İhtiyaç Duymadan Yapabilirdim.
Ne Yazık ki Kod Bulamadığım İçin Yardım İstedim.
Kusura Bakayım.Rahatsız Ettim Sizi Bir Daha Birşey İstemem...

[Paint]

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

on *:text:!reklam*:*:{
  set %bilgikanalı #X
  if (!$chan) && ($3) {
    if (!$read(reklam.txt,w,$nick $2 $3-)) {
      write reklam.txt $nick $2 $3-
      msg $nick Reklam bildiriniz alınmıştır.
      msg $nick İlginiz için teşekkürler.
      msg %bilgikanalı $reklamal($lines(reklam.txt))
    }
    else { msg $nick Bu reklam bildirisini önceden yaptınız. }
  }
  elseif $chan == %bilgikanalı {
    if $1 == !reklamlist {
      if !$lines(reklam.txt) { msg # Reklam dosyası boş. | return }
      var %r 1
      while %r <= $lines(reklam.txt) {
        msg # $reklamal(%r)
        inc %r
      }
    }
    elseif ($1- == !reklam temizle) { 
      $iif($isfile(reklam.txt),.timer 1 0 .remove reklam.txt $(|) msg # Reklam dosyası temizlendi.,msg # Reklam dosyası boş.)
    }
  }
}

alias reklamal return [REKLAM] Bildiri yapan: $gettok($read(reklam.txt,$1),1,32) Reklam yapan: $gettok($read(reklam.txt,$1),2,32) Reklam mesajı: $gettok($read(reklam.txt,$1),3-,32)

Komutlar:
Özelde: !reklam <Reklam yapan> <Reklam mesajı>

Belirtilen kanalda: !reklamlist, !reklam temizle

Not: Kodun çalışması için, ikinci satırdaki kanal adını(kırmızı renkte) kendinize göre düzenleyin.

[RmX78]

Sağol Paint...

[house]

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

Sürekli olarak bişeyleri istemek yerine neden kendiniz birşeyler yapmıyorsunuz? yapacağınız şeylerin en başında forumda bu konuyu aramak olurdu. Forum içeriğinde yüzlerce txt'ye kayıt,okutma vb. gibi şeyler mevcut. En azından forumda arayıp bulduğunuz kodları buraya yapıştırıp böyle birşey isteseydiniz bunları yazmak yerine yapmanız gerekenleri söyleyebilirdim. Lütfen öncelikle forumda arama yapın , arama yapılmadan örnek kod gösterilmeden açılan konular bundan sonra tarafımca silinecektir. [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Senden önce birileri de "örnek kod yazmayın yapılırsa zaten yapar veririz" diye yazmıştı, tezat burda. Ayrıca bişeyler istemiceksek bu başlık neden var? Kaldırın gitsin.

iLviiR e katılıyorum

imza: Herkes aLim olsaydı Dünyada Cahil oLmazdı.

[Cpu]

Mudin aynen eğer yapabilseydik ne buraya gelir nede konu başlıkları açardık bu kadar senedir ircdeyim
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
ilk kez birisi böyle birşey söyledi web sitesi edilse anlarım kodlar felan kolaydır orada biraz daha ama script ve kodlar baya karışık