/* Initial Operation 2006/11/17 (Unit of time is UT.)  */

/* OP START: 2006/11/17.10:35:00 */
/* OP END  : 2006/11/18.10:05:00 */

#include "EIS_DCBC.orl"
#include "FIXED_OG_EIS.orl"

/* Execution Definitions */
/* No need for table upload */
/* START: 2006/11/17.07:05:00 {SEQ: EIS_OBSTBL_UPLOAD_SEQ ;} */
/* START: 2006/11/17.07:06:00 {SEQ: EIS_MODE_CHANGE_DISABLE_SEQ;} */

/* EIS MODE CHANGE TO MANUAL */
START: 2006/11/17.11:30:00 {SEQ: EIS_STOP_OBS_SEQ ;}

/* COMCAL065 and 067 for Quiet Sun */

START: 2006/11/17.11:35:00 {SEQ: EIS_COMCAL_SIXTYFIVE_OP_SEQ ;}
START: 2006/11/17.11:43:50 {SEQ: EIS_STOP_OBS_SEQ ;}
START: 2006/11/17.11:44:00 {SEQ: EIS_COMCAL_SIXTYSEVEN_OP_SEQ ;}
START: 2006/11/17.11:59:50 {SEQ: EIS_STOP_OBS_SEQ ;}

START: 2006/11/17.12:00:00 {SEQ: EIS_COMCAL_SIXTYFIVE_OP_SEQ ;}
START: 2006/11/17.12:08:50 {SEQ: EIS_STOP_OBS_SEQ ;}
START: 2006/11/17.12:09:00 {SEQ: EIS_COMCAL_SIXTYSEVEN_OP_SEQ ;}
START: 2006/11/17.12:29:50 {SEQ: EIS_STOP_OBS_SEQ ;}

START: 2006/11/17.12:30:00 {SEQ: EIS_COMCAL_SIXTYFIVE_OP_SEQ ;}
START: 2006/11/17.12:38:50 {SEQ: EIS_STOP_OBS_SEQ ;}
START: 2006/11/17.12:39:00 {SEQ: EIS_COMCAL_SIXTYSEVEN_OP_SEQ ;}
START: 2006/11/17.12:59:50 {SEQ: EIS_STOP_OBS_SEQ ;}

START: 2006/11/17.13:00:00 {SEQ: EIS_COMCAL_SIXTYFIVE_OP_SEQ ;}
START: 2006/11/17.13:08:50 {SEQ: EIS_STOP_OBS_SEQ ;}
START: 2006/11/17.13:09:00 {SEQ: EIS_COMCAL_SIXTYSEVEN_OP_SEQ ;}
START: 2006/11/17.13:19:50 {SEQ: EIS_STOP_OBS_SEQ ;}

START: 2006/11/17.13:25:00 {SEQ: EIS_COMCAL_SIXTYFIVE_OP_SEQ ;}
START: 2006/11/17.13:33:50 {SEQ: EIS_STOP_OBS_SEQ ;}
START: 2006/11/17.13:34:00 {SEQ: EIS_COMCAL_SIXTYSEVEN_OP_SEQ ;}
START: 2006/11/17.13:44:30 {SEQ: EIS_STOP_OBS_SEQ ;}

/* AR program #1 */

START: 2006/11/17.14:00:50 {SEQ: EIS_COMENG_NINEOHONE_OP_SEQ ;}
START: 2006/11/17.14:04:50 {SEQ: EIS_STOP_OBS_SEQ ;}

START: 2006/11/17.14:05:00 {SEQ: EIS_COMENG_NINEFOURTEEN_OP_SEQ ;}
START: 2006/11/17.14:07:50 {SEQ: EIS_STOP_OBS_SEQ ;}

START: 2006/11/17.14:08:00 {SEQ: EIS_COMENG_NINETHIRTEEN_OP_SEQ ;}
START: 2006/11/17.14:41:50 {SEQ: EIS_STOP_OBS_SEQ ;}

START: 2006/11/17.14:42:00 {SEQ: EIS_COMENG_NINEFOURTEEN_OP_SEQ ;}
START: 2006/11/17.14:44:50 {SEQ: EIS_STOP_OBS_SEQ ;}
  /* 1" raster */
START: 2006/11/17.14:45:00 {SEQ: EIS_COMCAL_THIRTYEIGHT_OP_SEQ ;}
START: 2006/11/17.15:26:50 {SEQ: EIS_STOP_OBS_SEQ ;}

