Re: Fw: MSX-converter

[Arnaud de Klerk]

>10 maxfiles=2
>15 open "infile" for input as#1: open "outfile" for output as#2
>20 if eof(1) then close: end
>30 line input #1,a$: if a$="" then 20
>40 for t=1 to len(a$): a=asc(mid$(a$,t,1))
>50 if a<32 or a=127 then 20 else b$=b$+chr$(a)
>60 next
>70 print #1,b$: b$="": goto 20

It's been a while since I have used MSX-Basic, but shouldn't it be

70 print #2,b$: b$="": goto 20

Best Regards,

Arnaud


****
Problems? contact [EMAIL PROTECTED] See also http://www.faq.msxnet.org/
****