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.

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

Page 0642

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

Page 0643

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

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