I was going to make a script that took a file (726 754 byte) single line and write it into a new file with added CR/LF every 122 character.

But Readline doesn't like so long expressions.

Any suggestions how to do it?

kix32 radbryt.kix $INFIL="xxx" $UTFIL="XXX"

My script:

$Start = 1
$Antaltecken = 122

Open( 1 , "$INFIL" , 2 )
Open( 2 , "$UTFIL" , 1 )

$Filrad = ReadLine( 1 )
While @ERROR = 0
$Nyrad = SubStr( "$Filrad" , $Start , $Antaltecken )
WriteLine( 2 , $Nyrad + Chr(13) + Chr(10) )
$Start = $Start + 122
Loop

Close( 2 )
Close( 1 )