Source Code

These source-code files were transcribed from scans made from Don Eyles's personal copy of BURST120 (SUNBURST 120). They were scanned at archive.org's Boston facility, and the scanning was sponsored by Mike Stewart. The code was transcribed from these scans by a team of volunteers who are referenced in the program comments. Comments from the original source code are in ALL-CAPS, whereas comments added later in transcription are in Mixed-Case. In some cases, where similar code blocks exist in previously-transcribed AGC programs (primarily Luminary 99, from Apollo 11) those code blocks were used as a starting point and then corrected to agree with the BURST120 scans. The full scans are available at the Virtual AGC project's collection at archive.org, while more-convenient reduced-size (but reduced-quality) images are available at the main Virtual AGC website. Report any errors noted by creating an issue report at the Virtual AGC project's GitHub repository. Notations on the program listing read, in part:

	YUL SYSTEM FOR AGC: REVISION 0 OF PROGRAM BURST120 
	BY NASA 2021106-031 DEC 7, 1967

	THIS LISTING IS A COPY OF A VERSION OF THE PROGRAM INTENDED 
	FOR USE IN THE ON-BOARD PRIMARY GUIDANCE COMPUTER IN THE 
	UNMANNED FLIGHT OF APOLLO LUNAR MODULE 1 --- THE AS206 MISSION.
Note that the date is the date of the printout, not the date of the program revision.

030452,000002:                                                                                                  ## Copyright:    Public domain.
030453,000003:                                                                                                  ## Filename:     MP_7-SIVB_LEM_SEPARATION.agc
030454,000004:                                                                                                  ## Purpose:      A module for revision 0 of BURST120 (Sunburst). It 
030455,000005:                                                                                                  ##               is part of the source code for the Lunar Module's
030456,000006:                                                                                                  ##               (LM) Apollo Guidance Computer (AGC) for Apollo 5.
030457,000007:                                                                                                  ## Assembler:    yaYUL
030458,000008:                                                                                                  ## Contact:      Ron Burkey <info@sandroid.org>.
030459,000009:                                                                                                  ## Website:      www.ibiblio.org/apollo/index.html
030460,000010:                                                                                                  ## Mod history:  2016-09-30 RSB  Created draft version.
030461,000011:                                                                                                  ##               2016-10-25 MAS  Transcribed.
030462,000012:                                                                                                  ##               2016-10-31 RSB  Typos.
030463,000013:                                                                                                  ##               2016-11-01 RSB  More typos.
030464,000014:                                                                                                  ##               2016-12-06 RSB  Comments proofed using octopus/ProoferComments,
030465,000015:                                                                                                  ##                               no changes made.
030466,000016: 

Page 712

