Source Code

These source code files have been transcribed or otherwise adapted from digitized images of a hardcopy from the private collection of Don Eyles. The digitization was performed by archive.org, and transcription was performed by a team of volunteers. Note that the page images presented online are of reduced quality, and that the original high-quality images are available at archive.org. Report any conversion errors or legibility problems in page images to info@sandroid.org. Notations on the program listing read, in part:

    473423A YUL SYSTEM FOR BLK2: REVISION 12 of PROGRAM AURORA BY DAP GROUP   NOV 10, 1966
Note that the date is the date of the printout, not the date of the program revision.

027708,000002:                                                                                                  ## Copyright:    Public domain.
027709,000003:                                                                                                  ## Filename:     SUM_CHECK_END_OF_BANK_MARKERS.agc
027710,000004:                                                                                                  ## Purpose:      Part of the source code for Aurora (revision 12).
027711,000005:                                                                                                  ## Assembler:    yaYUL
027712,000006:                                                                                                  ## Contact:      Ron Burkey <info@sandroid.org>.
027713,000007:                                                                                                  ## Website:      https://www.ibiblio.org/apollo.
027714,000008:                                                                                                  ## Pages:        0642-0643
027715,000009:                                                                                                  ## Mod history:  2016-09-20 JL   Created.
027716,000010:                                                                                                  ##               2016-10-09 OH   Transcribed.
027717,000011:                                                                                                  ##               2016-10-16 HG   Fix operand ENDT45 -> ENDT4S
027718,000012:                                                                                                  ##               2016-12-08 RSB  Proofed comments with octopus/ProoferComments
027719,000013:                                                                                                  ##                               but no errors found.
027720,000014: 
027721,000015:                                                                                                  ## This source code has been transcribed or otherwise adapted from
027722,000016:                                                                                                  ## digitized images of a hardcopy from the private collection of 
027723,000017:                                                                                                  ## Don Eyles.  The digitization was performed by archive.org.
027724,000018: 
027725,000019:                                                                                                  ## Notations on the hardcopy document read, in part:
027726,000020: 
027727,000021:                                                                                                  ##       473423A YUL SYSTEM FOR BLK2: REVISION 12 of PROGRAM AURORA BY DAP GROUP
027728,000022:                                                                                                  ##       NOV 10, 1966
027729,000023: 
027730,000024:                                                                                                  ##       [Note that this is the date the hardcopy was made, not the
027731,000025:                                                                                                  ##       date of the program revision or the assembly.]
027732,000026: 
027733,000027:                                                                                                  ## The scan images (with suitable reduction in storage size and consequent 
027734,000028:                                                                                                  ## reduction in image quality) are available online at 
027735,000029:                                                                                                  ##       https://www.ibiblio.org/apollo.  
027736,000030:                                                                                                  ## The original high-quality digital images are available at archive.org:
027737,000031:                                                                                                  ##       https://archive.org/details/aurora00dapg
027738,000032: 

Page 0642

