Table of Contents
Advertisement
10
Reference
E.
To retrieve data
from diskette from
program-
Sample Program
Read
SEE THIS
1
.
OPEN
#1,
4,
0,
" D:DATA"
tells
computer to allow
reading from
L
diskette
file
named DATA
1 REM THIS
PROGRAM READS
A FILE OF
CHECK NUMBERS AND THEIR AMOUNTS
5 DIM CHECKNAME$(40)
10 OPEN t1o4o0o "D:CHECKS'
15 PRINT 'CHECK t AMOUNT WHO TO'
2.
INPUT #1
, X, Y,
Z
Reads
a
record I ike
the one created in
D
above.
3.
CLOSE
#1
Tells computer you are done with file.
PRINTER
Reference
I. To Print to Printer:
A.
Power
up computer and Printer
B.
Type LPRINT
"
HELLO"
and HELLO will
be typed
on
Printer
C. Wherever you can
use
PRINT you can
use
LPRINT
See the DISK OPERATING SYSTEM (DOS)
manual for complete details.
17 PRINT'----------
---------------
20
INPUT tllCHECKNUMoCHECKAMToCHECKNAME$
30 IF CHECKNUM=O THEN 100
40 PRINT
CHECKNUMo'S'lCHECKAMToCHECKNAMES
50 GOTO
20
!00 CLOSE tl
Sample Program
Read and print
SEE THIS
I REM THIS PROGRAM READS A FILE OF
CHECK
NUMBERS AND THEIR AMOUNTS
5 DIM
CHECKNAME$<40)
10 OPEN t1o4o0o 'D:CHECKS'
15 LPRINT 'CHECK t AMOUNT WHO TO'
17 LPRINT '-----------------------
20
INPUT tllCHECKNUMoCHECKAMToCHECKNAME$
30 IF CHECKNUM=O THEN 100
40 LPRINT CHECKo'$'lCHECKAMToCHECKNAME$
50
GOTO
20
100
CLOSE
t1
Print-Out of above program
:
CHECK
t
100
101
102
SEE THIS
AMOUNT
$12.51
$24.35
$102.67
WHO
TO
JOHN SMITH
GEORGE BROWN
HEAVY
CHEVY
Advertisement
Table of Contents
