Table of Contents
Advertisement
SAMPLE RS-232 QUICK BASIC COMMUNICATION
1:
OPEN "com1:300,o,7,1,RS" FOR RANDOM AS #1 LEN = 256
2:
L1:
INPUT "ENTER COMMAND"; A$
3:
PRINT #1, A$ + CHR$ (13) + CHR$ (10);
4:
LINE INPUT #1, B$
5:
PRINT B$
6:
GOTO L1
Line 1: Defines COM1 port for input/output at 300 baud, odd parity, 7 data bits, and 1 stop bit. The (LEN)
value selects the maximum length of the input/output string in ASCII characters.
Line 2: Prompts for the command and enters it into variable A$.
Line 3: Sends the command to the Model 818/819. CHR$ (13) is a Carriage Return and CHR$ (10) is a Line
Feed. The semi-colon at the end suppresses the automatic Carriage Return.
Line 4: Retrieves the Model 818/819 response. If the Model 818/819 does not respond, the program stops
and waits for a response. It stores the response in variable B$.
Line 5: Prints the Model 818/819 response on the screen.
Line 6: Jumps back to line 2, in effect, starting the program over.
To stop the program, or if the program receives no response from the Model 818/819, press and hold the
Control (CTRL) key and the Break on the computer keyboard.
Appendix C: Sample Quick Basic Program
Lake Shore Model 818 / 819 Cryopump Monitor User's Manual
APPENDIX C
PROGRAM
C-1
Advertisement
Table of Contents
