Here's the sketch - posted in pieces per my tabs.
//Satellite pointer/tracker
#include <Time.h>
#include <SPI.h>
#include <DS3234RTC.h>
#include <avr/pgmspace.h>
#include <MemoryFree.h>
#include <String.h>
#define lcloffset (3600UL)*4 //summer offset from UCT
#include <Streaming.h>
#define cout Serial
#define endl '\n'
#include <Plan13.h>
Plan13 p13; //declare and initialize the plan13 code
prog_uchar PROGMEM initstr[]= //can be used to provide startup commands
//23456789+123456789+123456789+
" ";
int initindx=0, initcnt=0;
double fparams[11]; byte fpcnt=0; //holds the numeric parameters parsed out of the serial string
#define fplimit 11 //max number of parameters
char buff[16]="\0\0\0\0\0\0\0\0\0\0"; //serial buffer
int bufflen=0;
#define buffmax 15
char satnum[]=" "; //area for 5 character satellite number
void setup () {
Serial.begin(115200);
delay(1000);
servoinit(); //initialize both servos
cout <<"V13 - DS3234lib \n"; //just reminding myself what's i and out
RTC.begin(9); //start the real time clock interface
setSyncProvider(RTC.get); // the function to get the time from the RTC
if(timeStatus()!= timeSet) {
Serial.println("RTC NG");
}
else{
Serial.println("RTC OK");
}
digitalClockDisplay(now()); cout<<endl;
p13.setLocation(-75.517, 45.467, 0); // coordinates of my back yard
// p13.setLocation(-75.31, 45.49, 0); // Eaglewoods golf in clarence creek
setaltaz(0,0); to do a quick alignment with geographic north
delay(10000);
setaltaz(45,0); //point to Polaris - mag 2 at the end of the little dipper's handle.
}
void loop(){ //the command loop reads from serial or the init string, parses out numerics and dispatches routines
char x;
while((Serial.available()>0)||(initindx<initcnt)){ //see if there's anything in the initialization string or serial
if (initindx<initcnt){
x=pgm_read_byte_near(initstr+initindx);
initindx++;
}
else {
x=Serial.read();
}
switch(x){
case 'y': //set the realtime clock from the arduino clock.
cout<<"sYnc\n";
syncrtc();;
break;
case 'x': //execute the observation plan
cout<<"X\n";
execplan();
break;
case 'a': //set altitude for testing
cout<<"A\n";
stobuff(); //take any parameter left in the buffer
setaltaz(fparams[0],lastaz);
fpcnt=0; //clear the parameters
break;
case 'z': //set azimuth for testing
cout<<"Z\n";
stobuff(); //take any parameter left in the buffer
setaltaz(lastalt,fparams[0]);
fpcnt=0;
break;
case 'f': //find a tle in the list and put the index in fparams[0]
cout<<"F\n";
fparams[0]=findtle(); //this will use and clear the buffer
if (fparams[0]!=0){ //if it's valid
fpcnt=1; //accept it
}
break;
case '?': //print status and varaiables
cout<<"Mem "<<freeMemory()<<endl;
prtstate();
break;
case 'c': //run a plan13 cycle needs l and e first
cout<<"C";
cycle13(now());
break;
case 'e': //set plan 13 elements
cout<<"\nset Elem.\n";
setelements();
break;
case 'p': //load parameters from a tle need to do a e afterwards to set the elements
stobuff(); //take any parameter left in the buffer
cout<<"Params<-TLE "<<fparams[0]<<endl;
fpcnt=0; //eat the tle #
tle2params(fparams[0]);
break;
case ',': case ' ': case '/': // comma or whitespace convert the buffer to a parameter
cout<<',';
stobuff();
break;
case 'l': //save parameters as a local date and time
cout<<"\n Local=";
stobuff();
setltime();
break;
case '0': case '1': case '2': case '3': case '4': case '5': case '6': case '7': case '8': case '9': case '.': //digits and decimal point
cout<<x;
if (bufflen<buffmax){
buff[bufflen]=x;
bufflen++;
buff[bufflen]='\0';
}
else {
cout<<"\nbuff oflo@"<<x<<endl;
}
break;
default:
cout<<endl<<"inv:"<<x<<endl;
break;
}
}
}
//routines to deal with accumulating parameters from serial
void stobuff(){//take any digits from the buffer and store them as a parameter
if (bufflen>0){ //if we're holding numbers for conversion
if (fpcnt<fplimit){ //if there's room
fpcnt+=1; //add a parameter
fparams[fpcnt-1]=atof(buff); //convert the buffer to a float
}
else {
cout <<endl<<"param oflo @ "<<buff<<endl;
}
bufflen=0;
buff[0]='\0';
}
}
prog_char PROGMEM obsplan[]={ //each line defines the start and end of a satellite pass and gives the satellite id
"19:44:19 19:55:33 31793" //SL-16 2.7
"20:20:11 20:31:11 25407" //Cosmos 2.1
"20:30:55 20:36:46 36089" //CZ-2C 3.0
"20:41:42 20:46:12 25391" //Tubsat 3.3
"21:08:41 21:17:49 27597" //ADEOS 2.4
"21:17:36 21:23:50 22566" //Cosmos 2.3
"21:53:55 21:58:52 28353" //SL-16 2.4
"22:00:24 22:05:25 22220" //Cosmos 2.3
};
#define numpasses 8
#define planyear 2011
#define planmonth 9
#define planday 18
//execute the observation plan
#define offhr 0 //offsets within the plan for hour
#define offmin 3 //min
#define offsec 6 //second
#define planlen 23 //length of a plan element
#define beginoffset 0 //offset to begin time
#define endoffset 9 //end tine
#define snpoffset 18 //satellite number offset
#define snplen 5 //satellite # length
void execplan(){ //execute the whole plan
cout <<" exec plan "<<numpasses<<" passes\n";
int passnum; //which pass we're on
for (passnum=1;passnum<=numpasses;passnum++){
execpass(passnum);
}
cout <<"plan done ";
digitalClockDisplay(now());
cout<<endl;
}
void execpass(int passnum) { //track a single satellite pass
time_t beginpass=getbegintime(passnum);
time_t endpass=getendtime(passnum);
time_t ctime=now();
cout <<" at "; digitalClockDisplay(now()); cout<<endl;
cout <<" beginpass=";digitalClockDisplay(beginpass);cout<<endl;
if (ctime<beginpass){
cout <<" secs til start "<<beginpass-ctime<<endl;
} else {
cout <<" secs since start "<<ctime-beginpass<<endl;
}
cout <<" endpass=";digitalClockDisplay(endpass);cout<<endl;
cout <<"length "<<endpass-beginpass<<endl;
while(beginpass>now()){
cout <<" secs til start "<<beginpass-now()<<endl;
delay(15000);
}
cpyplan2buff(passnum,18,5); bufflen=5; //copy satellite id to buffer
int foundtle=findtle(); //find the tle
if (foundtle!=0){
tle2params(foundtle); //stage the tle elements
setelements();// to plan 13
while (endpass>now()){
cout <<"secs til pass end "<<endpass-now()<<endl;
cycle13(now()+3); //look ahead 3 seconds
delay(3000); //and let reality catch up.
}
}
else {
cout <<"tle "<<buff<<" for plan entry #"<<passnum<<" not found \n";
cout <<"skip\n";
}
}
time_t getbegintime(int passnum){ //get the time_t definition of the beginning of the pass
return getpasstime(passnum, beginoffset); //point to begin time
}
time_t getendtime(int passnum){ //get the time_t definition of the beginning of the pass
return getpasstime(passnum, endoffset); //point to end time
}
time_t getpasstime(int passnum, int timeoffset){ //pick up a formatted time from the specified offset in the specified pass record
tmElements_t tm; // time elements for getting a time_t value
tm.Year=planyear-1970; //set
tm.Month=planmonth; //the easy
tm.Day=planday; //things
cpyplan2buff(passnum,timeoffset+offhr,2);
tm.Hour=atoi(buff); cout<<buff;
cpyplan2buff(passnum,timeoffset+offmin,2);
tm.Minute=atoi(buff);cout<<buff;
cpyplan2buff(passnum,timeoffset+offsec,2);
tm.Second=atoi(buff);cout<<buff<<endl;
time_t temp=makeTime(tm)+lcloffset;
return temp;
}
void cpyplan2buff(int n,int byteoffset,int len){ //copy n bytes out of tle n at offset given
for (int i=0;i<len;i++){
int passoffset=(n-1)*planlen; //1st byte of the pass pointed to
char x=pgm_read_byte_near(obsplan+passoffset+byteoffset+i);
buff[i]=x;
}
buff[len]='\0';
}