START: 2006/11/17.15:27:00 {SEQ: EIS_COMENG_NINEFOURTEEN_OP_SEQ ;}
START: 2006/11/17.15:29:50 {SEQ: EIS_STOP_OBS_SEQ ;}

START: 2006/11/17.15:30:00 {SEQ: EIS_COMENG_NINEOHONE_OP_SEQ ;}
START: 2006/11/17.15:35:00 {SEQ: EIS_STOP_OBS_SEQ ;}

/* AR program #2 */

START: 2006/11/17.15:48:50 {SEQ: EIS_COMENG_NINEOHONE_OP_SEQ ;}
START: 2006/11/17.15:52:50 {SEQ: EIS_STOP_OBS_SEQ ;}

START: 2006/11/17.15:53:00 {SEQ: EIS_COMENG_NINEFOURTEEN_OP_SEQ ;}
START: 2006/11/17.15:55:50 {SEQ: EIS_STOP_OBS_SEQ ;}

START: 2006/11/17.15:56:00 {SEQ: EIS_COMENG_NINETHIRTEEN_OP_SEQ ;}
START: 2006/11/17.16:29:50 {SEQ: EIS_STOP_OBS_SEQ ;}

START: 2006/11/17.16:30:00 {SEQ: EIS_COMENG_NINEFOURTEEN_OP_SEQ ;}
START: 2006/11/17.16:32:50 {SEQ: EIS_STOP_OBS_SEQ ;}
  /* 2" raster */
START: 2006/11/17.16:33:00 {SEQ: EIS_COMCAL_THIRTYNINE_OP_SEQ ;}
START: 2006/11/17.17:14:50 {SEQ: EIS_STOP_OBS_SEQ ;}

START: 2006/11/17.17:15:00 {SEQ: EIS_COMENG_NINEFOURTEEN_OP_SEQ ;}
START: 2006/11/17.17:17:50 {SEQ: EIS_STOP_OBS_SEQ ;}

START: 2006/11/17.17:18:00 {SEQ: EIS_COMENG_NINEOHONE_OP_SEQ ;}
START: 2006/11/17.17:20:00 {SEQ: EIS_STOP_OBS_SEQ ;}

/* Synoptic with 40" slot*/

START: 2006/11/17.18:59:00 {SEQ: EIS_COMCAL_TWELVE_OP_SEQ ;}
START: 2006/11/17.19:04:50 {SEQ: EIS_STOP_OBS_SEQ ;}

/* AR program #3 */

START: 2006/11/17.19:45:50 {SEQ: EIS_COMENG_NINEOHONE_OP_SEQ ;}
START: 2006/11/17.19:49:50 {SEQ: EIS_STOP_OBS_SEQ ;}

START: 2006/11/17.19:50:00 {SEQ: EIS_COMENG_NINEFOURTEEN_OP_SEQ ;}
START: 2006/11/17.19:52:50 {SEQ: EIS_STOP_OBS_SEQ ;}

START: 2006/11/17.19:53:00 {SEQ: EIS_COMENG_NINETHIRTEEN_OP_SEQ ;}
START: 2006/11/17.20:26:50 {SEQ: EIS_STOP_OBS_SEQ ;}

START: 2006/11/17.20:27:00 {SEQ: EIS_COMENG_NINEFOURTEEN_OP_SEQ ;}
START: 2006/11/17.20:29:50 {SEQ: EIS_STOP_OBS_SEQ ;}
  /* 1" raster */
START: 2006/11/17.20:30:00 {SEQ: EIS_COMCAL_THIRTYEIGHT_OP_SEQ ;}
START: 2006/11/17.21:19:50 {SEQ: EIS_STOP_OBS_SEQ ;}

START: 2006/11/17.21:20:00 {SEQ: EIS_COMENG_NINEFOURTEEN_OP_SEQ ;}
START: 2006/11/17.21:21:50 {SEQ: EIS_STOP_OBS_SEQ ;}

START: 2006/11/17.21:22:00 {SEQ: EIS_COMENG_NINEOHONE_OP_SEQ ;}
START: 2006/11/17.21:35:00 {SEQ: EIS_STOP_OBS_SEQ ;}

/* AR program #4 */

START: 2006/11/17.23:00:00 {SEQ: EIS_COMENG_NINEOHONE_OP_SEQ ;}
START: 2006/11/17.23:04:50 {SEQ: EIS_STOP_OBS_SEQ ;}

