Specifications

Figure 5-50. Frequency response simulation for a low-value inductor
Figure 5-51. Equivalent circuit enhancement
5-40
10 DIM Ztrc(1:201,1:2),Fmta$[9],Fmtb$[9]
20 DIM Ttrc(1:201,1:2)
30 DIM R(201),R1(201)
40 DIM X(201)
50 DIM Zdat(1:201,1:2)
60 DIM Tdat(1:201,1:2)
70 !
80 DEG
90 !
100 IF SYSTEM$(“SYSTEM ID”)=”HP4294A” THEN
110 ASSIGN @Agt4294a TO 800
120 ELSE
130 ASSIGN @Agt4294a TO 717
140 END IF
150 !
160 OUTPUT @Agt4294a;”FORM4”
170 !
180 OUTPUT @Agt4294a;”TRAC A”
190 OUTPUT @Agt4294a;”FMT?”
200 ENTER @Agt4294a;Fmta$
210 OUTPUT @Agt4294a;”OUTPMTRC?”
220 ENTER @Agt4294a;Ztrc(*)
230 !
240 OUTPUT @Agt4294a;”TRAC B”
250 OUTPUT @Agt4294a;”FMT?”
260 ENTER @Agt4294a;Fmtb$
270 OUTPUT @Agt4294a;”OUTPMTRC?”
280 ENTER @Agt4294a;Ttrc(*)
290 !
300 OUTPUT @Agt4294a;”DATMEM”
310 !
320 INPUT “Rs=”,Rs
330 !
340 FOR I=1 TO 201
350 R(I)=Ztrc(I,1)*COS(Ttrc(I,1))
360 X(I)=Ztrc(I,1)*SIN(Ttrc(I,1))
370 R1(I)=R(I)+Rs
380 Zdat(I,1)=SQR(R1(I)^2+X(I)^2)
390 Tdat(I,1)=ATN(X(I)/R1(I))
400 NEXT I
410 !
420 OUTPUT @Agt4294a;”TRAC A”
430 OUTPUT @Agt4294a;”FMT “&Fmta$
440 OUTPUT @Agt4294a;”INPUDTRC “;Zdat(*)
450 !
460 OUTPUT @Agt4294a;”TRAC B”
470 OUTPUT @Agt4294a;”FMT “&Fmtb$
480 OUTPUT @Agt4294a;”INPUDTRC “;Tdat(*)
490 !
500 GOTO 320
510 END
(a)
(a)
(b) Circuit mode A
(c) Circuit mode B
(b)
(c)