140 GOSUB 1000: REM Protocole de communication
150 PRINT #1, ENQ$; : REM Invite à la transmission de données.
160 INPUT #1, s, m: REM Lire la valeur mesurée.
170 IF s THEN PRINT "
180 PRINT USING "
200 NEXT I
300 LOCATE 5, 22
310 PRINT #1, "SPS": REM Interrogation du statut du contrôleur.
320 GOSUB 1000: REM Protocole de communication
330 PRINT #1, ENQ$; : REM Invite à la transmission de données.
340 INPUT #1, r1, r2, r3, r4, ra, rb: REM Lecture du statut.
350 PRINT USING "R1>#
999 GOTO 100
1000 REM *** Protocole de communication ***
1010 LINE INPUT #1, a$: REM Attend l'acquittement du message.
1020 IF INSTR(a$, ACK$) THEN FOR J = 1 TO 200: NEXT J: RETURN:REM Zeit >2ms (LF)
1021 REM Si retour d'information négatif.
1030 PRINT #1, ENQ$: REM Invite à la transmission du mot Error.
1040 INPUT #1, e: REM Lecture du mot Error du TPG300.
1050 IF e > 999 THEN PRINT "
1060 IF e > 99 THEN PRINT "
1070 IF e > 9 THEN PRINT "
1080 IF e THEN PRINT "
1090 PRINT
2000 END
D:
Littérature
BG 5970 BFR / B
(2014-10)
TPG300.mdu
"; : GOTO 200: REM État >0
\ \=##.#^^^^"; P$; m; : REM Données mesurées ok.
R2>#
R3>#
R4>#
FATAL ERROR"; : e = e - 1000
NO HARDWARE"; : e = e - 100
PARAMETER ERROR"; : e = e - 10
SYNTAX ERROR";
[1]
www.pfeiffer-vacuum.com
Manuel d'utilisation
Cartes d'extension pour l'instrument de mesure
et de commande à pression totale TPG 300
BG 5972 BFR
Pfeiffer Vacuum GmbH, D-35614 Asslar,
Allemagne
[2]
www.pfeiffer-vacuum.com
Manuel de l'utilisateur
Jauge Pirani TPR 010 / 017 / 018
BG 5976 BFR
Pfeiffer Vacuum GmbH, D-35614 Asslar,
Allemagne
[3]
www.pfeiffer-vacuum.com
Manuel de l'utilisateur
Jauge à cathode froide IKR 050
BG 5031 BFR
Pfeiffer Vacuum GmbH, D-35614 Asslar,
Allemagne
RA>#
RB>#"; r1; r2; r3; r4; ra; rb;
81