030468,000018: 25,2474                                           BANK     25                                    
030469,000019: 25,2474  E4,1566                                  EBANK=   TDEC                                  
030470,000020: 
030471,000021:                                                                                                  #  PROGRAM DESCRIPTION- MISSION PHASE 7 - SIVB/LEM SEPARATION              DATE- 21 OCT 66
030472,000022:                                                                                                  #  MOD NO- 0                                                               LOG SECTION- MP 7 - SIVB/LEM SEPARATION
030473,000023:                                                                                                  #  MOD BY- GILBERT                                                         ASSEMBLY- SUNBURST REVISION 12
030474,000024: 
030475,000025:                                                                                                  #  FUNCTIONAL DESCRIPTION
030476,000026:                                                                                                  #            SIVB/LEM SEPARATION IS STARTED 39 MIN. 56 SEC. AFTER SIVB SHUTDOWN IS DETECTED. AT 00/11/04, ONE
030477,000027:                                                                                                  #  MINUTE AFTER BOOST SHUTDOWN IS DETECTED, MISSION TIMER NO. 1 IS SET TO 38M 56S AND MISSION PHASE REGISTER NO. 1
030478,000028:                                                                                                  #  TO MP 7. MISSION PHASE 7 STARTS AT 00/50/00. THIS PROGRAM COMMANDS A SEQUENCE OF EVENTS INCLUDING RCS COLD
030479,000029:                                                                                                  #  FIRE PURGE, RCS PRESSURIZATION, S BAND SYSTEM ACTIVATION, +X TRANSLATION INITIATION OF LEM/SIVB SEPARATION
030480,000030:                                                                                                  #  SEQUENCE, AND AGS ACTIVATION. IMMEDIATELY AFTER PHYSICAL SEPARATION, 00/54/00, THE PGNCS HOLDS THE ATTITUDE RATE
030481,000031:                                                                                                  #  WHICH EXISTED AT SEPARATION TO MINIMIZE THE PROBABILITY OF RE-CONTACT. RCS +X TRANSLATION IS TERMINATED 15
030482,000032:                                                                                                  #  SECONDS AFTER SEPARATION AT 00/54/15 AT WHICH TIME AUTOMATIC ATTITUDE HOLD IS INITIATED. THIS TERMINATION
030483,000033:                                                                                                  #  FOLLOWS A SEQUENCE STARTING AT 00/53/55 DURING WHICH THE JETS ARE TURNED ON FOR 10 SECONDS, OFF FOR 5 SECONDS,
030484,000034:                                                                                                  #  AND ON FOR 5 SECONDS. THIS IS DUE TO THE POSSIBILITY OF HEAT AFFECTING THE RENDEZVOUS RADAR ANTENNAE.
030485,000035:                                                                                                  #  MISSION PHASE TIMER NO. 4 IS SET TO START MISSION PHASE 8 (DPS COLD SOAK) IN 08 SECONDS. MISSION PHASE TIMER
030486,000036:                                                                                                  #  NO. 2 IS SET TO START MISSION PHASE 9 (DPS 1) IN 3H 1M 47S. MAJOR MODE 14 IS DISPLAYED DURING THIS PHASE.
030487,000037: 
030488,000038:                                                                                                  #  CALLING SEQUENCE
030489,000039:                                                                                                  #      SIVB/LEM SEPARATION IS CALLED BY THE MISSION SCHEDULING ROUTINE AS A JOB. THE MISSION SCHEDULING ENTRY
030490,000040:                                                                                                  #  ROUTINE WAS CALLED 1 MINUTE AFTER BOOST SHUTDOWN IN MISSION PHASE 6 TO SET TIMER NO. 1 TO 38 MINUTES 56 SECONDS.
030491,000041: 
030492,000042:                                                                                                  #  SUBROUTINES CALLED
030493,000043:                                                                                                  #      NEWMODEX, WAITLIST, FIXDELAY, 1LMP+DT, 2LMP+DT, FLAG1UP, FLAG1DWN, MPENTRY, MIDTOAVE, AVETOMID, TPAGREE,
030494,000044:                                                                                                  #  PREREAD, READACCS, SERVICER, AVERAGEG.
030495,000045: 
030496,000046:                                                                                                  #  NORMAL EXIT MODE
030497,000047:                                                                                                  #      TASKOVER (ENDOFJOB INITIALLY SINCE TASK IS REQUESTED)
030498,000048: 
030499,000049:                                                                                                  #  ALARM OR ABORT EXIT MODES
030500,000050:                                                                                                  #      NONE
030501,000051: 
030502,000052:                                                                                                  #  INPUT
030503,000053:                                                                                                  #      MISSION SCHEDULING MAINTENANCE ROUTINE MUST BE INHIBITED AT BEGINNING AND ENABLED AT END OF MISSION PHASE 7.
030504,000054: 
030505,000055:                                                                                                  #  OUTPUT
030506,000056:                                                                                                  #      RCS COLD FIRE PURGE, RCS PRESSURIZATION, S BAND SYSTEM ACTIVATION, +X TRANSLATION, INITIATION OF LEM/SIVB
030507,000057:                                                                                                  #  SEPARATION SEQUENCE, AND SCHEDULING OF MISSION PHASES 8 AND 9 (DPS COLD SOAK AND DPS 1).
030508,000058: 
030509,000059:                                                                                                  #  ERASABLE INITIALIZATION REQUIRED
030510,000060:                                                                                                  #      NORMAL MISSION SEQUENCE SETS ERASABLES PROPERLY
030511,000061: 
030512,000062:                                                                                                  #  DEBRIS
030513,000063:                                                                                                  #      CENTRALS - A,L,Q
030514,000064:                                                                                                  #      OTHER    - ERASABLES IN SUBROUTINES USED
030515,000065: 

