% HYDRAPLAN - Script to calculate Sontek Hydra recorder durations
%
% Calculates recorder duration (in days) for a Hydra deployment 
% based on the recorder capacity and deployment parameters 
% 
% Parameters:  
% RecSize, - recorder size (Mb)
% SampRate - sampling rate (Hz)
%
% the following switches take 1 as 'YES' and 0 as 'NO'
%
format compact;
RecSize = 440 % recorder size in MB  
RecAmp   = 1; % Record Amplitude 
RecComp = 1;  % Record Compass
RecSen  = 1;  % Record Sensors
RecStat = 1;  % Record Statistics
RecExt  = 1 ; % Record External Sensors
RecParos= 1 ; % Record Paros
RecCTD  = 0 ; % Record CTD 
 
Alcal = 1;   % alkaline batt = 1, lithium = 0
NBat = 2         % number of batteries 
 
SampRate = 20   % sampling rate in Hz
VelRange  = 4;
Mode = 'b';
 
BurstInt = 2*3600 % burst interval in s
SPB      = SampRate*60*20 % sample per burst
BurstDur = SPB/SampRate;
  
  
DutyCycle=BurstDur/BurstInt*100;%- Duty cycle (%)

BatDur = hydrabatdur(NBat, DutyCycle, VelRange, Mode, Alcal);
RecDur = hydrarecdur(RecSize, SampRate, RecAmp, RecComp, RecSen,...
                 RecStat, RecExt, RecParos, RecCTD, DutyCycle);
              
fprintf('\n     Duty cycle is %4.1f%%, Recorder duration is %6.2f days, ', DutyCycle, RecDur); 
fprintf('Battery  duration is %6.2f days\n', BatDur);