var %a = 1, %b = 1, %line1
while ($read(file1.txt, %a)) {
  %line1 = %line1 $v1
  inc %a
}
while ($read(file2.txt, %b)) {
  %line1 = $remtok(%line1,$v1,32)
  inc %b
}