58 lines
1.2 KiB
C
58 lines
1.2 KiB
C
/* Compute sexagesimal from decimal */
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#include <math.h>
|
|
|
|
int main(int argc,char *argv[])
|
|
{
|
|
int h=0;
|
|
double sec,deg,min;
|
|
char c,sign,d=' ';
|
|
double x;
|
|
char s[14];
|
|
|
|
if (argc==1) {
|
|
printf("Usage: dec2s [options] <x>\n\nCompute sexagesimal from decimal input x.\n");
|
|
printf("Options: -r gives hours instead of degrees\n");
|
|
printf(" -d<a> uses character a as delimiter\n");
|
|
printf(" -h uses hms as delimiters\n");
|
|
printf(" -s always prints sign\n\n");
|
|
|
|
return -1;
|
|
}
|
|
|
|
// Get Decimal Value
|
|
x=(double) atof(argv[--argc]);
|
|
sign=(x<0 ? '-' : ' ');
|
|
|
|
// Get Options
|
|
while (--argc > 0 && (*++argv)[0] == '-') {
|
|
while (c = *++argv[0]) {
|
|
if (c == 'r')
|
|
x /= 15.;
|
|
if (c == 's')
|
|
sign=(x<0 ? '-' : '+');
|
|
if (c == 'd')
|
|
if (strlen(argv[0])!=1)
|
|
d=(*argv)[1];
|
|
if (c == 'h')
|
|
h++;
|
|
}
|
|
}
|
|
|
|
x=3600.*fabs(x);
|
|
sec=fmod(x,60.);
|
|
x=(x-sec)/60.;
|
|
min=fmod(x,60.);
|
|
x=(x-min)/60.;
|
|
deg=x;
|
|
|
|
if (h==0)
|
|
printf("%c%02i%c%02i%c%06.3f\n",sign,(int) deg,d,(int) min,d,(float) sec);
|
|
else
|
|
printf("%c%02ih%02im%06.3fs\n",sign,(int) deg,(int) min,(float) sec);
|
|
|
|
return 0;
|
|
}
|