Diffusion Instrument Control (TekRSA-Freq-vs-Time) Browse

runInstrument.m
235b33d748c8TekRSA-Freq-vs-Time

runInstrument.m
View Options

			% Create instrument instance and add it to the collector

			function Instr = runInstrument(name, varargin)

			% Process inputs
			p = inputParser();
			p.KeepUnmatched = true;
			addParameter(p, 'instr_class', '', @ischar);
			addParameter(p, 'enable_gui', false, @islogical);
			parse(p, varargin{:});

			instr_class = p.Results.instr_class;
			enable_gui = p.Results.enable_gui;
			un_varargin = struct2namevalue(p.Unmatched);

			% Get the unique instance of Collector
			Collector = MyCollector.instance();

			% Check if the instrument is already running
			if ismember(name, Collector.running_instruments)

			% If instrument is already present in the Collector, do not create
			% a new object, but return the existing one.
			disp([name, ' is already running. Returning existing object']);

			Instr = getInstrument(Collector, name);

			Fig = findFigure(Instr);

			if isempty(Fig)
			if enable_gui && ismethod(Instr, 'createGui')

			% Ensure the instrument has GUI
			createGui(Instr);

			Fig = findFigure(Instr);
			setupFigure(Fig, name);
			end
			else

			% Bring the window of existing GUI to the front
			setFocus(Fig);
			end

			return
			end

			% Create a new instrument object
			if isempty(instr_class)

			% Load instr_class, interface, address and other startup arguments
			% from InstrumentList
			InstrumentList = getLocalSettings('InstrumentList');

			ind = cellfun(@(x)isequal(x, name), {InstrumentList.name});

			assert(any(ind), [name ' must correspond to an entry in ' ...
			'InstrumentList.'])

			InstrEntry = InstrumentList(ind);

			if length(InstrEntry) > 1

			% Multiple entries found
			warning(['Multiple InstrumentList entries found with ' ...
			'name ' name]);
			InstrEntry = InstrEntry(1);
			end

			instr_class = InstrEntry.control_class;

			assert(~isempty(instr_class), ['Control class is not specified '...
			'for ' name]);

			instr_args = [struct2namevalue(InstrEntry.StartupOpts), ...
			un_varargin];
			else

			% Case in which all the arguments are supplied explicitly
			instr_args = un_varargin;
			end

			% Create an instrument instance and store it in Collector
			Instr = feval(instr_class, instr_args{:});
			addInstrument(Collector, name, Instr);

			try

			% Open communication. Typically instrument commands will re-open
			% the communication object if it is closed, but keepeing it open
			% speeds communication up.
			if ismethod(Instr, 'openComm')
			openComm(Instr);
			end

			% Send identification request to the instrument
			if ismethod(Instr, 'idn')
			idn(Instr);
			end

			% Read out the state of the physical device
			if ismethod(Instr, 'sync')
			sync(Instr);
			end
			catch ME
			warning(['Could not start communication with ' name ...
			'. Error: ' ME.message]);
			end

			if enable_gui && ismethod(Instr, 'createGui')

			% Ensure the instrument has GUI
			createGui(Instr);
			end

			Fig = findFigure(Instr);

			if ~isempty(Fig)
			setupFigure(Fig, name);
			end
			end

			function setupFigure(Fig, name)
			try

			% Display the instrument's name
			Fig.Name = char(name);

			% Apply color scheme
			applyLocalColorScheme(Fig);

			% Move the app figure to the center of the screen
			centerFigure(Fig);
			catch ME
			warning(['Error while setting up the GUI of ' name ':' ...
			ME.message]);
			end
			end

rINSTCONTROL/Utility functions/runInstrument.m235b33d748c8TekRSA-Freq-vs-Time

runInstrument.mView Options

rINSTCONTROL/Utility functions/runInstrument.m
235b33d748c8TekRSA-Freq-vs-Time

runInstrument.m
View Options