Acil bakarmısınız arkadaşlar [IRC Reklam bot] - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

KivanC · 31 Mart 2012, 11:02

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

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

on 1:connect:$iif(!$timer(reklam),timerreklam 0 3600 reklam)
on *:text:*:#kanal:{
  if (.başla == $1) { $iif(!$timer(reklam),timerreklam 0 3600 reklam) }
  if (.reklamlar == $1) { if (!$read(reklam.txt)) { msg # Gösterilecek Reklam Metni Yok. } | else { msg # Reklam Metinleri Listeleniyor. | reklam # } }
  if (.Rekle == $1) { if $read(reklam.txt,w,$+(*,$2-,*)) { msg # Bu reklam Metni Zaten Var. } | else { msg # Yeni Reklam Metni Eklendi. |  write -il1 reklam.txt $2- } }
  if (.Rsil == $1) { if ($2 == all) { msg # Tüm Reklam Metinleri Silindi. | write -c reklam.txt | halt } | elseif !$read(reklam.txt,w,$+(*,$2-,*)) { msg # Bu reklam Metni Zaten Yok. } | else { msg # Reklam Metni Silindi  | .write -d reklam.txt $2- } }
}

alias reklam { $iif(!$1,play #kanal reklam.txt 1000,play $1 reklam.txt 1000) }

Öncelikle Reklam Metinlerini İstersen !rekle Komutuyla Ekle İstersen Manuel Olarak mirc Klasorunde reklam isminde metin belgesi oluşturup içine At.Sonradan <!rekle Metin> Şeklinde Eklediğin Reklamlar 1. Sıraya Eklenerek Gösterilecektir.
Reklamın Yapılacagı Kanal'ı Kırmızı Olan Yerden
Komutların Kullanılacagı Kanalıda Mavi Olan Yerden Değiştirebilirsin.

Kullanabileceğin Komutlar;
.başla : Reklam Gönderimini Başlatır.
.Reklamlar : Reklam Metinlerini Kanala Listeler.
.Rekle : .Rekle <Reklam Metni > Şeklinde Yeni Bir Reklam Metni Ekler.
.RSil : .Rsil <all> Tüm Reklam Metinlerini Siler. | .Rsil <Reklam Metni> Belirtilen Reklam Metnini Dosyadan Siler.

Hayırlı Cumalar.

.Reklamlar komut kısmı çalışmadı

SiLuet · 31 Mart 2012, 11:56

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

.Reklamlar komut kısmı çalışmadı

Önceki Eklediğin Kodları Kaldırıp Bunu ekle.

Sadece .Başla Yazdığında reklam.txt İçerisindeki Reklamları 2 dakika Arayla tek tek global atar.

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

on *:text:*:#kanal:{
  if (.başla == $1) { $iif(!$timer(reklam),.timerreklam $lines(reklam.txt) 120 reklam) }
  if (.reklamlar == $1) { if (!$read(reklam.txt)) { msg # Gösterilecek Reklam Metni Yok. } | else { msg # Reklam Metinleri Listeleniyor. | play # reklam.txt 1000 } }
  if (.Rekle == $1) { if $read(reklam.txt,w,$+(*,$2-,*)) { msg # Bu reklam Metni Zaten Var. } | else { msg # Yeni Reklam Metni Eklendi. |  write -il1 reklam.txt $2- } }
  if (.Rsil == $1) { if ($2 == all) { msg # Tüm Reklam Metinleri Silindi. | write -c reklam.txt | halt } | elseif !$read(reklam.txt,w,$+(*,$2-,*)) { msg # Bu reklam Metni Zaten Yok. } | else { msg # Reklam Metni Silindi  | .write -d reklam.txt $2- } }
}

alias reklam { inc %1. | .os global $read(reklam.txt,%1.) | if (%1. == $lines(reklam.txt)) unset %1. }

KivanC · 31 Mart 2012, 12:39

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

Önceki Eklediğin Kodları Kaldırıp Bunu ekle.

Sadece .Başla Yazdığında reklam.txt İçerisindeki Reklamları 2 dakika Arayla tek tek global atar.

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

on *:text:*:#kanal:{
  if (.başla == $1) { $iif(!$timer(reklam),.timerreklam $lines(reklam.txt) 120 reklam) }
  if (.reklamlar == $1) { if (!$read(reklam.txt)) { msg # Gösterilecek Reklam Metni Yok. } | else { msg # Reklam Metinleri Listeleniyor. | play # reklam.txt 1000 } }
  if (.Rekle == $1) { if $read(reklam.txt,w,$+(*,$2-,*)) { msg # Bu reklam Metni Zaten Var. } | else { msg # Yeni Reklam Metni Eklendi. |  write -il1 reklam.txt $2- } }
  if (.Rsil == $1) { if ($2 == all) { msg # Tüm Reklam Metinleri Silindi. | write -c reklam.txt | halt } | elseif !$read(reklam.txt,w,$+(*,$2-,*)) { msg # Bu reklam Metni Zaten Yok. } | else { msg # Reklam Metni Silindi  | .write -d reklam.txt $2- } }
}

alias reklam { inc %1. | .os global $read(reklam.txt,%1.) | if (%1. == $lines(reklam.txt)) unset %1. }

os Global işlevi olmadı yani atmıyor dilerseniz " AMSG " Yada tüm sunucudaki kullanıcılara atalım.

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
IRCServices Toplam Online Süresi Sorunu Acil Bakarmısınız Arkadaşlar.	yiLmaz691	IRCServices	1	07 Ocak 2011 18:33
Arkadaşlar Bi bakarmısınız ?	Spy	Google	12	16 Ocak 2010 22:02
Arkadaşlar bakarmısınız anlamadım?	Xadd1	Eggdrop, NeoStats, BNC	0	19 Ocak 2009 19:57
Bi bakarmısınız arkadaşlar	Xadd1	Eggdrop, NeoStats, BNC	3	24 Aralık 2008 19:30
arkadaşlar acil bakarmısınız:(	KnOuCK	Eggdrop, NeoStats, BNC	10	07 Eylül 2007 00:00

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)

Etiketlenen Kullanıcılar
Etiketlemek istediğiniz kullanıcılar arasına virgül koyunuz. Örnek: nokta,sukunet,NucLear

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.