Programming Examples
Sending Queries to the Logic Analyzer
150 !
160! ************* INTITIALIZE VARIABLE FOR NUMBER OF BYTES *****************
170! The variable "Numbytes" contains the number of bytes in the buffer.
180!
190REAL Numbytes
200Numbytes=0
210!
220! **************
230!
240CONTROL @Buff,3;1
250CONTROL @Buff,4;0
260!
270! *********************** SEND THE DATA QUERY **************************
280OUTPUT 707;":SYSTEM:HEADER ON"
290OUTPUT 707;":SYSTEM:LONGFORM ON"
300OUTPUT @Comm;"SELECT 2"
310OUTPUT @Comm;":SYSTEM:DATA?"
320!
330! ******************** ENTER THE BLOCK DATA HEADER *********************
340! Enter the block data header in the proper format.
350!
360ENTER @Comm USING "#,B";Byte
370PRINT CHR$(Byte);
380WHILE Byte<>35
390ENTER @Comm USING "#,B";Byte
400PRINT CHR$(Byte);
410END WHILE
420ENTER @Comm USING "#,B";Byte
430PRINT CHR$(Byte);
440
450IF Byte=1 THEN ENTER @Comm USING "#,D";Numbytes
460IF Byte=2 THEN ENTER @Comm USING "#,DD";Numbytes
470IF Byte=3 THEN ENTER @Comm USING "#,DDD";Numbytes
480IF Byte=4 THEN ENTER @Comm USING "#,DDDD";Numbytes
490IF Byte=5 THEN ENTER @Comm USING "#,DDDDD";Numbytes
500IF Byte=6 THEN ENTER @Comm USING "#,DDDDDD";Numbytes
510IF Byte=7 THEN ENTER @Comm USING "#,DDDDDDD";Numbytes
520IF Byte=8 THEN ENTER @Comm USING "#,DDDDDDDD";Numbytes
530Str1$=DVAL$(Numbytes,10)
531! DVAL$ returns an 11 character string
532PRINT
540!