Keysight Technologies 3458A Guide D'utilisation page 811

Exemple DINT
L'exemple suivant est identique au précédent à part qu'il effectue 50 lectures au
lieu de 10 et les transmet à l'ordinateur en utilisant le format DINT.
10 OPTION BASE 1
20 INTEGER Num_readings,I,J,K
30 Num_readings=50
40 ALLOCATE REAL Rdgs(1:Num_readings) ! CREATION D'UN TABLEAU POUR LES
45
50 ASSIGN @Dvm TO 722
60 ASSIGN @Buffer TO BUFFER[4*Num_readings]
65
70 OUTPUT @Dvm;"PRESET NORM;RANGE 10;OFORMAT DINT;NRDGS ";Num_readings
75
77
80 TRANSFER @Dvm TO @Buffer;WAIT
85
90 OUTPUT @Dvm; "ISCALE?"
95
100 ENTER @Dvm;S
110 FOR I=1 TO Num_readings
120 ENTER @Buffer USING "#,W,W";J,K
122
125
127
130 Rdgs(I)=(J*65536.+K+65536.*(K<0))
140 R=ABS(Rdgs(I))
145
150 IF R>2147483647 THEN PRINT "OVLD"
155
160 Rdgs(I)=Rdgs(I)*S
170 Rdgs(I)=DROUND(Rdgs(I),8)
180 PRINT Rdgs(I)
190 NEXT I
200 END
Keysight 3458A Guide d'utilisation
! TARM AUTO, TRIG SYN, DCV GAMME 10 V, FORMAT DE SORTIE DINT,
! 50 LECTURES,AUTO
! NOTATION COMPLEMENT A 2 DANS CHAQUE VARIABLE J ET K (# = FIN
! D'INSTRUCTION NON REQUISE; W = METTRE DONNEES SOUS FORME ENTIER
! 16 BITS NOTATION COMPLEMENT A 2)
! BORNE INFERIEURE DU TABLEAU A 1
! DECLARATION DES VARIABLES
! NOMBRE DE LECTURES = 50
! LECTURES
! AFFECTATION DE L'ADRESSE DU MULTIMETRE
! D'ACCES DE LA MEMOIRE-TAMPON
! EVENEMENT SYN, TRANSFERT DES
! LECTURES
! INTERROGATION DU FACTEUR D'ECHELLE POUR
! LE FORMAT DINT
! LECTURE DU FACTEUR D'ECHELLE
! ENTRER UN MOT DE 16 OCTETS
! UTILISATION DE LA VALEUR ABSOLUE POUR
! VERIFIER SURCHARGE
! SI SURCHARGE, IMPRESSION
! D'UN MESSAGE
! APPLICATION DU FACTEUR D'ECHELLE
! ARRONDIT LECTURE CONVERTIE
! IMPRESSION DES LECTURES
Référence
! AFFECTATION DU NOM
! CONVERTIR EN NB REEL
6
307