START: 2006/11/17.23:05:00 {SEQ: EIS_COMENG_NINEFOURTEEN_OP_SEQ ;}
START: 2006/11/17.23:07:50 {SEQ: EIS_STOP_OBS_SEQ ;}

START: 2006/11/17.23:08:00 {SEQ: EIS_COMENG_NINETHIRTEEN_OP_SEQ ;}
START: 2006/11/17.23:41:50 {SEQ: EIS_STOP_OBS_SEQ ;}

START: 2006/11/17.23:42:00 {SEQ: EIS_COMENG_NINEFOURTEEN_OP_SEQ ;}
START: 2006/11/17.23:44:50 {SEQ: EIS_STOP_OBS_SEQ ;}
  /* 2" raster */
START: 2006/11/17.23:45:00 {SEQ: EIS_COMCAL_THIRTYNINE_OP_SEQ ;}
START: 2006/11/18.00:26:50 {SEQ: EIS_STOP_OBS_SEQ ;}

START: 2006/11/18.00:27:00 {SEQ: EIS_COMENG_NINEFOURTEEN_OP_SEQ ;}
START: 2006/11/18.00:28:50 {SEQ: EIS_STOP_OBS_SEQ ;}

START: 2006/11/18.00:29:00 {SEQ: EIS_COMENG_NINEOHONE_OP_SEQ ;}
START: 2006/11/18.00:31:00 {SEQ: EIS_STOP_OBS_SEQ ;}

/* AR program #5 */

START: 2006/11/18.02:00:00 {SEQ: EIS_COMENG_NINEOHONE_OP_SEQ ;}
START: 2006/11/18.02:04:50 {SEQ: EIS_STOP_OBS_SEQ ;}

START: 2006/11/18.02:05:00 {SEQ: EIS_COMENG_NINEFOURTEEN_OP_SEQ ;}
START: 2006/11/18.02:07:50 {SEQ: EIS_STOP_OBS_SEQ ;}

START: 2006/11/18.02:08:00 {SEQ: EIS_COMENG_NINETHIRTEEN_OP_SEQ ;}
START: 2006/11/18.02:41:50 {SEQ: EIS_STOP_OBS_SEQ ;}

START: 2006/11/18.02:42:00 {SEQ: EIS_COMENG_NINEFOURTEEN_OP_SEQ ;}
START: 2006/11/18.02:44:50 {SEQ: EIS_STOP_OBS_SEQ ;}
  /* 1" raster */
START: 2006/11/18.02:45:00 {SEQ: EIS_COMCAL_THIRTYEIGHT_OP_SEQ ;}
START: 2006/11/18.03:31:50 {SEQ: EIS_STOP_OBS_SEQ ;}

START: 2006/11/18.03:32:00 {SEQ: EIS_COMENG_NINEFOURTEEN_OP_SEQ ;}
START: 2006/11/18.03:33:50 {SEQ: EIS_STOP_OBS_SEQ ;}

START: 2006/11/18.03:34:00 {SEQ: EIS_COMENG_NINEOHONE_OP_SEQ ;}
START: 2006/11/18.03:36:00 {SEQ: EIS_STOP_OBS_SEQ ;}

/* AR program #6 (without slit scan) */

START: 2006/11/18.05:20:00 {SEQ: EIS_COMENG_NINEOHONE_OP_SEQ ;}
START: 2006/11/18.05:24:50 {SEQ: EIS_STOP_OBS_SEQ ;}

START: 2006/11/18.05:25:00 {SEQ: EIS_COMENG_NINEFOURTEEN_OP_SEQ ;}
START: 2006/11/18.05:27:50 {SEQ: EIS_STOP_OBS_SEQ ;}

START: 2006/11/18.05:28:00 {SEQ: EIS_COMENG_NINETHIRTEEN_OP_SEQ ;}
START: 2006/11/18.06:13:00 {SEQ: EIS_STOP_OBS_SEQ ;}
  /* SAA */
START: 2006/11/18.06:48:00 {SEQ: EIS_COMENG_NINEFOURTEEN_OP_SEQ ;}
START: 2006/11/18.06:49:50 {SEQ: EIS_STOP_OBS_SEQ ;}

START: 2006/11/18.06:50:00 {SEQ: EIS_COMENG_NINEOHONE_OP_SEQ ;}
START: 2006/11/18.06:52:00 {SEQ: EIS_STOP_OBS_SEQ ;}


/* Synoptic with 266" slot*/

START: 2006/11/18.06:59:00 {SEQ: EIS_COMCAL_THIRTEEN_OP_SEQ ;}
START: 2006/11/18.07:04:40 {SEQ: EIS_STOP_OBS_SEQ ;}


