Commande à distance de l'unité d'acquisition HP 34970A
07/01/2001
 Patrick ABATI 
Liste des cours

Cette page traite de l'utilisation de la RS-232.
La HP est équipée des modules HP 34901A et HP 34907A.
hp34970a

 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).

module multifonction

 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 

compteur

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.

analog

 

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