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:
  • B1 — Revision 292
  • B2 — Revision 302
  • B3 — Revision 302
  • B4 — Revision 302
  • B5 — Revision 292
  • B6 — Revision 306
These dumps were then modified using memos, checklists, observed address changes, and the Sundance GSOPs to get the entire program to match Sundance revision 306 as closely as possible. Without more information, it is not possible to say how close it actually is; however, this code should be quite close. It is capable of flying the whole Apollo 9 mission using the original checklists and padload. Since only binary dumps (rather than listings) of Sundance 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. 

006960,000002:                                                                                                  ## Copyright:   Public domain.
006961,000003:                                                                                                  ## Filename:    STAGE_MONITOR.agc
006962,000004:                                                                                                  ## Purpose:     A section of an attempt to reconstruct Sundance revision 306
006963,000005:                                                                                                  ##              as closely as possible with available information. Sundance
006964,000006:                                                                                                  ##              306 is the source code for the Lunar Module's (LM) Apollo
006965,000007:                                                                                                  ##              Guidance Computer (AGC) for Apollo 9. This program was created
006966,000008:                                                                                                  ##              using the mixed-revision SundanceXXX as a starting point, and
006967,000009:                                                                                                  ##              pulling back features from Luminary 69 believed to have been
006968,000010:                                                                                                  ##              added based on memos, checklists, observed address changes,
006969,000011:                                                                                                  ##              or the Sundance GSOPs.
006970,000012:                                                                                                  ## Assembler:   yaYUL
006971,000013:                                                                                                  ## Contact:     Ron Burkey <info@sandroid.org>.
006972,000014:                                                                                                  ## Website:     www.ibiblio.org/apollo/index.html
006973,000015:                                                                                                  ## Mod history: 2020-07-24 MAS  Created from SundanceXXX.
006974,000016: 
006975,000017: 
006976,000018: 
006977,000019: 06,3260                                           BANK     06                                    
006978,000020: 06,2000                                           SETLOC   STGMONT                               
006979,000021: 06,2000                                           BANK                                           
006980,000022: 
006981,000023: 06,3260           35025        STAGEMON           CAF      BIT2                                  
006982,000024: 06,3261           00006                           EXTEND                                         
006983,000025: 06,3262           02030                           RAND     CHAN30                                
006984,000026: 06,3263           00006                           EXTEND                                         
006985,000027: 06,3264           15340                           BZF      RESUME                                
006986,000028: 
006987,000029: 06,3265           40075                           CS       FLAGWRD1                              
006988,000030: 06,3266           75013                           MASK     APSFLBIT                              
006989,000031: 06,3267           00006                           EXTEND                                         
006990,000032: 06,3270           15340                           BZF      RESUME                                
006991,000033: 06,3271           26075                           ADS      FLAGWRD1                              
006992,000034: 
006993,000035: 06,3272           37667                           CAF      PRIO27                                
006994,000036: 06,3273           05142                           TC       NOVAC                                 
006995,000037: 06,3274  E6,1532                                  EBANK=   AOSQ                                  
006996,000038: 06,3274           02312 40006                     2CADR    1/ACCJOB                              
006997,000039: 
006998,000040: 06,3276           15340                           TCF      RESUME                                

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