Page 713

030517,000067: 25,2474           04141        MP07JOB            TC       2PHSCHNG                              
030518,000068: 25,2475           00006                           OCT      00006                                 
030519,000069: 25,2476           05022                           OCT      05022                                 
030520,000070: 25,2477           20000                           OCT      20000                                 
030521,000071: 
030522,000072: 25,2500           04141                           TC       2PHSCHNG                              
030523,000073: 25,2501           00003                           OCT      00003                                 
030524,000074: 25,2502           00004                           OCT      00004                                 
030525,000075: 
030526,000076: 25,2503           37755                           CAF      BIT7                                  
030527,000077: 25,2504           04105                           TC       SETRSTRT                              #  SET RESTART FLAG
030528,000078: 
030529,000079: 25,2505           04161                           TC       PHASCHNG                              
030530,000080: 25,2506           47013                           OCT      47013                                 
030531,000081: 25,2507           07640                           DEC      4000       B-14                       
030532,000082: 25,2510  E4,1566                                  EBANK=   TDEC                                  
030533,000083: 25,2510           02555 52064                     2CADR    SIVBSEP                               
030534,000084: 
030535,000085: 25,2512           04161                           TC       PHASCHNG                              
030536,000086: 25,2513           06022                           OCT      06022                                 
030537,000087: 25,2514  E4,1566                                  EBANK=   TDEC                                  
030538,000088: 25,2514           02524 52064                     2CADR    DOOI                                  
030539,000089: 
030540,000090: 25,2516           00004                           INHINT                                         
030541,000091: 25,2517           33005                           CA       40SEC                                 
030542,000092: 25,2520           05663                           TC       WAITLIST                              
030543,000093: 25,2521  E4,1566                                  EBANK=   TDEC                                  
030544,000094: 25,2521           02555 52064                     2CADR    SIVBSEP                               
030545,000095: 
030546,000096: 25,2523           00003                           RELINT                                         
030547,000097: 
030548,000098: 25,2524           00006        DOOI               EXTEND                                         
030549,000099: 25,2525           30025                           DCA      TIME2                                 #  SET UP TIME FOR MIDTOAVE
030550,000100: 25,2526           53567                           DXCH     TDEC                                  
030551,000101: 25,2527           00006                           EXTEND                                         
030552,000102: 25,2530           33007                           DCA      MP07DELT                              
030553,000103: 25,2531           21567                           DAS      TDEC                                  
030554,000104: 
030555,000105: 25,2532           00006                           EXTEND                                         
030556,000106: 25,2533           31567                           DCA      TDEC                                  
030557,000107: 25,2534           52421                           DXCH     TIMEHOLD                              #  NO RADAR ON 206
030558,000108: 
030559,000109: 25,2535           04117                           TC       NEWMODEX                              #  DISPLAY MAJOR MODE 14
030560,000110: 25,2536           00014                           OCT      14                                    
030561,000111: 
030562,000112: 25,2537           00006                           EXTEND                                         
030563,000113: 25,2540           33011                           DCA      MIDAVE2C                              #  PRIOR TO THRUST
030564,000114: 25,2541           52006                           DXCH     Z                                     
030565,000115: 
030566,000116: 25,2542           04161                           TC       PHASCHNG                              

Page 714

