Specifications

Chapter 7 157
Measurement Result Processing
Using Marker Function
7. Measurement Result
Processing
CStr(n_peak_y) & "[ohm] @" & CStr(n_peak_x / 1000000#) & "MHz")
880 End If
890 End If
900
910 End
920
930 End Sub
940
950 Private Function peak_not_found(trc As Integer)
960 Dim reg As String
970 Dim div As Integer, Mo As Integer
980
990 SCPI.Output "STAT:QUES:SEAR:COND?"
1000 SCPI.Enter reg
1010
1020 div = Val(reg) \ 32
1030 Mo = Val(reg) Mod 32
1040 If div = 1 Then
1050 trc5 = 1
1060 ElseIf div = 0 Then
1070 trc5 = 0
1080 End If
1090 div = Mo \ 16
1100 Mo = Mo Mod 16
1110 If div = 1 Then
1120 trc4 = 1
1130 ElseIf div = 0 Then
1140 trc4 = 0
1150 End If
1160 div = Mo \ 8
1170 Mo = Mo Mod 8
1180 If div = 1 Then
1190 trc3 = 1
1200 ElseIf div = 0 Then
1210 trc3 = 0
1220 End If
1230 div = Mo \ 4
1240 Mo = Mo Mod 4
1250 If div = 1 Then
1260 trc2 = 1
1270 ElseIf div = 0 Then
1280 trc2 = 0
1290 End If
1300 div = Mo \ 2
1310 Mo = Mo Mod 2
1320 If div = 1 Then
1330 trc1 = 1
1340 ElseIf div = 0 Then
1350 trc1 = 0
1360 End If
1370
1380 Select Case trc
1390 Case 1
1400 peak_not_found = trc1
1410 Case 2
1420 peak_not_found = trc2
1430 Case 3
1440 peak_not_found = trc3