Context Navigation

soleilcorcheck.m @ 4

Last change on this file since 4 was 4, checked in by zhangj, 10 years ago
Initial import--MML version from SOLEIL@2013
File size: 871 bytes

Line
1	function [varargout] = soleilcorcheck
2	%SOLEILCORCHECK - Checks for invalid corrector entries
3	% [varargout] = soleilcorcheck
4	% create COR.status vector with valid indices
5
6	%
7	% Written by Laurent S. Nadolski, Soleil, April 2004
8
9	mode = getfamilydata('HCOR','Monitor','Mode');
10	if strcmpi(mode,'ONLINE') %...system is ONLINE - look for bad correctors readings
11	xstat = find(getfamilydata('HCOR','Status'));
12	elseif strcmpi(mode,'SIMULATOR')
13	xstat = find(getfamilydata('HCOR','Status'));
14	end %end of mode condition
15
16	mode = getfamilydata('VCOR','Monitor','Mode');
17	if strcmpi(mode,'ONLINE') %...system is ONLINE - look for bad correctors readings
18	zstat = find(getfamilydata('VCOR','Status'));
19	elseif strcmpi(mode,'SIMULATOR')
20	zstat = find(getfamilydata('VCOR','Status'));
21	end %end of mode condition
22
23	varargout{1} = xstat;
24	varargout{2} = zstat;

Note: See TracBrowser for help on using the repository browser.