030568,000118: 25,2543           04022                           OCT      04022                                 
030569,000119: 25,2544           33015                           CAF      AVRAGEG7                              #  SERVICER CALLS AVERAGEG
030570,000120: 25,2545           55310                           TS       DVSELECT                              
030571,000121: 
030572,000122: 25,2546           00006                           EXTEND                                         
030573,000123: 25,2547           33013                           DCA      SVREXIT                               #  NORMAL EXIT FROM AVERAGEG
030574,000124: 25,2550           53073                           DXCH     AVGEXIT                               
030575,000125: 
030576,000126: 25,2551           33014                           CAF      JETS+X                                #  RCS COLD FIRE PURGE
030577,000127: 25,2552           00006                           EXTEND                                         
030578,000128: 25,2553           01005                           WRITE    5                                     
030579,000129: 
030580,000130: 25,2554           05567                           TC       ENDOFJOB                              #  AND RELINT
030581,000131: 
030582,000132: 25,2555           04141        SIVBSEP            TC       2PHSCHNG                              
030583,000133: 25,2556           00003                           OCT      00003                                 
030584,000134: 25,2557           05012                           OCT      05012                                 
030585,000135: 25,2560           77777                           OCT      77777                                 
030586,000136: 
030587,000137: 25,2561           37767                           CAF      ZERO                                  #  TERMINATE RCS COLD FIRE PURGE
030588,000138: 25,2562           00006                           EXTEND                                         
030589,000139: 25,2563           01005                           WRITE    5                                     
030590,000140: 
030591,000141: 25,2564           04161                           TC       PHASCHNG                              
030592,000142: 25,2565           47012                           OCT      47012                                 
030593,000143: 25,2566           00620                           DEC      400        B-14                       
030594,000144: 25,2567  E4,1566                                  EBANK=   TDEC                                  
030595,000145: 25,2567           02573 52064                     2CADR    SIVB1                                 
030596,000146: 
030597,000147: 25,2571           05701                           TC       FIXDELAY                              #  WAIT 4 SECONDS
030598,000148: 25,2572           00620                           DEC      400        B-14                       
030599,000149: 
030600,000150: 25,2573           05073        SIVB1              TC       2LMP+DT                               
030601,000151: 25,2574           00274                           DEC      188        B-14                       #  RCS MAIN S/O VALVES, SYS. A - OPEN **
030602,000152: 25,2575           00276                           DEC      190        B-14                       #  RCS MAIN S/O VALVES, SYS. B - OPEN **
030603,000153: 25,2576           00144                           DEC      100        B-14                       #  WAIT 1 SECOND
030604,000154: 
030605,000155: 25,2577           05101                           TC       1LMP+DT                               
030606,000156: 25,2600           00004                           DEC      4          B-14                       #  ED BATTERY ACTIVATION - ON
030607,000157: 25,2601           00144                           DEC      100        B-14                       #  WAIT 1 SECOND
030608,000158: 
030609,000159: 25,2602           05073                           TC       2LMP+DT                               
030610,000160: 25,2603           00275                           DEC      189        B-14                       #  RESET **
030611,000161: 25,2604           00277                           DEC      191        B-14                       #  RESET **
030612,000162: 25,2605           01604                           DEC      900        B-14                       #  WAIT 9 SECONDS
030613,000163: 
030614,000164: 25,2606           05101                           TC       1LMP+DT                               
030615,000165: 25,2607           00006                           DEC      6          B-14                       #  RCS PRESSURIZE - FIRE **
030616,000166: 25,2610           00310                           DEC      200        B-14                       #  WAIT 2 SECONDS
030617,000167: 

Page 715

