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

2Beğeni(ler)

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 05 Ocak 2008, 09:47   #11
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Şiir Botu




Anti fener ben oraya kadarda gelemedim !şiir yazdığımda hiç bir şey olmuyor kodlarıda ekledim mircin versiyonu v.s sorunu olabilirmi yardımcı olursanız sevinirim.

Sabit bir klasörün içindeki txt dosyalarını random olarak her !siir yazınca bir tanesini okusun istiyorum.

Teşekkürler..

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Yazgulu Sohbet
Alt 05 Ocak 2008, 16:16   #12
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Şiir Botu




Dikkat ederseniz on text event'ini kullanılmış.
Eğer kod'u kendi mIRC'inize ekleyip, aynı mIRC'den !şiir yazarsanız tabiki siz !şiir yazdığınız'da algılamıyacaktır.

 
Alıntı ile Cevapla

Alt 21 Nisan 2009, 19:16   #13
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Şiir Botu




ya kardeş iyi güzel yazmışsın da bu bot notice olarak atıyor bi düzenlesende kanala yazsa bir de stop komutu olsa bunun şiirden sıkılırsa kişi hemen durdurabilsin. biraz kasarmısın rica ediceğim.

 
Alıntı ile Cevapla

Alt 21 Nisan 2009, 22:16   #14
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Şiir Botu




ilk sayfayı iyi oku orda açıklamada yazmıs arkadaşımız
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

 
Alıntı ile Cevapla

Alt 21 Nisan 2009, 22:18   #15
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Şiir Botu




Yazabiliriz.
Şiirleri mIRC'de şiirler diye bir klasör içine koyup on TEXT eventiyle ve /play komutuyla kanala ya da nicke gönderebilirsin ama botun Excess Flood'dan düşebilir.
Edit:

Aşağıdaki kodu senin için yazdım. Öncelikle
1) mIRC klasörüne şiirler diye bir klasör açmalısın.
2) *.txt uzantılı yani Metin Belgeleri içine şiirlerini yazmalısın. (Örneğin şiir1.txt içine alt alta satırlarda istediğin şiiri yazmalısın.
3) /play komutlarının sonundaki 1500, satırları kaçar milisaniye arayla göndereceğini belirtir. Ben 1.5 saniye (1500ms) olarak ayarladım, sen istediğinle değiştirebilirsin.

Daha sonra kanalda herhangi biri !şiir yazdığında onlara toplam kaç tane şiir olduğunu (şiirler klasöründeki .txt uzantılı dosyalar) söyler ve !şiir random yazdıklarında rasgele bir şiir geleceğini, !şiir <şiir no> ile istedikleri şiiri okuyabileceklerini belirtir.
Aşağıdaki kodu mIRC'de Remote'a(ALT+R) koymalısın. İşte kod:

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:text:!şiir*:#:{ var %: = $findfile($qt($mircdirşiirler),*.txt,0) if !$2 { msg # Toplam $+(,%:,) tane şiir mevcut, rasgele bir şiir için !şiir random yazınız, %: şiirden herhangi biri için !şiir <şiir no> yazınız. } elseif $2 == random { play -n $nick $qt($findfile($qt($mircdirşiirler),*.txt,$r(1,%:)) ) 1500 } elseif $2 isnum $+(1-,%:) { play -n $nick $qt($findfile($qt($mircdirşiirler),*.txt,$2)) 1500 } | else { msg # Üzgünüm, toplam $+(,%:,) tane şiir var. } }


Kırmızı olan yeri play $chan yap yada play $nick


play -n $nick deki $nick'i $chan ile değiştirirsen kanala /notice olarak gönderir, /notice olarak gitmesini istemiyorsan -n flagını kaldırmalısın yani /play $chan olarak değiştirmelisin. mIRC'de şiirler klasörü içine *.txt uzantılı her bir Metin Belgesi içine 1 şiir yazdığında onları gönderir. Eğer 0 şiir var diyorsa ya mIRC içinde şiirler klasörü yoktur ya da şiirler klasörü içinde .txt uzantılı dosyalar yoktur.

 
Alıntı ile Cevapla

Alt 19 Haziran 2010, 12:56   #16
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Şiir Botu




Şimdi bu bota bir de !şiir listele komutu ekleyelim desek ve bu komut verildiğinde bot, şiirleri

1- şiir1
2- şiir2
3- şiir3

Gibi listelese, Kullanıcı da şiirleri listeden seçse nasıl bir kod eklememiz gerekecek..? Ben Liste.txt adlı bir dosya oluşturup tüm şiirlerin adını bu listeye yazdım. !şiir listele komutu verildiğinde liste kanala 1,5 saniye arayla iletiliyor. Ancak, gelgelelim !şiir şiir1 dediğimizde şiir1 değil de, şiir2 veya şiir3'ü yazıyor bot kanala. Liste.txt'deki şiir sırasıyla şiir.txt'lerini bi türlü senkronlayamadım.


Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:text:!şiir*:#:{ var %: = $findfile($qt($mircdirşiirler),*.txt,0) if !$2 { msg # Toplam $+(,%:,) tane şiir mevcut, rasgele bir şiir için !şiir random yazınız, %: şiirden herhangi biri için !şiir <şiir no> yazınız. } elseif $2 == listele { play $chan liste.txt 1500 } elseif $2 == random { play $chan $qt($findfile($qt($mircdirşiirler),*.txt,$r(1,%:)) ) 3000 } elseif $2 isnum $+(1-,%:) { play $chan $qt($findfile($qt($mircdirşiirler),*.txt,$2)) 3000 } | else { msg # Üzgünüm, toplam $+(,%:,) tane şiir var. } }


 
Alıntı ile Cevapla

