4349B
110
OUTPUT @Hp4349;":SOUR:VOLT1
100"
120
OUTPUT @Hp4349;":SOUR:VOLT2
100"
130
OUTPUT @Hp4349;":SOUR:VOLT3
100"
140
OUTPUT @Hp4349;":SOUR:VOLT4
100"
150
OUTPUT @Hp4349;":CURR:APER
0.03"
160
OUTPUT @Hp4349;":SENS:CURR:RANG1:AUTO
OFF"
170
OUTPUT
@Hp4349;":SENS:CURR:RANG1
1E-10"
180
OUTPUT
@Hp4349;":SENS:CURR:RANG2
1E-10"
190
OUTPUT
@Hp4349;":SENS:CURR:RANG3
1E-10"
200
OUTPUT
@Hp4349;":SENS:CURR:RANG4
1E-10"
210
!
220
DISP
"Open
the
test
leads,
then
press
the
`Continue'."
230
PAUSE
240
DISP
"OPEN
Correction"
250
OUTPUT
@Hp4349;":SENS:CORR:COLL
OFFS"
260
OUTPUT
@Hp4349;"*OPC?"
270
ENTER
@Hp4349;A
280
DISP
"Connect
DUT,
then
press
the
`Continue'."
290
PAUSE
300
DISP
310
!
320
OUTPUT
@Hp4349;":CALC1:LIM:LOW
1E12;UPP
1E13"
330
OUTPUT
@Hp4349;":CALC2:LIM:LOW
1E12;UPP 1E13"
340
OUTPUT
@Hp4349;":CALC3:LIM:LOW
1E12;UPP 1E13"
350
OUTPUT
@Hp4349;":CALC4:LIM:LOW
1E12;UPP 1E13"
360
OUTPUT
@Hp4349;":CALC1:LIM:STAT
ON"
370
OUTPUT
@Hp4349;":DISP:ENAB
OFF"
380
OUTPUT
@Hp4349;":RES:CONT:VER
ON"
390
OUTPUT
@Hp4349;":TRIG:SOUR
EXT"
400
OUTPUT
@Hp4349;":FORM
REAL"
410
!
420
OUTPUT @Hp4349;":DATA:POIN
DBUF,50"
430
OUTPUT @Hp4349;":DATA:FEED
DBUF,'SENS'"
440
OUTPUT
@Hp4349;":DATA:FEED:CONT
DBUF,ALW"
450
!
460
OUTPUT
@Hp4349;":STAT:OPER:ENAB
";DVAL("0000000100000000",2)
470
OUTPUT
@Hp4349;"*SRE
";DVAL("11000000",2)
480
OUTPUT
@Hp4349;":INIT:CONT
ON"
490
!
500
!
Triggering
510 !
520 ON INTR Hp_ib GOTO Buffer_full
530 ENABLE INTR Hp_ib;2
540 LOOP
550 END LOOP
560 !
570 Buffer_full:OFF INTR
580 DISP "Buffer full."
590 OUTPUT @Hp4349;":DATA? DBUF"
600 ENTER @Binary USING "#,6A";A$
610 FOR I=1 TO 50
620 FOR J=1 TO 4
630 ENTER @Binary;St(J,I),Dat(J,I),Comp(J,I)
640 NEXT J
650 NEXT I
Application Measurement 6-3