HP 436A - Page 49

Operation
Model 436A
3-28
436A QUICK PROGRAMMING GUIDE (cont'd)
Subroutines for 9825 (HPL)
"pmz" - Power meter zero subroutine
"pmz":
"remove source":dsp "disconnect sensor from source";stp
wrt "pmrd","ZlT";fmt 2,3x,f5.0;red "pmrd.2",Z
"verify zero" :if abs (Z) >2;gto "-1"
"unzero":wrt "pmrd","9+AI";fmt 3,b;red "pmrd.3",Z
"verify unzero": if Z>84;gto "unzero"
"preset/ret":wrt "pmrd","9D+V";ret
"pmr" - Power meter read subroutine
"pmr":
f~t l,lx,b,lx,fS.O,lx,f3.0
0-+R
for X=l to 20
wrt "pmrd", "9iJ+V"
wait (R=73)4000
red "pmrd.1
11
,R,P,E
if X=l;gto "Pl"
if abs(P-S)>l;gto "Pl"
PlO"E-rP;ret
"Pl":P-rS
next X
dsp "power meter not settled"
Note: The next statement should be "end" : end , or if another subroutine follows then a gto "end"
should be used.
Figure 3-8. 436A Quick Programming Guide (4 of 5)
•
•
•