Cette page traite de l'utilisation de la RS-232. La HP est équipée des modules HP 34901A et HP 34907A. |
Configuration de l'interface
Sur la HP: RS-232, 115200 baud, None, 8 bits, Flow None
Sur le PC:
On utilise le contrôle de communication MSComm
Me.MSComm1.CommPort = 1 'utilisation de COM1
Me.MSComm1.Settings = "115200,N,8,2" '115200 baud, sans parité, 8 bits, 2 Stop
Me.MSComm1.Handshaking = 0 'Pas de protocole de communication
Me.MSComm1.PortOpen = True 'Ouverture du port
Module multifonction HP 34907A
Ce module contient 16 entrées/sorties numériques, 1 compteur totalisateur 26 bits, 2 sorties analogiques en tension (± 12v) 16 bits. Il est implanté à l'emplacement 2.
Entrées/sorties numériques: les entrées sont compatibles TTL et les sorties sont à Drain ouvert (42v, 400mA).
Activation d'une sortie
Pour mettre à 1 le bit 7 de la voie 02:
Me.MSComm1.Output = "SOURCE:DIG:DATA:BYTE 128,(@202)" + vbCrLf
Pour mettre à 0 le bit 7 de la voie 02:
Me.MSComm1.Output = "SOURCE:DIG:DATA:BYTE 0,(@202)" + vbCrLf
Remarque: toute chaîne envoyée vers la HP doit se terminer par les codes ASCII CR et LF.
Lecture d'un port
Pour lire le port 1 (voie 01):
Me.MSComm1.Output = "SENS:DIG:DATA:BYTE? (@201)" + vbCrLf
La HP renvoie la valeur du port qui est lue par:
x = Val(Me.MSComm1.Input)
Remarque: les entrées non connectées sont au 1 logique.
Compteur-totalisateur
Le signal est appliqué entre les bornes +IN et -IN.
Son amplitude doit être comprise entre 1v et 42v crête à crête.
Sa fréquence doit être inférieure à 100 kHz.
Gate doit être au 1 logique et /Gate au 0 logique pour que le comptage soit actif.
La lecture du compteur se fait par:
Me.MSComm1.Output = "SENS:TOT:DATA? (@203)" + vbCrLf
La HP renvoie une valeur lue par:
x = Val(Me.MSComm1.Input)
La remise à zéro du compteur se fait par:
Me.MSComm1.Output = "SENS:TOT:CLE:IMM (@203)" + vbCrLf
Sorties analogiques
2 sorties tension ± 12v.
Courant de sortie 10mA maxi.
L'écriture se fait par:
Me.MSComm1.Output = "SOURCE:VOLT 3.251,(@204)" + vbCrLf
La sortie DAC 1 (voie 04) délivre alors une tension de 3,251v.
Module Multiplexeur à 20 voies HP 34901A
Ce module est implanté à l'emplacement 1.
Utilisation du thermocouple fourni avec l'appareil branché sur CH01 (Rouge en L et Blanc en H).
La lecture de la température se fait par:
Me.MSComm1.Output = "MEAS:TEMP? TC,J,1,0.1,(@101)" + vbCrLf