/* AR program #7 */

START: 2006/11/18.08:30:00 {SEQ: EIS_COMENG_NINEOHONE_OP_SEQ ;}
START: 2006/11/18.08:34:50 {SEQ: EIS_STOP_OBS_SEQ ;}

START: 2006/11/18.08:35:00 {SEQ: EIS_COMENG_NINEFOURTEEN_OP_SEQ ;}
START: 2006/11/18.08:37:50 {SEQ: EIS_STOP_OBS_SEQ ;}

START: 2006/11/18.08:38:00 {SEQ: EIS_COMENG_NINETHIRTEEN_OP_SEQ ;}
START: 2006/11/18.09:11:50 {SEQ: EIS_STOP_OBS_SEQ ;}

START: 2006/11/18.09:12:00 {SEQ: EIS_COMENG_NINEFOURTEEN_OP_SEQ ;}
START: 2006/11/18.09:14:50 {SEQ: EIS_STOP_OBS_SEQ ;}
  /* 2" raster */
START: 2006/11/18.09:15:00 {SEQ: EIS_COMCAL_THIRTYNINE_OP_SEQ ;}
START: 2006/11/18.09:57:50 {SEQ: EIS_STOP_OBS_SEQ ;}

START: 2006/11/18.09:58:00 {SEQ: EIS_COMENG_NINEFOURTEEN_OP_SEQ ;}
START: 2006/11/18.09:59:30 {SEQ: EIS_STOP_OBS_SEQ ;}


/* ---------------------------------------------------- */

/* Real Sequence */
/* No OBSTBL Upload for this OP period */

DEFSEQ(REAL) : EIS_OBSTBL_UPLOAD_SEQ{
 NP_C.: "**********************************************" ;
    C.: "   EIS OBSTBL Upload                          " ;
 NP_C.: "**********************************************" ;
    C.: "    RAM-ID     PassID RAM-sub-ID (in decimal)" ;
 ENTRY: RAM EIS_OBSTBL 827 827 ;
    C.: "";
   CMD: EIS_DUMP_OBSTBL 07 00 00 70 00 ;
    C.: "Should not see any error " ;
}


DEFSEQ(REAL) : EIS_MODE_CHANGE_DISABLE_SEQ{
   NP_C.: "***************************************************" ;
      C.: " ONLY TO BE USED IF EIS OBSTBL UPLOAD IS UNSUCCESSFUL " ;
   NP_C.: "***************************************************" ;
   NP_C.: "" ;
    CMD : EIS_MODE_CHG_DIS ;
   NP_C.: " Confirm MODE_CHG = DIS " ;
}

/* ---------------------------------------------------- */

/* OP Sequence Definitions */

DEFSEQ(OP) : EIS_STOP_OBS_SEQ{
  OG : EIS_MODE_MANU_OG;
  INTERVAL : 5 ;
  OG : EIS_CLR_ICU_ERR_OG;
}

DEFSEQ(OP): EIS_COMENG_NINEOHONE_OP_SEQ{
  OG: EIS_SEL_COMENG_NINEOHONE_SEQ_OG;
  INTERVAL: 20;
  OG: EIS_MODE_AUTO_OG;
}


DEFSEQ(OP): EIS_COMENG_NINEFOURTEEN_OP_SEQ{
  OG: EIS_SEL_WIDE_SLOT_OG;
  INTERVAL: 60;
  OG: EIS_SEL_COMENG_NINEFOURTEEN_SEQ_OG;
  INTERVAL: 20;
  OG: EIS_MODE_AUTO_OG;
}


DEFSEQ(OP): EIS_COMENG_NINETHIRTEEN_OP_SEQ{
  OG: EIS_SEL_NARROW_SLOT_OG;
  INTERVAL: 60;
  OG: EIS_SEL_COMENG_NINETHIRTEEN_SEQ_OG;
  INTERVAL: 20;
  OG: EIS_MODE_AUTO_OG;
}


DEFSEQ(OP): EIS_COMCAL_THIRTYEIGHT_OP_SEQ{
  OG: EIS_SEL_COMCAL_THIRTYEIGHT_SEQ_OG;
  INTERVAL: 20;
  OG: EIS_MODE_AUTO_OG;
}

DEFSEQ(OP): EIS_COMCAL_SEVENTYFIVE_OP_SEQ{
  OG: EIS_SEL_COMCAL_SEVENTYFIVE_SEQ_OG;
  INTERVAL: 20;
  OG: EIS_MODE_AUTO_OG;
}

