Source Code

These source-code files are part of a reconstructed copy of Comanche 45, the second release, though not the final mission release, of the Apollo 10 Command Module (CM) Apollo Guidance Computer (AGC) software. Comanche 45 was preceded by Comanche 44 and followed by Comanche 45/2 (the flown release). The reconstruction is believed to be exactly accurate, but in the absence of an actual Apollo-era listing of Comanche 45, some explanation of the reconstruction process is needed to insure confidence in that accuracy.

The starting point was the source code of Comanche 44 (itself previously accurately reconstructed). Comanche 44 source code was then modified by incorporating changes known from contemporary documentation to have been made between revisions 44 and 45. The now-reconstructed Comanche 45 source code was verified by assembling it and checking that the assembled code had the expected known-correct memory-bank checksums. Note that page numbers in the reconstructed code tend to match those in the Comanche 55, the most-similar revision of Comanche for which we have access to an actual non-reconstructed hardcopy; the source code would likely have different page numbers in a contemporary Comanche 45 listing.

Annotations that were not present in the contemporary source code have been added to the reconstructed code to justify each change relative to Comanche 44. Here's a guide to the Apollo documentation referenced in those annotations:
There is also a detailed commentary about the reconstruction process.

Comments expected to have been present in the original source code are prefixed with a single '#' symbol, whereas comments added later are prefixed by "##" or "###". Report any errors noted by creating an issue report at the Virtual AGC Project's GitHub repository.

059015,000002:                                                                                                  ## Copyright:   Public domain.
059016,000003:                                                                                                  ## Filename:    STAR_TABLES.agc
059017,000004:                                                                                                  ## Purpose:     A section of Comanche revision 045.
059018,000005:                                                                                                  ##              It is part of the reconstructed source code for the
059019,000006:                                                                                                  ##              second release of the flight software for the Command
059020,000007:                                                                                                  ##              Module's (CM) Apollo Guidance Computer (AGC) for Apollo 10.
059021,000008:                                                                                                  ##              The code has been recreated from a copy of Comanche 055. It
059022,000009:                                                                                                  ##              has been adapted such that the resulting bugger words
059023,000010:                                                                                                  ##              exactly match those specified for Comanche 45 in NASA drawing
059024,000011:                                                                                                  ##              2021153D, which gives relatively high confidence that the
059025,000012:                                                                                                  ##              reconstruction is correct.
059026,000013:                                                                                                  ## Assembler:   yaYUL
059027,000014:                                                                                                  ## Contact:     Ron Burkey <info@sandroid.org>.
059028,000015:                                                                                                  ## Website:     www.ibiblio.org/apollo/index.html
059029,000016:                                                                                                  ## Mod history: 2020-12-06 MAS  Created from Comanche 44.
059030,000017: 

Page 1389

059032,000019: 32,3770                                           BANK     32                                    
059033,000020: 14,2000                                           SETLOC   STARTAB                               
059034,000021: 14,2000                                           BANK                                           
059035,000022: 
059036,000023: 14,3423                                           COUNT    14/STARS                              
059037,000024: 
059038,000025: 14,3423           15261 27231                     2DEC     +.8341953207 B-1                        #  STAR 37       X
059039,000026: 14,3425           74126 61161                     2DEC     -.2394362567 B-1                        #  STAR 37       Y
059040,000027: 14,3427           70032 54470                     2DEC     -.4967780649 B-1                        #  STAR 37       Z
059041,000028: 
059042,000029: 14,3431           15013 10432                     2DEC     +.8138753897 B-1                        #  STAR 36       X
059043,000030: 14,3433           67066 40370                     2DEC     -.5559063490 B-1                        #  STAR 36       Y
059044,000031: 14,3435           02550 31133                     2DEC     +.1690413589 B-1                        #  STAR 36       Z
059045,000032: 
059046,000033: 14,3437           07207 24243                     2DEC     +.4540570017 B-1                        #  STAR 35       X
059047,000034: 14,3441           67275 67544                     2DEC     -.5393383149 B-1                        #  STAR 35       Y
059048,000035: 14,3443           13261 25121                     2DEC     +.7091871552 B-1                        #  STAR 35       Z
059049,000036: 
059050,000037: 14,3445           05075 16350                     2DEC     +.3200014224 B-1                        #  STAR 34       X
059051,000038: 14,3447           70715 55404                     2DEC     -.4436740480 B-1                        #  STAR 34       Y
059052,000039: 14,3451           62466 54577                     2DEC     -.8371095679 B-1                        #  STAR 34       Z
059053,000040: 
059054,000041: 14,3453           10650 17202                     2DEC     +.5518160037 B-1                        #  STAR 33       X
059055,000042: 14,3455           63234 43704                     2DEC     -.7934422090 B-1                        #  STAR 33       Y
059056,000043: 14,3457           73710 50170                     2DEC     -.2568045150 B-1                        #  STAR 33       Z
059057,000044: 
059058,000045: 14,3461           07203 13612                     2DEC     +.4535361097 B-1                        #  STAR 32       X
059059,000046: 14,3463           61746 77370                     2DEC     -.8780537171 B-1                        #  STAR 32       Y
059060,000047: 14,3465           02343 05340                     2DEC     +.1527307006 B-1                        #  STAR 32       Z
059061,000048: 
059062,000049: 14,3467           03235 14762                     2DEC     +.2067145272 B-1                        #  STAR 31       X
059063,000050: 14,3471           62030 51212                     2DEC     -.8720349419 B-1                        #  STAR 31       Y
059064,000051: 14,3473           70715 64117                     2DEC     -.4436486945 B-1                        #  STAR 31       Z
059065,000052: 
059066,000053: 14,3475           01744 11157                     2DEC     +.1216171923 B-1                        #  STAR 30       X

