Bronze Edition Guide - True BASIC

12. Using and Storing Data 87
IF reply$ = answer$ THEN ! If correct...
LET right = right + 1 ! Count correct replies
PRINT “Correct.”
! And say bravo
ELSE
PRINT “No, the correct answer is “; answer$; “.”
PRINT #2: question$; ","; answer$
END IF
LOOP until end #1
PRINT "All done. You answered"; right; "out of"; total;
PRINT "questions correctly."
CLOSE #1
CLOSE #2
END
This program opens a second file and prints to it each missed question along with the correct
response. Notice that the PRINT #2 statement also prints the comma that must separate
these two items if you later wish to use the file for input.
The CREATE NEWOLD keywords on the second OPEN statement tell True BASIC to create
a new file if it can't find one with the specified name.
The RESET #2: END statement tells True BASIC to move to the end of the second file. True
BASIC is always "looking" at the beginning of a newly opened file, which is fine if you are
using the file for input or if the file is empty. But True BASIC can print only to the end of
existing text files, so you must either erase the file or move to the end before you can PRINT.
(If the file is empty, the RESET statement has no effect.)
———————————————————————————————————————
x If you want to PRINT to a text file that is not empty, you must first
ERASE the file or RESET to the END of the file.
———————————————————————————————————————
Make these changes to the TRIVIA2 program and try it out.