Source Code
|
These source-code files are part of a reconstructed copy of Comanche 67, the
Apollo Guidance Computer (AGC) Command Module (CM) software for Apollo 12.
They have been adapted from sources files for Comanche 55, and updated via
disassembly of binary dumps of original core rope memory modules, part numbers
2003972-1081, 2003972-1091, 2003972-1111, 2003972-1121, 2003972-1131, and 2003972-1141.
Since only binary dumps (rather than listings) of Comanche 67 are available as source material,
all comments and labels are approximate.
They have been taken from other AGC programs where possible, or, in some places, written
from scratch to match what we believe would have been in the original listing.
|
057556,000002: ## Copyright: Public domain.
057557,000003: ## Filename: STAR_TABLES.agc
057558,000004: ## Purpose: A section of Comanche revision 067.
057559,000005: ## It is part of the reconstructed source code for the flight
057560,000006: ## software for the Command Module's (CM) Apollo Guidance Computer
057561,000007: ## (AGC) for Apollo 12. No original listings of this program are
057562,000008: ## available; instead, this file was created via dissassembly of
057563,000009: ## dumps of Comanche 067 core rope modules and comparison with
057564,000010: ## other AGC programs.
057565,000011: ## Assembler: yaYUL
057566,000012: ## Contact: Ron Burkey <info@sandroid.org>.
057567,000013: ## Website: www.ibiblio.org/apollo/index.html
057568,000014: ## Mod history: 2023-08-16 MAS Created from Comanche 055.
057569,000015:
057570,000016: 32,3770 BANK 32
057571,000017: 14,2000 SETLOC STARTAB
057572,000018: 14,2000 BANK
057573,000019:
057574,000020: 14,3424 COUNT 14/STARS
057575,000021:
057576,000022: 14,3424 15262 21773 2DEC +.8342971408 B-1 # STAR 37 X
057577,000023: 14,3426 74130 42420 2DEC -.2392481515 B-1 # STAR 37 Y
057578,000024: 14,3430 70033 41533 2DEC -.4966976975 B-1 # STAR 37 Z
057579,000025:
057580,000026: 14,3432 15014 04650 2DEC +.8139832631 B-1 # STAR 36 X
057581,000027: 14,3434 67067 60150 2DEC -.5557243189 B-1 # STAR 36 Y
057582,000028: 14,3436 02551 15723 2DEC +.1691204557 B-1 # STAR 36 Z
057583,000029:
057584,000030: 14,3440 07210 01664 2DEC +.4541086270 B-1 # STAR 35 X
057585,000031: 14,3442 67276 62232 2DEC -.5392368197 B-1 # STAR 35 Y
057586,000032: 14,3444 13262 00563 2DEC +.7092312789 B-1 # STAR 35 Z
057587,000033:
057588,000034: 14,3446 05076 35561 2DEC +.3201817378 B-1 # STAR 34 X
057589,000035: 14,3450 70716 40260 2DEC -.4436021946 B-1 # STAR 34 Y
057590,000036: 14,3452 62466 64656 2DEC -.8370786986 B-1 # STAR 34 Z
057591,000037:
057592,000038: 14,3454 10652 04246 2DEC +.5520184464 B-1 # STAR 33 X
057593,000039: 14,3456 63235 44200 2DEC -.7933187400 B-1 # STAR 33 Y
057594,000040: 14,3460 73710 66230 2DEC -.2567508745 B-1 # STAR 33 Z
057595,000041:
057596,000042: 14,3462 07204 33712 2DEC +.4537196908 B-1 # STAR 32 X
057597,000043: 14,3464 61747 72343 2DEC -.8779508801 B-1 # STAR 32 Y
057598,000044: 14,3466 02343 21362 2DEC +.1527766153 B-1 # STAR 32 Z
057599,000045:
057600,000046: 14,3470 03237 13301 2DEC +.2069525789 B-1 # STAR 31 X
057601,000047: 14,3472 62030 65332 2DEC -.8719885748 B-1 # STAR 31 Y
057602,000048: 14,3474 70715 71267 2DEC -.4436288486 B-1 # STAR 31 Z
057603,000049:
057604,000050: 14,3476 01745 06477 2DEC +.1217293692 B-1 # STAR 30 X
057605,000051: 14,3500 63531 75365 2DEC -.7702732847 B-1 # STAR 30 Y
057606,000052: 14,3502 12010 03005 2DEC +.6259880410 B-1 # STAR 30 Z
057607,000053:
057608,000054: 14,3504 76146 77014 2DEC -.1124304773 B-1 # STAR 29 X
057609,000055: 14,3506 60371 75073 2DEC -.9694934200 B-1 # STAR 29 Y
057610,000056: 14,3510 03370 12003 2DEC +.2178116072 B-1 # STAR 29 Z
057611,000057:
057612,000058: 14,3512 76125 40037 2DEC -.1146237858 B-1 # STAR 28 X
057613,000059: 14,3514 72436 77062 2DEC -.3399692557 B-1 # STAR 28 Y
057614,000060: 14,3516 61041 54164 2DEC -.9334250333 B-1 # STAR 28 Z
057615,000061:
057616,000062: 14,3520 72277 51044 2DEC -.3516499609 B-1 # STAR 27 X
057617,000063: 14,3522 62641 45471 2DEC -.8240752703 B-1 # STAR 27 Y
057618,000064: 14,3524 70711 70546 2DEC -.4441196390 B-1 # STAR 27 Z
057619,000065:
057620,000066: 14,3526 67364 47073 2DEC -.5326876930 B-1 # STAR 26 X
057621,000067: 14,3530 64425 77777 2DEC -.7160644554 B-1 # STAR 26 Y
057622,000068: 14,3532 07157 16322 2DEC +.4511047742 B-1 # STAR 26 Z
057623,000069:
057624,000070: 14,3534 63327 64446 2DEC -.7861763936 B-1 # STAR 25 X
057625,000071: 14,3536 67515 55266 2DEC -.5217996305 B-1 # STAR 25 Y
057626,000072: 14,3540 05230 25476 2DEC +.3311371675 B-1 # STAR 25 Z
057627,000073:
057628,000074: 14,3542 64754 72604 2DEC -.6898393233 B-1 # STAR 24 X
057629,000075: 14,3544 71235 72553 2DEC -.4182330640 B-1 # STAR 24 Y
057630,000076: 14,3546 66427 42171 2DEC -.5909338474 B-1 # STAR 24 Z
057631,000077:
057632,000078: 14,3550 66546 70765 2DEC -.5812035376 B-1 # STAR 23 X
057633,000079: 14,3552 73260 71643 2DEC -.2909171294 B-1 # STAR 23 Y
057634,000080: 14,3554 14121 30153 2DEC +.7599800468 B-1 # STAR 23 Z
057635,000081:
057636,000082: 14,3556 61247 73310 2DEC -.9170097662 B-1 # STAR 22 X
057637,000083: 14,3560 72313 41247 2DEC -.3502146628 B-1 # STAR 22 Y
057638,000084: 14,3562 74744 44566 2DEC -.1908999176 B-1 # STAR 22 Z
057639,000085:
057640,000086: 14,3564 70606 54564 2DEC -.4523440203 B-1 # STAR 21 X
057641,000087: 14,3566 77153 61536 2DEC -.0493710140 B-1 # STAR 21 Y
057642,000088: 14,3570 61601 47046 2DEC -.8904759346 B-1 # STAR 21 Z
057643,000089:
057644,000090: 14,3572 60604 76224 2DEC -.9525211695 B-1 # STAR 20 X
057645,000091: 14,3574 77031 73354 2DEC -.0593434796 B-1 # STAR 20 Y
057646,000092: 14,3576 73161 63065 2DEC -.2986331746 B-1 # STAR 20 Z
057647,000093:
057648,000094: 14,3600 60431 51702 2DEC -.9656605484 B-1 # STAR 19 X
057649,000095: 14,3602 00656 33013 2DEC +.0525933156 B-1 # STAR 19 Y
057650,000096: 14,3604 04044 10627 2DEC +.2544280809 B-1 # STAR 19 Z
057651,000097:
057652,000098: 14,3606 62164 45040 2DEC -.8608205219 B-1 # STAR 18 X
057653,000099: 14,3610 07325 37443 2DEC +.4636213989 B-1 # STAR 18 Y
057654,000100: 14,3612 03267 06626 2DEC +.2098647835 B-1 # STAR 18 Z
057655,000101:
057656,000102: 14,3614 63471 50471 2DEC -.7742591356 B-1 # STAR 17 X
057657,000103: 14,3616 11660 04151 2DEC +.6152504197 B-1 # STAR 17 Y
057658,000104: 14,3620 75501 46664 2DEC -.1482892839 B-1 # STAR 17 Z
057659,000105:
057660,000106: 14,3622 70430 46540 2DEC -.4657947941 B-1 # STAR 16 X
057661,000107: 14,3624 07507 20100 2DEC +.4774785033 B-1 # STAR 16 Y
057662,000108: 14,3626 13727 05455 2DEC +.7450164351 B-1 # STAR 16 Z
057663,000109:
057664,000110: 14,3630 72160 64202 2DEC -.3612508532 B-1 # STAR 15 X
057665,000111: 14,3632 11144 05203 2DEC +.5747270840 B-1 # STAR 15 Y
057666,000112: 14,3634 64200 65331 2DEC -.7342932655 B-1 # STAR 15 Z
057667,000113:
057668,000114: 14,3636 71322 41512 2DEC -.4118589524 B-1 # STAR 14 X
057669,000115: 14,3640 16402 16205 2DEC +.9065485360 B-1 # STAR 14 Y
057670,000116: 14,3642 01365 04034 2DEC +.0924226975 B-1 # STAR 14 Z
057671,000117:
057672,000118: 14,3644 75054 56052 2DEC -.1820751783 B-1 # STAR 13 X
057673,000119: 14,3646 17030 17635 2DEC +.9404899869 B-1 # STAR 13 Y
057674,000120: 14,3650 73321 57603 2DEC -.2869271926 B-1 # STAR 13 Z
057675,000121:
057676,000122: 14,3652 77010 47623 2DEC -.0614937230 B-1 # STAR 12 X
057677,000123: 14,3654 11515 01640 2DEC +.6031563286 B-1 # STAR 12 Y
057678,000124: 14,3656 63215 52176 2DEC -.7952489957 B-1 # STAR 12 Z
057679,000125:
057680,000126: 14,3660 02143 26755 2DEC +.1371725575 B-1 # STAR 11 X
057681,000127: 14,3662 12715 31470 2DEC +.6813721061 B-1 # STAR 11 Y
057682,000128: 14,3664 13401 31222 2DEC +.7189685267 B-1 # STAR 11 Z
057683,000129:
057684,000130: 14,3666 03157 27504 2DEC +.2011399589 B-1 # STAR 10 X
057685,000131: 14,3670 17402 12312 2DEC +.9690337941 B-1 # STAR 10 Y
057686,000132: 14,3672 75552 63657 2DEC -.1432348512 B-1 # STAR 10 Z
057687,000133:
057688,000134: 14,3674 05471 06122 2DEC +.3507315038 B-1 # STAR 9 X
057689,000135: 14,3676 16220 16362 2DEC +.8926333307 B-1 # STAR 9 Y
057690,000136: 14,3700 04417 32762 2DEC +.2831839492 B-1 # STAR 9 Z
057691,000137:
057692,000138: 14,3702 06443 12622 2DEC +.4105636020 B-1 # STAR 8 X
057693,000139: 14,3704 07766 10237 2DEC +.4988110001 B-1 # STAR 8 Y
057694,000140: 14,3706 14154 36154 2DEC +.7632988371 B-1 # STAR 8 Z
057695,000141:
057696,000142: 14,3710 13200 31653 2DEC +.7032235469 B-1 # STAR 7 X
057697,000143: 14,3712 13244 21036 2DEC +.7075846047 B-1 # STAR 7 Y
057698,000144: 14,3714 01067 23106 2DEC +.0692868685 B-1 # STAR 7 Z
057699,000145:
057700,000146: 14,3716 10560 27227 2DEC +.5450107404 B-1 # STAR 6 X
057701,000147: 14,3720 10402 00275 2DEC +.5314955466 B-1 # STAR 6 Y
057702,000148: 14,3722 65477 77044 2DEC -.6484410356 B-1 # STAR 6 Z
057703,000149:
057704,000150: 14,3724 00153 11212 2DEC +.0130968840 B-1 # STAR 5 X
057705,000151: 14,3726 00077 36275 2DEC +.0078062795 B-1 # STAR 5 Y
057706,000152: 14,3730 17777 01417 2DEC +.9998837600 B-1 # STAR 5 Z
057707,000153:
057708,000154: 14,3732 07674 21771 2DEC +.4917678276 B-1 # STAR 4 X
057709,000155: 14,3734 03416 07626 2DEC +.2204887125 B-1 # STAR 4 Y
057710,000156: 14,3736 62413 57536 2DEC -.8423473935 B-1 # STAR 4 Z
057711,000157:
057712,000158: 14,3740 07510 06414 2DEC +.4775639450 B-1 # STAR 3 X
057713,000159: 14,3742 01673 06065 2DEC +.1166004340 B-1 # STAR 3 Y
057714,000160: 14,3744 15735 31531 2DEC +.8708254803 B-1 # STAR 3 Z
057715,000161:
057716,000162: 14,3746 16745 17555 2DEC +.9342640400 B-1 # STAR 2 X
057717,000163: 14,3750 02615 13716 2DEC +.1735073142 B-1 # STAR 2 Y
057718,000164: 14,3752 73010 40311 2DEC -.3115219339 B-1 # STAR 2 Z
057719,000165:
057720,000166: 14,3754 15776 34660 2DEC +.8748658918 B-1 # STAR 1 X
057721,000167: 14,3756 00325 26625 2DEC +.0260879174 B-1 # STAR 1 Y
057722,000168: 14,3760 07572 05105 2DEC +.4836621670 B-1 # STAR 1 Z
057723,000169:
057724,000170: 14,3762 15472 CATLOG DEC 6970 B-14
057725,000171:
057726,000172:
057727,000173:
End of include-file STAR_TABLES.agc. Parent file is MAIN.agc