Agilent Technologies E5071C Manual page 1181

E5071C
400| '''Performing single sweep
410| SCPI.IEEE4882.CLS
420| SCPI.TRIGger.SEQuence.SINGle
430| Dmy = SCPI.IEEE4882.OPC
440|
450| SCPI.DISPlay.WINDow(1).TRACe(1).Y.SCALe.AUTO
460| SCPI.DISPlay.WINDow(1).TRACe(2).Y.SCALe.AUTO
470|
480| '''Judging limit test
490| Rgst = SCPI.STATus.QUEStionable.LIMit.EVENt
500| Test_Ch1 = CInt(Rgst And 2)
510| Rgst = SCPI.STATus.QUEStionable.LIMit.CHANnel(1).EVENt
520| Test_Tr1 = CInt(Rgst And 2)
530| Test_Tr2 = CInt(Rgst And 4)
540|
550| '''Analyzing insertion loss/bandpass ripple
560| SCPI.CALCulate(1).PARameter(1).Select
570| SCPI.CALCulate(1).SELected.FUNCtion.DOMain.STARt = 1850000000#
580| SCPI.CALCulate(1).SELected.FUNCtion.DOMain.STOP = 1910000000#
590| SCPI.CALCulate(1).SELected.FUNCtion.DOMain.STATe = True
600| SCPI.CALCulate(1).SELected.FUNCtion.PPOLarity = "both"
610| SCPI.CALCulate(1).SELected.FUNCtion.PEXCursion = 0
620| SCPI.CALCulate(1).SELected.FUNCtion.TYPE = "MIN"
630| SCPI.CALCulate(1).SELected.FUNCtion.EXECute
640| IlossTx = SCPI.CALCulate(1).SELected.FUNCtion.DATA
650| RipTx = MaxPeakToPeak(1)
660|
670| SCPI.CALCulate(1).PARameter(2).Select
680| SCPI.CALCulate(1).SELected.FUNCtion.DOMain.STARt = 1930000000#
690| SCPI.CALCulate(1).SELected.FUNCtion.DOMain.STOP = 1990000000#
700| SCPI.CALCulate(1).SELected.FUNCtion.DOMain.STATe = True
710| SCPI.CALCulate(1).SELected.FUNCtion.PPOLarity = "both"
720| SCPI.CALCulate(1).SELected.FUNCtion.PEXCursion = 0
730| SCPI.CALCulate(1).SELected.FUNCtion.TYPE = "MIN"
740| SCPI.CALCulate(1).SELected.FUNCtion.EXECute
750| IlossRx = SCPI.CALCulate(1).SELected.FUNCtion.DATA
760| RipRx = MaxPeakToPeak(1)
1408