030619,000169: 25,2611           05101                           TC       1LMP+DT                               
030620,000170: 25,2612           00007                           DEC      7          B-14                       #  RESET **
030621,000171: 25,2613           05360                           DEC      2800       B-14                       #  WAIT 28 SECONDS
030622,000172: 
030623,000173: 25,2614           05101                           TC       1LMP+DT                               
030624,000174: 25,2615           00005                           DEC      5          B-14                       #  ED BATTERY ACTIVATION - SAFE *
030625,000175: 25,2616           22434                           DEC      9500       B-14                       #  WAIT 95 SECONDS                              ...
030626,000176: 
030627,000177: 25,2617           00006                           EXTEND                                         
030628,000178: 25,2620           30421                           DCA      TIMEHOLD                              
030629,000179: 25,2621           53664                           DXCH     DT2TEMPD                              
030630,000180: 25,2622           00006                           EXTEND                                         
030631,000181: 25,2623           40025                           DCS      TIME2                                 #  TIG - 28 SEC.  =  TDEC + 2 SEC.
030632,000182: 25,2624           21664                           DAS      DT2TEMPD                              
030633,000183: 
030634,000184: 25,2625           04161                           TC       PHASCHNG                              
030635,000185: 25,2626           05012                           OCT      05012                                 
030636,000186: 25,2627           77777                           OCT      77777                                 
030637,000187: 
030638,000188: 25,2630           00006                           EXTEND                                         
030639,000189: 25,2631           31664                           DCA      DT2TEMPD                              
030640,000190: 25,2632           52421                           DXCH     TIMEHOLD                              
030641,000191: 25,2633           10421                           CCS      TIMEHOLD   +1                         #  INSURE WAITLIST TIME POSITIVE
030642,000192: 25,2634           67763                           AD       ONE                                   
030643,000193: 25,2635           12640                           TCF      +3                                    
030644,000194: 25,2636           40000                           COM                                            
030645,000195: 25,2637           67743                           AD       POSMAX                                
030646,000196: 25,2640           55662                           TS       DT2TEMP                               
030647,000197: 25,2641           05663                           TC       WAITLIST                              #  REQUEST LASTBIAS AT TIG - 30 SECONDS
030648,000198: 25,2642  E4,1566                                  EBANK=   TDEC                                  
030649,000199: 25,2642           03016 52064                     2CADR    TIG-30                                
030650,000200: 
030651,000201: 25,2644           04141                           TC       2PHSCHNG                              
030652,000202: 25,2645           40052                           OCT      40052                                 
030653,000203: 25,2646           47014                           OCT      47014                                 
030654,000204: 25,2647           76115                           -GENADR  DT2TEMP                               
030655,000205: 25,2650  E4,1566                                  EBANK=   TDEC                                  
030656,000206: 25,2650           03016 52064                     2CADR    TIG-30                                
030657,000207: 
030658,000208: 25,2652           05701                           TC       FIXDELAY                              #  WAIT 55 SECONDS
030659,000209: 25,2653           12574                           DEC      5500       B-14                       
030660,000210: 
030661,000211: 25,2654           05270        SIVB2              TC       IBNKCALL                              #  DEADBAND SELECT - MAX
030662,000212: 25,2655           40054                           CADR     SETMAXDB                              
030663,000213: 
030664,000214: 25,2656           33014                           CAF      JETS+X                                #  COMMAND +X TRANSLATION - ON (4 JET)
030665,000215: 25,2657           00006                           EXTEND                                         
030666,000216: 25,2660           01005                           WRITE    5                                     
030667,000217: 25,2661           05270                           TC       IBNKCALL                              
030668,000218: 25,2662           40062                           CADR     ULLAGE                                
030669,000219: 

Page 716

