deg2dms.m

来自「《 software Defined GPS and Galilleo Rece」· M 代码 · 共 43 行

function dmsOutput = deg2dms(deg)
%DEG2DMS  Conversion of degrees to degrees, minutes, and seconds.
%The output format (dms format) is: (degrees*100 + minutes + seconds/100)

% Written by Kai Borre
% February 7, 2001
% Updated by Darius Plausinaitis

%%% Save the sign for later processing
neg_arg = false;
if deg < 0
    % Only positive numbers should be used while spliting into deg/min/sec
    deg     = -deg;
    neg_arg = true;    
end

%%% Split degrees minutes and seconds
int_deg   = floor(deg);
decimal   = deg - int_deg;
min_part  = decimal*60;
min       = floor(min_part);
sec_part  = min_part - floor(min_part);
sec       = sec_part*60;

%%% Check for overflow
if sec == 60
    min     = min + 1;
    sec     = 0;
end
if min == 60
    int_deg = int_deg + 1;
    min     = 0;
end

%%% Construct the output
dmsOutput = int_deg * 100 + min + sec/100;

%%% Correct the sign
if neg_arg == true
    dmsOutput = -dmsOutput;
end

%%%%%%%%%%%%%%%%%%% end deg2dms.m %%%%%%%%%%%%%%%%