gergely/astrognome
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Changed get_planet_position() to get_planet_info()

Browse Source
This commit is contained in:
Gergely Polonkai 2013-07-26 17:07:35 +02:00
parent d41e04df1a
commit 9bc8c7f4aa
1 changed files with 42 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

38
src/gradix.c
View File

@ -182,25 +182,53 @@ init_graphics(void)
return TRUE; return TRUE;
} }
double planetInfo_t *
get_planet_position(int32 planet_no, double date) get_planet_info(int32 planetNo, double date, double cusps[])
{ {
int32 iflgret, int32 iflgret,
iflag = SEFLG_SPEED | SEFLG_TOPOCTR; iflag = SEFLG_SPEED | SEFLG_TOPOCTR;
double x2[6]; double x2[6];
char serr[AS_MAXCH]; char serr[AS_MAXCH];
planetInfo_t *ret = g_new0(planetInfo_t, 1);
int i;
iflgret = swe_calc(date, planet_no, iflag, x2, serr); iflgret = swe_calc(date, planetNo, iflag, x2, serr);
if (iflgret < 0) { if (iflgret < 0) {
printf("error: %s\n", serr); printf("error: %s\n", serr);
return -1; return NULL;
} else if (iflgret != iflag) { } else if (iflgret != iflag) {
printf("warning: iflgret != iflag. %s\n", serr); printf("warning: iflgret != iflag. %s\n", serr);
} }
return x2[0]; ret->house = 0;
for (i = 1; i < 13; i++) {
int j = (i < 12) ? i + 1 : 1;
if (cusps[j] < cusps[i]) {
if ((x2[0] >= cusps[i]) || (x2[0] < cusps[j])) {
ret->house = i;
break;
}
} else {
if ((x2[0] >= cusps[i]) && (x2[0] < cusps[j])) {
ret->house = i;
break;
}
}
}
ret->position = x2[0];
ret->sign = (int)ceilf(x2[0] / 30.0);
ret->retrograde = x2[3] < 0;
ret->type = signType[ret->sign].type;
ret->element = signType[ret->sign].element;
return ret;
} }
int int