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); }