TB 9-6625-173-24
APPENDIX A - CONTINUED
Sub Rng2500
Scan (1,Sec,3,0)
VoltSe (RangeSE1,1,mV2500,1,1,0,_60Hz,1.0,0)
VoltDiff (RangeDif1,1,mV2500,1,True,0,_60Hz,1.0,0)
If Flag(2)= False Then
ExitScan
EndIf
NextScan
EndSub
Sub Rng250
Scan (1,Sec,3,0)
VoltSe (RangeSE1,1,mV250,1,1,0,_60Hz,1.0,0)
VoltDiff (RangeDif1,1,mV250,1,True,0,_60Hz,1.0,0)
If Flag(3)= False Then
ExitScan
EndIf
NextScan
EndSub
Sub Rng25
Scan (1,Sec,3,0)
VoltSe (RangeSE1,1,mV25,1,1,0,_60Hz,1.0,0)
VoltDiff (RangeDif1,1,mV25,1,True,0,_60Hz,1.0,0)
If Flag(4)= False Then
ExitScan
EndIf
NextScan
EndSub
Sub Rng075
Scan (1,Sec,3,0)
VoltSe (RangeSE1,1,mV7_5,1,1,0,_60Hz,1.0,0)
VoltDiff (RangeDif1,1,mV7_5,l,True,0,_60Hz,1.0,0)
If Flag(5)= False Then
ExitScan
EndIf
NextScan
EndSub
A-3