REM Program:  File.bas
REM Written By:  Rob. Breuer
REM Date Written:  15th May 1996
REM Last modified: 15th May 1996
REM Description:  This program creates a text file that contains student
REM               assignment and exam marks.  The file is to be used as
REM               input from a report program called Grades.bas
REM
REM ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

CLS
OPEN "c:\temp\Marks.txt" FOR OUTPUT AS #1
PRINT "Enter student marks, or EOF to end."
INPUT "Enter the students name: ", name$
DO WHILE name$ <> "EOF"
    INPUT "Enter the students first assignment mark: ", Assign1
    INPUT "Enter the students second assignment mark: ", Assign2
    INPUT "Enter the students exam mark: ", Exam
    WRITE #1, name$, Assign1, Assign2, Exam
    CLS
    INPUT "Enter the students name: ", name$
LOOP
CLOSE #1
END