Download Commodore News

1070
Reads the first piece of data located in line 1130 as S$.
(So S$ = cursor up + cursor up + reverse field on + BREAK­
EVEN + cursor down + 9 cursor left's + ANALYSIS").
S$ is then printed, centered on the top of the screen.
1080
C$ is set equal to 40 spaces.
The next three lines contain a FOR NEXT loop which reads
in the rest of the data contained in lines 1130-1150.
S$ = field title
A = field title row position
B
= field title column position
C
= field row position
D
= field column position
E
= field length
1090
Reads the data S$, A, B, C, D, E
1110
Prints the field title and the spaces for the input
(referred to as the 'field').
1120
Stores the field row position, column position and
length in the matrix 1% (I,J). This information will
be needed later in order to receive the input from the
screen.
fixed
cost
X
0
number
of
units
variable
sale
cost
price
1
2
3
0
10
12
14
16
Field column l
Position
20
20
20
20
Field Length 2
10
10
10
10
Field row
Position
1130-1150
data statements called in line 1070 and 1090.
Subsequent issues of this PET NEWSLETTER will contain a
similar description of the remaining routines within this
program.
13