E-8
Example Programs
Models 2510 and 2510-AT User’s Manual
Program 2: Setpoint tolerance temperature sweep
' The program uses setpoint tolerance to generate a temperature sweep.
' 2510 primary address = 15.
OPEN "IEEE" FOR OUTPUT AS #1
' Open IEEE-488 output path.
OPEN "IEEE" FOR INPUT AS #2
' Open IEEE-488 input path.
PRINT #1, "INTERM CRLF"
' Set input terminator.
PRINT #1, "OUTTERM LF"
' Set output terminator.
PRINT #1, "REMOTE 15"
' Put 2510 in remote.
PRINT #1, "OUTPUT 15;*RST"
' Restore GPIB defaults.
PRINT #1, "OUTPUT 15;:STAT:MEAS:ENAB 4096;*SRE 1"
' Enable SRQ on SPT.
PRINT #1, "OUTPUT 15;:SOUR:STOL 1"
' 1% setpoint tolerance.
PRINT #1, "OUTPUT 15;:SOUR:STOL:COUN 10"
' 10 reading tolerance window.
PRINT #1, "OUTPUT 15;:SOUR:TEMP:PROT 90"
' Upper temp. limit = 90 deg.
PRINT #1, "OUTPUT 15;:OUTP ON"
' Turn on output.
CLS
FOR Setpoint = 40 TO 80 STEP 10
' Loop for 40 to 80 deg. setpoints.
PRINT #1, "OUTPUT 15;:SOUR:TEMP" ; Setpoint
' Program temp. setpoint.
PRINT "Waiting for"; Setpoint; "degree setpoint to stabilize..."
DO: PRINT #1, "SRQ?"
' Request SRQ status.
INPUT #2, S
' Input SRQ status byte.
LOOP UNTIL S
' Wait for setpoint tolerance.
PRINT #1, "OUTPUT 15;:*CLS"
' Clear SPT.
PRINT #1, "SPOLL 15"
' Serial poll unit to clear SRQ.
INPUT #2, S
PRINT #1, "OUTPUT 15;:MEAS:POW?"
' Query TEC power reading.
PRINT #1, "ENTER 15"
INPUT #2, Power
PRINT "TEC power at"; Setpoint; "degree setpoint:"; Power
NEXT Setpoint
PRINT #1, "OUTPUT 15;:OUTP OFF"
' Turn off output.
PRINT "Done."
END
Содержание TEC SourceMeter 2510
Страница 194: ...A Specifications...
Страница 197: ...B StatusandErrorMessages...
Страница 206: ...C IEEE 488BusOverview...
Страница 221: ...D IEEE 488andSCPI ConformanceInformation...
Страница 225: ...E ExamplePrograms...
Страница 233: ...F GPIB488 1Protocol...