> TxJoin C"Input file 1: "in1$:in1%=(in1$):in1%=0:in1$;" not found": C"Input file 2: "in2$:in2%=(in2$):in2%=0:in2$;" not found": (["Output file: "out$:out%=(out$):out%=0:"Can't open "out$":CLOSE#in2%:CLOSE#in1%:END 2 err: < F z%=66: P%#in1%:t1$=line(in1%) t1$="" Z%#in2%:t2$=line(in2%) t2$="" d+out(t1$+(40-t1$)(t1$<40)," ")+t2$) n #in1% #in2% x-#out%:out%=0:#in2%:in2%=0:#in1%:in1%=0   : ݤerr: in2%:A%=in2%:in2%=0:#A% in1%:A%=in1%:in1%=0:#A% out%:A%=out%:out%=0:#A% " at line ";:= : ݤline(in%): a$ :A%=#in%:A%>31:a$=a$+A% A%=13:=a$ : out(a$):out%=0:a$: (a$<>"":#out%,a$:a$=a$,2):a$="" -#out%,13:13;100*#in1% #in1%;"%";: