Chapter 7 631
Language Reference
TDF Trace Data Format
Query Response
Figure 7-275 TDF Query Response
Example
10 REAL A(1:601)
20 OUTPUT 718;"IP;CF 300MHZ;SP 20MHZ;SNGLS;TS;"
30 CALL Get_data(Fa,Fb,Rl,Rb,Vb,St,Lg,Aunits$)
40 OUTPUT 718;"TDF P;TRA?;"
50 ENTER 718;A(*)
60 PRINT "PRESS CONTINUE TO RETURN DATA TO THE ANALYZER."
70 PAUSE
80 OUTPUT 718;"IP;TDF P;TS;VIEW TRA;"
90 CALL Enter_data(Fa,Fb,Rl,Rb,Vb,St,Lg,Aunits$)
100 OUTPUT 718;"TRA ";
110 FOR I=1 TO 600
120 OUTPUT 718;A(I);"DBM,"
130 NEXT I
140 OUTPUT 718;A(601);"DBM;"
150 END
160 SUB Enter_data(Fa,Fb,Rl,Rb,Vb,St,Lg,Aunits$)
170 OUTPUT 718;"FA ";Fa;"HZ;"
180 OUTPUT 718;"FB ";Fb;"HZ;"
190 OUTPUT 718;"AUNITS ";Aunits$;";"
200 OUTPUT 718;"RB ";Rb;"HZ;"
210 OUTPUT 718;"VB ";Vb;"HZ;"
220 OUTPUT 718;"ST ";St;"S;"
230 IF Lg=0 THEN
240 OUTPUT 718;"LN;"
250 ELSE
260 OUTPUT 718;"LG ";Lg;"DB;"
270 END IF
280 SUBEND
290 SUB Get_data(Fa,Fb,Rl,Rb,Vb,St,Lg,Aunits$)
300 OUTPUT 718;"FA?;FB?;RL?;RB?;VB?;ST?;LG?;AUNITS?;"
310 ENTER 718 USING "K";Fa,Fb,Rl,Rb,Vb,St,Lg,Aunits$
320 PRINT Fa,Fb,Rl,Rb,Vb,St,Lg,Aunits$
330 SUBEND
To Next Page
Loading...
Need help?
General
