0001 function [amp_filter_info] = vb_read_yokogawa_amp_filter_info(fid)
0002
0003
0004
0005
0006
0007
0008
0009 amp_gain = GetMeg160AmpGainM( fid );
0010
0011
0012 fll_count = size(amp_gain, 1);
0013
0014
0015
0016
0017
0018
0019
0020
0021 IsUSBLowBandKapperType = false;
0022 if IsISICOSystem( system_id ) ||...
0023 IsMattoHISSystem( system_id ) ||...
0024 IsAmaike160System( system_id ) ||...
0025 IsTokyo440System( system_id ) ||...
0026 IsATRSystem( system_id )
0027 IsUSBLowBandKapperType = true;
0028 end
0029
0030 for no = 1:fll_count
0031 data_gain = amp_gain(no, 1);
0032 if IsUSBLowBandKapperType
0033 amp_filter_info(no) = struct('A1_gain', data_gain, ...
0034 'A2_gain', 1, ...
0035 'A3_gain', 1, ...
0036 'HPF_setting', [], ...
0037 'LPF_setting', [], ...
0038 'BEF_setting', []);
0039 else
0040 amp_filter_info(no) = struct('input_gain', data_gain, ...
0041 'output_gain', 1, ...
0042 'HPF_setting', [], ...
0043 'LPF_setting', [], ...
0044 'BEF_setting', []);
0045 end
0046 end
0047
0048
0049
0050
0051
0052
0053 function flag = IsAmaike160System(n)
0054
0055 SystemIdAmaike160min = 41;
0056 SystemIdAmaike160max = 49;
0057 if n>=SystemIdAmaike160min & n<=SystemIdAmaike160max
0058 flag = true;
0059 else
0060 flag = false;
0061 end
0062
0063 function flag = IsMattoHISSystem(n)
0064
0065 SystemIdMattoHISmin = 60;
0066 SystemIdMattoHISmax = 69;
0067 if n>=SystemIdMattoHISmin & n<=SystemIdMattoHISmax
0068 flag = true;
0069 else
0070 flag = false;
0071 end
0072
0073 function flag = IsISICOSystem(n)
0074
0075 SystemIdISICOmin = 160;
0076 SystemIdISICOmax = 179;
0077 if n>=SystemIdISICOmin & n<=SystemIdISICOmax
0078 flag = true;
0079 else
0080 flag = false;
0081 end
0082
0083 function flag = IsTokyo440System(n)
0084
0085 SystemIdTokyo440min = 180;
0086 SystemIdTokyo440max = 199;
0087 if n>=SystemIdTokyo440min & n<=SystemIdTokyo440max
0088 flag = true;
0089 else
0090 flag = false;
0091 end
0092
0093 function flag = IsATRSystem(n)
0094
0095
0096
0097
0098
0099
0100
0101
0102 flag = true;
0103