237
Chapter 4 Application Programs
Program Listings
4
4
With mfIo2
.WriteString "*CLS"
.WriteString "*RST"
End With
Sleep 2000
With mfIo1
' Set up instrument 1
' Send commands to set channel 1 on instrument 1 to desired configuration
.WriteString "SOURCE1:FUNCTION SIN"
.WriteString "SOURCE1:FREQUENCY 1000"
.WriteString "SOURCE1:VOLT:UNIT VPP"
.WriteString "SOURCE1:VOLT 2"
.WriteString "SOURCE1:VOLT:OFFSET 0"
.WriteString "OUTPUT1:LOAD 50"
' Set trigger mode to BUS for instrument 1
.WriteString "TRIGGER1:SOURCE BUS"
' Set up and turn on infinite cycle burst with infinite cycle output
' This burst will start on instrument 1 when instrument receives a BUS
' trigger (*TRG)
.WriteString "SOURCE1:BURST:NCYCLES INF"
.WriteString "SOURCE1:BURST:MODE TRIG"
.WriteString "SOURCE1:BURST:STATE ON"
' Set up the output trigger on instrument to output a positive pulse when
' its burst starts
.WriteString "OUTPUT:TRIGGER ON"
.WriteString "OUTPUT:TRIGGER:SLOPE POSITIVE"
.WriteString "OUTPUT:TRIGGER:SOURCE CH1"
' turn off continuous INIT as we are just using one trigger to start the
' burst
.WriteString "INITIATE1:CONTINUOUS OFF"
' arm instrument 1 with INIT so it waits for BUS trigger to start burst
.WriteString "INITIATE1"
End With
With mfIo2
' Set up instrument 2
' Send commands to set channel 1 on instrument 2 to desired configuration
.WriteString "SOURCE1:FUNCTION RAMP"
.WriteString "SOURCE1:FREQUENCY 2000"
.WriteString "SOURCE1:VOLT:UNIT VPP"
.WriteString "SOURCE1:VOLT 1"
.WriteString "SOURCE1:VOLT:OFFSET 1"
.WriteString "OUTPUT1:LOAD 50"
' Set trigger mode to EXT for instrument 2
.WriteString "TRIGGER1:SOURCE EXT"
' Set slope of rear external trigger to positive edge
.WriteString "TRIGGER1:SLOPE POSITIVE"
' Set up and turn on infinite cycle burst with infinite cycle output
' This burst will start on instrument 2 when the instrument receives a
' positive TTL pulse (EXT trigger) on its rear EXT TRIG IN port
To Next Page
Loading...