Alt 25 Haziran 2010, 11:11   #17
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Şiir Botu




bende sorun yok çalışmasına çalışıor ancak şiirler klasörü içine 9'dan fazla sayıda şiir.txt olması sorun yarattı ..şöyleki !şiir 44 desek 9.txt okuo yada !şiir 23 desek 4.txt okuo ..yani 9'dan fazlasını algılamakta bi sorun oluştu..ilginç....

 
Alıntı ile Cevapla

Alt 11 Temmuz 2011, 19:42   #18
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Şiir Botu




evet arkadaşlar 10 ve üzeri şiirleri okumuyor sorun nededir yardımcı olurmusunuz ? Şöyleki Mesela şiir klasörüne 10.txt 11.txt diye gidiyor bota !şiir 10 yazdımı 9.txt deki şiirleri okuyor hata nerede acaba
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

 
Alıntı ile Cevapla

Alt 12 Temmuz 2011, 15:37   #19
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Yardım Lütfen




on *:text:!şiir*:#:{
var %: = $findfile($qt($mircdirşiirler),*.txt,0)
if !$2 { msg # Toplam $+(,%:,) tane şiir mevcut, rasgele bir şiir için !şiir random yazınız, %: şiirden herhangi biri için !şiir <şiir no> yazınız. }
elseif $2 == random { play -n $nick $qt($findfile($qt($mircdirşiirler),*.txt,$r(1,%
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
) ) 1500 }
elseif $2 isnum $+(1-,%
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
{ play -n $nick $qt($findfile($qt($mircdirşiirler),*.txt,$2)) 1500 } | else { msg # Üzgünüm, toplam $+(,%:,) tane şiir var. }
}

arkadaşlar bu kodda şiirler klasörünün içine 10 tane txt dosyası ekledimi 1.txt...10.txt fakat şöyle bir sorun var 9. dan sonra okumuyor ve şaşırıyor, !şiir 10 yazıyorsun 9.txt yi okuyor 10 ve üstünü okumuyor, !şiir 1 2 3 4 5 e kadar doğru okuma yapıyor !şiir 6 yazdımı 7.txt yi okuyor, !şiir 10 yazdımı 9.txt okuyor boyle bir problem var. yardımcı olursanız sevinirim.

 
Alıntı ile Cevapla

Alt 12 Temmuz 2011, 21:31   #20
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Şiir Botu




Heartbroken Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
bende sorun yok çalışmasına çalışıor ancak şiirler klasörü içine 9'dan fazla sayıda şiir.txt olması sorun yarattı ..şöyleki !şiir 44 desek 9.txt okuo yada !şiir 23 desek 4.txt okuo ..yani 9'dan fazlasını algılamakta bi sorun oluştu..ilginç....

hasan86 Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
evet arkadaşlar 10 ve üzeri şiirleri okumuyor sorun nededir yardımcı olurmusunuz ? Şöyleki Mesela şiir klasörüne 10.txt 11.txt diye gidiyor bota !şiir 10 yazdımı 9.txt deki şiirleri okuyor hata nerede acaba ;idea

$findfile identifieri ile çağrılan sıralama no belirtilen metin belge numarası değildir.Burada çağrılan klasör içindeki metin belge isimlerinin numerik\alfabetik bir başka deyişle artan\azalan çağrışım no'sudur.Örneğin,klasörünüzdeki metin belgeleri alt alta dizilim şu şekilde olsun;
1.txt
2.txt
3.txt
10.txt
11.txt

Burada $findfile ile aranılan metin sıralama nosu "//echo -a $findfile($mircdirşiirler,*.txt,1)" şu şekilde gelişir:
1.sıra 1.txt
2.sıra 10.txt
3.sıra 11.txt
4.sıra 2.txt
5.sıra 3.txt

Bu kısım sanırım anlaşıldı,kodda herhangi bir hata yok.
____________________________________________

(!şiir 1)Belge numarasına(1.txt) göre okutmak istiyorsanız kod aşağıdaki şekilde düşünülebilir:
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:text:!şiir*:#:{ var %: = $findfile($qt($mircdirşiirler),*.txt,0) if !$2 { msg # Toplam $+(,%:,) tane şiir mevcut, rasgele bir şiir için !şiir random yazınız, %: şiirden herhangi biri için !şiir <şiir no> yazınız. } elseif $2 == random { play -n $nick $qt($findfile($qt($mircdirşiirler),*.txt,$r(1,%:)) ) 1500 } elseif $2 isnum $+(1-,%:) { play -n $nick $qt($+($mircdirşiirler,\,$2,.txt)) 1500 } | else { msg # Üzgünüm, toplam $+(,%:,) tane şiir var. } }


 
Alıntı ile Cevapla

Cevapla

Etiketler
botu, mirc download, mirc indir, siir, Şiir


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

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
Şiir nasıl yazılır, şiir yazma teknikleri. Şahsi fikrim. IF Şiir, Hikaye ve Güzel Sözler 6 02 Ağustos 2014 23:06
Afrikalı Zenci Bir Adam'ın, 2005 Yılında En İyi Şiir Olmaya Aday Gösterilmiş Şiir'i Sevda Şiir, Hikaye ve Güzel Sözler 3 27 Ağustos 2011 09:14
Şiir yazmana gerek yok, şiir sensin. Luis Şiir, Hikaye ve Güzel Sözler 0 07 Mart 2010 22:03