Fluke CombiScope PM3370B User Manual page 254

THE CPL PROTOCOL
Example:
100 PRINT #1,"QW";74
110 GOSUB 1000
120 INPUT #1,NM$
130 INPUT #1,YUNIT$
140 INPUT #1,XUNIT$
150 INPUT #1,YZERO
160 INPUT #1,XZERO
170 INPUT #1,YRESOL
180 INPUT #1,XRESOL
190 INPUT #1,YRANGE
200 INPUT #1,DT$
210 INPUT #1,TM$
220 INPUT #1,DTC
230 INPUT #1,MINMAX
240 INPUT #1,RES1$
250 INPUT #1,RES2$
260 INPUT #1,RES3$
270 INPUT #1,RES4$
280 INPUT #1,COUNT
290 DIM WAVE(2*COUNT)
300 SUM=0
310 PRINT "Reading trace samples ..."
320 FOR I=1 TO 2*COUNT
330 WAVE(I)=ASC(INPUT$(1,#1))
340 SUM=(SUM+WAVE(I))MOD(256)
350 NEXT I
360 CHECKSUM=ASC(INPUT$(1,#1))
370 IF SUM <> CHECKSUM THEN GOTO 380
380 END
390 PRINT "*** Checksum error ***"
:'Query waveform (m7.4)
:'Sync on acknowledge
:'Trace_name
:'Y_unit
:'X_unit
:'Y_zero
:'X_zero
:'Y_resolution
:'X_resolution
:'Y_range
:'Date
:'Time
:'Delta T correction
:'Min Max trace
:'Reserved field
:'Reserved field
:'Reserved field
:'Reserved field
:'Sample_count
:'Declare waveform array
:'Display operator message
:'2 bytes per sample
:'Read each sample byte
:'Calculate checksum
:'Read checksum
:'Test checksum
:'Display error message
6 - 37