[Coco] Bug in CoCo 3 DECB?

[Juan Castro]

Type this in a CoCo 3:

10 ONERR GOTO 60
20 INPUT"FILE NUMBER";F
30 OPEN"I",#F,"TEXTIM.TXT"
40 PRINT"YEP, FILE EXISTS"
45 CLOSE #F
50 END
60 PRINT"THIS ISN'T EXACTLY OK"
65 PRINT"ERROR";ERNO;"AT";ERLIN

Tell me what you get  if you input, say, 10. (Don't use a FILES command
beforehand.) Or 9999999999999999 (sixteen nines). Or 1, but the text file
doesn't exist.


Juan Castro
Enviado do meu Olivetti Programma 101
http://retropolis.com.br