Commit f287dc6e authored by Jürgen Matzka's avatar Jürgen Matzka
Browse files
parents c0da6214 4add9450
% -------------------------------------------------------------------------
% Parameters
% -------------------------------------------------------------------------
starttime = '2018-01-25';
stoptime = '2018-03-15';
station = ['BFO1s'];
produce_IAGA_2002_min='P';
produce_IAGA_2002_sec='0';
% -------------------------------------------------------------------------
% Start programs
% -------------------------------------------------------------------------
%ppmsec2cdf('starttime',starttime,'stoptime',stoptime,'station',station);
for s=1:size(station,1)
h=varlab_01('parfile','parameters_win_Achim.txt','date',starttime,...
'station',station(s,1:4));
waitfor(h);
pressed=questdlg('Verschieben von ppm/sec ins Archiv ?','Was jetzt?',...
'Ja','Nein','Abbrechen','Nein');
switch pressed
case 'Ja'
case 'Nein'
continue
case 'Abbrechen'
break
end
pressed=questdlg('Aufrufen von cdf2def ?','Was jetzt?',...
'Ja','Nein','Abbrechen','Nein');
switch pressed
case 'Ja'
cdf2def('starttime',starttime,'stoptime',stoptime,...
'station',station(s,:),...
'produce_IAGA_2002_min',produce_IAGA_2002_min,...
'produce_IAGA_2002_sec',produce_IAGA_2002_sec);
case 'Nein'
continue
case 'Abbrechen'
break
end
pressed=questdlg('Versenden an Kyoto ?','Was jetzt?',...
'Ja','Nein','Abbrechen','Nein');
switch pressed
case 'Ja'
% Move files
% Send files (Check for P/Q-files depending on
% produce_IAGA_2002_min
IAGA2002_Kyoto_transfer('starttime',starttime,...
'stoptime',stoptime,...
'station',station(s,1:4),...
'IAGAtype',produce_IAGA_2002_min);
case 'Nein'
continue
case 'Abbrechen'
break
end
end
% -------------------------------------------------------------------------
% FROM cdf2def_auto
% -------------------------------------------------------------------------
%station_array = 'NGK0g';
%station_array = ['BFO1s';'VNA1s']
%station_array = 'VNA1s'
%station_array = ['MAR1l']
%station_array = 'BFO1s';
%station_array = 'MSN0g';
%station_array = 'VNA1s';
%station_array = 'TDC1d';
%station_array = 'NGK0g';
%station_array = 'WNG1g';
%station_array = 'BFO1s';
%station_array = 'TTB0g';
%station_array = 'SMA0g';
%station_array = 'VSS0g';
%station_array = 'SHE0g';
% station_array = [...
%'TDC1d';...% 1
%'ROE1d';...% 2
%'BFE4d';...% 3
%'BFE6d';...% 4
%'NAQ4d';...% 5
%'NAQ6d';...% 6
%'FHB1d';...% 7
%'GHB1d';...% 8
%'SKT1d';...% 9
%'STF1d';...% 10
%'ATU1d';...% 11
%'GDH4d';...% 12
%'GDH6d';...% 13
%'UMQ1d';...% 14
%'UPN1d';...% 15
%'KUV1d';...% 16
%'SVS1d';...% 17
%'TAB1d';...% 18
%'THL4d';...% 19
%'THL6d';...% 20
%'NRD1d';...% 21
%'DMH1d';...% 22
%'SCO1d';...% 23
% 'AMK1d';...%
% ]; % 24
% station_array = [...
% %'TDC1d';...% 1
% %'ROE1d';...% 2
% %'BFE4d';...% 3
% %'BFE6d';...% 4
% %'NAQ4d';...% 5
% 'NAQ6d';...% 6
% %'FHB1d';...% 7
% %'GHB1d';...% 8
% 'SKT1d';...% 9
% 'STF1d';...% 10
% 'ATU1d';...% 11
% %'GDH4d';...% 12
% 'GDH6d';...% 13
% 'UMQ1d';...% 14
% %'UPN1d';...% 15
% %'KUV1d';...% 16
% %'SVS1d';...% 17
% %'TAB1d';...% 18
% %'THL4d';...% 19
% %'THL6d';...% 20
% %'NRD1d';...% 21
% %'DMH1d';...% 22
% %'SCO1d';...% 23
% % 'AMK1d';...%
% ]; % 24
% station_array = 'THL6d';
% station_array = 'GDH6d';
% station_array = 'NAQ6d';
% station_array = 'TDC1d';
% station_array = 'SHE0g';
% station_array = 'VNA1s';
% station_array = 'VSS0g';
% station_array = 'LOK0g';
% station_array = [... % all variometer stations
% 'TAB1d';...%
% 'SVS1d';...%
% 'KUV1d';...%
% 'UPN1d';...%
% 'UMQ1d';...%
% 'ATU1d';...%
% 'STF1d';...%
% 'SKT1d';...%
% 'GHB1d';...%
% 'FHB1d';...%
% 'STN1d';...
% 'DNB1d';...
% 'SCO1d';...
% 'AMK1d'...
% ]; %
\ No newline at end of file
% -> convert löschen
% -> cdf2def_auto löschen
% -> wo ist 1 Hz mat?
% -> 1-sec Program für Kyoto
% produce_IAGA_2002_min = '0'; % kann auch 'n' sein, warum?
% produce_IAGA_2002_sec = '0'; % kann auch 'n' sein, warum?
% -------------------------------------------------------------------------
% Pflicht-Parameter
% -------------------------------------------------------------------------
clear all
close all
station = ['WNG0g'];
%station = ['BFO1s';'VNA1s']
starttime = '2018-03-10';
stoptime = '2018-04-05'; % nicht für Varlab
% -------------------------------------------------------------------------
% ppmsec2cdf
% -------------------------------------------------------------------------
% braucht keine weiteren Paramter
ppmsec2cdf('starttime',starttime,'stoptime',stoptime,'station',station);
% -------------------------------------------------------------------------
% cdf2def
% -------------------------------------------------------------------------
%
produce_IAGA_2002_min = '0'; % kann auch 'n' sein, warum?
produce_IAGA_2002_sec = '0'; % kann auch 'n' sein, warum?
output_resolution = '0';
calculate_IAGA_F = 'n';
output_format = 'c';
cdf2def('starttime',starttime,'stoptime',stoptime,...
'station',station,...
'produce_IAGA_2002_min',produce_IAGA_2002_min,...
'produce_IAGA_2002_sec',produce_IAGA_2002_sec,...
'calculate_IAGA_F', calculate_IAGA_F,...
'output_format', output_format,...
'output_resolution', output_resolution);
% - produce_IAGA_2002_min/sec '0' (default) no output
% 'P' provisional data
% 'D' definitive data
% 'Q' quasi-definitive data
% 'V' variation (V)
%
% - output_resolution '0' (default) don't write mat-file
% 's' means that also 1-second values are
% saved in matlab format.
%
% - calculate_IAGA_F 'n' (default) 888888 is set in the F-column for
% types Q, D, P, V
% 'y' for type other than V), then F is
% calculated from XYZ
%
% - output_format 'c' (default) means calibrated, all types of files
% 'r' means raw, only raw-file 1 second
% and IAGA V
%
% -------------------------------------------------------------------------
% varlab
% -------------------------------------------------------------------------
% geht auch direkt aufzurufen
varlab_01('parfile','parameters_win_JM.txt','date',starttime,...
'station',station(1:4));
% % -------------------------------------------------------------------------
% % Start programs
% % -------------------------------------------------------------------------
%
% ppmsec2cdf('starttime',starttime,'stoptime',stoptime,'station',station);
%
% cdf2def('starttime',starttime,'stoptime',stoptime,...
% 'station',station)
%
% cdf2def('starttime',starttime,'stoptime',stoptime,...
% 'station',station,...
% 'produce_IAGA_2002_min',produce_IAGA_2002_min,...
% 'produce_IAGA_2002_sec',produce_IAGA_2002_min)
%
% varlab_01('parfile','parameters_win_JM.txt','date',starttime,...
% 'station',station(1:4));
%
% for s=1:size(station,1)
%
% h=varlab_01('parfile','parameters_win_JM.txt','date',starttime,...
% 'station',station(s,1:4));
% waitfor(h);
%
% pressed=questdlg('Aufrufen von cdf2def ?','Was jetzt?',...
% 'Ja','Nein','Abbrechen','Nein');
% switch pressed
% case 'Nein'
% continue
% case 'Abbrechen'
% break
% end
%
% cdf2def('starttime',starttime,'stoptime',stoptime,...
% 'station',station(s,:),...
% 'produce_IAGA_2002_min',produce_IAGA_2002_min,...
% 'produce_IAGA_2002_sec',produce_IAGA_2002_min);
%
% end
% -------------------------------------------------------------------------
% FROM cdf2def_auto
% -------------------------------------------------------------------------
%station_array = 'NGK0g';
%station_array = ['BFO1s';'VNA1s']
%station_array = 'VNA1s'
%station_array = ['MAR1l']
%station_array = 'BFO1s';
%station_array = 'MSN0g';
%station_array = 'VNA1s';
%station_array = 'TDC1d';
%station_array = 'NGK0g';
%station_array = 'WNG1g';
%station_array = 'BFO1s';
%station_array = 'TTB0g';
%station_array = 'SMA0g';
%station_array = 'VSS0g';
%station_array = 'SHE0g';
% station_array = [...
%'TDC1d';...% 1
%'ROE1d';...% 2
%'BFE4d';...% 3
%'BFE6d';...% 4
%'NAQ4d';...% 5
%'NAQ6d';...% 6
%'FHB1d';...% 7
%'GHB1d';...% 8
%'SKT1d';...% 9
%'STF1d';...% 10
%'ATU1d';...% 11
%'GDH4d';...% 12
%'GDH6d';...% 13
%'UMQ1d';...% 14
%'UPN1d';...% 15
%'KUV1d';...% 16
%'SVS1d';...% 17
%'TAB1d';...% 18
%'THL4d';...% 19
%'THL6d';...% 20
%'NRD1d';...% 21
%'DMH1d';...% 22
%'SCO1d';...% 23
% 'AMK1d';...%
% ]; % 24
% station_array = [...
% %'TDC1d';...% 1
% %'ROE1d';...% 2
% %'BFE4d';...% 3
% %'BFE6d';...% 4
% %'NAQ4d';...% 5
% 'NAQ6d';...% 6
% %'FHB1d';...% 7
% %'GHB1d';...% 8
% 'SKT1d';...% 9
% 'STF1d';...% 10
% 'ATU1d';...% 11
% %'GDH4d';...% 12
% 'GDH6d';...% 13
% 'UMQ1d';...% 14
% %'UPN1d';...% 15
% %'KUV1d';...% 16
% %'SVS1d';...% 17
% %'TAB1d';...% 18
% %'THL4d';...% 19
% %'THL6d';...% 20
% %'NRD1d';...% 21
% %'DMH1d';...% 22
% %'SCO1d';...% 23
% % 'AMK1d';...%
% ]; % 24
% station_array = 'THL6d';
% station_array = 'GDH6d';
% station_array = 'NAQ6d';
% station_array = 'TDC1d';
% station_array = 'SHE0g';
% station_array = 'VNA1s';
% station_array = 'VSS0g';
% station_array = 'LOK0g';
% station_array = [... % all variometer stations
% 'TAB1d';...%
% 'SVS1d';...%
% 'KUV1d';...%
% 'UPN1d';...%
% 'UMQ1d';...%
% 'ATU1d';...%
% 'STF1d';...%
% 'SKT1d';...%
% 'GHB1d';...%
% 'FHB1d';...%
% 'STN1d';...
% 'DNB1d';...
% 'SCO1d';...
% 'AMK1d'...
% ]; %
\ No newline at end of file
% -> 1-sec Program für Kyoto
% produce_IAGA_2002_min = '0'; % kann auch 'n' sein, warum?
% produce_IAGA_2002_sec = '0'; % kann auch 'n' sein, warum?
% -------------------------------------------------------------------------
% Pflicht-Parameter
% -------------------------------------------------------------------------
clear all
close all
%station = ['SMA0g']
%station = ['SHE0g']
%station = ['VNA1s']
station = ['NGK8g']
%station = ['TDC1d']
%station = ['TTB1l']
%station = ['BFO1s']
%station = ['NGK0g';'NGK1g';'NGK2g';'NGK6g';'WNG0g';'WNG1g';'WNG2g';'WNG3g';'VNA1s';'SHE0g';'VSS0g';'TTB0g';'TTB1l';'VSS1g';'SMA0g';'PUL0g';'TEL0g'];
starttime = '2017-04-26';
stoptime = '2017-04-26'; % nicht für Varlab
% -------------------------------------------------------------------------
% ppmsec2cdf
% -------------------------------------------------------------------------
% braucht keine weiteren Paramter
ppmsec2cdf('starttime',starttime,'stoptime',stoptime,'station',station);
% -------------------------------------------------------------------------
% cdf2def
% -------------------------------------------------------------------------
produce_IAGA_2002_min = 'P'; % kann auch 'n' sein, warum?
produce_IAGA_2002_sec = '0'; % kann auch 'n' sein, warum?
output_resolution = '0';
calculate_IAGA_F = 'n';
output_format = 'c';
cdf2def('starttime',starttime,'stoptime',stoptime,...
'station',station,...
'produce_IAGA_2002_min',produce_IAGA_2002_min,...
'produce_IAGA_2002_sec',produce_IAGA_2002_sec,...
'calculate_IAGA_F', calculate_IAGA_F,...
'output_format', output_format,...
'output_resolution', output_resolution);
% - produce_IAGA_2002_min/sec '0' (default) no output
% 'P' provisional data
% 'D' definitive data
% 'Q' quasi-definitive data
% 'V' variation (V)
%
% - output_resolution '0' (default) don't write mat-file
% 's' means that also 1-second values are
% saved in matlab format.
%
% - calculate_IAGA_F 'n' (default) 888888 is set in the F-column for
% types Q, D, P, V
% 'y' for type other than V), then F is
% calculated from XYZ
%
% - output_format 'c' (default) means calibrated, all types of files
% 'r' means raw, only raw-file 1 second
% and IAGA V
%
% -------------------------------------------------------------------------
% varlab
% -------------------------------------------------------------------------
% geht auch direkt aufzurufen
varlab_01('parfile','parameters_win_JM.txt','date',starttime,...
'station',station(1:4));
% % -------------------------------------------------------------------------
% % Start programs
% % -------------------------------------------------------------------------
% ppmsec2cdf('starttime',starttime,'stoptime',stoptime,'station',station);
%
% cdf2def('starttime',starttime,'stoptime',stoptime,...
% 'station',station)
%
% cdf2def('starttime',starttime,'stoptime',stoptime,...
% 'station',station,...
% 'produce_IAGA_2002_min',produce_IAGA_2002_min,...
% 'produce_IAGA_2002_sec',produce_IAGA_2002_min)
%
% varlab_01('parfile','parameters_win_JM.txt','date',starttime,...
% 'station',station(1:4));
%
% for s=1:size(station,1)
%
% h=varlab_01('parfile','parameters_win_JM.txt','date',starttime,...
% 'station',station(s,1:4));
% waitfor(h);
%
% pressed=questdlg('Aufrufen von cdf2def ?','Was jetzt?',...
% 'Ja','Nein','Abbrechen','Nein');
% switch pressed
% case 'Nein'
% continue
% case 'Abbrechen'
% break
% end
%
% cdf2def('starttime',starttime,'stoptime',stoptime,...
% 'station',station(s,:),...
% 'produce_IAGA_2002_min',produce_IAGA_2002_min,...
% 'produce_IAGA_2002_sec',produce_IAGA_2002_min);
%
% end
% -------------------------------------------------------------------------
% FROM cdf2def_auto
% -------------------------------------------------------------------------
%station_array = 'NGK0g';
%station_array = ['BFO1s';'VNA1s']
%station_array = 'VNA1s'
%station_array = ['MAR1l']
%station_array = 'BFO1s';
%station_array = 'MSN0g';
%station_array = 'VNA1s';
%station_array = 'TDC1d';
%station_array = 'NGK0g';
%station_array = 'WNG1g';
%station_array = 'BFO1s';
%station_array = 'TTB0g';
%station_array = 'SMA0g';
%station_array = 'VSS0g';
%station_array = 'SHE0g';
% station_array = [...
%'TDC1d';...% 1
%'ROE1d';...% 2
%'BFE4d';...% 3
%'BFE6d';...% 4
%'NAQ4d';...% 5
%'NAQ6d';...% 6
%'FHB1d';...% 7
%'GHB1d';...% 8
%'SKT1d';...% 9
%'STF1d';...% 10
%'ATU1d';...% 11
%'GDH4d';...% 12
%'GDH6d';...% 13
%'UMQ1d';...% 14
%'UPN1d';...% 15
%'KUV1d';...% 16
%'SVS1d';...% 17
%'TAB1d';...% 18
%'THL4d';...% 19
%'THL6d';...% 20
%'NRD1d';...% 21
%'DMH1d';...% 22
%'SCO1d';...% 23
% 'AMK1d';...%
% ]; % 24
% station_array = [...
% %'TDC1d';...% 1
% %'ROE1d';...% 2
% %'BFE4d';...% 3
% %'BFE6d';...% 4
% %'NAQ4d';...% 5
% 'NAQ6d';...% 6
% %'FHB1d';...% 7
% %'GHB1d';...% 8
% 'SKT1d';...% 9
% 'STF1d';...% 10
% 'ATU1d';...% 11
% %'GDH4d';...% 12
% 'GDH6d';...% 13
% 'UMQ1d';...% 14
% %'UPN1d';...% 15
% %'KUV1d';...% 16
% %'SVS1d';...% 17
% %'TAB1d';...% 18
% %'THL4d';...% 19
% %'THL6d';...% 20
% %'NRD1d';...% 21
% %'DMH1d';...% 22
% %'SCO1d';...% 23
% % 'AMK1d';...%
% ]; % 24
% station_array = 'THL6d';
% station_array = 'GDH6d';
% station_array = 'NAQ6d';
% station_array = 'TDC1d';
% station_array = 'SHE0g';
% station_array = 'VNA1s';
% station_array = 'VSS0g';
% station_array = 'LOK0g';
% station_array = [... % all variometer stations
% 'TAB1d';...%
% 'SVS1d';...%
% 'KUV1d';...%
% 'UPN1d';...%
% 'UMQ1d';...%
% 'ATU1d';...%
% 'STF1d';...%
% 'SKT1d';...%
% 'GHB1d';...%
% 'FHB1d';...%
% 'STN1d';...
% 'DNB1d';...
% 'SCO1d';...
% 'AMK1d'...
% ]; %
\ No newline at end of file
This diff is collapsed.
This diff is collapsed.
###########################################################################
# Shared varlab01,make_cdf
###########################################################################
DATE=20160123 # Starting date of observations (YYYYMMDD)
PATH=O:\jmat\ # PATH TO FILES
STATION=NGK0;WNG1;NGK2 # Station name
###########################################################################
# Used by make_cdf
###########################################################################
DATE_END=20150105 # End date of observations (YYYYMMDD)
PATH_MOM=/home/mors # Path to momentary values
###########################################################################
# Used by varlab01
###########################################################################
# Initial values
TIME=0000 # Starting time of observations (HHMM)
NEIGHBOUR1=WNG1 # Neighbour station 1
NEIGHBOUR2=BFE6 # Neighbour station 2
FIRST_DIFF_ACTIVE=0 # NOT YET USED
ROTANGLE_ACTIVE=0 # NOT YET USED
ROTANGLE=0 # NOT YET USED
LENGTH=1440 # Length of observation in minutes