alias temp {
  var %lines = $lines(C:\Temp\file.txt)
  var %cnt = 1
  while (%cnt <= %lines) {
    var %word = $read(C:\Temp\file.txt, %cnt)
    echo %word
    if !$read(C:\Temp\newfile.txt,w,%word) {
      write C:\Temp\newfile.txt %word
    }
    inc %cnt
  }
}