027740,000034: 
027741,000035:    5512                                           SETLOC   ENDIMUF                               
027742,000036:    5512           05512                           TC       -0                                    
027743,000037:    5513           05513                           TC       -0                                    
027744,000038: 
027745,000039:    7701                                           SETLOC   ENDINTF                               
027746,000040:    7701           07701                           TC       -0                                    
027747,000041:    7702           07702                           TC       -0                                    
027748,000042: 
027749,000043: 00,3657                                           SETLOC   ENDINTS0                              
027750,000044: 00,3657           03657                           TC       -0                                    
027751,000045: 00,3660           03660                           TC       -0                                    
027752,000046: 
027753,000047: 01,3145                                           SETLOC   ENDSLFS2                              
027754,000048: 01,3145           03145                           TC       -0                                    
027755,000049: 01,3146           03146                           TC       -0                                    
027756,000050: 
027757,000051: 04,3540                                           SETLOC   ENDPINS1                              
027758,000052: 04,3540           03540                           TC       -0                                    
027759,000053: 04,3541           03541                           TC       -0                                    
027760,000054: 
027761,000055: 05,3524                                           SETLOC   ENDPINS2                              
027762,000056: 05,3524           03524                           TC       -0                                    
027763,000057: 05,3525           03525                           TC       -0                                    
027764,000058: 
027765,000059: 06,2555                                           BANK     06                                    
027766,000060: 06,2555           02555                           TC       -0                                    
027767,000061: 06,2556           02556                           TC       -0                                    
027768,000062: 
027769,000063: 07,2502                                           BANK     07                                    
027770,000064: 07,2502           02502                           TC       -0                                    
027771,000065: 07,2503           02503                           TC       -0                                    
027772,000066: 
027773,000067: 10,3341                                           SETLOC   ENDRTSTS                              
027774,000068: 10,3341           03341                           TC       -0                                    
027775,000069: 10,3342           03342                           TC       -0                                    
027776,000070: 
027777,000071: 11,3361                                           SETLOC   ENDCMS                                
027778,000072: 11,3361           03361                           TC       -0                                    
027779,000073: 11,3362           03362                           TC       -0                                    
027780,000074: 
027781,000075: 12,3767                                           SETLOC   ENDT4S                                
027782,000076: 12,3767           03767                           TC       -0                                    
027783,000077: 12,3770           03770                           TC       -0                                    
027784,000078: 
027785,000079: 13,3434                                           SETLOC   ENDAMODS                              
027786,000080: 13,3434           03434                           TC       -0                                    
027787,000081: 13,3435           03435                           TC       -0                                    
027788,000082: 
027789,000083: 14,3726                                           SETLOC   ENDIMUS1                              
027790,000084: 14,3726           03726                           TC       -0                                    

Page 0643

027792,000086: 14,3727           03727                           TC       -0                                    
027793,000087: 
027794,000088: 15,3575                                           SETLOC   ENDRTBSS                              
027795,000089: 15,3575           03575                           TC       -0                                    
027796,000090: 15,3576           03576                           TC       -0                                    
027797,000091: 
027798,000092: 16,3362                                           SETLOC   ENDIMUS3                              
027799,000093: 16,3362           03362                           TC       -0                                    
027800,000094: 16,3363           03363                           TC       -0                                    
027801,000095: 
027802,000096: 17,3730                                           SETLOC   ENDIMUS2                              
027803,000097: 17,3730           03730                           TC       -0                                    
027804,000098: 17,3731           03731                           TC       -0                                    
027805,000099: 
027806,000100: 20,3756                                           SETLOC   ENDSLFS1                              
027807,000101: 20,3756           03756                           TC       -0                                    
027808,000102: 20,3757           03757                           TC       -0                                    
027809,000103: 
027810,000104: 21,3427                                           SETLOC   ENDPREL1                              
027811,000105: 21,3427           03427                           TC       -0                                    
027812,000106: 21,3430           03430                           TC       -0                                    
027813,000107: 
027814,000108: 23,3411                                           SETLOC   ENDDAP23                              
027815,000109: 23,3411           03411                           TC       -0                                    
027816,000110: 23,3412           03412                           TC       -0                                    
027817,000111: 
027818,000112: 24,3723                                           SETLOC   ENDDAP24                              
027819,000113: 24,3723           03723                           TC       -0                                    
027820,000114: 24,3724           03724                           TC       -0                                    
027821,000115: 
027822,000116: 25,3663                                           SETLOC   ENDDAP25                              
027823,000117: 25,3663           03663                           TC       -0                                    
027824,000118: 25,3664           03664                           TC       -0                                    
027825,000119: 
027826,000120: 26,3521                                           SETLOC   ENDDAP26                              
027827,000121: 26,3521           03521                           TC       -0                                    
027828,000122: 26,3522           03522                           TC       -0                                    
027829,000123: 
027830,000124: 
027831,000125: 

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