TSI Instruments 3022A User Manual

8-12 Model 3022A Condensation Particle Counter
5010 I$ = INKEY$ : IF I$ = "M" OR I$ = "m" THEN RETURN ELSE 5010
5012 REM
5046 REM-------------------------------------------------------------------------
5047 REM
5048 REM SUBROUTINE FOR READING THE REFERENCE DETECTOR
5049 REM
5050 PRINT # 3, "R6"
5052 GOSUB 9000 : IF ZZ$ = "" THEN 5052 ELSE 5054
5054 REFDET = VAL(ZZ%)
5056 CLS : LOCATE 5,15 : PRINT "THE REFERENCE DETECTOR IS "; REFDET; "volt"
5058 LOCATE 22,15 : PRINT "HIT 'M' TO RETURN TO THE MAIN MENU"
5060 I$ = INKEY$ : IF I$ = "M" OR I$ = "m" THEN RETURN ELSE 5060
5062 REM
5996 REM-------------------------------------------------------------------------
5997 REM
5998 REM SUBROUTINE FOR READING THE DETECTOR VOLTAGE
5999 REM
6000 PRINT # 3, "R7"
6002 GOSUB 9000 : IF ZZ$ = "" THEN 6002 ELSE 6004
6004 DETVOLT = VAL(ZZ$)
6006 CLS : LOCATE 5,15 : PRINT "THE DETECTOR VOLTAGE IS "; DETVOLT; "volt"
6008 LOCATE 22,15 : PRINT "HIT 'M' TO RETURN TO THE MAIN MENU"
6010 I$ = INKEY$ : IF I$ = "M" OR I$ = "m" THEN RETURN ELSE 6010
6012 REM
6046 REM-------------------------------------------------------------------------
6047 REM
6048 REM SUBROUTINE FOR READING THE 200 SECOND BUFFER
6049 REM
6050 PRINT # 3, "R8"
6052 GOSUB 9000 : IF ZZ$ = "" THEN 6052 ELSE 6054
6054 BUF200 = VAL(ZZ$)
6056 CLS : LOCATE 5,15 : PRINT "THE 200 SECOND BUFFER IS "; BUF200
6057 LOCATE 22,15 : PRINT "HIT 'M' TO RETURN TO THE MAIN MENU"
6058 I$ = INKEY$ : IF I$ = "M" OR I$ = "m" THEN RETURN ELSE 6058
6060 REM
6996 REM-------------------------------------------------------------------------
6997 REM
6998 REM SUBROUTINE FOR READING THE 20 SECOND BUFFER
6999 REM
7000 PRINT # 3, "R9"
7002 GOSUB 9000 : IF ZZ$ = "" THEN 7002 ELSE 7004
7004 BUF20 = VAL(ZZ$)
7006 CLS : LOCATE 5,15 : PRINT "THE 20 SECOND BUFFER IS "; BUF20
7008 LOCATE 22,15 : PRINT "HIT 'M' TO RETURN TO THE MAIN MENU"
7010 I$ = INKEY$ : IF I$ = "M" OR I$ = "m" THEN RETURN ELSE 7010
7012 REM
7046 REM-------------------------------------------------------------------------
7047 REM
7048 REM SUBROUTINE FOR READING THE 2 SECOND BUFFER
7049 REM
7050 PRINT # 3, "RA"
7052 GOSUB 9000 : IF ZZ$ = "" THEN 7052 ELSE 7054
7054 BUF2 = VAL(ZZ$)
7056 CLS : LOCATE 5,15 : PRINT "THE 2 SECOND BUFFER IS "; BUF2
7058 LOCATE 22,15 : PRINT "HIT 'M' TO RETURN TO THE MAIN MENU"
7060 I$ = INKEY$ : IF I$ = "M" OR I$ = "m" THEN RETURN ELSE 7060

TSI Instruments 3022A Specifications

General

Brand	TSI Instruments
Model	3022A
Category	Cash Counter
Language	English