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 Parça Kodlar (https://www.ircforumlari.net/mirc-parca-kodlar/)
-   -   Sirala disk tür yol. (https://www.ircforumlari.net/mirc-parca-kodlar/819879-sirala-disk-tur-yol.html)

IrCbaStarD 06 Mayıs 2019 02:04

Sirala disk tür yol.
 
Disk veya klasör üzerinde belirlediğiniz klasörde dosyalari alfabetik sıraya göre taşır.

Kullanımı:
/sirala (Aranacak disk veya klasör) (Dosya türü) (Kopyalamak istediğiniz klasör)
/sirala D:\SrjN\IrCbaStarD txt D:\SrjN\Test112

Geliştirmeye açıktır basit şekilde yazdım.

Kod:

sirala {
  var %d $iif($len($1) = 1,$+($1,:\),$1), %e echo 14 -a ***, %a $2, %y $shortfn($3-) | hadd -mu10 kla sör $3-
  if !$exists(%d) { %e 4Belirlediginiz klasör bulunmuyor. | return } 
  if !$exists(%y) { mkdir $replace($3-,$chr(32),$chr(160))  }
  noop $findfile(%d,$+(*.,%a),0,klasor.ayarla $1-)
}
klasor.ayarla {
  var %d $left($nopath($1-),1), %q $+($hget(kla,sör),\,[  %d ]), %i $nopath($1-) | inc -u5 %w
  if !$exists(%q) { .mkdir %q } 
  $+(.timer,$replace($+(%q,\,%i),$chr(32),%x)) 1 1 .copy -o $shortfn($1-) $replace($+(%q,\,%i),$chr(32),$chr(160))
  .timerbilgi 1 5 echo -at 4Toplam %w dosyasi belirlediginiz klasöre tasindi.
}

Faydalı olabilecek kaynaklar:

MS: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

https://en.wikichip.org/wiki/mirc/identifiers/$findfile
https://en.wikichip.org/wiki/mirc/identifiers/$nopath
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] özendim senden :$

OkyAnuS 06 Mayıs 2019 05:18

Cevap: Sirala disk tür yol.
 
Bak sen.. @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] dolaşıyor yine..:seytani:

Feragat 06 Mayıs 2019 07:43

Cevap: Sirala disk tür yol.
 
Yarın gel teknik servis olarak başla

IrCbaStarD 06 Mayıs 2019 14:12

Cevap: Sirala disk tür yol.
 
Alıntı:

Feragat Nickli Üyeden Alıntı (Mesaj 1042072507)
Yarın gel teknik servis olarak başla

ahaha 1 kerelige mahsus birseydi sen servise devam ett. :D

Feragat 06 Mayıs 2019 14:41

Cevap: Sirala disk tür yol.
 
:tatli: kod hoşuma gitti. Kışkırtıcı :seytani:


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

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