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