030671,000221: 25,2663           04161                           TC       PHASCHNG                              
030672,000222: 25,2664           47012                           OCT      47012                                 
030673,000223: 25,2665           00144                           DEC      100        B-14                       
030674,000224: 25,2666  E4,1566                                  EBANK=   TDEC                                  
030675,000225: 25,2666           02672 52064                     2CADR    SIVB3                                 
030676,000226: 
030677,000227: 25,2670           05701                           TC       FIXDELAY                              #  WAIT 1 SECOND
030678,000228: 25,2671           00144                           DEC      100        B-14                       
030679,000229: 
030680,000230: 25,2672           05101        SIVB3              TC       1LMP+DT                               
030681,000231: 25,2673           00212                           DEC      138        B-14                       #  XMTR/RCVR (S-BAND) - PRIM *
030682,000232: 25,2674           00454                           DEC      300        B-14                       #  WAIT 3 SECONDS
030683,000233: 
030684,000234: 25,2675           05101                           TC       1LMP+DT                               
030685,000235: 25,2676           00072                           DEC      58         B-14                       #  LEM/SIVB SEPARATE ARM - ON *
030686,000236: 25,2677           00062                           DEC      50         B-14                       #  WAIT 500 MILLISECONDS
030687,000237: 
030688,000238: 25,2700           40077                           CS       DAPBOOLS                              #  ENABLE DAP
030689,000239: 25,2701           77751                           MASK     GODAPGO                               
030690,000240: 25,2702           26077                           ADS      DAPBOOLS                              
030691,000241: 
030692,000242: 25,2703           04161                           TC       PHASCHNG                              
030693,000243: 25,2704           47012                           OCT      47012                                 
030694,000244: 25,2705           00062                           DEC      50         B-14                       
030695,000245: 25,2706  E4,1566                                  EBANK=   TDEC                                  
030696,000246: 25,2706           02712 52064                     2CADR    SIVB3A                                
030697,000247: 
030698,000248: 25,2710           05701                           TC       FIXDELAY                              #  WAIT 500 MILLISECONDS
030699,000249: 25,2711           00062                           DEC      50         B-14                       
030700,000250: 
030701,000251: 25,2712           05270        SIVB3A             TC       IBNKCALL                              
030702,000252: 25,2713           40072                           CADR     SETRATE                               #  HOLD VEHICLE ATTITUDE RATE
030703,000253: 
030704,000254: 25,2714           05101                           TC       1LMP+DT                               
030705,000255: 25,2715           00132                           DEC      90         B-14                       #  LEM/SIVB SEPARATE - COMMAND **
030706,000256: 25,2716           00012                           DEC      10         B-14                       #  WAIT 100 MILLISECONDS
030707,000257: 
030708,000258: 25,2717           05270                           TC       IBNKCALL                              #  DEADBAND SELECT - MIN
030709,000259: 25,2720           40046                           CADR     SETMINDB                              
030710,000260: 
030711,000261: 25,2721           40075                           CS       FLAGWRD1                              #  SETS SIVBGONE TO 1
030712,000262: 25,2722           77760                           MASK     BIT4                                  
030713,000263: 25,2723           26075                           ADS      FLAGWRD1                              
030714,000264: 
030715,000265: 25,2724           04161                           TC       PHASCHNG                              
030716,000266: 25,2725           47012                           OCT      47012                                 
030717,000267: 25,2726           00132                           DEC      90         B-14                       
030718,000268: 25,2727  E4,1566                                  EBANK=   TDEC                                  
030719,000269: 25,2727           02733 52064                     2CADR    SIVB3B                                
030720,000270: 

Page 717

030722,000272: 25,2731           05701                           TC       FIXDELAY                              #  WAIT 900 MILLISECONDS
030723,000273: 25,2732           00132                           DEC      90         B-14                       
030724,000274: 
030725,000275: 25,2733           05101        SIVB3B             TC       1LMP+DT                               
030726,000276: 25,2734           00073                           DEC      59         B-14                       #  LEM/SIVB SEPARATE ARM - OFF *
030727,000277: 25,2735           00144                           DEC      100        B-14                       #  WAIT 1 SECOND
030728,000278: 
030729,000279: 25,2736           05101                           TC       1LMP+DT                               
030730,000280: 25,2737           00133                           DEC      91         B-14                       #  RESET **
030731,000281: 25,2740           00454                           DEC      300        B-14                       #  WAIT 3 SECONDS
030732,000282: 
030733,000283: 25,2741           05270                           TC       IBNKCALL                              #  COMMAND +X TRANSLATION - OFF (4 JET)
030734,000284: 25,2742           40066                           CADR     NOULLAGE                              
030735,000285: 
030736,000286: 25,2743           04161                           TC       PHASCHNG                              
030737,000287: 25,2744           47012                           OCT      47012                                 
030738,000288: 25,2745           00764                           DEC      500        B-14                       
030739,000289: 25,2746  E4,1566                                  EBANK=   TDEC                                  
030740,000290: 25,2746           02752 52064                     2CADR    SIVB4                                 
030741,000291: 
030742,000292: 25,2750           05701                           TC       FIXDELAY                              #  WAIT 5 SECONDS
030743,000293: 25,2751           00764                           DEC      500        B-14                       
030744,000294: 
030745,000295: 25,2752           05270        SIVB4              TC       IBNKCALL                              #  COMMAND +X TRANSLATION - ON (4 JET)
030746,000296: 25,2753           40062                           CADR     ULLAGE                                
030747,000297: 
030748,000298: 25,2754           04161                           TC       PHASCHNG                              
030749,000299: 25,2755           47012                           OCT      47012                                 
030750,000300: 25,2756           00764                           DEC      500        B-14                       
030751,000301: 25,2757  E4,1566                                  EBANK=   TDEC                                  
030752,000302: 25,2757           02763 52064                     2CADR    SIVB5                                 
030753,000303: 
030754,000304: 25,2761           05701                           TC       FIXDELAY                              #  WAIT 5 SECONDS
030755,000305: 25,2762           00764                           DEC      500        B-14                       
030756,000306: 
030757,000307: 25,2763           05270        SIVB5              TC       IBNKCALL                              #  COMMAND +X TRANSLATION - OFF (4 JET)
030758,000308: 25,2764           40066                           CADR     NOULLAGE                              
030759,000309: 
030760,000310: 25,2765           06067                           TC       FLAG1DWN                              #  KNOCK DOWN AVERAGEG FLAG
030761,000311: 25,2766           00001                           OCT      00001                                 
030762,000312: 
030763,000313: 25,2767           05270                           TC       IBNKCALL                              #  HOLD LEM ATTITUDE
030764,000314: 25,2770           40114                           CADR     STOPRATE                              
030765,000315: 
030766,000316: 25,2771           05270                           TC       IBNKCALL                              #  DEADBAND SELECT - MAX
030767,000317: 25,2772           40054                           CADR     SETMAXDB                              
030768,000318: 
030769,000319: 25,2773           04141                           TC       2PHSCHNG                              
030770,000320: 25,2774           00002                           OCT      00002                                 
030771,000321: 25,2775           05013                           OCT      05013                                 

