REM $Include "QBSetup"
DEV&=722
INFO1$="*RST"
LENGTH1%=LEN(INFO1$)
INFO2$="*CLS"
LENGTH2%=LEN(INFO2$)
INFO3$="CALC:DBM:REF 50"
LENGTH3%=LEN(INFO3$)
INFO4$="CONF:VOLT:AC 1,0.001"
LENGTH4%=LEN(INFO4$)
INFO5$="DET:BAND 200"
LENGTH5%=LEN(INFO5$)
INFO6$="TRIG:COUN 5"
LENGTH6%=LEN(INFO6$)
INFO7$="TRIG:SOUR IMM"
LENGTH7%=LEN(INFO7$)
INFO8$="CALC:FUNC DBM"
LENGTH8%=LEN(INFO8$)
INFO9$="CALC:STAT ON"
LENGTH9%=LEN(INFO9$)
INFO10$="READ?"
LENGTH10%=LEN(INFO10$)
DIM A(1:5)
Actual%=0
Call IOCLEAR(DEV&)
Call IOOUTPUTS(DEV&, INFO1$, LENGTH1%)
Call IOOUTPUTS(DEV&, INFO2$, LENGTH2%)
Call IOOUTPUTS(DEV&, INFO3$, LENGTH3%)
Call IOOUTPUTS(DEV&, INFO4$, LENGTH4%)
Call IOOUTPUTS(DEV&, INFO5$, LENGTH5%)
Call IOOUTPUTS(DEV&, INFO6$, LENGTH6%)
Call IOOUTPUTS(DEV&, INFO7$, LENGTH7%)
Call IOOUTPUTS(DEV&, INFO8$, LENGTH8%)
Call IOOUTPUTS(DEV&, INFO9$, LENGTH9%)
Call IOOUTPUTS(DEV&, INFO10$, LENGTH10%)
Call IOENTER(DEV&, Seg A(1),5,Actual%)
For I=1 to 5
Print A(I);
Next I
END
HP-IB Operation Using QuickBASIC
6
Chapter 6 Application Programs
Using CONFigure with a Math Operation
187
Summary of Contents for 34401A
Page 12: ...1 Quick Start 1 ...
Page 26: ...2 Front Panel Menu Operation 2 ...
Page 50: ...3 Features and Functions 3 ...
Page 103: ...4 Remote Interface Reference 4 ...
Page 135: ...SCPI Status System 4 Chapter 4 Remote Interface Reference The SCPI Status Model 135 ...
Page 170: ...5 Error Messages 5 ...
Page 182: ...6 Application Programs 6 ...
Page 196: ...7 Measurement Tutorial 7 ...
Page 214: ...8 Specifications 8 ...