; Dosya Arama Addonu
; Saygýlarýmla
; Bu Satýrdan sora yapýcaðýnýz deðiþiklikler
; Addonun hatalý çalýþmasýna veya hiç çalýþmamasýna neden olabilir..

Arkadaslar Bu addon mirc uzerinden hizli bir sekilde pc’nizde bulunan bir dosyayi  google kadar hizli bi sekilde size bulur.Denenmistir.

dialog arama1 {
  title “Dosya Arama Addonu”
  size -1 -1 137 103
  option dbu
  edit “”, 4, 53 8 74 10, autohs
  text “Aranacak Dosya”, 5, 6 9 42 8
  box “”, 1, -8 24 217 9
  text “Aranýlacak Uzantý”, 2, 6 39 43 8
  edit “”, 3, 54 38 63 10, read autohs
  button “Seç”, 6, 119 38 14 10
  box “”, 7, -8 51 217 9
  text “www.topluchat.com – Araniyor..”, 8, 32 63 69 10, center
  box “”, 9, -8 73 217 9
  button “Aramaya Baþla”, 10, -6 82 149 22
}
on *:Dialog:arama1:sclick:10: {
  if ($did(4) == $null) return $input(Lütfen Aranacak Kelimeyi Giriniz,ohud,Hata!)
  else set %aranacak $replace($did(4),$chr(32),*)
  if ($did(3) == $null) return $input(Lütfen Aranýlacak Bölümü Giriniz,ohud,Hata!)
  else set %nerede $did(3)
  .dialog -m arama2 arama2
  ara
}
on *:Dialog:arama1:sclick:6: {
  .did -ra $dname 3 $sdir($mircdir,Dosyanýz Nerede Aransýn ?)
}
dialog arama2 {
  title “aLLStar Su an onu ariyor…”
  size -1 -1 184 134
  option dbu
  button “Tamam / Kapat”, 10, -8 108 199 27, ok
  box “”, 1, 1 1 182 105
  list 2, 4 7 177 98, size
}
on *:Dialog:arama2:init:0: {
  dialog -t arama2 $replace(%aranacak,*,$chr(32)) Dosyasý için $findfile(%nerede,* $+ %aranacak $+ *,0) Sonuç Çýktý !
}
on *:Dialog:arama2:sclick:2: {
  .run $did(2).seltext
}
alias ara {
  var %c 1
  while %c <= $findfile(%nerede,* $+ %aranacak $+ *,%c) {
    .did -a arama2 2 $findfile(%nerede,* $+ %aranacak $+ *,%c)
    inc %c
  }
}
alias arama {
  .dialog -m arama1 arama1
}
on *:load:{
  .echo -a 6-> 7 http://www.topluchat.com
  .echo -a 6-> 7Addonu Açmak Ýçin /arama Yazýnýz
}