Source Code
These source code files are an attempted reconstruction of Sundance revision 306, the Apollo 9
LM (Lunar Module) AGC (Apollo Guidance Computer) flight software, created from binary dumps of
original core rope program modules, as follows:
|
050116,000002: ## Copyright: Public domain.
050117,000003: ## Filename: STAR_TABLES.agc
050118,000004: ## Purpose: A section of an attempt to reconstruct Sundance revision 306
050119,000005: ## as closely as possible with available information. Sundance
050120,000006: ## 306 is the source code for the Lunar Module's (LM) Apollo
050121,000007: ## Guidance Computer (AGC) for Apollo 9. This program was created
050122,000008: ## using the mixed-revision SundanceXXX as a starting point, and
050123,000009: ## pulling back features from Luminary 69 believed to have been
050124,000010: ## added based on memos, checklists, observed address changes,
050125,000011: ## or the Sundance GSOPs.
050126,000012: ## Assembler: yaYUL
050127,000013: ## Contact: Ron Burkey <info@sandroid.org>.
050128,000014: ## Website: www.ibiblio.org/apollo/index.html
050129,000015: ## Mod history: 2020-07-24 MAS Created from SundanceXXX.
050130,000016:
050131,000017:
050132,000018:
050133,000019: 32,3712 BANK 32
050134,000020: 14,2000 SETLOC STARTAB
050135,000021: 14,2000 BANK
050136,000022:
050137,000023: 14,3375 COUNT* $$/STARS
050138,000024:
050139,000025: 14,3375 15261 27231 2DEC +.8341953207 B-1 # STAR 37 X
050140,000026: 14,3377 74126 61161 2DEC -.2394362567 B-1 # STAR 37 Y
050141,000027: 14,3401 70032 54470 2DEC -.4967780649 B-1 # STAR 37 Z
050142,000028: 14,3403 15013 10432 2DEC +.8138753897 B-1 # STAR 36 X
050143,000029: 14,3405 67066 40370 2DEC -.5559063490 B-1 # STAR 36 Y
050144,000030: 14,3407 02550 31133 2DEC +.1690413589 B-1 # STAR 36 Z
050145,000031: 14,3411 07207 24243 2DEC +.4540570017 B-1 # STAR 35 X
050146,000032: 14,3413 67275 67544 2DEC -.5393383149 B-1 # STAR 35 Y
050147,000033: 14,3415 13261 25121 2DEC +.7091871552 B-1 # STAR 35 Z
050148,000034: 14,3417 05075 16350 2DEC +.3200014224 B-1 # STAR 34 X
050149,000035: 14,3421 70715 55404 2DEC -.4436740480 B-1 # STAR 34 Y
050150,000036: 14,3423 62466 54577 2DEC -.8371095679 B-1 # STAR 34 Z
050151,000037: 14,3425 10650 17202 2DEC +.5518160037 B-1 # STAR 33 X
050152,000038: 14,3427 63234 43704 2DEC -.7934422090 B-1 # STAR 33 Y
050153,000039: 14,3431 73710 50170 2DEC -.2568045150 B-1 # STAR 33 Z
050154,000040: 14,3433 07203 13612 2DEC +.4535361097 B-1 # STAR 32 X
050155,000041: 14,3435 61746 77370 2DEC -.8780537171 B-1 # STAR 32 Y
050156,000042: 14,3437 02343 05340 2DEC +.1527307006 B-1 # STAR 32 Z
050157,000043: 14,3441 03235 14762 2DEC +.2067145272 B-1 # STAR 31 X
050158,000044: 14,3443 62030 51212 2DEC -.8720349419 B-1 # STAR 31 Y
050159,000045: 14,3445 70715 64117 2DEC -.4436486945 B-1 # STAR 31 Z
050160,000046: 14,3447 01744 11157 2DEC +.1216171923 B-1 # STAR 30 X
050161,000047: 14,3451 63531 66055 2DEC -.7703014754 B-1 # STAR 30 Y
050162,000048: 14,3453 12007 37503 2DEC +.6259751556 B-1 # STAR 30 Z
050163,000049: 14,3455 76145 53477 2DEC -.1126265542 B-1 # STAR 29 X
050164,000050: 14,3457 60372 43624 2DEC -.9694679589 B-1 # STAR 29 Y
050165,000051: 14,3461 03370 15121 2DEC +.2178236347 B-1 # STAR 29 Z
050166,000052: 14,3463 76123 64245 2DEC -.1147906312 B-1 # STAR 28 X
050167,000053: 14,3465 72437 45623 2DEC -.3399437395 B-1 # STAR 28 Y
050168,000054: 14,3467 61041 57124 2DEC -.9334138229 B-1 # STAR 28 Z
050169,000055: 14,3471 72275 55365 2DEC -.3518772846 B-1 # STAR 27 X
050170,000056: 14,3473 62641 72150 2DEC -.8239967165 B-1 # STAR 27 Y
050171,000057: 14,3475 70712 41542 2DEC -.4440853383 B-1 # STAR 27 Z
050172,000058: 14,3477 67363 50441 2DEC -.5328042377 B-1 # STAR 26 X
050173,000059: 14,3501 64426 77263 2DEC -.7159448596 B-1 # STAR 26 Y
050174,000060: 14,3503 07157 34056 2DEC +.4511569595 B-1 # STAR 26 Z
050175,000061: 14,3505 63326 77723 2DEC -.7862552143 B-1 # STAR 25 X
050176,000062: 14,3507 67516 72566 2DEC -.5216265404 B-1 # STAR 25 Y
050177,000063: 14,3511 05231 14031 2DEC +.3312227199 B-1 # STAR 25 Z
050178,000064: 14,3513 64753 63156 2DEC -.6899901699 B-1 # STAR 24 X
050179,000065: 14,3515 71237 42272 2DEC -.4180817950 B-1 # STAR 24 Y
050180,000066: 14,3517 66427 64260 2DEC -.5908647707 B-1 # STAR 24 Z
050181,000067: 14,3521 66546 73302 2DEC -.5811943804 B-1 # STAR 23 X
050182,000068: 14,3523 73261 73575 2DEC -.2907877154 B-1 # STAR 23 Y
050183,000069: 14,3525 14122 07016 2DEC +.7600365758 B-1 # STAR 23 Z
050184,000070: 14,3527 61247 42015 2DEC -.9171065276 B-1 # STAR 22 X
050185,000071: 14,3531 72314 67004 2DEC -.3500098785 B-1 # STAR 22 Y
050186,000072: 14,3533 74744 74104 2DEC -.1908106439 B-1 # STAR 22 Z
050187,000073: 14,3535 70605 63103 2DEC -.4524416631 B-1 # STAR 21 X
050188,000074: 14,3537 77154 54113 2DEC -.0492700670 B-1 # STAR 21 Y
050189,000075: 14,3541 61601 62472 2DEC -.8904319167 B-1 # STAR 21 Z
050190,000076: 14,3543 60604 63166 2DEC -.9525633510 B-1 # STAR 20 X
050191,000077: 14,3545 77033 63044 2DEC -.0591313500 B-1 # STAR 20 Y
050192,000078: 14,3547 73162 53261 2DEC -.2985406935 B-1 # STAR 20 Z
050193,000079: 14,3551 60431 63350 2DEC -.9656240240 B-1 # STAR 19 X
050194,000080: 14,3553 00660 22763 2DEC +.0528067543 B-1 # STAR 19 Y
050195,000081: 14,3555 04045 01424 2DEC +.2545224762 B-1 # STAR 19 Z
050196,000082: 14,3557 62165 45335 2DEC -.8606970465 B-1 # STAR 18 X
050197,000083: 14,3561 07327 21564 2DEC +.4638127405 B-1 # STAR 18 Y
050198,000084: 14,3563 03267 34557 2DEC +.2099484122 B-1 # STAR 18 Z
050199,000085: 14,3565 63472 50705 2DEC -.7741360248 B-1 # STAR 17 X
050200,000086: 14,3567 11661 21433 2DEC +.6154234025 B-1 # STAR 17 Y
050201,000087: 14,3571 75501 72421 2DEC -.1482142053 B-1 # STAR 17 Z
050202,000088: 14,3573 70431 65316 2DEC -.4656165921 B-1 # STAR 16 X
050203,000089: 14,3575 07510 12666 2DEC +.4775804724 B-1 # STAR 16 Y
050204,000090: 14,3577 13727 21520 2DEC +.7450624681 B-1 # STAR 16 Z
050205,000091: 14,3601 72161 43161 2DEC -.3611937602 B-1 # STAR 15 X
050206,000092: 14,3603 11144 32323 2DEC +.5748077840 B-1 # STAR 15 Y
050207,000093: 14,3605 64200 76476 2DEC -.7342581827 B-1 # STAR 15 Z
050208,000094: 14,3607 71323 70264 2DEC -.4116502629 B-1 # STAR 14 X
050209,000095: 14,3611 16403 05717 2DEC +.9066387314 B-1 # STAR 14 Y
050210,000096: 14,3613 01365 17662 2DEC +.0924676785 B-1 # STAR 14 Z
050211,000097: 14,3615 75055 75101 2DEC -.1818957154 B-1 # STAR 13 X
050212,000098: 14,3617 17030 32613 2DEC +.9405318128 B-1 # STAR 13 Y
050213,000099: 14,3621 73321 65667 2DEC -.2869039173 B-1 # STAR 13 Z
050214,000100: 14,3623 77010 66714 2DEC -.0614360769 B-1 # STAR 12 X
050215,000101: 14,3625 11515 05314 2DEC +.6031700106 B-1 # STAR 12 Y
050216,000102: 14,3627 63215 53630 2DEC -.7952430739 B-1 # STAR 12 Z
050217,000103: 14,3631 02145 21163 2DEC +.1373948084 B-1 # STAR 11 X
050218,000104: 14,3633 12715 21123 2DEC +.6813398852 B-1 # STAR 11 Y
050219,000105: 14,3635 13401 26125 2DEC +.7189566241 B-1 # STAR 11 Z
050220,000106: 14,3637 03161 14610 2DEC +.2013426456 B-1 # STAR 10 X
050221,000107: 14,3641 17401 36465 2DEC +.9689888101 B-1 # STAR 10 Y
050222,000108: 14,3643 75552 56556 2DEC -.1432544058 B-1 # STAR 10 Z
050223,000109: 14,3645 05473 01565 2DEC +.3509587451 B-1 # STAR 9 X
050224,000110: 14,3647 16217 31643 2DEC +.8925545449 B-1 # STAR 9 Y
050225,000111: 14,3651 04417 22211 2DEC +.2831507435 B-1 # STAR 9 Z
050226,000112: 14,3653 06444 33354 2DEC +.4107492871 B-1 # STAR 8 X
050227,000113: 14,3655 07765 20153 2DEC +.4987190610 B-1 # STAR 8 Y
050228,000114: 14,3657 14154 23613 2DEC +.7632590132 B-1 # STAR 8 Z
050229,000115: 14,3661 13202 05024 2DEC +.7033883645 B-1 # STAR 7 X
050230,000116: 14,3663 13243 07665 2DEC +.7074274193 B-1 # STAR 7 Y
050231,000117: 14,3665 01067 01242 2DEC +.0692188921 B-1 # STAR 7 Z
050232,000118: 14,3667 10561 05666 2DEC +.5450662811 B-1 # STAR 6 X
050233,000119: 14,3671 10401 00357 2DEC +.5313738486 B-1 # STAR 6 Y
050234,000120: 14,3673 65477 61124 2DEC -.6484940879 B-1 # STAR 6 Z
050235,000121: 14,3675 00154 03111 2DEC +.0131955837 B-1 # STAR 5 X
050236,000122: 14,3677 00077 35676 2DEC +.0078043793 B-1 # STAR 5 Y
050237,000123: 14,3701 17777 01142 2DEC +.9998824772 B-1 # STAR 5 Z
050238,000124: 14,3703 07674 11416 2DEC +.4917355618 B-1 # STAR 4 X
050239,000125: 14,3705 03415 12707 2DEC +.2203784481 B-1 # STAR 4 Y
050240,000126: 14,3707 62413 43135 2DEC -.8423950835 B-1 # STAR 4 Z
050241,000127: 14,3711 07511 03423 2DEC +.4776746280 B-1 # STAR 3 X
050242,000128: 14,3713 01672 12054 2DEC +.1164935557 B-1 # STAR 3 Y
050243,000129: 14,3715 15735 15405 2DEC +.8707790771 B-1 # STAR 3 Z
050244,000130: 14,3717 16745 21763 2DEC +.9342726691 B-1 # STAR 2 X
050245,000131: 14,3721 02613 24675 2DEC +.1732973829 B-1 # STAR 2 Y
050246,000132: 14,3723 73007 50430 2DEC -.3116128956 B-1 # STAR 2 Z
050247,000133: 14,3725 15777 12457 2DEC +.8749183324 B-1 # STAR 1 X
050248,000134: 14,3727 00324 03265 2DEC +.0258916990 B-1 # STAR 1 Y
050249,000135: 14,3731 07571 17020 2DEC +.4835778442 B-1 # STAR 1 Z
050250,000136: 14,3733 15325 CATLOG DEC 6869 B-14
End of include-file STAR_TABLES.agc. Parent file is MAIN.agc