trying to load a row to a column using scriptbasic (or a better basic if there is one)

I am trying to load a row from one file into a column from another
file and I am getting some errors because it doesn't like how I am
trying to write to the output file and it is giving me nested
errors...  Am I making a simple mistake??  (does anyone eve use script
basic)..  is there another basic this would be a simple task in??




print "input file"
line input filname$
print "input column file"
line input filename2$
print "column number"
line input columnnumber
print "output file"
line input outputfile$

open filename2$ for input as 2
open outputfile$ for output as 3
line input #2, b
splita b by " " to columnfile

for x = lbound(columnfile) and ubound(columnfile)
  open filename$ for input as 1
  line input #1, a
  close 1
  print 1
  rem split the string into an array
  splita a by " " to inputfile
  for y = lbound(inputfile) to ubound(inputfile)
    if columnnumber = y then
      print #3 columnfile(x) + " "
    else
      print #3 inputfile(y)
    rem counter here to compare
    End if
  next
next

https://sourceforge.net/projects/dex-tracker