2 sample host programs, 1 serial communications - no checksum – INFICON IC/5 Thin Film Deposition Controller User Manual

Page 185

Advertising
background image

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

Advertising