Evet arkadaşlar, boş zamanlarımda mIRC.hlp dosyasında İdentifier'ları karıştırırım. Denemeler yapar, kucuk kodlar yazarım. Dun gece dosya ve klasor identifier'larını karıştırırken daha once kullanması nasip olmayan $finddir identifier'ı ile karşılaştım. Ve aklıma işinize yarıyacak bir kod yazmak geldi.

Vereceğim kod'un bu kadar karmaşık olduğuna bakmayın, yani kafanız karışmasın.
Ben zaten karmaşık yazmayı seviyorum.
Zaten bu kod'un oluşmasının sebebi $finddir identifier'ı.
Diğer identifier'lar zaten bildikleriniz.
Bilmediklerinizi acıklıyacağım.
Kullanılan identifier'lar;
$disk(surucu-adı) : Adı ustunde bilgisayarınız'daki surucu ismini kontrol eder.
//echo -a $disk(C) yaparsanız ve C adında bir surucunuz varsa, $true olarak donecektir.
$qt(text) : Bu identifier'ın gorevi; icerisine yazılan yazının başına ve sonuna tırnak işareti koyacaktır. Yani //echo -a $qt(Hasan) yaptığınızda; "Hasan" olarak donecektir.
Sanırım kod'un icerisinde başka yabancı gelecek bir identifier mevcut değil.
$gettok : Token identifier'ı bol bol gormuşsunuzdur.
$chr(sayı) : Girilen ascii numarasını, ait karakter'e cevirir. Bunuda biliyorsunuz.
$strip : Yazıyı renk kalın ince vb. detaylardan arındırmak icin kullanılır.
Sanırım başka bir identifier'da kullanmamışım.

Buyrun kod;

Kod:
alias dtara if !$disk($1) || $len($1) >= 2 if !$2 if $1 && $2 if $finddir($[$1,:\),$2,0) >= 1 echo -s $[$chr(45),$chr(32),Bilgi,$chr(58),$chr(32),Tarama tamamlandı.) echo -s $[$chr(45),$chr(32),Bilgi,$chr(58),$chr(32),Cıkan dosyalardan herhangi birini acmak icin;,$chr(2),$chr(32),/ac sıranumarası,$chr(2),$chr(32),yazmanız yeterlidir.) echo -s $[$chr(45),$chr(32),Bilgi,$chr(58),$chr(32),Bulunan her dosya'ya bir numara verilir,$chr(2),(Sıra: 1 gibi),$chr(2),$chr(32),Eğer yazdığınız numara sıra numarasında yoksa dosya acılmayacaktır.) } } } alias ac if !$left($read(dosyalar.txt,w,$[$1,*)),1) if $1 && $left($read(dosyalar.txt,w,$[$1,*)),1) }
Kullanımı;

/dtara surucu-ismi dosya-ismi
Ornek: /dtara C *mIRC* (C surucusunde icinde mIRC kelimesi gecen tum klasor'leri sıralıyacaktır.)
Gorduğunuz gibi, wildcard kullanabilirsiniz.
Yani *kelime ve/ya kelime* ve/ya *kelime* şeklinde.
"Yalnız siz kalkıpta, /dtara C *a* gibi sacma bir işlev yaparsanız mIRC donacaktır."
Kod'u gerekli yerlerde kullanırsanız işinize yarıyacağını duşunuyorum.
Şimdi bir kac ornek verelim;
/dtara C *mIRC* (C surucusun'de icinde mIRC kelimesi gecen tum klasoer'ler) yapıyorum ve status penceresinde cıkan sonuclar;

- Bilgi: Tarama başlatılıyor.
- Taranan surucu: "C"
- Aranan dosya ismi: "*mIRC*"
- Bulunan dosya sayısı: "7"
- Sonuclar sıralanıyor, tarama tamamlanana kadar bekleyiniz;
- Sıra: 1 - Yeri: C:\Documents and Settings\All Users\Start Menu\Programlar\Turkce Mirc v6.21
- Sıra: 2 - Yeri: C:\Documents and Settings\L4roXyL\Application Data\mIRC
- Sıra: 3 - Yeri: C:\Documents and Settings\L4roXyL\Desktop\Kullanılmayan\Turkce Mirc v6.2
- Sıra: 4 - Yeri: C:\Documents and Settings\L4roXyL\Desktop\Kullanılmayan\Turkce Mirc v6.21
- Sıra: 5 - Yeri: C:\Documents and Settings\L4roXyL\Desktop\Kullanılmayan\Turkce Mirc v6.21\mirc621
- Sıra: 6 - Yeri: C:\Documents and Settings\L4roXyL\Desktop\L4roXyL\mIRC Kodlarım
- Sıra: 7 - Yeri: C:\Documents and Settings\L4roXyL\Desktop\L4roXyL\mIRC Handcoding
- Bilgi: Tarama tamamlandı.
- Bilgi: Cıkan dosyalardan herhangi birini acmak icin; /ac sıranumarası yazmanız yeterlidir.
- Bilgi: Bulunan her dosya'ya bir numara verilir(Sıra: 1 gibi) Eğer yazdığınız numara sıra numarasında yoksa dosya acılmayacaktır.
-

Birde "/ac" alias'imiz var.
Gorduğunuz gibi her cıkan sonuca bir numara verilmekte;
Siz /ac 6 komutunu uyguladığınızda, 1 saniye sonra sıra numarası 6 olan klasor'u acıcaktır.
Umarım işinize yarar.

-

Hıı birde gruplar icin cok basit bir kod yazmıştım belki işinize yarar;
mIRC'inizdeki grupların isimleri bulunduğu klasor'leri ve durumlarını gostermek icin;
Buyrun;

Kod:
alias gruplar }
Kullanımı: /gruplar
Umarım işinizi gorur.
__________________