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

SiLuet · 20 Ocak 2012, 14:52

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.

sedar · 21 Ocak 2012, 02:11

Hocam eline sağlık güzel bi çalışma oldu

KivanC · 30 Mart 2012, 18:53

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.

Cok Güzel Bir Codlama peki .Başla dediğimizde Bot Tüm Sunucuya Reklam.txt 'inde Bulunduğu reklamları 10 satır varsa tek tek 2 Dakika Ara ile atsa diyorum olabilirmi ?

SiLuet · 30 Mart 2012, 19:52

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

Cok Güzel Bir Codlama peki .Başla dediğimizde Bot Tüm Sunucuya Reklam.txt 'inde Bulunduğu reklamları 10 satır varsa tek tek 2 Dakika Ara ile atsa diyorum olabilirmi ?

Mevcut Koddaki,

if (.başla == $1) { $iif(!$timer(reklam),timerreklam 0 3600 reklam) }

Bu satırı Aşağıdaki şekilde değiştirin,ve Verdiğim Aliası Ekleyin.

if (.başla == $1) { $iif(!$timer(reklam),.timerreklam $lines(reklam.txt) 120 reklamm) }

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

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

Reklamları Gönderme Şeklini Global olarak Yaptım O Kısmı İstersen değişebilirsin.
.başla Yazdığında 2 dakika Arayla reklam.txt içerisindekileri global olarak atar. txt Bittiğinde Durur.

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.

Seçenekler	Arama
Yazdırılabilir şekli göster Sayfayı E-Mail olarak gönder	Arama: Gelişmiş Arama Yap
Stil
Normal gösterime geğ Hybrid-Şeklinde Ağaç şeklinde gösterime geç

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.