828 Keysight InfiniiVision DSOX1204A/G Oscilloscopes Programmer's Guide36 Programming ExamplesmyScope.DoCommand(":TRIGger:EDGE:LEVel 1.5")Console.WriteLine("Trigger edge level: {0}", _myScope.DoQueryString(":TRIGger:EDGE:LEVel?"))myScope.DoCommand(":TRIGger:EDGE:SLOPe POSitive")Console.WriteLine("Trigger edge slope: {0}", _myScope.DoQueryString(":TRIGger:EDGE:SLOPe?"))' Save oscilloscope configuration.Dim ResultsArray As Byte() ' Results array.Dim nLength As Integer ' Number of bytes returned from inst.Dim strPath As StringDim fStream As FileStream' Query and read setup string.ResultsArray = myScope.DoQueryIEEEBlock(":SYSTem:SETup?")nLength = ResultsArray.Length' Write setup string to file.strPath = "c:\scope\config\setup.stp"fStream = File.Open(strPath, FileMode.Create)fStream.Write(ResultsArray, 0, nLength)fStream.Close()Console.WriteLine("Setup bytes saved: {0}", nLength)' Change settings with individual commands:' Set vertical scale and offset.myScope.DoCommand(":CHANnel1:SCALe 0.05")Console.WriteLine("Channel 1 vertical scale: {0}", _myScope.DoQueryString(":CHANnel1:SCALe?"))myScope.DoCommand(":CHANnel1:OFFSet -1.5")Console.WriteLine("Channel 1 vertical offset: {0}", _myScope.DoQueryString(":CHANnel1:OFFSet?"))' Set horizontal scale and offset.myScope.DoCommand(":TIMebase:SCALe 0.0002")Console.WriteLine("Timebase scale: {0}", _myScope.DoQueryString(":TIMebase:SCALe?"))myScope.DoCommand(":TIMebase:POSition 0.0")Console.WriteLine("Timebase position: {0}", _myScope.DoQueryString(":TIMebase:POSition?"))' Set the acquisition type (NORMal, PEAK, AVERage, or HRESolution).myScope.DoCommand(":ACQuire:TYPE NORMal")Console.WriteLine("Acquire type: {0}", _myScope.DoQueryString(":ACQuire:TYPE?"))' Or, configure by loading a previously saved setup.Dim DataArray As Byte()Dim nBytesWritten As Integer' Read setup string from file.
