Source Code
![]() |
YAYUL: ASSEMBLE REVISION 5 OF PROGRAM BOREALIS BY MSTEWART MAR. 27,2017This is a modern AGC system self-test program, though based on the Apollo-era AURORA 12 program, and was not written by the original AGC developers, but rather by Mike Stewart. All of the original AURORA 12 DAP code added by the DAP Group has been removed, and extensive new system test code has been added in its place. This allows more in-depth testing of CPU behavior, both in AGC software simulations and hardware simulations. |
022993,000002: ## Copyright: Public domain.
022994,000003: ## Filename: SUM_CHECK_END_OF_BANK_MARKERS.agc
022995,000004: ## Purpose: This program is designed to extensively test the Apollo Guidance Computer
022996,000005: ## (specifically the LM instantiation of it). It is built on top of a heavily
022997,000006: ## stripped-down Aurora 12, with all code ostensibly added by the DAP Group
022998,000007: ## removed. Instead Borealis expands upon the tests provided by Aurora,
022999,000008: ## including corrected tests from Retread 44 and tests from Ron Burkey's
023000,000009: ## Validation.
023001,000010: ## Assembler: yaYUL
023002,000011: ## Contact: Mike Stewart <mastewar1@gmail.com>.
023003,000012: ## Website: www.ibiblio.org/apollo/index.html
023004,000013: ## Mod history: 2016-12-20 MAS Created from Aurora 12 (with much DAP stuff removed).
023005,000014: ## 2016-12-21 MAS Updated for new end-of-bank locations for self-tests.
023006,000015: ## 2017-01-04 MAS Added minimal words to all unused banks, to get self-
023007,000016: ## test to at least verify that all are accessible.
023008,000017: ## 2017-01-15 MAS Updated for added tests. Bank 24 now occupied.
023009,000018:
023010,000019: 5626 SETLOC ENDRTRDF
023011,000020: 5626 05626 TC -0
023012,000021: 5627 05627 TC -0
023013,000022:
023014,000023: 7760 SETLOC ENDSLFS4
023015,000024: 7760 07760 TC -0
023016,000025: 7761 07761 TC -0
023017,000026:
023018,000027: 00,3657 SETLOC ENDINTS0
023019,000028: 00,3657 03657 TC -0
023020,000029: 00,3660 03660 TC -0
023021,000030:
023022,000031: 01,3402 SETLOC ENDSLFS2
023023,000032: 01,3402 03402 TC -0
023024,000033: 01,3403 03403 TC -0
023025,000034:
023026,000035: 04,3545 SETLOC ENDPINS1
023027,000036: 04,3545 03545 TC -0
023028,000037: 04,3546 03546 TC -0
023029,000038:
023030,000039: 05,3524 SETLOC ENDPINS2
023031,000040: 05,3524 03524 TC -0
023032,000041: 05,3525 03525 TC -0
023033,000042:
023034,000043: 06,2555 BANK 06
023035,000044: 06,2555 02555 TC -0
023036,000045: 06,2556 02556 TC -0
023037,000046:
023038,000047: 07,2502 BANK 07
023039,000048: 07,2502 02502 TC -0
023040,000049: 07,2503 02503 TC -0
023041,000050:
023042,000051: 10,3341 SETLOC ENDRTSTS
023043,000052: 10,3341 03341 TC -0
023044,000053: 10,3342 03342 TC -0
023045,000054:
023046,000055: 11,3241 SETLOC ENDEXTVS
023047,000056: 11,3241 03241 TC -0
023048,000057: 11,3242 03242 TC -0
023049,000058:
023050,000059: 12,3557 BANK 12
023051,000060: 12,3557 03557 TC -0
023052,000061: 12,3560 03560 TC -0
023053,000062:
023054,000063: 13,3434 SETLOC ENDAMODS
023055,000064: 13,3434 03434 TC -0
023056,000065: 13,3435 03435 TC -0
023057,000066:
023058,000067: 14,3726 SETLOC ENDIMUS1
023059,000068: 14,3726 03726 TC -0
023060,000069: 14,3727 03727 TC -0
023061,000070:
023062,000071: 15,3575 SETLOC ENDRTBSS
023063,000072: 15,3575 03575 TC -0
023064,000073: 15,3576 03576 TC -0
023065,000074:
023066,000075: 16,3362 SETLOC ENDIMUS3
023067,000076: 16,3362 03362 TC -0
023068,000077: 16,3363 03363 TC -0
023069,000078:
023070,000079: 17,3730 SETLOC ENDIMUS2
023071,000080: 17,3730 03730 TC -0
023072,000081: 17,3731 03731 TC -0
023073,000082:
023074,000083: 20,3771 SETLOC ENDSLFS1
023075,000084: 20,3771 03771 TC -0
023076,000085: 20,3772 03772 TC -0
023077,000086:
023078,000087: 21,3427 SETLOC ENDPREL1
023079,000088: 21,3427 03427 TC -0
023080,000089: 21,3430 03430 TC -0
023081,000090:
023082,000091: 22,3162 SETLOC ENDINST1
023083,000092: 22,3162 03162 TC -0
023084,000093: 22,3163 03163 TC -0
023085,000094:
023086,000095: 23,3303 SETLOC ENDINST2
023087,000096: 23,3303 03303 TC -0
023088,000097: 23,3304 03304 TC -0
023089,000098:
023090,000099: 24,2073 SETLOC ENDEXTST
023091,000100: 24,2073 02073 TC -0
023092,000101: 24,2074 02074 TC -0
023093,000102:
023094,000103: # The remaining banks are currently unused, but bank-end markers and banksums are put into
023095,000104: # them to allow self-check to verify operation of every bank
023096,000105: 25,2000 BANK 25
023097,000106: 25,2000 02000 TC -0
023098,000107: 25,2001 02001 TC -0
023099,000108:
023100,000109: 26,2000 BANK 26
023101,000110: 26,2000 02000 TC -0
023102,000111: 26,2001 02001 TC -0
023103,000112:
023104,000113: 27,2000 BANK 27
023105,000114: 27,2000 02000 TC -0
023106,000115: 27,2001 02001 TC -0
023107,000116:
023108,000117: 30,2000 BANK 30
023109,000118: 30,2000 02000 TC -0
023110,000119: 30,2001 02001 TC -0
023111,000120:
023112,000121: 31,2000 BANK 31
023113,000122: 31,2000 02000 TC -0
023114,000123: 31,2001 02001 TC -0
023115,000124:
023116,000125: 32,2000 BANK 32
023117,000126: 32,2000 02000 TC -0
023118,000127: 32,2001 02001 TC -0
023119,000128:
023120,000129: 33,2000 BANK 33
023121,000130: 33,2000 02000 TC -0
023122,000131: 33,2001 02001 TC -0
023123,000132:
023124,000133: 34,2000 BANK 34
023125,000134: 34,2000 02000 BANK34 TC -0
023126,000135: 34,2001 02001 TC -0
023127,000136:
023128,000137: 35,2000 BANK 35
023129,000138: 35,2000 02000 TC -0
023130,000139: 35,2001 02001 TC -0
023131,000140:
023132,000141: 36,2000 BANK 36
023133,000142: 36,2000 02000 TC -0
023134,000143: 36,2001 02001 TC -0
023135,000144:
023136,000145: 37,2000 BANK 37
023137,000146: 37,2000 02000 TC -0
023138,000147: 37,2001 02001 TC -0
023139,000148:
023140,000149: 40,2000 BANK 40
023141,000150: 40,2000 02000 TC -0
023142,000151: 40,2001 02001 TC -0
023143,000152:
023144,000153: 41,2000 BANK 41
023145,000154: 41,2000 02000 TC -0
023146,000155: 41,2001 02001 TC -0
023147,000156:
023148,000157: 42,2000 BANK 42
023149,000158: 42,2000 02000 TC -0
023150,000159: 42,2001 02001 TC -0
023151,000160:
023152,000161: 43,2000 BANK 43
023153,000162: 43,2000 02000 LASTBANK TC -0
023154,000163: 43,2001 02001 TC -0
End of include-file SUM_CHECK_END_OF_BANK_MARKERS.agc. Parent file is MAIN.agc