OpenEuphoria

question converting to euphoria from qbasic

• Posted by ST Qu Man <STQuMan at AOL.COM> Apr 11, 1998
• 792 views

I have been doing pretty good in converting over between the two languages,
but I'm stuck on how to transfer the following basic chunk to a Euphoria
chunk.

OPEN "c:\file.txt" FOR OUTPUT AS #1
DO
IF EOF(1) THEN GOTO 1090
LINE INPUT #1, d$
PRINT d$
LOOP
1090 SLEEP
END