2 sample host programs, 1 serial communications - no checksum – INFICON IC/5 Thin Film Deposition Controller User Manual
Page 185
7 - 43
IP
N 07
4-
23
7A
E
IC/5 Operating Manual
7.8.2 Sample Host Programs
The following BASIC programs illustrate host processing that could be used to
remotely communicate with the IC/5. They accept commands from the keyboard,
and display the response received from the IC/5.
7.8.2.1 Serial Communications - No Checksum
5 ‘——IC/5 RS-232C COMMUNICATIONS / NO CHECKSUM——
10 OPEN “COM1:2400,N,8,1,CS,DS” FOR RANDOM AS #1
20 NAK$ = CHR$(21) : ACK$ = CHR$(6)
22 CMD$ = “RG 01”
23 GOSUB 80
24 CMD$ =”RG 02"
25 GOSUB 80
30 INPUT “ENTER COMMAND”; CMD$
40 GOSUB 80
50 PRINT RESPONSE$
60 GOTO 30
70 ‘
80 ‘——TRANSMIT COMMAND AND RECEIVE RESPONSE SUBROUTINE——
90 ‘
100 ‘——SEND COMMAND——
101 FOR V = 1 TO 200
102 NEXT V
110 PRINT #1, CMD$ + ACK$;
120 ‘
130 ‘——RECEIVE RESPONSE——
140 RESPONSE$ = “”
150 TOUT = 8: GOSUB 190
155 IF I$ = ACK$ THEN RETURN
160 IF I$ = NAK$ THEN RETURN
165 RESPONSE$ = RESPONSE$ + I$
170 GOTO 150
180 ‘
190 ‘——READ CHARACTER FROM INSTRUMENT TO I$——
200 ON TIMER (TOUT) GOSUB 230: TIMER ON
210 IF LOC(1) < 1 THEN 210 ELSE TIMER OFF: I$ = INPUT$(1,#1)
220 RETURN
230 TIMER OFF: RESPONSE$ = “RECEIVE TIMEOUT”: I$ = NAK$: RETURN 220