TB 9-6625-173-24
APPENDIX A - CONTINUED
Sub Rng025
Scan (1,Sec,3,0)
VoltSe (RangeSE1,1,mV2_5,1,1,0,_60Hz,1.0,0)
VoltDiff (RangeDif1,1,mV2_5,1,True,0,_60Hz,1.0,0)
If Flag(6)= False Then
ExitScan
EndIf
NextScan
EndSub
BeginProg
Scan(1,Sec,0,0)
If Flag(1)=True Then
Call Rng5000
ElseIf Flag(2)=True Then
Call Rng2500
ElseIf Flag(3)=True Then
Call Rng250
ElseIf Flag(4)=True Then
Call Rng25
ElseIf Flag(5)=True Then
Call Rng075
ElseIf Flag(6) =True Then
Call Rng025
EndIf
NextScan
EndProg
A-4