Page 1390

059068,000055: 14,3477           63531 66055                     2DEC     -.7703014754 B-1                        #  STAR 30       Y
059069,000056: 14,3501           12007 37503                     2DEC     +.6259751556 B-1                        #  STAR 30       Z
059070,000057: 
059071,000058: 14,3503           76145 53477                     2DEC     -.1126265542 B-1                        #  STAR 29       X
059072,000059: 14,3505           60372 43624                     2DEC     -.9694679589 B-1                        #  STAR 29       Y
059073,000060: 14,3507           03370 15121                     2DEC     +.2178236347 B-1                        #  STAR 29       Z
059074,000061: 
059075,000062: 14,3511           76123 64245                     2DEC     -.1147906312 B-1                        #  STAR 28       X
059076,000063: 14,3513           72437 45623                     2DEC     -.3399437395 B-1                        #  STAR 28       Y
059077,000064: 14,3515           61041 57124                     2DEC     -.9334138229 B-1                        #  STAR 28       Z
059078,000065: 
059079,000066: 14,3517           72275 55365                     2DEC     -.3518772846 B-1                        #  STAR 27       X
059080,000067: 14,3521           62641 72150                     2DEC     -.8239967165 B-1                        #  STAR 27       Y
059081,000068: 14,3523           70712 41542                     2DEC     -.4440853383 B-1                        #  STAR 27       Z
059082,000069: 
059083,000070: 14,3525           67363 50441                     2DEC     -.5328042377 B-1                        #  STAR 26       X
059084,000071: 14,3527           64426 77263                     2DEC     -.7159448596 B-1                        #  STAR 26       Y
059085,000072: 14,3531           07157 34056                     2DEC     +.4511569595 B-1                        #  STAR 26       Z
059086,000073: 
059087,000074: 14,3533           63326 77723                     2DEC     -.7862552143 B-1                        #  STAR 25       X
059088,000075: 14,3535           67516 72566                     2DEC     -.5216265404 B-1                        #  STAR 25       Y
059089,000076: 14,3537           05231 14031                     2DEC     +.3312227199 B-1                        #  STAR 25       Z
059090,000077: 
059091,000078: 14,3541           64753 63156                     2DEC     -.6899901699 B-1                        #  STAR 24       X
059092,000079: 14,3543           71237 42272                     2DEC     -.4180817950 B-1                        #  STAR 24       Y
059093,000080: 14,3545           66427 64260                     2DEC     -.5908647707 B-1                        #  STAR 24       Z
059094,000081: 
059095,000082: 14,3547           66546 73302                     2DEC     -.5811943804 B-1                        #  STAR 23       X
059096,000083: 14,3551           73261 73575                     2DEC     -.2907877154 B-1                        #  STAR 23       Y
059097,000084: 14,3553           14122 07016                     2DEC     +.7600365758 B-1                        #  STAR 23       Z
059098,000085: 
059099,000086: 14,3555           61247 42015                     2DEC     -.9171065276 B-1                        #  STAR 22       X
059100,000087: 14,3557           72314 67004                     2DEC     -.3500098785 B-1                        #  STAR 22       Y

