Computer Interface and Commands 8-7
The program is loaded on one 3.5-inch disk. To run the program,
first boot the computer and load BASICA
or a compatible BASIC
interpreter. To load the program, type <LOAD "TSICPC.BAS> and
then type <RUN>.
The program has self-explanatory, easy-to-use menus. The various
tasks performed by the program are explained in earlier sections of
this manual.
This program is intended as a reference guide to those who wish to
write their own software. It may be modified as desired. However,
TSI cannot support any user-written software except as illustrated
in this manual.
Note: The display nested under (3) Read Menu, (D) Read time,
counts and concentration, and (1) Start the measurement gives
two concentration measurements. The first is the concentration
that can be read from the front panel of the CPC. The second
is the averaged concentration over the time interval. It is
calculated by dividing the counts by the time and the flowrate:
Concentration
Particles
cm
Counts
Time Flowrate
3
=
×
11 REM
12 REM *************************************************************************
14 REM
15 REM PROGRAM: TSICPC.BAS VERSION 1.2 8-FEB-1989
16 REM THIS PROGRAM IS A TEST PROGRAM FOR THE CPC 3022A. IT
18 REM PROVIDES THE COMMANDS FOR THE UNIT TO INTERFACE WITH THE
20 REM COMPUTER.
22 REM
24 REM *************************************************************************
26 REM
28 CLEAR : KEY OFF : WIDTH 80
30 REM
34 OPTION BASE 1 : J =1 : PSIG$ = "OFF" : PFLAG = 2
36 REM
38 CLS : LOCATE 4,25 : PRINT " TSI INCORPORATED"
40 LOCATE 9, 18 : PRINT "***********************************"
41 LOCATE 10,18 : PRINT "* *"
42 LOCATE 11,18 : PRINT "* TEST PROGRAM FOR CPC 3022A *"
43 LOCATE 12,18 : PRINT "* *"
44 LOCATE 13,18 : PRINT "***********************************"
48 LOCATE 15,18 : PRINT "PRESS ENTER TO CONTINUE"
50 LOCATE 16,18 : PRINT "PRESS 'ESC' TO END"
52 REM
54 I$ = INKEY$ : IF I$ = CHR$(27) THEN CLS : END
56 IF I$ = "" THEN 54 ELSE 58
58 IF I% = CHR$(13) THEN 130 ELSE 54
To Next Page
Loading...
Need help?
General
