Models 2500 and 2502 User’s Manual Example Programs H-5
Data store program
The program listing below performs data storage as covered in Section 8, and it also dem-
onstrates how to use SRQs to determine when storage is complete. This program sets up
the following operating modes:
• Number of points: 10
•Trigger count: 10
• Data store source: channel 1 readings only
• Acquired data: all buffer readings, mean (average), and standard deviation.
' Data Store Program
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 25"
CLS
PRINT #1, "OUTPUT 25;*RST" ' Restore GPIB defaults.
PRINT #1, "OUTPUT 25;:STAT:MEAS:ENAB 512;*SRE 1" ' Enable buffer full SRQ.
PRINT #1, "OUTPUT 25;:SOUR1:VOLT 10" ' Output 10V on channel 1.
PRINT #1, "OUTPUT 25;:SOUR1:DEL 0.5" ' 0.5 sec source 1 delay.
PRINT #1, "OUTPUT 25;:TRAC:POIN 10" ' Store 10 readings.
PRINT #1, "OUTPUT 25;:TRAC:FEED:CONT NEXT" ' Turn on data store.
PRINT #1, "OUTPUT 25;:TRIG:COUN 10" ' Trigger count = data store points.
PRINT #1, "OUTPUT 25;:FORM:ELEM:TRAC CURR1" 'Select channel 1 current.
PRINT #1, "OUTPUT 25;:OUTP1 ON" ' Turn on channel 1 output.
PRINT #1, "OUTPUT 25;:INIT" ' Trigger readings.
PRINT "Waiting for buffer to fill..."
DO: PRINT #1, "SRQ?" ' Request SRQ status.
INPUT #2, S ' Input SRQ status.
LOOP UNTIL S ' Wait for buffer to fill.
PRINT #1, "OUTPUT 25;:OUTP1 OFF" ' Turn off channel 1 output.
PRINT #1, "OUTPUT 25;:TRAC:DATA?" ' Request all data store readings.
PRINT #1, "ENTER 25" ' Address 2500 to talk.
LINE INPUT #2, R$ ' Input reading string.
PRINT "All buffer readings: "; R$ ' Print reading string.
PRINT #1, "OUTPUT 25;:DISP:MODE CALC3" ' Select channel 1 for stats.
PRINT #1, "OUTPUT 25;:CALC8:FORM MEAN" ' Select mean buffer statistic.
PRINT #1, "OUTPUT 25;:CALC8:DATA?" ' Request mean reading.
PRINT #1, "ENTER 25" ' Address 2500 to talk.
LINE INPUT #2, R$ ' Input mean reading.
PRINT "Buffer mean: "; R$ ' Print mean reading.
PRINT #1, "OUTPUT 25;:CALC8:FORM SDEV" ' Standard deviation statistic.
PRINT #1, "OUTPUT 25;:CALC8:DATA?" ' Request standard deviation.
PRINT #1, "ENTER 25" ' Address 2500 to talk.
LINE INPUT #2, R$ ' Input standard deviation.
PRINT "Buffer standard deviation: "; R$ ' Print standard deviation.
END
Test Equipment Depot - 800.517.8431 - 99 Washington Street Melrose, MA 02176
TestEquipmentDepot.com