All pastes #906683 Raw Edit

vas

public text v1 · immutable
·published 2008-02-16 21:56 UTC
rendered paste body
alias cmd {
  var %t = $ticks
  var %file = $+(",$scriptdir,output.txt,")
  var %file_err = $+(",$scriptdir,output_err.txt,")
  var %file2 = $+(",$scriptdir,outputdone.txt,")
  var %line = 0
  var %line_err = 0
  .remove %file
  .remove %file_err
  .remove %file2
  run cmd /C $1- > %file 2> %file_err & echo --done-- > %file2
  while ($read(%file2,$lines(%file2)) != --done--) {
    dll whilefix\WhileFix.dll WhileFix .
    ;echo -a lines: $lines(%file) read: $read(%file,$lines(%file))

    while (%line_err < $lines(%file_err)) {
      if ($read(%file_err,%line_err)) { echo -aq $replace($read(%file_err,%line_err),$chr(32),$chr(160)) }
      inc %line_err
    }

    while (%line < $lines(%file)) {
      if ($read(%file,%line)) { echo -aq $replace($read(%file,%line),$chr(32),$chr(160)) }
      inc %line
    }
  }

  while (%line_err < $lines(%file_err)) {
    if ($read(%file_err,%line_err)) { echo -aq $replace($read(%file_err,%line_err),$chr(32),$chr(160)) }
    inc %line_err
  }

  while (%line <= $lines(%file)) {
    if ($read(%file,%line)) { echo -aq $replace($read(%file,%line),$chr(32),$chr(160)) }
    inc %line
  }
  echo -aq 4Done. Time taken: $calc($ticks - %t)
}