Page 1391

059102,000089: 14,3561           74744 74104                     2DEC     -.1908106439 B-1                        #  STAR 22       Z
059103,000090: 
059104,000091: 14,3563           70605 63103                     2DEC     -.4524416631 B-1                        #  STAR 21       X
059105,000092: 14,3565           77154 54113                     2DEC     -.0492700670 B-1                        #  STAR 21       Y
059106,000093: 14,3567           61601 62472                     2DEC     -.8904319167 B-1                        #  STAR 21       Z
059107,000094: 
059108,000095: 14,3571           60604 63166                     2DEC     -.9525633510 B-1                        #  STAR 20       X
059109,000096: 14,3573           77033 63044                     2DEC     -.0591313500 B-1                        #  STAR 20       Y
059110,000097: 14,3575           73162 53261                     2DEC     -.2985406935 B-1                        #  STAR 20       Z
059111,000098: 
059112,000099: 14,3577           60431 63350                     2DEC     -.9656240240 B-1                        #  STAR 19       X
059113,000100: 14,3601           00660 22763                     2DEC     +.0528067543 B-1                        #  STAR 19       Y
059114,000101: 14,3603           04045 01424                     2DEC     +.2545224762 B-1                        #  STAR 19       Z
059115,000102: 
059116,000103: 14,3605           62165 45335                     2DEC     -.8606970465 B-1                        #  STAR 18       X
059117,000104: 14,3607           07327 21564                     2DEC     +.4638127405 B-1                        #  STAR 18       Y
059118,000105: 14,3611           03267 34557                     2DEC     +.2099484122 B-1                        #  STAR 18       Z
059119,000106: 
059120,000107: 14,3613           63472 50705                     2DEC     -.7741360248 B-1                        #  STAR 17       X
059121,000108: 14,3615           11661 21433                     2DEC     +.6154234025 B-1                        #  STAR 17       Y
059122,000109: 14,3617           75501 72421                     2DEC     -.1482142053 B-1                        #  STAR 17       Z
059123,000110: 
059124,000111: 14,3621           70431 65316                     2DEC     -.4656165921 B-1                        #  STAR 16       X
059125,000112: 14,3623           07510 12666                     2DEC     +.4775804724 B-1                        #  STAR 16       Y
059126,000113: 14,3625           13727 21520                     2DEC     +.7450624681 B-1                        #  STAR 16       Z
059127,000114: 
059128,000115: 14,3627           72161 43161                     2DEC     -.3611937602 B-1                        #  STAR 15       X
059129,000116: 14,3631           11144 32323                     2DEC     +.5748077840 B-1                        #  STAR 15       Y
059130,000117: 14,3633           64200 76476                     2DEC     -.7342581827 B-1                        #  STAR 15       Z
059131,000118: 
059132,000119: 14,3635           71323 70264                     2DEC     -.4116502629 B-1                        #  STAR 14       X
059133,000120: 14,3637           16403 05717                     2DEC     +.9066387314 B-1                        #  STAR 14       Y
059134,000121: 14,3641           01365 17662                     2DEC     +.0924676785 B-1                        #  STAR 14       Z
059135,000122: 

Page 1392

