Download Model DC100 Communication Interface Instruction

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