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

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   Çözüldü Bot`a Txt okutma (https://www.ircforumlari.net/mirc-scripting-sorunlari/55305-bot-txt-okutma.html)

Braun 24 Nisan 2008 14:10
Bot`a Txt okutma
 
Selam kolay gelsin.

Arkadaşlar benim bir kanalım var kanalımda yapmış olduğum bir bota istediğim bir mesajı okutmak istiyorum.

Mesela : #kanal kanalında !sevgi yaptığımda txt te ekli olan sevgi mesajlarını kanala yazsın.Ve bunu sadece % @ & ~ kullanabilsin.

XcLusive 24 Nisan 2008 14:40
Cevap: Bot`a Txt okutma
 
Kod:
on *:text:!sevgi*:#KomutunOkunacağıKanal:{
  var %? = 1, %! = $2
  while (%? <= %!) {
    .timer 1 %? msg #MesajGönderilecekKanal $read(sevgi.txt)
    inc %?
  }
}
kanala göndereceği mesajları birer saniye ara ile gönderir (flood yapmaması ve laga girmemesi için)
örnek :
!sevgi 20 => sevgi.txt dosyasından rastgele 20 satır okur.
!sevgi 5 => sevgi.txt dosyasından rastgele 5 satır okur.

Braun 24 Nisan 2008 14:55
Cevap: Bot`a Txt okutma
 
Alıntı:
XcLusive Nickli Üyeden Alıntı (Mesaj 382778)
Kod:
on *:text:!sevgi*:#KomutunOkunacağıKanal:{
  var %? = 1, %! = $2
  while (%? <= %!) {
    .timer 1 %? msg #MesajGönderilecekKanal $read(sevgi.txt)
    inc %?
  }
}
kanala göndereceği mesajları birer saniye ara ile gönderir (flood yapmaması ve laga girmemesi için)
örnek :
!sevgi 20 => sevgi.txt dosyasından rastgele 20 satır okur.
!sevgi 5 => sevgi.txt dosyasından rastgele 5 satır okur.
çlaışmadı hocam.

/msg yetersiz parametre diyor.

XcLusive 24 Nisan 2008 15:02
Cevap: Bot`a Txt okutma
 
evet çünki mirc'i çalıştırdığın klasörün içinde sevgi.txt dosyası yok..
Kod:
$read(sevgi.txt)
olan kısmı ayarlaman gerekecek hangi dosyayı okuyacaksa ona göre dosya adı vermelisin dosyayı başka yerde okuyacaksa;
örnek:
Kod:
$read(c:\txtler\sevgi.txt)
gibi düzeltmelisin..
mirc klasörünün içinden okutacaksan
örnek:
mirc klasörünün içinde dosyalar klasörünün içindeki sevgi.txt dosyasını okutacaksın
Kod:
$read(dosyalar\sevgi.txt)
bu şekilde olması gerek..

Braun 24 Nisan 2008 15:28
Cevap: Bot`a Txt okutma
 
Denedim gene olmadı :S

Braun 24 Nisan 2008 15:31
Cevap: Bot`a Txt okutma
 
Peki txt olmadan olmazmı


Birgun kıyamet kopar çöker karanlık
Allah bizi affetmez cok günah aldık
Sevenler ayrılmaz bir plan yaptık
Bütünn ÇARŞI cehenneme kombine aldık.


bu mesajın beşiktaş kanalında !bjk yaptığımda çıkmasını istiyorum mesela.

XcLusive 24 Nisan 2008 15:41
Cevap: Bot`a Txt okutma
 
mIRC 6.31 kullanıyorsan olmaz sanırım çünki onun $dir sistemi çok farklı..
o zaman şöyle yaparız

Kod:
alias sevgi.txt return c:\klasör adı\sevgi.txt
on *:text:!sevgi*:#KomutunOkunacağıKanal:{
  var %? = 1, %! = $2
  while (%? <= %!) {
    .timer 1 %? msg #MesajGönderilecekKanal $read($sevgi.txt)
    inc %?
  }
}
alias sevgi.txt return c:\klasör adı\sevgi.txt
mavi olan yere okunacak dosyanın yolunu belirtirsin..
yukarıdaki kodu denedim sorunsuz çalışıyor..

