R3131 Spectrum Analyzer Operation Manual
4.1 GPIB Remote Programming
4-40
Aug 28/98
Example PC-14: Input data to memory A in binary format.
10
ISET IFC:ISET REN
’
Execute interface clear and remote
enable.
20
DIM DT(501)
30
A=0:ST=3.14/100
40
PRINT @8;”AB TBA”
’
Specify binary input to memory A.
50
FOR I=0 TO 500
60
DI(I)=INT(COS(A)*1000+2000
70
A=A+ST
80
NEXT I
90
’
Cancel listener and address PC9801 to
#30 as
100
’
talker and this device to #8 as listener.
110
WBYTE &H3F,&H5F,&H5E,&H28;DT(0)\256,DT(0) MOD 256
120
FOR I=1 to 499
130
WBYTE;DT(I)\256,DT(I) MOD 256
’
Transfer data, first high-order bytes and
then low-order bytes.
140
NEXT I
150
WBYTE;DT(500)\256,DT(500) MOD256@
’
When the last data is input, send EOI
signal.
160
PRINT @8;”AV”
’
A VIEW
170
STOP
180
END
