Yokogawa DA100 User Manual
Page 83
IM DA100-11E
8-2
8.1 GP-IB Sample Programs
Output the Unit and Decimal Point Data
Read out the unit and decimal point data from DA100, display them on CRT of personal computer,
and save them to floppy disk.
10
'TS2 <GET> LF
20
OPEN "TS2.DAT" FOR OUTPUT AS #1
30
ISET IFC
40
CMD DELIM=0
50
PRINT @1;"TS2"
60
WBYTE &H3F,&H21,&H8,&H3F;
70
PRINT @1;"LF001,010"
80
LINE INPUT @1;D$:PRINT D$:PRINT #1,D$
90
GOTO 110
100
LINE INPUT @;D$:PRINT D$:PRINT #1,D$
110
IF MID$(D$,2,1)<>"E" THEN 100
120
CLOSE:STOP
130
END
Output the measurement data (ASCII Code)
Read out the measurement data by ASCII code from DA100, display on CRT of personal computer,
and save to floppy disc.
10
'TS0 <GET> FM0
20
OPEN "TS0ASC.DAT" FOR OUTPUT AS #1
30
ISET IFC
40
CMD DELIM=0
50
PRINT @1;"TS0"
60
WBYTE &H3F,&H21,&H8,&H3F;
70
PRINT @1;"FM0,001,010"
80
LINE INPUT @1;D$:PRINT D$:PRINT #1,D$
90
LINE INPUT @;D$:PRINT D$:PRINT #1,D$
100
IF MID$(D$,2,1)<>"E" THEN 90
110
CLOSE:STOP
120
END