059137,000124: 14,3643           75055 75101                     2DEC     -.1818957154 B-1                        #  STAR 13       X
059138,000125: 14,3645           17030 32613                     2DEC     +.9405318128 B-1                        #  STAR 13       Y
059139,000126: 14,3647           73321 65667                     2DEC     -.2869039173 B-1                        #  STAR 13       Z
059140,000127: 
059141,000128: 14,3651           77010 66714                     2DEC     -.0614360769 B-1                        #  STAR 12       X
059142,000129: 14,3653           11515 05314                     2DEC     +.6031700106 B-1                        #  STAR 12       Y
059143,000130: 14,3655           63215 53630                     2DEC     -.7952430739 B-1                        #  STAR 12       Z
059144,000131: 
059145,000132: 14,3657           02145 21163                     2DEC     +.1373948084 B-1                        #  STAR 11       X
059146,000133: 14,3661           12715 21123                     2DEC     +.6813398852 B-1                        #  STAR 11       Y
059147,000134: 14,3663           13401 26125                     2DEC     +.7189566241 B-1                        #  STAR 11       Z
059148,000135: 
059149,000136: 14,3665           03161 14610                     2DEC     +.2013426456 B-1                        #  STAR 10       X
059150,000137: 14,3667           17401 36465                     2DEC     +.9689888101 B-1                        #  STAR 10       Y
059151,000138: 14,3671           75552 56556                     2DEC     -.1432544058 B-1                        #  STAR 10       Z
059152,000139: 
059153,000140: 14,3673           05473 01565                     2DEC     +.3509587451 B-1                        #  STAR 9        X
059154,000141: 14,3675           16217 31643                     2DEC     +.8925545449 B-1                        #  STAR 9        Y
059155,000142: 14,3677           04417 22211                     2DEC     +.2831507435 B-1                        #  STAR 9        Z
059156,000143: 
059157,000144: 14,3701           06444 33354                     2DEC     +.4107492871 B-1                        #  STAR 8        X
059158,000145: 14,3703           07765 20153                     2DEC     +.4987190610 B-1                        #  STAR 8        Y
059159,000146: 14,3705           14154 23613                     2DEC     +.7632590132 B-1                        #  STAR 8        Z
059160,000147: 
059161,000148: 14,3707           13202 05024                     2DEC     +.7033883645 B-1                        #  STAR 7        X
059162,000149: 14,3711           13243 07665                     2DEC     +.7074274193 B-1                        #  STAR 7        Y
059163,000150: 14,3713           01067 01242                     2DEC     +.0692188921 B-1                        #  STAR 7        Z
059164,000151: 
059165,000152: 14,3715           10561 05666                     2DEC     +.5450662811 B-1                        #  STAR 6        X
059166,000153: 14,3717           10401 00357                     2DEC     +.5313738486 B-1                        #  STAR 6        Y
059167,000154: 14,3721           65477 61124                     2DEC     -.6484940879 B-1                        #  STAR 6        Z
059168,000155: 
059169,000156: 14,3723           00154 03111                     2DEC     +.0131955837 B-1                        #  STAR 5        X

Page 1393

059171,000158: 14,3725           00077 35676                     2DEC     +.0078043793 B-1                        #  STAR 5        Y
059172,000159: 14,3727           17777 01142                     2DEC     +.9998824772 B-1                        #  STAR 5        Z
059173,000160: 
059174,000161: 14,3731           07674 11416                     2DEC     +.4917355618 B-1                        #  STAR 4        X
059175,000162: 14,3733           03415 12707                     2DEC     +.2203784481 B-1                        #  STAR 4        Y
059176,000163: 14,3735           62413 43135                     2DEC     -.8423950835 B-1                        #  STAR 4        Z
059177,000164: 
059178,000165: 14,3737           07511 03423                     2DEC     +.4776746280 B-1                        #  STAR 3        X
059179,000166: 14,3741           01672 12054                     2DEC     +.1164935557 B-1                        #  STAR 3        Y
059180,000167: 14,3743           15735 15405                     2DEC     +.8707790771 B-1                        #  STAR 3        Z
059181,000168: 
059182,000169: 14,3745           16745 21763                     2DEC     +.9342726691 B-1                        #  STAR 2        X
059183,000170: 14,3747           02613 24675                     2DEC     +.1732973829 B-1                        #  STAR 2        Y
059184,000171: 14,3751           73007 50430                     2DEC     -.3116128956 B-1                        #  STAR 2        Z
059185,000172: 
059186,000173: 14,3753           15777 12457                     2DEC     +.8749183324 B-1                        #  STAR 1        X
059187,000174: 14,3755           00324 03265                     2DEC     +.0258916990 B-1                        #  STAR 1        Y
059188,000175: 14,3757           07571 17020                     2DEC     +.4835778442 B-1                        #  STAR 1        Z
059189,000176: 
059190,000177: 14,3761           15325        CATLOG             DEC      6869       B-14                       
059191,000178: 
059192,000179: 
059193,000180: 

End of include-file STAR_TABLES.agc.  Parent file is MAIN.agc