Apollo Program Source Code

The source code and documentation for the Apollo and Gemini computing systems is now publicly available. It’s so fascinating to consider how badly the USSR wanted this back in the day.

I’m happy to see that the engineers had a sense of humor (scroll right for the comments):

034083,000236: 32,3233           05353                          TC       PHASCHNG                              #  PREVENT RECALLING R60
034084,000237: 32,3234           04024                          OCT      04024                                 
034085,000238: 
034086,000239: 32,3235           34746        P63SPOT3          CA       BIT6                                  #  IS THE LR ANTENNA IN POSITION 1 YET
034087,000240: 32,3236           00006                          EXTEND                                         
034088,000241: 32,3237           02033                          RAND     CHAN33                                
034089,000242: 32,3240           00006                          EXTEND                                         
034090,000243: 32,3241           13247                          BZF      P63SPOT4                              #  BRANCH IF ANTENNA ALREADY IN POSITION 1
034091,000244: 
034092,000245: 32,3242           33254                          CAF      CODE500                               #  ASTRONAUT:     PLEASE CRANK THE
034093,000246: 32,3243           04616                          TC       BANKCALL                              #                 SILLY THING AROUND
034094,000247: 32,3244           20623                          CADR     GOPERF1                               
034095,000248: 32,3245           16001                          TCF      GOTOP00H                              #  TERMINATE
034096,000249: 32,3246           13235                          TCF      P63SPOT3                              #  PROCEED        SEE IF HE'S LYING
034097,000250: 
034098,000251: 32,3247           04616        P63SPOT4          TC       BANKCALL                              #  ENTER          INITIALIZE LANDING RADAR
034099,000252: 32,3250           67721                          CADR     SETPOS1                               
034100,000253: 
034101,000254: 32,3251           04635                          TC       POSTJUMP                              #  OFF TO SEE THE WIZARD ...