Page 718

030773,000323: 25,2776           77777                           OCT      77777                                 
030774,000324: 
030775,000325: 25,2777           05126                           TC       MPENTRY                               #  SCHEDULE DPS COLD SOAK
030776,000326: 25,3000           00004                           DEC      4          B-14                       #  TIMER NO. 4
030777,000327: 25,3001           00010                           DEC      8          B-14                       #  MISSION PHASE 8
030778,000328: 25,3002           01751                           ADRES    MPDTO8                                
030779,000329: 
030780,000330: 25,3003           15727                           TCF      TASKOVER                              
030781,000331: 

Page 719

030783,000333: 25,3004           00310        2SEC               DEC      200        B-14                       
030784,000334: 25,3005           07640        40SEC              DEC      4000       B-14                       
030785,000335: 25,3006           00001 10024  MP07DELT           2DEC     20500      B-28                       
030786,000336: 
030787,000337: 25,3010  E4,1566                                  EBANK=   TDEC                                  
030788,000338: 25,3010           02341 16064  MIDAVE2C           2CADR    MIDTOAVE                              
030789,000339: 
030790,000340: 25,3012  E4,1566                                  EBANK=   TDEC                                  
030791,000341: 25,3012           02324 60064  SVREXIT            2CADR    SERVEXIT                              
030792,000342: 
030793,000343: 25,3014           00252        JETS+X             OCT      00252                                 
030794,000344: 25,3015           02251        AVRAGEG7           GENADR   AVERAGEG                              
030795,000345: 
030796,000346: 
030797,000347: 
030798,000348: 
030799,000349: 
030800,000350: 25,3016           04141        TIG-30             TC       2PHSCHNG                              
030801,000351: 25,3017           00004                           OCT      00004                                 
030802,000352: 25,3020           00335                           OCT      00335                                 #  5.33 SPOT FOR PREREAD
030803,000353: 
030804,000354: 25,3021           37763                           CAF      BIT1                                  
030805,000355: 25,3022           05663                           TC       WAITLIST                              
030806,000356: 25,3023  E5,1506                                  EBANK=   DVTOTAL                               
030807,000357: 25,3023           02000 60065                     2CADR    PREREAD                               
030808,000358: 
030809,000359: 25,3025           15727                           TCF      TASKOVER                              

End of include-file MP_7-SIVB_LEM_SEPARATION.agc.  Parent file is MAIN.agc