RosettaCodeData/Task/Input-loop/Ring/input-loop.ring
2016-12-05 23:44:36 +01:00

9 lines
154 B
Text

fp = fopen("C:\Ring\ReadMe.txt","r")
r = fgetc(fp)
while isstring(r)
r = fgetc(fp)
if r = char(10) see nl
else see r ok
end
fclose(fp)