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. |
029126,000002: ## Copyright: Public domain.
029127,000003: ## Filename: MP_3_SUBORBITAL_ABORT.agc
029128,000004: ## Purpose: A module for revision 0 of BURST120 (Sunburst). It
029129,000005: ## is part of the source code for the Lunar Module's
029130,000006: ## (LM) Apollo Guidance Computer (AGC) for Apollo 5.
029131,000007: ## Assembler: yaYUL
029132,000008: ## Contact: Ron Burkey <info@sandroid.org>.
029133,000009: ## Website: www.ibiblio.org/apollo/index.html
029134,000010: ## Mod history: 2016-09-30 RSB Created draft version.
029135,000011: ## 2016-10-23 MAS Transcribed.
029136,000012: ## 2016-10-31 RSB Typos.
029137,000013: ## 2016-12-06 RSB Comments proofed using octopus/ProoferComments,
029138,000014: ## changes made.
029139,000015: ## 2017-06-14 RSB Added a ##-comment about the difference between
029140,000016: ## this code and SUNBURST 37.
029141,000017:
|
|
Page 686 |
029143,000019: 25,2000 BANK 25
029144,000020: 25,2000 E4,1566 EBANK= TDEC
029145,000021:
029146,000022:
|
|
Note that while the following comments identify this code as being precisely identical to the corresponding code in SUNBURST 37, there are in fact significant non-trivial changes between the two revisions. — RSB |
029150,000026: # PROGRAM DESCRIPTION- MISSION PHASE 3 - SUBORBITAL ABORT DATE- 28 OCT 66
029151,000027: # MOD NO- 0 LOG SECTION- MP 3 - SUBORBITAL ABORT
029152,000028: # MOD BY- GILBERT ASSEMBLY- SUNBURST REVISION 17
029153,000029:
029154,000030: # FUNCTIONAL DESCRIPTION
029155,000031: # IN THE FIRST 10 SECONDS OF THIS PHASE, THE GROUND IS CAUSING THE NOSECONE TO BE JETTISONED AND THE SLA
029156,000032: # PANELS TO BE DEPLOYED. 10 SECONDS AFTER RECEIPT OF THE ABORT COMMAND, MP3 CHECKS TUMBLING AND PROCEEDS ONLY
029157,000033: # WHEN THE INDICATED TUMBLING RATES ARE LESS THAN 3 DEGREES PER SECOND. MP3 THEN STARTS +X TRANSLATION AND
029158,000034: # COMMANDS SIVB/LEM SEPARATION. 13 SECONDS AFTER SEPARATION THE DESCENT ENGINE IS TURNED ON FOR 5 SECONDS, THEN
029159,000035: # IGNITED AGAIN AFTER A 5 SECOND COAST AND LEFT ON THROUGH THE ABORT STAGE COMMAND WHICH IS SENT/RECEIVED 31
029160,000036: # SECONDS LATER. THE APS ENGINE IS TURNED OFF 5 SECONDS AFTER ABORT STAGE, THEN IGNITED AGAIN AFTER A 30 SECOND
029161,000037: # COAST FOR A FINAL 60 SECOND BURN. IMU COMPENSATION CONTINUES THROUGHOUT THIS MISSION PHASE.
029162,000038:
029163,000039: # CALLING SEQUENCE
029164,000040: # SUBORBITAL ABORT IS STARTED AT THE DISCRETION OF THE GROUND IN THE EVENT OF AN ABORT DURING THE EARLIER PART
029165,000041: # OF BOOST. KEY CODE 23 IS SENT VIA UPLINK.
029166,000042:
029167,000043: # SUBROUTINES CALLED
029168,000044: # NEWMODEX, WAITLIST, FIXDELAY, 1LMP, 2LMP, 1LMP+DT, 2LMP+DT, FLAG1DWN, ENGINEON, ENGINOFF, ENGINOF1, PREREAD,
029169,000045: # READACCS, SERVICER, AVERAGEG.
029170,000046:
029171,000047: # NORMAL EXIT MODES
029172,000048: # TASKOVER.
029173,000049:
029174,000050: # ALARM OR ABORT EXIT MODES
029175,000051: # MAJOR MODE 71.
029176,000052:
029177,000053: # INPUT
029178,000054: # DVSELECT SET FOR READACCS AND SERVICER
029179,000055:
029180,000056: # OUTPUT
029181,000057: # ''LAST RITES''
029182,000058:
029183,000059: # ERASABLE INITIALIZATION REQUIRED
029184,000060: # KEY CODE 23 SENT VIA UPLINK.
029185,000061:
029186,000062: # DEBRIS
029187,000063: # CENTRALS - A,L,Q
029188,000064: # OTHER - ERASABLES IN SUBROUTINES USED
029189,000065:
|
|
Page 687 |
029191,000067: 25,2000 04117 MP03JOB TC NEWMODEX # DISPLAY MAJOR MODE 71
029192,000068: 25,2001 00071 OCT 71
029193,000069:
029194,000070: 25,2002 36311 CAF THREE
029195,000071: 25,2003 54764 TS PHASENUM
029196,000072:
029197,000073: 25,2004 04161 TC PHASCHNG
029198,000074: 25,2005 47012 OCT 47012
029199,000075: 25,2006 00001 DEC 1 B-14
029200,000076: 25,2007 E4,1566 EBANK= TDEC
029201,000077: 25,2007 02021 52064 2CADR SBORB1
029202,000078:
029203,000079: 25,2011 37761 CAF BIT3
029204,000080: 25,2012 04105 TC SETRSTRT # SET RESTART FLAG
029205,000081:
029206,000082: 25,2013 00004 INHINT
029207,000083: 25,2014 37763 CAF ONE # 10 MS. - CONTINUE UNDER WAITLIST CONTROL
029208,000084: 25,2015 05663 TC WAITLIST
029209,000085: 25,2016 E4,1566 EBANK= TDEC
029210,000086: 25,2016 02021 52064 2CADR SBORB1
029211,000087:
029212,000088: 25,2020 15567 TCF ENDOFJOB # AND RELINT
029213,000089:
029214,000090: 25,2021 37767 SBORB1 CAF ZERO # INSURE RCS JETS OFF
029215,000091: 25,2022 00006 EXTEND
029216,000092: 25,2023 01006 WRITE 6
029217,000093: 25,2024 00006 EXTEND
029218,000094: 25,2025 01005 WRITE 5
029219,000095:
029220,000096: 25,2026 04161 TC PHASCHNG
029221,000097: 25,2027 47012 OCT 47012
029222,000098: 25,2030 00144 DEC 100 B-14
029223,000099: 25,2031 E4,1566 EBANK= TDEC
029224,000100: 25,2031 02035 52064 2CADR SBORB2
029225,000101:
029226,000102: 25,2033 05701 TC FIXDELAY # WAIT 1 SECOND
029227,000103: 25,2034 00144 DEC 100 B-14
029228,000104:
029229,000105: 25,2035 05073 SBORB2 TC 2LMP+DT
029230,000106: 25,2036 00274 DEC 188 B-14 # RCS MAIN S/O VALVES, SYS. A - OPEN **
029231,000107: 25,2037 00276 DEC 190 B-14 # RCS MAIN S/O VALVES, SYS. B - OPEN **
029232,000108: 25,2040 00144 DEC 100 B-14 # WAIT 1 SECOND
029233,000109:
029234,000110: 25,2041 05101 TC 1LMP+DT
029235,000111: 25,2042 00004 DEC 4 B-14 # ED BATTERY ACTIVATION - ON *
029236,000112: 25,2043 00144 DEC 100 B-14 # WAIT 1 SECOND
029237,000113:
029238,000114: 25,2044 05073 TC 2LMP+DT
029239,000115: 25,2045 00275 DEC 189 B-14 # RESET **
029240,000116: 25,2046 00277 DEC 191 B-14 # RESET **
|
|
Page 688 |
029242,000118: 25,2047 00144 DEC 100 B-14 # WAIT 1 SECOND
029243,000119:
029244,000120: 25,2050 05101 TC 1LMP+DT
029245,000121: 25,2051 00006 DEC 6 B-14 # RCS PRESSURIZE - FIRE **
029246,000122: 25,2052 00144 DEC 100 B-14 # WAIT 1 SECOND
029247,000123:
029248,000124: 25,2053 05101 TC 1LMP+DT
029249,000125: 25,2054 00005 DEC 5 B-14 # ED BATTERY ACTIVATION - SAFE *
029250,000126: 25,2055 00144 DEC 100 B-14 # WAIT 1 SECOND
029251,000127:
029252,000128: 25,2056 05101 TC 1LMP+DT
029253,000129: 25,2057 00007 DEC 7 B-14 # RESET **
029254,000130: 25,2060 00620 DEC 400 B-14 # WAIT 4 SECONDS
029255,000131:
029256,000132: 25,2061 40075 TUMBCHK CS FLAGWRD1 # IS VEHICLE RATE LESS THAN 3 DEG/SEC
029257,000133: 25,2062 77747 MASK BIT13
029258,000134: 25,2063 10000 CCS A
029259,000135: 25,2064 12070 TCF TUMB1 # YES
029260,000136:
029261,000137: 25,2065 05701 TC FIXDELAY # WAIT .5 SECONDS
029262,000138: 25,2066 00062 DEC 50 B-14
029263,000139:
029264,000140: 25,2067 12061 TCF TUMBCHK
029265,000141:
029266,000142: 25,2070 04161 TUMB1 TC PHASCHNG
029267,000143: 25,2071 05012 OCT 05012
029268,000144: 25,2072 77777 OCT 77777
029269,000145:
029270,000146: 25,2073 06067 TC FLAG1DWN # TERMINATE TUMBLE MONITOR
029271,000147: 25,2074 20000 OCT 20000
029272,000148:
029273,000149: 25,2075 33014 CAF JETS+X # COMMAND +X TRANSLATION - ON (4 JET)
029274,000150: 25,2076 00006 EXTEND
029275,000151: 25,2077 01005 WRITE 5
029276,000152: 25,2100 05270 TC IBNKCALL
029277,000153: 25,2101 40062 CADR ULLAGE # USE LATER
029278,000154:
029279,000155: 25,2102 05101 TC 1LMP+DT
029280,000156: 25,2103 00072 DEC 58 B-14 # LEM/S4B SEPARATE ARM - ON *
029281,000157: 25,2104 00062 DEC 50 B-14 # WAIT 500 MILLISECONDS
029282,000158:
029283,000159: 25,2105 40077 CS DAPBOOLS # ENABLE DAP
029284,000160: 25,2106 77751 MASK GODAPGO
029285,000161: 25,2107 26077 ADS DAPBOOLS
029286,000162:
029287,000163: 25,2110 05270 TC IBNKCALL # DEADBAND SELECT - MAX
029288,000164: 25,2111 40054 CADR SETMAXDB
029289,000165:
029290,000166: 25,2112 04161 TC PHASCHNG
029291,000167: 25,2113 47012 OCT 47012
|
|
Page 689 |
029293,000169: 25,2114 00062 DEC 50 B-14
029294,000170: 25,2115 E4,1566 EBANK= TDEC
029295,000171: 25,2115 02121 52064 2CADR TUMB2
029296,000172:
029297,000173: 25,2117 05701 TC FIXDELAY # WAIT 500 MILLISECONDS
029298,000174: 25,2120 00062 DEC 50 B-14
029299,000175:
029300,000176: 25,2121 05270 TUMB2 TC IBNKCALL
029301,000177: 25,2122 40072 CADR SETRATE # HOLD VEHICLE ATTITUDE RATE
029302,000178:
029303,000179: 25,2123 05073 TC 2LMP+DT
029304,000180: 25,2124 00132 DEC 90 B-14 # LEM/S4B SEPARATE - COMMAND **
029305,000181: 25,2125 00004 DEC 4 B-14 # ED BATTERY ACTIVATION - ON *
029306,000182: 25,2126 00012 DEC 10 B-14 # WAIT 100 MILLISECONDS
029307,000183:
029308,000184: 25,2127 05270 TC IBNKCALL # DEADBAND SELECT - MIN
029309,000185: 25,2130 40046 CADR SETMINDB
029310,000186:
029311,000187: 25,2131 40075 CS FLAGWRD1 # SETS SIVBGONE TO 1
029312,000188: 25,2132 77760 MASK BIT4
029313,000189: 25,2133 26075 ADS FLAGWRD1
029314,000190:
029315,000191: 25,2134 04161 TC PHASCHNG
029316,000192: 25,2135 47012 OCT 47012
029317,000193: 25,2136 00132 DEC 90 B-14
029318,000194: 25,2137 E4,1566 EBANK= TDEC
029319,000195: 25,2137 02143 52064 2CADR TUMB3
029320,000196:
029321,000197: 25,2141 05701 TC FIXDELAY # WAIT 900 MILLISECONDS
029322,000198: 25,2142 00132 DEC 90 B-14
029323,000199:
029324,000200: 25,2143 05270 TUMB3 TC IBNKCALL
029325,000201: 25,2144 40277 CADR ENGINOF1
029326,000202:
029327,000203: 25,2145 05073 TC 2LMP+DT
029328,000204: 25,2146 00073 DEC 59 B-14 # LEM/S4B SEPARATE ARM - OFF *
029329,000205: 25,2147 00226 DEC 150 B-14 # ENGINE SELECT - DESC ARM *
029330,000206: 25,2150 00001 DEC 1 B-14 # WAIT 10 MILLISECONDS
029331,000207:
029332,000208: 25,2151 37752 CAF BIT10 # START ABORT STAGE DISCRETE MONITOR
029333,000209: 25,2152 05663 TC WAITLIST
029334,000210: 25,2153 E4,1566 EBANK= TDEC
029335,000211: 25,2153 02436 52064 2CADR ABTSTGDM
029336,000212:
029337,000213: 25,2155 04141 TC 2PHSCHNG
029338,000214: 25,2156 40072 OCT 40072
029339,000215: 25,2157 47016 OCT 47016
029340,000216: 25,2160 01000 DEC 512 B-14
029341,000217: 25,2161 E4,1566 EBANK= TDEC
029342,000218: 25,2161 02436 52064 2CADR ABTSTGDM
029343,000219:
|
|
Page 690 |
029345,000221: 25,2163 05270 SBORBA TC IBNKCALL # DEADBAND SELECT - MIN
029346,000222: 25,2164 40046 CADR SETMINDB
029347,000223:
029348,000224: 25,2165 05101 TC 1LMP+DT
029349,000225: 25,2166 00126 DEC 86 B-14 # MANUAL THROTTLE - ON (10 PC) *
029350,000226: 25,2167 00144 DEC 100 B-14 # WAIT 1 SECOND
029351,000227:
029352,000228: 25,2170 05101 TC 1LMP+DT
029353,000229: 25,2171 00133 DEC 91 B-14 # RESET **
029354,000230: 25,2172 01130 DEC 600 B-14 # WAIT 6 SECONDS
029355,000231:
029356,000232: 25,2173 05270 TC IBNKCALL # HOLD LEM ATTITUDE
029357,000233: 25,2174 40114 CADR STOPRATE
029358,000234: 25,2175 04161 TC PHASCHNG
029359,000235: 25,2176 47012 OCT 47012
029360,000236: 25,2177 00620 DEC 400 B-14
029361,000237: 25,2200 E5,1511 EBANK= DVCNTR
029362,000238: 25,2200 02204 52065 2CADR SBORB3
029363,000239:
029364,000240: 25,2202 05701 TC FIXDELAY # WAIT 4 SECONDS
029365,000241: 25,2203 00620 DEC 400 B-14
029366,000242:
029367,000243: 25,2204 E5,1511 EBANK= DVCNTR
029368,000244:
029369,000245: 25,2204 35661 SBORB3 CA EBANK5
029370,000246: 25,2205 54003 TS EBANK
029371,000247:
029372,000248: 25,2206 05101 TC 1LMP+DT
029373,000249: 25,2207 00010 DEC 8 B-14 # LANDING GEAR DEPLOY - FIRE **
029374,000250: 25,2210 00144 DEC 100 B-14 # WAIT 1 SECOND
029375,000251:
029376,000252: 25,2211 05270 TC IBNKCALL
029377,000253: 25,2212 40226 CADR DPSENGON
|
|
DPSENGON in the above line has a green arrow pointing to it. |
029379,000255:
029380,000256: 25,2213 04161 TC PHASCHNG
029381,000257: 25,2214 47012 OCT 47012
029382,000258: 25,2215 00144 DEC 100 B-14
029383,000259: 25,2216 E5,1511 EBANK= DVCNTR
029384,000260: 25,2216 02222 52065 2CADR SBORB4
029385,000261:
029386,000262: 25,2220 05701 TC FIXDELAY # WAIT 1 SECOND
029387,000263: 25,2221 00144 DEC 100 B-14
029388,000264:
029389,000265: 25,2222 05073 SBORB4 TC 2LMP+DT
029390,000266: 25,2223 00005 DEC 5 B-14 # ED BATTERY ACTIVATION - SAFE *
029391,000267: 25,2224 00011 DEC 9 B-14 # RESET **
029392,000268: 25,2225 00620 DEC 400 B-14 # WAIT 4 SECONDS
029393,000269:
029394,000270: 25,2226 37767 CA ZERO # WE WANT TO DETECT ENGINOFF QUICKLY SO IT
029395,000271: 25,2227 55341 TS SETDVCNT # WON'T INTERFERE WITH NEXT ENG ON.
029396,000272:
|
|
Page 691 |
029398,000274: 25,2230 37763 CA ONE # DITTO.
029399,000275: 25,2231 55511 TS DVCNTR
029400,000276:
029401,000277: 25,2232 05270 TC IBNKCALL
029402,000278: 25,2233 40263 CADR ENGINOFF
029403,000279:
029404,000280: 25,2234 04161 TC PHASCHNG
029405,000281: 25,2235 47012 OCT 47012
029406,000282: 25,2236 00764 DEC 500 B-14
029407,000283: 25,2237 E5,1511 EBANK= DVCNTR
029408,000284: 25,2237 02243 52065 2CADR SBORB5
029409,000285:
029410,000286: 25,2241 05701 TC FIXDELAY # WAIT 5 SECONDS
029411,000287: 25,2242 00764 DEC 500 B-14
029412,000288:
029413,000289: 25,2243 05270 SBORB5 TC IBNKCALL
029414,000290: 25,2244 40226 CADR DPSENGON # DPSENGON WILL REFRESH SETDVCNT
|
|
DPSENGON in the above line has a green arrow pointing to it. |
029416,000292:
029417,000293: 25,2245 04161 TC PHASCHNG
029418,000294: 25,2246 47012 OCT 47012
029419,000295: 25,2247 00310 DEC 200 B-14
029420,000296: 25,2250 E5,1511 EBANK= DVCNTR
029421,000297: 25,2250 02254 52065 2CADR SBORB6
029422,000298:
029423,000299: 25,2252 05701 TC FIXDELAY # WAIT 2 SECONDS
029424,000300: 25,2253 00310 DEC 200 B-14
029425,000301:
029426,000302: 25,2254 05270 SBORB6 TC IBNKCALL # COMMAND +X TRANSLATION - OFF (4 JET)
029427,000303: 25,2255 40066 CADR NOULLAGE
029428,000304:
029429,000305: 25,2256 04161 TC PHASCHNG
029430,000306: 25,2257 47012 OCT 47012
029431,000307: 25,2260 03554 DEC 1900 B-14
029432,000308: 25,2261 E5,1511 EBANK= DVCNTR
029433,000309: 25,2261 02265 52065 2CADR SBORB7
029434,000310:
029435,000311: 25,2263 05701 TC FIXDELAY # WAIT 19 SECONDS
029436,000312: 25,2264 03554 DEC 1900 B-14
029437,000313:
029438,000314: 25,2265 05101 SBORB7 TC 1LMP+DT
029439,000315: 25,2266 00336 DEC 222 B-14 # ASCENT WATER COOLANT VALVE - OPEN **
029440,000316: 25,2267 00310 DEC 200 B-14 # WAIT 2 SECONDS
029441,000317:
029442,000318: 25,2270 05101 TC 1LMP+DT
029443,000319: 25,2271 00337 DEC 223 B-14 # RESET **
029444,000320: 25,2272 00454 DEC 300 B-14 # WAIT 3 SECONDS
029445,000321:
029446,000322: 25,2273 35210 CAF PRIO30 # THRUST REQUEST DURING JOB
029447,000323: 25,2274 05516 TC FINDVAC
029448,000324: 25,2275 E5,1565 EBANK= ETHROT
|
|
Page 692 |
029450,000326: 25,2275 02464 52065 2CADR TRST90PC
029451,000327:
029452,000328: 25,2277 04141 TC 2PHSCHNG
029453,000329: 25,2300 40112 OCT 40112
029454,000330: 25,2301 07024 OCT 07024
029455,000331: 25,2302 30000 OCT 30000
029456,000332: 25,2303 E5,1565 EBANK= ETHROT
029457,000333: 25,2303 02464 52065 2CADR TRST90PC
029458,000334:
029459,000335: 25,2305 05701 TC FIXDELAY # WAIT 4 SECONDS
029460,000336: 25,2306 00620 DEC 400 B-14
029461,000337:
029462,000338: 25,2307 05101 SBORB8 TC 1LMP+DT
029463,000339: 25,2310 00046 DEC 38 B-14 # ABORT STAGE - ARM *
029464,000340: 25,2311 00144 DEC 100 B-14 # WAIT 1 SECOND
029465,000341:
029466,000342: 25,2312 05101 TC 1LMP+DT
029467,000343: 25,2313 00026 DEC 22 B-14 # ABORT STAGE - COMMAND *
029468,000344: 25,2314 00001 DEC 1 B-14 # WAIT 10 MS
029469,000345:
029470,000346: 25,2315 04161 TC PHASCHNG
029471,000347: 25,2316 00002 OCT 00002
029472,000348:
029473,000349: 25,2317 15727 TCF TASKOVER # ABORT STAGE DISCRETE MONITOR RUNNING
029474,000350:
029475,000351:
029476,000352:
029477,000353: 25,2320 E7,1776 EBANK= LEMMASS2
029478,000354: 25,2320 35662 SBORBB CAF EBANK7
029479,000355: 25,2321 54003 TS EBANK
029480,000356:
029481,000357: 25,2322 00006 EXTEND
029482,000358: 25,2323 31777 DCA LEMMASS2
029483,000359: 25,2324 53321 DXCH MASS
029484,000360:
029485,000361: 25,2325 05270 TC IBNKCALL # SET UP DAP FOR APS BURN
029486,000362: 25,2326 40175 CADR APSENGON
029487,000363:
029488,000364: 25,2327 E4,1566 EBANK= TDEC
029489,000365: 25,2327 37751 CAF EBANK4
029490,000366: 25,2330 54003 TS EBANK
029491,000367:
029492,000368: 25,2331 04161 TC PHASCHNG
029493,000369: 25,2332 47012 OCT 47012
029494,000370: 25,2333 00144 DEC 100 B-14
029495,000371: 25,2334 E4,1566 EBANK= TDEC
029496,000372: 25,2334 02340 52064 2CADR SBORB9
029497,000373:
029498,000374: 25,2336 05701 TC FIXDELAY # WAIT 1 SECOND
029499,000375: 25,2337 00144 DEC 100 B-14
029500,000376:
|
|
Page 693 |
029502,000378: 25,2340 05101 SBORB9 TC 1LMP+DT
029503,000379: 25,2341 00227 DEC 151 B-14 # ENGINE SELECT - DESC ARM OFF *
029504,000380: 25,2342 00620 DEC 400 B-14 # WAIT 4 SECONDS
029505,000381:
029506,000382: 25,2343 05270 TC IBNKCALL
029507,000383: 25,2344 40263 CADR ENGINOFF
029508,000384:
029509,000385: 25,2345 04161 TC PHASCHNG
029510,000386: 25,2346 47012 OCT 47012
029511,000387: 25,2347 00144 DEC 100 B-14
029512,000388: 25,2350 E4,1566 EBANK= TDEC
029513,000389: 25,2350 02354 52064 2CADR SBORB10
029514,000390:
029515,000391: 25,2352 05701 TC FIXDELAY # WAIT 1 SECOND
029516,000392: 25,2353 00144 DEC 100 B-14
029517,000393:
029518,000394: 25,2354 05073 SBORB10 TC 2LMP+DT
029519,000395: 25,2355 00047 DEC 39 B-14 # ABORT STAGE - COMMAND RESET *
029520,000396: 25,2356 00206 DEC 134 B-14 # ENGINE SELECT - ASC ARM *
029521,000397: 25,2357 05214 DEC 2700 B-14 # WAIT 27 SECONDS
029522,000398:
029523,000399: 25,2360 05270 TC IBNKCALL # COMMAND +X TRANSLATION - ON (4 JET)
029524,000400: 25,2361 40062 CADR ULLAGE
029525,000401:
029526,000402: 25,2362 04161 TC PHASCHNG
029527,000403: 25,2363 47012 OCT 47012
029528,000404: 25,2364 00310 DEC 200 B-14
029529,000405: 25,2365 E4,1566 EBANK= TDEC
029530,000406: 25,2365 02371 52064 2CADR SBORB11
029531,000407:
029532,000408: 25,2367 05701 TC FIXDELAY # WAIT 2 SECONDS
029533,000409: 25,2370 00310 DEC 200 B-14
029534,000410:
029535,000411: 25,2371 05270 SBORB11 TC IBNKCALL
029536,000412: 25,2372 40175 CADR APSENGON
029537,000413:
029538,000414: 25,2373 04161 TC PHASCHNG
029539,000415: 25,2374 47012 OCT 47012
029540,000416: 25,2375 00310 DEC 200 B-14
029541,000417: 25,2376 E4,1566 EBANK= TDEC
029542,000418: 25,2376 02402 52064 2CADR SBORB12
029543,000419:
029544,000420: 25,2400 05701 TC FIXDELAY # WAIT 2 SECONDS
029545,000421: 25,2401 00310 DEC 200 B-14
029546,000422:
029547,000423: 25,2402 05270 SBORB12 TC IBNKCALL # COMMAND +X TRANSLATION - OFF (4 JET)
029548,000424: 25,2403 40066 CADR NOULLAGE
029549,000425:
029550,000426: 25,2404 04161 TC PHASCHNG
029551,000427: 25,2405 47012 OCT 47012
|
|
Page 694 |
029553,000429: 25,2406 13250 DEC 5800 B-14
029554,000430: 25,2407 E4,1566 EBANK= TDEC
029555,000431: 25,2407 02413 52064 2CADR SBORB13
029556,000432:
029557,000433: 25,2411 05701 TC FIXDELAY # WAIT 58 SECONDS
029558,000434: 25,2412 13250 DEC 5800 B-14
029559,000435:
029560,000436: 25,2413 05270 SBORB13 TC IBNKCALL
029561,000437: 25,2414 40263 CADR ENGINOFF
029562,000438:
029563,000439: 25,2415 04161 TC PHASCHNG
029564,000440: 25,2416 47012 OCT 47012
029565,000441: 25,2417 00144 DEC 100 B-14
029566,000442: 25,2420 E4,1566 EBANK= TDEC
029567,000443: 25,2420 02424 52064 2CADR SBORB14
029568,000444:
029569,000445: 25,2422 05701 TC FIXDELAY # WAIT 1 SECOND
029570,000446: 25,2423 00144 DEC 100 B-14
029571,000447:
029572,000448: 25,2424 05101 SBORB14 TC 1LMP+DT
029573,000449: 25,2425 00207 DEC 135 B-14 # ENGINE SELECT - ASC ARM OFF *
029574,000450: 25,2426 05524 DEC 2900 B-14 # WAIT 29 SECONDS
029575,000451:
029576,000452: 25,2427 06067 TC FLAG1DWN # KNOCK DOWN AVERAGEG FLAG
029577,000453: 25,2430 00001 OCT 00001
029578,000454:
029579,000455: 25,2431 05270 TC IBNKCALL # DEADBAND SELECT - MAX
029580,000456: 25,2432 40054 CADR SETMAXDB
029581,000457:
029582,000458: 25,2433 04161 TC PHASCHNG
029583,000459: 25,2434 00002 OCT 00002
029584,000460:
029585,000461: 25,2435 05727 TC TASKOVER
029586,000462:
029587,000463:
029588,000464:
029589,000465: 25,2436 37762 ABTSTGDM CAF BIT2 # ABORT STAGE DISCRETE MONITOR
029590,000466: 25,2437 00006 EXTEND
029591,000467: 25,2440 02030 RAND 30
029592,000468:
029593,000469: 25,2441 00006 EXTEND
029594,000470: 25,2442 12446 BZF ABTSTG1 # YES
029595,000471:
029596,000472: 25,2443 05701 TC FIXDELAY # WAIT .5 SECONDS
029597,000473: 25,2444 00062 DEC 50 B-14
029598,000474:
029599,000475: 25,2445 12436 TCF ABTSTGDM
029600,000476:
029601,000477: 25,2446 04141 ABTSTG1 TC 2PHSCHNG
029602,000478: 25,2447 00004 OCT 00004
|
|
Page 695 |
029604,000480: 25,2450 47012 OCT 47012
029605,000481: 25,2451 77777 OCT 77777
029606,000482: 25,2452 E4,1566 EBANK= TDEC
029607,000483: 25,2452 02320 52064 2CADR SBORBB
029608,000484:
029609,000485: 25,2454 04141 TC 2PHSCHNG
029610,000486: 25,2455 00006 OCT 00006
029611,000487: 25,2456 00003 OCT 00003
029612,000488:
029613,000489: 25,2457 35660 CAF PRIO37 # GENERATE RESTART IMMEDIATELY
029614,000490: 25,2460 05505 TC NOVAC
029615,000491: 25,2461 E3,1400 EBANK= LST1
029616,000492: 25,2461 02354 02063 2CADR ENEMA
029617,000493:
029618,000494: 25,2463 15727 TCF TASKOVER
029619,000495:
029620,000496:
029621,000497:
029622,000498:
029623,000499:
029624,000500: 25,2464 37743 TRST90PC CAF POSMAX # INCREASE THROTTLE 90 PERCENT
029625,000501: 25,2465 55323 TS PCNTF
029626,000502: 25,2466 00006 EXTEND
029627,000503: 25,2467 32473 DCA THRSTLOC
029628,000504: 25,2470 52006 DXCH Z
029629,000505:
029630,000506: 25,2471 15567 TCF ENDOFJOB
029631,000507:
029632,000508:
029633,000509:
029634,000510:
029635,000511:
029636,000512: 25,2472 E5,1565 EBANK= ETHROT
029637,000513: 25,2472 03466 60065 THRSTLOC 2CADR PCNTFMAX
End of include-file MP_3_SUBORBITAL_ABORT.agc. Parent file is MAIN.agc