Table of Contents
Advertisement
Appendix
Sample Program
10
'*************************************************************************
20
'*
Program that reads/displays the measured data 10 times (GP-IB)'
30
'*************************************************************************
40
'
100 ISET IFC
110 ISET REN
120 CMD DELIM=0
130 IO=1
140 '
150 PRINT @IO;"PU4"
160 PRINT @IO;"H1"
170 PRINT @IO;"DL0"
180 '
190 FOR I=1 TO 10
200
INPUT WAIT 10," ",A
210
PRINT @IO;"OD"
220
LINE INPUT @IO;D$
230
PRINT D$
240 NEXT I
250 '
260 '
300 '************************************************************************
310 '*
Program that reads data using trigger and serial poll (GP-IB)'
320 '************************************************************************
330 '
340 PRINT @IO;"HD1"
350 '
360 PRINT @IO;"IM1"
370 POLL IO,STB
380 '
390 FOR I=1 TO 10
400
PRINT @IO;"E"
410
POLL IO,STB
420 IF (STB AND &H41)<>&H41 THEN 410
430
PRINT @IO;"OD"
440
LINE INPUT @IO;D$
450
PRINT D$
460 NEXT I
470 '
480 PRINT @IO;"HD0"
App-16
Example of response
MDL767303;REV1.01
REL0;PU4;PD0;ML4,0.000;MH4,130.000
DMM1;DF1
HD0;AG3;DIS0
VO0L;BL0;BP1
SM0;SN01;SR0;SND20
DR0;CMP0;CMD0.000,130.000
END
Operating Environment
Target model:
NEC PC-9801 Series
Target language:
N88-BASIC (standard program language on the PC-9801
Series)
GP-IB board:
PC-9801-29N interface board
' interface/clear
' set remote
'controller side delimiter = CR+LF
'Address=1
'Pressure units = kPa
'Communications output data header present
'Communications output delimiter=CR+LF+EOI
'read measured data ten times
'wait (random)
'measured data output request
'read measured data
'display measured data
'data hold
'status byte mask
'status byte initialization
'read measured data ten times
'activates trigger
'send serial poll
'check whether measurement has finished
'measured data output request
'read measured data
'display measured data
'release data hold
*
*
IM 767361-01E
Advertisement
Table of Contents
