123
────────────────────────────────────────────────────
8.9 Sample Programs
────────────────────────────────────────────────────
(6) Saving the measurement value to the floppy disk
Summary This program saves the resistance measurement value or the temperature
measurement value to the floppy disk.
Program List
100 OUTPUT 701;":HEAD OFF"
110 LINPUT "Function? (R/T) ",F$
120 IF F$<>"R" AND F$<>"T" THEN 110
130 IF F$="R" THEN
140 OUTPUT 701;"FUNC RESI"
150 ELSE
160 OUTPUT 701;"FUNC TEMP"
170 END IF
180 LINPUT "Data Number? ",N$
190 OUTPUT 701;"HOLD ON"
200 CREATE ASCII "DATA",100
210 ASSIGN @File TO "DATA"
220 FOR I=1 TO VAL(N$)
230 OUTPUT 701;"*TRG"
240 IF F$="R" THEN
250 OUTPUT 701;":MEAS:RESI?"
260 ELSE
270 OUTPUT 701;":MEAS:TEMP?"
280 END IF
290 ENTER 701;M$
300 OUTPUT @File;M$
310 NEXT I
320 ASSIGN @File TO *
330 END
Comments
110 Designate the measurement function.
140 Set the measurement function to the resistance measurement mode.
160 Set the measurement function to the temperature measurement mode.
180 Designate the number of the measurements.
190 Set the holding of the measurements.
200-210 Open the date preservation file "DATA" with the 100-block size.
230 Execute the measurement once.
290 Get the temperature measurement value .
300 Save the measurement value to the file.
310 Loop until getting the designated number of measurement value.
320 Close the file.