Untitled

alias lolz-omg-wtf {
  ;create new file list
  ;and set the number files in %total-files
  var %total-files = $findfile(g:\,*.mp3,0,write recover.txt $1-)

  ;now to copy all files to f:\recover\

  ;looping
  while (%total-files > 0) {
    ;copying
    copy " $+ $read($findfile(g:\,*.mp3,%total-files) $+ "  f:\recover

    ;dec the file num
    dec %total-files 1
  }

  say #ircer done!!!
}