Braun 24 Nisan 2008 22:49
Cevap: Bot`a Txt okutma
 
Birgun kıyamet kopar çöker karanlık
Allah bizi affetmez cok günah aldık
Sevenler ayrılmaz bir plan yaptık
Bütünn ÇARŞI cehenneme kombine aldık.


Mesela bu mesajı bota okutmak istiyorum !bjk dediğim zaman txt olmadan remote ile mümkünmü.

XcLusive 25 Nisan 2008 00:52
Cevap: Bot`a Txt okutma
 
Kod:
on *:text:!bjk:#:{
  msg # Birgun kıyamet kopar çöker karanlık
  msg # Allah bizi affetmez cok günah aldık
  msg # Sevenler ayrılmaz bir plan yaptık
  msg # Bütünn ÇARŞI cehenneme kombine aldık.
}

Braun 25 Nisan 2008 12:30
Cevap: Bot`a Txt okutma
 
Alıntı:
XcLusive Nickli Üyeden Alıntı (Mesaj 383387)
Kod:
on *:text:!bjk:#:{
  msg # Birgun kıyamet kopar çöker karanlık
  msg # Allah bizi affetmez cok günah aldık
  msg # Sevenler ayrılmaz bir plan yaptık
  msg # Bütünn ÇARŞI cehenneme kombine aldık.
}
Bu şekilde yaptığım zaman kanalda !bjk dahil ne yazarsam yazayım çıkıyor yani başka bir şeyler yazıyorum gene çıkıyor hata nerde acaba ve yarıca bunu oplar kullanabilsin.

BLaCK_and_WHiTe 25 Nisan 2008 13:28
Cevap: Bot`a Txt okutma
 
Kod:
on *:text:*:#:{
  if $1 == !bjk { msg # Birgun kıyamet kopar çöker karanlık | msg # Allah bizi affetmez cok günah aldık | msg # Sevenler ayrılmaz bir plan yaptık | msg # Bütünn ÇARŞI cehenneme kombine aldık.
  }
}
Alıntı:
[13:26:50] <@MaSaL> !bjk
[13:26:50] <@BLaCK_and_WHiTe> Birgun kıyamet kopar çöker karanlık
[13:26:50] <@BLaCK_and_WHiTe> Allah bizi affetmez cok günah aldık
[13:26:50] <@BLaCK_and_WHiTe> Sevenler ayrılmaz bir plan yaptık
[13:26:50] <@BLaCK_and_WHiTe> Bütünn ÇARŞI cehenneme kombine aldık.
bunu kullanabilirsin.

ByDeniS 25 Nisan 2008 13:45
Cevap: Bot`a Txt okutma
 
Kod:
on *:text:*:*:{
if ($nicK == $me) && ($1 == !bjk) && ($chan == #beşiktaş) {
var %i 0
while (%i <= $lines(bjk.txt)) {
msg $chan $read(bjk.txt,%i)
inc %i
  }
 }
}

Al bunu dene arkadaşım. Çalşıyor test ettim.

djiNn 25 Nisan 2008 13:46
Cevap: Bot`a Txt okutma
 
aynı mantıgı ben yazcaktım farklı şekilde sen yapmışsn ;) en son yazılan kesin çalışır.

Giant 30 Aralık 2022 06:10
Cevap: Bot`a Txt okutma
 
$read mantığı olmadan bu txt içerisindeki komple satırları okumamızın bir yolu varmı?

Mylife 30 Aralık 2022 12:25
Cevap: Bot`a Txt okutma
 
Alıntı:
Giant Nickli Üyeden Alıntı (Mesaj 1042762556)
$read mantığı olmadan bu txt içerisindeki komple satırları okumamızın bir yolu varmı?
2 alternatif daha var birisi while döngüsü ile okutmak bir diğeri ise play kullanarak okutmak...

Örnekler;

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

Play ile text okutmak,

Örnek vermem gerekirse playlist adında bir txt dosyamız olsun ve bu txt dosyasını bir kanala yazdırmak istiyelim...

