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.

030435,000002:                                                                                                  ## Copyright:    Public domain.
030436,000003:                                                                                                  ## Filename:     MP_7-SIVB_LEM_SEPARATION.agc
030437,000004:                                                                                                  ## Purpose:      A module for revision 0 of BURST120 (Sunburst). It 
030438,000005:                                                                                                  ##               is part of the source code for the Lunar Module's
030439,000006:                                                                                                  ##               (LM) Apollo Guidance Computer (AGC) for Apollo 5.
030440,000007:                                                                                                  ## Assembler:    yaYUL
030441,000008:                                                                                                  ## Contact:      Ron Burkey <info@sandroid.org>.
030442,000009:                                                                                                  ## Website:      www.ibiblio.org/apollo/index.html
030443,000010:                                                                                                  ## Mod history:  2016-09-30 RSB  Created draft version.
030444,000011:                                                                                                  ##               2016-10-25 MAS  Transcribed.
030445,000012:                                                                                                  ##               2016-10-31 RSB  Typos.
030446,000013:                                                                                                  ##               2016-11-01 RSB  More typos.
030447,000014:                                                                                                  ##               2016-12-06 RSB  Comments proofed using octopus/ProoferComments,
030448,000015:                                                                                                  ##                               no changes made.
030449,000016: 

Page 712

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

Page 713

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

Page 714

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

Page 715

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

Page 716

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

Page 717

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

Page 718

030756,000323: 25,2776           77777                           OCT      77777                                 
030757,000324: 
030758,000325: 25,2777           05126                           TC       MPENTRY                               #  SCHEDULE DPS COLD SOAK
030759,000326: 25,3000           00004                           DEC      4          B-14                       #  TIMER NO. 4
030760,000327: 25,3001           00010                           DEC      8          B-14                       #  MISSION PHASE 8
030761,000328: 25,3002           01751                           ADRES    MPDTO8                                
030762,000329: 
030763,000330: 25,3003           15727                           TCF      TASKOVER                              
030764,000331: 

Page 719

030766,000333: 25,3004           00310        2SEC               DEC      200        B-14                       
030767,000334: 25,3005           07640        40SEC              DEC      4000       B-14                       
030768,000335: 25,3006           00001 10024  MP07DELT           2DEC     20500      B-28                       
030769,000336: 
030770,000337: 25,3010  E4,1566                                  EBANK=   TDEC                                  
030771,000338: 25,3010           02341 16064  MIDAVE2C           2CADR    MIDTOAVE                              
030772,000339: 
030773,000340: 25,3012  E4,1566                                  EBANK=   TDEC                                  
030774,000341: 25,3012           02324 60064  SVREXIT            2CADR    SERVEXIT                              
030775,000342: 
030776,000343: 25,3014           00252        JETS+X             OCT      00252                                 
030777,000344: 25,3015           02251        AVRAGEG7           GENADR   AVERAGEG                              
030778,000345: 
030779,000346: 
030780,000347: 
030781,000348: 
030782,000349: 
030783,000350: 25,3016           04141        TIG-30             TC       2PHSCHNG                              
030784,000351: 25,3017           00004                           OCT      00004                                 
030785,000352: 25,3020           00335                           OCT      00335                                 #  5.33 SPOT FOR PREREAD
030786,000353: 
030787,000354: 25,3021           37763                           CAF      BIT1                                  
030788,000355: 25,3022           05663                           TC       WAITLIST                              
030789,000356: 25,3023  E5,1506                                  EBANK=   DVTOTAL                               
030790,000357: 25,3023           02000 60065                     2CADR    PREREAD                               
030791,000358: 
030792,000359: 25,3025           15727                           TCF      TASKOVER                              

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