mIRC 7.49 download

(türkçe sürüm)

Sohbete Bağlan

(299 online)

Türkçe Mirc Sohbet programı 7.49 versiyonunu , sorunsuz ve tek download adresinden indirmek için TIKLAYIN

mIRC MP3 Edit

Türkçe Mirc v7.49 Türkçe Sohbet Programını Hemen Bilgisayarınıza Yükleyin.

Kod sahibi : L4roXyL

Useful: /mp3combin

Sample: /mp3combin begin => (secondmp3file+firstmp3file)
Sample: /mp3combin end => (firstmp3file+secondmp3file)
Sample: /mp3combin 00:45 => (firstmp3file(00:45)+secondmp3file+firstmp3file00: 46+)

;code by l4roxyl
;2014 October
;-
alias mp3combin {
  if $1 {
    if (!$isdir($mircdircutter_and_combining)) mkdir cutter_and_combining
    var %_we = echo -eac info *** MP3 Cutter&Combining info:
    if !$regex($1,/^(end|begin|\d{2}:\d{2})$/g) {
      %_we Invalid parameters. Example: /mp3com <begin|end|00:00>
      return
    }
    var %f_f = $sfile(*.mp3,Select First MP3 File,Select) 
    var %f_f2 = $sfile(*.mp3,Select Another Adding MP3 File,Select)
    if !%f_f || !%f_f2 { 
      %_we First/second or both file not selected.
      return
    }
    var %_dir = $mircdircutter_and_combining
    var %f1 = $shortfn(%f_f), %f2 = $shortfn(%f_f2)
    var %_inl = $int($calc($sound(%f1).length / 1000))
    var %new_file = $+($left($nopath(%f_f),-4),__,$nopath(%f_f2)), %_br = bread ,%_bw = bwrite
    var %_add_file = $shortfn($+(%_dir,\,-[,$iif($1 isalpha,$upper($1),$replace($1,:,.)),-, $+ $&
      $asctime(dd.mm.yyyy-hh.nn.ss),]-,$regsubex(%new_file,/(\s)/g,_)))
    %_br %f1 0 $lof(%f1) &f_1
    %_br %f2 0 $lof(%f2) &f_2
    var %fsize = $lof(%f1)
    var %second = $int($calc($sound(%f1).length / 1000))
    var %one_second = $calc(%fsize / %second)
    if $1 = end {
      %_bw %_add_file 0 $lof(%f1) &f_1
      %_bw %_add_file $lof(%f1) $lof(%f2) &f_2
      run %_dir
    }
    if $1 = begin {
      %_bw %_add_file 0 $lof(%f2) &f_2
      %_bw %_add_file $lof(%f2) $lof(%f1) &f_1
      run %_dir
    }
    if $regex(a_,$1,^(\d{2}:\d{2})$) {
      var %_d_r = $duration($regml(a_,1))
      if (%_inl < %_d_r) || %_inl = %_d_r) {
        %_we File length small with entered time!
        return
      }
      var %_int = $round($calc(%one_second * %_d_r),0) 
      %_br %f1 0 %_int &f_ar
      %_bw %_add_file 0 $bvar(&f_ar,0) &f_ar
      %_bw %_add_file $lof(%_add_file) $lof(%f2) &f_2
      %_br %f1 $bvar(&f_ar,0) $lof(%f1) &f_3
      %_bw %_add_file $lof(%_add_file) $bvar(&f_3,0) &f_3
      run %_dir
    }
  }
}

Benzer yazılar

IP Takip Kodu
Badnick Koruması Op/Admin
ıp locator (ıp yer tespıt)
Regex Kontrol
DNSBL Proxy Koruma
Spam kısa alias kodları
Services bot sokma
Şişe çevirme oyunu
Socket Cycle v1-v2-v3 Hepsinin son versionu
Radyo dinleyici kayit sistemi
mIRC Join Ulke-Sehir Gösterme Codu
!zar – komutu hediye verme


IRCALEM.Net © Tüm Hakları Saklıdır.

Bu site YuzukNET iştirakıdır.