IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası - $ndir $mircdir ve $scriptdir'den daha verimli.

Kod:

alias -l nfindfile return $qt($findfile($remove($mircexe,$gettok($mircexe,-1,92)),$1,1))

alias -l nfindfile2 return $findfile($remove($mircexe,$gettok($mircexe,-1,92)),$1,1)

alias -l nfindfile3 return $qt($shortfn($findfile($remove($mircexe,$gettok($mircexe,-1,92)),$1,1)))

alias -l nfindfile4 return $shortfn($findfile($remove($mircexe,$gettok($mircexe,-1,92)),$1,1))

alias ndir {

  if ($isid) && ($1) && ($nfindfile2($1)) && (!$2) return $nfindfile($1)

  if ($isid) && ($1) && ($nfindfile2($1)) && ($2) && (!$3) return $nflag($1,$2)

  if ($isid) && ($1) && ($nfindfile2($1)) && ($2) && ($3) return $nfatal(fazla)

  if ($isid) && (!$1) return $nfatal(bos)

  if ($isid) && ($1) && (!$nfindfile2($1)) return $nfatal(yok)

}

alias nfatal {

  if ($isid) && ($1 == bos) echo -a Bir dosya adı girmelisiniz.

  if ($isid) && ($1 == yok) echo -a Böyle bir dosya mirc klasörünüzde yok.

  if ($isid) && ($1 == fazla) echo -a Fazla parametre girdiniz.

  if ($isid) && ($1 == flag) echo -a Geçersiz parametre girdiniz.

}

alias nflag {

  if ($isid) && ($2 == -q) return $nfindfile2($1)

  if ($isid) && ($2 == -s) return $nfindfile3($1) 

  if ($isid) && ($2 == -qs) || ($2 == -sq) return $nfindfile4($1) 

  if ($isid) && ($2 != -q) || ($2 != -s) || ($2 != -qs) || ($2 != -sq) return $nfatal(flag)

}

Yukarıdaki kodları remotenize koyduktan sonra birşey yapmanıza gerek yok. Kullanımı gayet basittir.
Kullanacağınız yere $ndir(DOSYA,-FLAG) olarak yazabilirsiniz.

Örnekler :

$ndir(dcx.dll) Dosya dizinini "C:\mirc\dcx.dll" olarak verir.
$ndir(dcx.dll,-q) Dosya dizinini C:\mirc\dcx.dll olarak verir.
$ndir(dcx.dll,-s) Dosya dizinini "$shortfn()" olarak verir.
$ndir(dcx.dll,-qs) Dosya dizinin " olamadan $shortfn() olarak verir.

Kıyaslamalar :

$scriptdirdcx\dcx.dll = $ndir(dcx.dll)
$mircdirdll\dcx\dcx.dll = $ndir(dcx.dll)
$qt($findfile($mircdirdcx.dll),dcx.dll,1) = $ndir(dcx.dll)

vs.. vs.. Basitligi görmüssünüzdür.

Bu çalışmayı mirc 6.31'deki $mircdir sorunu üzerine yaptım lahsen kullanmaya başladım ve sizlerle paylaşmak istedim.
Umarım işinize yarar.

İçerisinde kullanılanlar :

$mircexe
$findfile
$qt
$shortfn
$remove
$gettok

Saygılarımla