DEFSEQ(OP): EIS_COMCAL_THIRTYNINE_OP_SEQ{
  OG: EIS_SEL_COMCAL_THIRTYNINE_SEQ_OG;
  INTERVAL: 20;
  OG: EIS_MODE_AUTO_OG;
}


DEFSEQ(OP): EIS_COMCAL_TWELVE_OP_SEQ{
  OG: EIS_SEL_COMCAL_TWELVE_SEQ_OG;
  INTERVAL: 20;
  OG: EIS_MODE_AUTO_OG;
}

DEFSEQ(OP): EIS_COMCAL_THIRTEEN_OP_SEQ{
  OG: EIS_SEL_COMCAL_THIRTEEN_SEQ_OG;
  INTERVAL: 20;
  OG: EIS_MODE_AUTO_OG;
}

DEFSEQ(OP): EIS_COMCAL_SIXTYFIVE_OP_SEQ{
  OG: EIS_SEL_COMCAL_SIXTYFIVE_SEQ_OG;
  INTERVAL: 20;
  OG: EIS_MODE_AUTO_OG;
}

DEFSEQ(OP): EIS_COMCAL_SIXTYSEVEN_OP_SEQ{
  OG: EIS_SEL_COMCAL_SIXTYSEVEN_SEQ_OG;
  INTERVAL: 20;
  OG: EIS_MODE_AUTO_OG;
}
/* ---------------------------------------------------- */

/* OG Sequence Definitions */

/* Standard OGs */

DEFSEQ(OG): EIS_MODE_MANU_OG{
 NUMBER: 450;
    CMD: EIS_MODE_MANU ;
}

DEFSEQ(OG): EIS_CLR_ICU_ERR_OG{
 NUMBER: 451;
    CMD: EIS_CLR_ICU_ERR ;
}

DEFSEQ(OG): EIS_MODE_AUTO_OG{
 NUMBER: 452;
    CMD: EIS_MODE_AUTO ;
}

/* COMCAL and COMENG OGs */

DEFSEQ(OG): EIS_SEL_COMENG_NINEOHONE_SEQ_OG{
 NUMBER: 453;
    CMD: EIS_SELECT_SEQ 05 ;
}

DEFSEQ(OG): EIS_SEL_COMENG_NINETHIRTEEN_SEQ_OG{
 NUMBER: 454;
    CMD: EIS_SELECT_SEQ 06 ;
}


DEFSEQ(OG): EIS_SEL_COMENG_NINEFOURTEEN_SEQ_OG{
 NUMBER: 455;
    CMD: EIS_SELECT_SEQ 07 ;
}

DEFSEQ(OG): EIS_SEL_COMCAL_THIRTYEIGHT_SEQ_OG{
 NUMBER: 456;
    CMD: EIS_SELECT_SEQ 58;
}

DEFSEQ(OG): EIS_SEL_WIDE_SLOT_OG{               
 NUMBER: 457;
    CMD: EIS_SET_SLIT1 ;
}

DEFSEQ(OG): EIS_SEL_NARROW_SLOT_OG{               
 NUMBER: 458;
    CMD: EIS_SET_SLIT3 ;
}

DEFSEQ(OG): EIS_SEL_COMCAL_SEVENTYFIVE_SEQ_OG{
 NUMBER: 459;
    CMD: EIS_SELECT_SEQ 02;
}

DEFSEQ(OG): EIS_SEL_COMCAL_THIRTYNINE_SEQ_OG{
 NUMBER: 460;
    CMD: EIS_SELECT_SEQ 59;
}

/* newly introduced */
DEFSEQ(OG): EIS_SEL_COMCAL_TWELVE_SEQ_OG{
 NUMBER: 461;
    CMD: EIS_SELECT_SEQ 3E;
}

DEFSEQ(OG): EIS_SEL_COMCAL_THIRTEEN_SEQ_OG{
 NUMBER: 462;
    CMD: EIS_SELECT_SEQ 3F;
}

DEFSEQ(OG): EIS_SEL_COMCAL_SIXTYFIVE_SEQ_OG{
 NUMBER: 463;
    CMD: EIS_SELECT_SEQ 73;
}

DEFSEQ(OG): EIS_SEL_COMCAL_SIXTYSEVEN_SEQ_OG{
 NUMBER: 464;
    CMD: EIS_SELECT_SEQ 75;
}