Kod:
.play #MsL playlist.txt 1000
=> burada 1000 1 saniye 2000 2 saniye anlamına gelir, yani size kaç saniye aralıklarla txt dosyasındaki yazıları aktarsın bu değer üzerinden girilir.

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

İyi forumlar.

Bozkurt- 30 Aralık 2022 12:30
Cevap: Bot`a Txt okutma
 
Alıntı:
Giant Nickli Üyeden Alıntı (Mesaj 1042762556)
$read mantığı olmadan bu txt içerisindeki komple satırları okumamızın bir yolu varmı?
Mümkün
Örneğin mirc anadizininde proxyler.txt adlı bir klasör olsun içindekileri görelim.
Kod:
//window @Oku | loadbuf $lines(proxyler.txt) @Oku $qt(proxyler.txt)
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Giant 31 Aralık 2022 15:52
Cevap: Bot`a Txt okutma
 
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] ; bu txt içerisindeki satırları tek kod ile nasıl okuyabilirim bir bilgin varmı?



Kod:
on *:text:!3112*:#:{
  var %? = 1, %! = $2
  while (%? <= %!) {
    .timer 1 %? /notice $nick $read($mircdir,/windowlogs/3112.txt)
    inc %?
  }
}

Bozkurt- 31 Aralık 2022 16:42
Cevap: Bot`a Txt okutma
 
Alıntı:
Giant Nickli Üyeden Alıntı (Mesaj 1042763146)
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] ; bu txt içerisindeki satırları tek kod ile nasıl okuyabilirim bir bilgin varmı?



Kod:
on *:text:!3112*:#:{
  var %? = 1, %! = $2
  while (%? <= %!) {
    .timer 1 %? /notice $nick $read($mircdir,/windowlogs/3112.txt)
    inc %?
  }
}
Tek koddan kastın nedir. Yazdığın kod zaten tek değil mi?

Biri kanala !3112 yazınca içindekileri 1 saniye ara ile kanala yansıtır.
Kod:
on *:text:!3112*:#:{
  .play # windowlogs/3112.txt 1000
}
Başkası değil komutu ben kullanayım sadece dersen.

Kod:
on *:input:#:{
  if $regex($1,/^[.!]3112/Si) {
  .play # windowlogs/3112.txt 1000
}
}
Kanala yansımasın sadece ben okuyayım içindekileri dersen
Kod:
alias oku {
//window @Oku | loadbuf $lines(windowlogs/3112.txt) @Oku $qt(windowlogs/3112.txt)
}
Bu şekilde @oku penceresinde dosyada yazılı olan herşeyi görürsün. Tam bilgi vermiyorsunuz içindekileri okumak istiyorum diyorsunuz. Kanala mı yansısın kimse görmeden bir pencerede mi görünsün. Burada kimse sizin ne istediğinizi tam bilmeden yardımcı olamaz.

Gururum61 16 Temmuz 2023 21:15
Cevap: Bot`a Txt okutma
 
Kod:
on *:text:!3112*:#:{
  .play # windowlogs/3112.txt 1000
}
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] buna !dur !devam ekleyebilirmiyiz

manikdepresif 16 Temmuz 2023 22:06
Cevap: Bot`a Txt okutma
 
Alıntı:
Gururum61 Nickli Üyeden Alıntı (Mesaj 1042816419)
Kod:
on *:text:!3112*:#:{
  .play # windowlogs/3112.txt 1000
}
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] buna !dur !devam ekleyebilirmiyiz
Kod:
on *:text:!*:#:{
;
  if (?3112* iswm $1) { unset %pos-text | play -a zup $chan  windowlogs/3112.txt 5000 }
  if (?3113* iswm $1) { unset %pos-text | play -a zup $chan  windowlogs/3113.txt 5000 }
;
  if ($1 == !dur && $play(1)) { set %fname-text $qt($play(1).fname) | .play stop }
  if ($1 == !devam && %fname-text && %pos-text && $play(1) == $null) { play $+(-af,%pos-text) zup $chan %fname-text 5000 }
}
alias zup { msg $1 $2- | inc %pos-text }


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 02:49.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk