void Balls::mooning() {
if (beatcounter % 80 < 16) {
moon();
}
if (beatcounter % 80 < 32 && beatcounter % 80 >= 16) {
dim[0] = quadApp(0.0, 1.0, 16, beatcounter % 16);
dim[1] = dim[0];
dim[2] = dim[1];
color = 7;
moon2();
}
if (beatcounter % 80 < 48 && beatcounter % 80 >= 32) {
dim[0] = quadApp(1.0, 0.0, 16, beatcounter % 16);
dim[1] = dim[0];
dim[2] = dim[1];
color = 7;
moon2();
}
if (beatcounter % 80 < 64 && beatcounter % 80 >= 48) {
dim[0] = quadApp(0.0, 1.0, 16, beatcounter % 16);
dim[1] = dim[0];
dim[2] = dim[1];
color = 6;
moon2();
}
if (beatcounter % 80 < 80 && beatcounter % 80 >= 64) {
dim[0] = quadApp(1.0, 0.0, 16, beatcounter % 16);
dim[1] = dim[0];
dim[2] = dim[1];
color = 6;
moon2();
}
}
/* Calculate geometric coordinates of Moon
* without light time or nutation correction.
*/
int swi_moshmoon2(double J, double *pol)
{
int i;
T = (J-J2000)/36525.0;
T2 = T*T;
mean_elements();
moon1();
moon2();
moon3();
moon4();
for( i=0; i<3; i++ )
pol[i] = moonpol[i];
return(0);
}
