create txt file

[carkon]

i have 2 txt file(a.txt,b.txt)..these are have 2000 lines some data
i want to make a new txt files with each lines...
i mean script reads both lines of these file ..and write these to new txt

line1 of a.txt and line1 b.txt ----->1.txt (contain these lines)
line2 of a.txt and line2 b.txt ----->2.txt
line3 of a.txt and line3 b.txt ----->3.txt
line4 of a.txt and line4 b.txt ----->4.txt
line5 of a.txt and line5 b.txt ----->5.txt
.
.
.
line2000 of a.txt and line2000 b.txt ----->2000.txt


so i will have 2000 txt files

[carkon]

sorry about my english..not good

[olllllliii]

This works with version 11 - 12

Code: Select all

Let>i=1

Label>loop
ReadLn>C:\a.txt,%i%,line
Let>Filename=C:\%i%.txt
WriteLn>Filename,Result,line
IF>i>1999
    Goto>ending
    ELSE
    Add>i,1
    Goto>loop
ENDIF

Label>ending
EXIT