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

- mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)

- - mirc Ana dizine atılan txt dosyalar (https://www.ircforumlari.net/mirc-scripting-sorunlari/693022-mirc-ana-dizine-atilan-txt-dosyalar.html)

mirc Ana dizine atılan txt dosyalar

Kod:

on !*:join:#: {

  var %aa = 1, %bb = $lines(nick2.txt)

  while (%aa <= %bb) {

    if ($read(nick2.txt,%aa) iswm $nick) {

      if $hget(Play,$nick) >= 1 { return }

      .hinc -msu20 Play $nick

      .play $nick 1.txt 

      echo -a 4 Düşman listten $nick $network sunucusundan online oldu

      break    

    }

    inc %aa

  }

}

Örnek kod yukardadır,bu tip bir çok kod içeren txt dosyalar mirc ana dizinde duruyor oldukça dağınık ve karmaşık bir görüntü oluyor bunları bir dosya altında topladıgımdada kodlar çalışmıyor örneğin yukardaki kodu A isimli mirc ana dizinindeki bir dosya içine attıgımda kodun neresini nasıl düzenlemem gerektigi konusunda yardımcı olursanız diğerlerini kendim yapmaya çalışırım.Tşk.

Cevap: mirc Ana dizine atılan txt dosyalar

Alıntı:

rewal Nickli Üyeden Alıntı (Mesaj 1041651196)

Kod:

on !*:join:#: {

  var %aa = 1, %bb = $lines(nick2.txt)

  while (%aa <= %bb) {

    if ($read(nick2.txt,%aa) iswm $nick) {

      if $hget(Play,$nick) >= 1 { return }

      .hinc -msu20 Play $nick

      .play $nick 1.txt 

      echo -a 4 Düşman listten $nick $network sunucusundan online oldu

      break    

    }

    inc %aa

  }

}

1- Bu söylediğini pek çok yolla yapman mümkün. Fakat remote'ları A klasörüne taşıdığında $read veya play gibi okuma ve oynatma dosyalarındaki okunan yada oynatılan dosyalarıda taşıyorsan, dosya isimlerininde yolunu değiştirmelisin.

- Örneğin bu bölüm: $read(nick2.txt,%aa) Böyle olmalı: $read(A\nick2.txt,%aa) gibi. Direk $read(nick2.txt,) olarak belirttiğinde $mircdir i baz alır yani mirc klasörünü, ama mIRC klasörünün içinde A klasörü ve onun içideki nick2.txt dosyası için A\nick2.txt yapmalısın.
- Aynı olay /play komutu içinde geçerli: play $nick 1.txt --- play $nick A\1.txt olmalı.

2- Bir klasör içindeki .txt dosyalarını remote olarak yüklemek içi bunu kullanabilirsin.
- A klasörü içinde bulunan tüm .txt uzantılarını load etmek için.

Kod:

//noop $findfile($shortfn($mircdirA),*.txt,0, load -rs $1-)

Klasör ismini A kısmından değiştirebilirsin.

Cevap: mirc Ana dizine atılan txt dosyalar

Alıntı:

Feragat Nickli Üyeden Alıntı (Mesaj 1041651203)

Kod:

//noop $findfile($shortfn($mircdirA),*.txt,0, load -rs $1-)

Klasör ismini A kısmından değiştirebilirsin.

Kod:

on !*:join:#: {

  var %aa = 1, %bb = $lines(A\nick2.txt)

  while (%aa <= %bb) {

    if $read(A\nick2.txt,%aa) iswm $nick) {

      if $hget(Play,$nick) >= 1 { return }

      .hinc -msu20 Play $nick

      .play $nick A\1.txt 

      echo -a 4 Düşman listten $nick $network sunucusundan online oldu

      break    

    }

    inc %aa

  }

}

Böyle yapdım çalışmadı yanlış olan ne acaba ?

Cevap: mirc Ana dizine atılan txt dosyalar

Alıntı:

rewal Nickli Üyeden Alıntı (Mesaj 1041651329)

Kod:

on !*:join:#: {

  var %aa = 1, %bb = $lines(A\nick2.txt)

  while (%aa <= %bb) {

    if $read(A\nick2.txt,%aa) iswm $nick) {

      if $hget(Play,$nick) >= 1 { return }

      .hinc -msu20 Play $nick

      .play $nick A\1.txt 

      echo -a 4 Düşman listten $nick $network sunucusundan online oldu

      break    

    }

    inc %aa

  }

}

Böyle yapdım çalışmadı yanlış olan ne acaba ?

nick2.txt ve 1.txt A klasörünün içinde var mı ?

Cevap: mirc Ana dizine atılan txt dosyalar

Alıntı:

Feragat Nickli Üyeden Alıntı (Mesaj 1041651330)

nick2.txt ve 1.txt A klasörünün içinde var mı ?

Evet var..

Cevap: mirc Ana dizine atılan txt dosyalar

Alıntı:

rewal Nickli Üyeden Alıntı (Mesaj 1041651332)

Evet var..

Bu satırı:

Kod:

if $read(A\nick2.txt,%aa) iswm $nick) {

Bu şekilde değiştir:

Kod:

if $read(A\nick2.txt,%aa) iswm $nick {

Sonda bir parantez kapatmışsın fazladan.

Kendi mIRC'imde denedim ve sonuç;

Kod:

[01:07] * Giriş: Feragat 

 Düşman listten Feragat mIRCScripting.net sunucusundan online oldu

Cevap: mirc Ana dizine atılan txt dosyalar

Alıntı:

Feragat Nickli Üyeden Alıntı (Mesaj 1041651333)

Bu satırı:

Kod:

if $read(A\nick2.txt,%aa) iswm $nick) {

Bu şekilde değiştir:

Kod:

if $read(A\nick2.txt,%aa) iswm $nick {

Sonda bir parantez kapatmışsın fazladan.

Kendi mIRC'imde denedim ve sonuç;

Kod:

[01:07] * Giriş: Feragat 

 Düşman listten Feragat mIRCScripting.net sunucusundan online oldu

if $regex($token($address($nick,5),2,64),/(admin|op|sop|halfop)/i) { return }
if $regex($token($token($address($nick,5),1,64),1,33) ,/^(41|45)$/i) { return }
if $istok( irc.sunucu2.com,$server,32) { return }

Bazı kodlarda geçen muaflardaki if $regex ve if $istok kısımlarında ne eklemeliyim ?