Source Code

These source-code files are part of a reconstructed copy of Skylark 048, the Block II Command Module (CM) Apollo Guidance Computer (AGC) software for the Skylab-2, Skylab-3, Skylab-4, and Apollo-Soyuz Test Project missions.

They have been created via disassembly of binary dumps of the original core rope memory modules actually flown on Skylab-2, part numbers 2010802-541, 2010802-551, 2010802-561, 2010802-571, 2010802-581, and 2010802-591. Access to these modules was provided by the New Mexico Museum of Space History, who we are much indebted to.

The source code for the Apollo 15, 16, and 17 software, Artemis 072, was used as a starting point. Heavy use was made of TRW 4900.5-244, Programmed Guidance Equations for Skylark Command Module Earth Orbital Program, dated 14 February 1972. This document contains pseudocode of essentially all of Skylark, using original program labels which have been copied for this source reconstruction.

Since only binary dumps (rather than listings) of Skylark are available as source material, all comments and labels are approximate. They have been taken from the Programmed Guidance Equations or other AGC programs where possible, or, in some places, written from scratch to match what we believe would have been in the original listing.

025327,000002:                                                                                                  ## Copyright:   Public domain.
025328,000003:                                                                                                  ## Filename:    P31-P33.agc
025329,000004:                                                                                                  ## Purpose:     A section of Skylark revision 048.
025330,000005:                                                                                                  ##              It is part of the source code for the Apollo Guidance Computer (AGC)
025331,000006:                                                                                                  ##              for Skylab-2, Skylab-3, Skylab-4, and ASTP. No original listings of
025332,000007:                                                                                                  ##              this software are available; instead, this file was created via
025333,000008:                                                                                                  ##              disassembly of dumps of the core rope modules actually flown on
025334,000009:                                                                                                  ##              Skylab-2. Access to these modules was provided by the New Mexico
025335,000010:                                                                                                  ##              Museum of Space History.
025336,000011:                                                                                                  ## Assembler:   yaYUL
025337,000012:                                                                                                  ## Contact:     Ron Burkey <info@sandroid.org>.
025338,000013:                                                                                                  ## Website:     www.ibiblio.org/apollo/index.html
025339,000014:                                                                                                  ## Mod history: 2024-02-25 MAS  Created.
025340,000015: 
025341,000016: 
025342,000017:                                                                                                  ## This log section is entirely new in Skylark. Names have been taken from
025343,000018:                                                                                                  ## the Programmed Guidance Equations for Skylark wherever possible.
025344,000019: 
025345,000020: 32,2000                                           SETLOC   NCPROGS                               
025346,000021: 32,2000                                           BANK                                           
025347,000022: 32,2000  E4,1440                                  EBANK=   TCS                                   
025348,000023: 32,2000                                           COUNT*   $$/P3133                              
025349,000024: 
025350,000025: 32,2000           04564        P31                TC       P20FLGON                              
025351,000026: 32,2001           07722                           TC       DOWNFLAG                              
025352,000027: 32,2002           00012                           ADRES    NC12FLG                               
025353,000028: 
025354,000029: 32,2003           32010                           CAF      V06N95                                
025355,000030: 32,2004           05550                           TC       VNFLASH                               
025356,000031: 
025357,000032: 32,2005           32012                           CAF      V06N57                                
025358,000033: 32,2006           05550                           TC       VNFLASH                               
025359,000034: 
025360,000035: 32,2007           02026                           TC       GETTPI                                
025361,000036: 
025362,000037: 32,2010           01537        V06N95             VN       0695                                  
025363,000038: 32,2011           01434        V06N28             VN       0628                                  
025364,000039: 32,2012           01471        V06N57             VN       0657                                  
025365,000040: 
025366,000041: 32,2013           04564        P32                TC       P20FLGON                              
025367,000042: 32,2014           07710                           TC       UPFLAG                                
025368,000043: 32,2015           00012                           ADRES    NC12FLG                               
025369,000044: 
025370,000045: 32,2016           32011                           CAF      V06N28                                
025371,000046: 32,2017           05550                           TC       VNFLASH                               
025372,000047: 
025373,000048: 32,2020           32012                           CAF      V06N57                                
025374,000049: 32,2021           05553                           TC       VNFLASHR                              
025375,000050: 
025376,000051: 32,2022           02026                           TC       GETTPI                                
025377,000052: 
025378,000053: 32,2023           35001                           CAF      BIT1                                  
025379,000054: 32,2024           05531                           TC       BLANKET                               
025380,000055: 32,2025           05220                           TC       ENDOFJOB                              
025381,000056: 
025382,000057: 32,2026           34600        GETTPI             CAF      V06N37                                
025383,000058: 32,2027           05550                           TC       VNFLASH                               
025384,000059: 
025385,000060: 32,2030           06006                           TC       INTPRET                               
025386,000061: 32,2031           43145                           DLOAD    BOFF                                  
025387,000062: 32,2032           03766                                    NC1TIG                                
025388,000063: 32,2033           00352                                    NC12FLG                               
025389,000064: 32,2034           64037                                    +3                                    
025390,000065: 32,2035           77745                           DLOAD                                          
025391,000066: 32,2036           03770                                    NC2TIG                                
025392,000067: 32,2037           77614                           CLEAR                                          
025393,000068: 32,2040           01271                                    FINALFLG                              
025394,000069: 32,2041           03632                           STORE    TIMEC                                 
025395,000070: 32,2042           03413                           STORE    TIG                                   
025396,000071: 
025397,000072: 32,2043           54335                           SLOAD    SL                                    
025398,000073: 32,2044           02633                                    HALFREVS                              
025399,000074: 32,2045           20211                                    8D                                    
025400,000075: 32,2046           36234                           STCALL   NC                                    
025401,000076: 32,2047           73430                                    VN1645                                
025402,000077: 
025403,000078: 32,2050           40335        NC12ST             SLOAD    SETPD                                 
025404,000079: 32,2051           25346                                    25F/S                                 
025405,000080: 32,2052           00001                                    0                                     
025406,000081: 32,2053           17454                           STODL    PH1                                   
025407,000082: 32,2054           15204                                    HI6ZEROS                              
025408,000083: 32,2055           03554                           STORE    CF                                    
025409,000084: 32,2056           17653                           STODL    PH2                                   
025410,000085: 32,2057           25342                                    165F/S                                
025411,000086: 32,2060           03450                           STORE    DVH1                                  
025412,000087: 
025413,000088: 32,2061           41414                           BOFF     PUSH                                  
025414,000089: 32,2062           00352                                    NC12FLG                               
025415,000090: 32,2063           64071                                    +6                                    
025416,000091: 
025417,000092: 32,2064           77735                           SLOAD                                          
025418,000093: 32,2065           02053                                    NH1                                   
025419,000094: 32,2066           16234                           STODL    NC                                    
025420,000095: 32,2067           77650                           GOTO                                           
025421,000096: 32,2070           64073                                    +3                                    
025422,000097: 
025423,000098: 32,2071           77745                           DLOAD                                          
025424,000099: 32,2072           25344                                    225F/S                                
025425,000100: 
025426,000101: 32,2073           17552                           STODL    DVC                                   
025427,000102: 32,2074           25346                                    25F/S                                 
025428,000103: 32,2075           17452                           STODL    DVH2                                  
025429,000104: 32,2076           15202                                    DPHALF                                
025430,000105: 32,2077           17546                           STODL    PI                                    
025431,000106: 32,2100           03632                                    TIMEC                                 
025432,000107: 32,2101           03645                           STORE    TN                                    
025433,000108: 32,2102           34041                           STCALL   TDEC1                                 
025434,000109: 32,2103           11400                                    CSMPREC                               
025435,000110: 
025436,000111: 32,2104           77214                           CLEAR    VLOAD                                 
025437,000112: 32,2105           01262                                    ITERFLG                               
025438,000113: 32,2106           00001                                    RATT                                  
025439,000114: 32,2107           03610                           STORE    RTIG                                  
025440,000115: 32,2110           26453                           STOVL    RAC                                   
025441,000116: 32,2111           00007                                    VATT                                  
025442,000117: 32,2112           03616                           STORE    VTIG                                  
025443,000118: 32,2113           17516                           STODL    VAC                                   
025444,000119: 32,2114           03632                                    TIMEC                                 
025445,000120: 32,2115           34041                           STCALL   TDEC1                                 
025446,000121: 32,2116           11435                                    LEMCONIC                              
025447,000122: 
025448,000123: 32,2117           77775                           VLOAD                                          
025449,000124: 32,2120           00007                                    VATT                                  
025450,000125: 32,2121           26545                           STOVL    VPC                                   
025451,000126: 32,2122           00001                                    RATT                                  
025452,000127: 32,2123           02533                           STORE    RPC                                   
025453,000128: 
025454,000129: 32,2124           53435        PHSMCH             VXV      UNIT                                  
025455,000130: 32,2125           02545                                    VPC                                   
025456,000131: 32,2126           77606                           PUSH                                           
025457,000132: 32,2127           26611                           STOVL    AM1                                   
025458,000133: 32,2130           02453                                    RAC                                   
025459,000134: 32,2131           47206                           PUSH     VXV                                   
025460,000135: 32,2132           03516                                    VAC                                   
025461,000136: 32,2133           47256                           UNIT     VXV                                   
025462,000137: 32,2134           53435                           VXV      UNIT                                  
025463,000138: 32,2135           77606                           PUSH                                           
025464,000139: 32,2136           26360                           STOVL    URPD                                  
025465,000140: 32,2137           02533                                    RPC                                   
025466,000141: 32,2140           50256                           UNIT     DOT                                   
025467,000142: 32,2141           65552                           SL1      ACOS                                  
025468,000143: 32,2142           63221                           BDSU     PDVL                                  
025469,000144: 32,2143           03546                                    PI                                    
025470,000145: 32,2144           02360                                    URPD                                  
025471,000146: 32,2145           50235                           VXV      DOT                                   
025472,000147: 32,2146           02533                                    RPC                                   
025473,000148: 32,2147           02611                                    AM1                                   
025474,000149: 32,2150           75325                           PDDL     SIGN                                  
025475,000150: 32,2151           40221                           BDSU     SETPD                                 
025476,000151: 32,2152           03546                                    PI                                    
025477,000152: 32,2153           00003                                    2                                     
025478,000153: 32,2154           17647                           STODL    TH2                                   
025479,000154: 
025480,000155: 32,2155           71240                           BMN      DLOAD                                 
025481,000156: 32,2156           64210                                    NC12B                                 
025482,000157: 32,2157           02234                                    NC                                    
025483,000158: 32,2160           50025                           DSU      BMN                                   
025484,000159: 32,2161           25354                                    18B5                                  
025485,000160: 32,2162           64210                                    NC12B                                 
025486,000161: 32,2163           53145                           DLOAD    BZE                                   
025487,000162: 32,2164           03546                                    PI                                    
025488,000163: 32,2165           64210                                    NC12B                                 
025489,000164: 32,2166           63375                           VLOAD    PDVL                                  
025490,000165: 32,2167           02533                                    RPC                                   
025491,000166: 32,2170           02545                                    VPC                                   
025492,000167: 32,2171           65325                           PDDL     PDDL                                  
025493,000168: 32,2172           03632                                    TIMEC                                 
025494,000169: 32,2173           25330                                    1B5                                   
025495,000170: 32,2174           45006                           PUSH     CALL                                  
025496,000171: 32,2175           65105                                    REVUP                                 
025497,000172: 32,2176           45345                           DLOAD    DSU                                   
025498,000173: 32,2177           03564                                    RATEMP                                
025499,000174: 32,2200           03632                                    TIMEC                                 
025500,000175: 32,2201           77621                           BDSU                                           
025501,000176: 32,2202           03645                                    TN                                    
025502,000177: 32,2203           17645                           STODL    TN                                    
025503,000178: 32,2204           03647                                    TH2                                   
025504,000179: 32,2205           41446                           ABS      PUSH                                  
025505,000180: 32,2206           77650                           GOTO                                           
025506,000181: 32,2207           64224                                    NC12J                                 
025507,000182: 
025508,000183: 32,2210           51545        NC12B              DLOAD    ABS                                   
025509,000184: 32,2211           03647                                    TH2                                   
025510,000185: 32,2212           41406                           PUSH     PUSH                                  
025511,000186: 32,2213           50025                           DSU      BMN                                   
025512,000187: 32,2214           02043                                    EPS1                                  
025513,000188: 32,2215           64301                                    NC12F                                 
025514,000189: 32,2216           53145                           DLOAD    BZE                                   
025515,000190: 32,2217           03454                                    PH1                                   
025516,000191: 32,2220           65021                                    PSMALRM                               
025517,000192: 32,2221           77625                           DSU                                            
025518,000193: 32,2222           16336                                    DPB-14                                
025519,000194: 32,2223           17454                           STODL    PH1                                   
025520,000195: 
025521,000196: 32,2224           43146        NC12J              COS      SET                                   
025522,000197: 32,2225           03466                                    RVSW                                  
025523,000198: 32,2226           16726                           STODL    CSTH                                  
025524,000199: 32,2227           77756                           SIN                                            
025525,000200: 32,2230           26724                           STOVL    SNTH                                  
025526,000201: 32,2231           02533                                    RPC                                   
025527,000202: 32,2232           26651                           STOVL    RVEC                                  
025528,000203: 32,2233           02545                                    VPC                                   
025529,000204: 32,2234           77765                           SIGN                                           
025530,000205: 32,2235           03647                                    TH2                                   
025531,000206: 32,2236           36740                           STCALL   VVEC                                  
025532,000207: 32,2237           25004                                    TIMETHET                              
025533,000208: 
025534,000209: 32,2240           53145                           DLOAD    BZE                                   
025535,000210: 32,2241           03546                                    PI                                    
025536,000211: 32,2242           64254                                    NC12C                                 
025537,000212: 
025538,000213: 32,2243           77745                           DLOAD                                          
025539,000214: 32,2244           15204                                    HI6ZEROS                              
025540,000215: 32,2245           27546                           STOVL    PI                                    
025541,000216: 32,2246           01704                                    R-OTHER                               
025542,000217: 32,2247           26533                           STOVL    RPC                                   
025543,000218: 32,2250           01712                                    V-OTHER                               
025544,000219: 32,2251           16545                           STODL    VPC                                   
025545,000220: 32,2252           01643                                    T-OTHER                               
025546,000221: 32,2253           03456                           STORE    TPC                                   
025547,000222: 
025548,000223: 32,2254           40214        NC12C              CLEAR    SETPD                                 
025549,000224: 32,2255           00275                                    NCINTFLG                              
025550,000225: 32,2256           00001                                    0                                     
025551,000226: 
025552,000227: 32,2257           63375                           VLOAD    PDVL                                  
025553,000228: 32,2260           02533                                    RPC                                   
025554,000229: 32,2261           02545                                    VPC                                   
025555,000230: 32,2262           65325                           PDDL     PDDL                                  
025556,000231: 32,2263           03456                                    TPC                                   
025557,000232: 32,2264           00037                                    30D                                   
025558,000233: 32,2265           44365                           SIGN     BDSU                                  
025559,000234: 32,2266           03647                                    TH2                                   
025560,000235: 32,2267           03645                                    TN                                    
025561,000236: 32,2270           03645                           STORE    TN                                    
025562,000237: 32,2271           03456                           STORE    TPC                                   
025563,000238: 32,2272           34041                           STCALL   TDEC1                                 
025564,000239: 32,2273           65062                                    NCINT                                 
025565,000240: 
025566,000241: 32,2274           45575                           VLOAD    STADR                                 
025567,000242: 32,2275           51232                           STOVL    VPC                                   
025568,000243: 32,2276           77626                           STADR                                          
025569,000244: 32,2277           41244                           STCALL   RPC                                   
025570,000245: 32,2300           64124                                    PHSMCH                                
025571,000246: 
025572,000247: 32,2301           40345        NC12F              DLOAD    SETPD                                 
025573,000248: 32,2302           15204                                    HI6ZEROS                              
025574,000249: 32,2303           00001                                    0                                     
025575,000250: 32,2304           27454                           STOVL    PH1                                   
025576,000251: 32,2305           02453                                    RAC                                   
025577,000252: 32,2306           77624                           CALL                                           
025578,000253: 32,2307           65173                                    VECPROJ                               
025579,000254: 32,2310           26453                           STOVL    RAC                                   
025580,000255: 32,2311           03516                                    VAC                                   
025581,000256: 32,2312           77624                           CALL                                           
025582,000257: 32,2313           65173                                    VECPROJ                               
025583,000258: 32,2314           27516                           STOVL    VAC                                   
025584,000259: 32,2315           02533                                    RPC                                   
025585,000260: 32,2316           65315                           PDVL     PDDL                                  
025586,000261: 32,2317           02545                                    VPC                                   
025587,000262: 32,2320           03456                                    TPC                                   
025588,000263: 32,2321           43125                           PDDL     SET                                   
025589,000264: 32,2322           03643                                    TTPI                                  
025590,000265: 32,2323           00075                                    NCINTFLG                              
025591,000266: 32,2324           34041                           STCALL   TDEC1                                 
025592,000267: 32,2325           65062                                    NCINT                                 
025593,000268: 
025594,000269: 32,2326           77214                           SET      VLOAD                                 
025595,000270: 32,2327           00075                                    NCINTFLG                              
025596,000271: 
025597,000272: 32,2330           77626                           STADR                                          
025598,000273: 32,2331           51417                           STOVL    VPTPI                                 
025599,000274: 32,2332           77626                           STADR                                          
025600,000275: 32,2333           61332                           STODL    RPTPI                                 
025601,000276: 32,2334           02051                                    DELH1                                 
025602,000277: 32,2335           36236                           STCALL   DELH                                  
025603,000278: 32,2336           65605                                    QRDTPI                                
025604,000279: 32,2337           77775                           VLOAD                                          
025605,000280: 32,2340           53575                           VLOAD    UNIT                                  
025606,000281: 32,2341           00001                                    0                                     
025607,000282: 32,2342           76561                           VXSC     VSL1                                  
025608,000283: 32,2343           02051                                    DELH1                                 
025609,000284: 32,2344           45445                           BVSU     STADR                                 
025610,000285: 32,2345           74237                           STORE    RAFD                                  
025611,000286: 
025612,000287: 32,2346           41575        NC1LOOP            VLOAD    PUSH                                  
025613,000288: 32,2347           02453                                    RAC                                   
025614,000289: 32,2350           47315                           PDVL     VXV                                   
025615,000290: 32,2351           02611                                    AM1                                   
025616,000291: 32,2352           74256                           UNIT     VXSC                                  
025617,000292: 32,2353           03552                                    DVC                                   
025618,000293: 32,2354           53372                           VSL1     VAD                                   
025619,000294: 32,2355           03516                                    VAC                                   
025620,000295: 32,2356           65325                           PDDL     PDDL                                  
025621,000296: 32,2357           03632                                    TIMEC                                 
025622,000297: 32,2360           02234                                    NC                                    
025623,000298: 32,2361           45006                           PUSH     CALL                                  
025624,000299: 32,2362           65105                                    REVUP                                 
025625,000300: 
025626,000301: 32,2363           43175                           VLOAD    BON                                   
025627,000302: 32,2364           00001                                    RATT                                  
025628,000303: 32,2365           00312                                    NC12FLG                               
025629,000304: 32,2366           64433                                    NC2A                                  
025630,000305: 32,2367           26445                           STOVL    RAH1                                  
025631,000306: 32,2370           00007                                    VATT                                  
025632,000307: 32,2371           16360                           STODL    VAH1                                  
025633,000308: 32,2372           03564                                    RATEMP                                
025634,000309: 32,2373           17645                           STODL    TH1                                   
025635,000310: 32,2374           03554                                    CF                                    
025636,000311: 32,2375           71254                           BZE      DLOAD                                 
025637,000312: 32,2376           64400                                    +2                                    
025638,000313: 32,2377           25326                                    0.5B5                                 
025639,000314: 32,2400           03546                           STORE    CI                                    
025640,000315: 
025641,000316: 32,2401           41575        NC2LOOP            VLOAD    PUSH                                  
025642,000317: 32,2402           02445                                    RAH1                                  
025643,000318: 32,2403           47315                           PDVL     VXV                                   
025644,000319: 32,2404           02611                                    AM1                                   
025645,000320: 32,2405           74256                           UNIT     VXSC                                  
025646,000321: 32,2406           03450                                    DVH1                                  
025647,000322: 32,2407           53372                           VSL1     VAD                                   
025648,000323: 32,2410           02360                                    VAH1                                  
025649,000324: 32,2411           41525                           PDDL     PUSH                                  
025650,000325: 32,2412           03645                                    TH1                                   
025651,000326: 32,2413           41535                           SLOAD    PUSH                                  
025652,000327: 32,2414           02053                                    NH1                                   
025653,000328: 32,2415           77624                           CALL                                           
025654,000329: 32,2416           65105                                    REVUP                                 
025655,000330: 
025656,000331: 32,2417           77775                           VLOAD                                          
025657,000332: 32,2420           00007                                    VATT                                  
025658,000333: 32,2421           17600                           STODL    VAH2                                  
025659,000334: 32,2422           03564                                    RATEMP                                
025660,000335: 32,2423           27647                           STOVL    TH2                                   
025661,000336: 32,2424           00001                                    RATT                                  
025662,000337: 32,2425           43006                           PUSH     CLEAR                                 
025663,000338: 32,2426           00666                                    NCLPFLG                               
025664,000339: 32,2427           17566                           STODL    RAH2                                  
025665,000340: 32,2430           02045                                    DHNCC                                 
025666,000341: 32,2431           37562                           STCALL   DELHTMP                               
025667,000342: 32,2432           64577                                    EHCOMP                                
025668,000343: 
025669,000344: 32,2433           27566        NC2A               STOVL    RAH2                                  
025670,000345: 32,2434           00007                                    VATT                                  
025671,000346: 32,2435           17600                           STODL    VAH2                                  
025672,000347: 32,2436           03564                                    RATEMP                                
025673,000348: 32,2437           03647                           STORE    TH2                                   
025674,000349: 
025675,000350: 32,2440           53145        NC12D              DLOAD    BZE                                   
025676,000351: 32,2441           03554                                    CF                                    
025677,000352: 32,2442           64445                                    +3                                    
025678,000353: 32,2443           77745                           DLOAD                                          
025679,000354: 32,2444           25326                                    0.5B5                                 
025680,000355: 32,2445           03546                           STORE    CI                                    
025681,000356: 
025682,000357: 32,2446           41575        NCCLOOP            VLOAD    PUSH                                  
025683,000358: 32,2447           03566                                    RAH2                                  
025684,000359: 32,2450           47315                           PDVL     VXV                                   
025685,000360: 32,2451           02611                                    AM1                                   
025686,000361: 32,2452           74256                           UNIT     VXSC                                  
025687,000362: 32,2453           03452                                    DVH2                                  
025688,000363: 32,2454           53372                           VSL1     VAD                                   
025689,000364: 32,2455           03600                                    VAH2                                  
025690,000365: 32,2456           41525                           PDDL     PUSH                                  
025691,000366: 32,2457           03647                                    TH2                                   
025692,000367: 32,2460           43015                           DAD      SET                                   
025693,000368: 32,2461           02041                                    TCS                                   
025694,000369: 32,2462           00075                                    NCINTFLG                              
025695,000370: 32,2463           03651                           STORE    TAS                                   
025696,000371: 32,2464           34041                           STCALL   TDEC1                                 
025697,000372: 32,2465           65062                                    NCINT                                 
025698,000373: 
025699,000374: 32,2466           45575                           VLOAD    STADR                                 
025700,000375: 32,2467           50253                           STOVL    VAS                                   
025701,000376: 32,2470           00001                                    RATT                                  
025702,000377: 32,2471           36366                           STCALL   RAS                                   
025703,000378: 32,2472           65142                                    RADUP                                 
025704,000379: 
025705,000380: 32,2473           51406                           PUSH     ABS                                   
025706,000381: 32,2474           51515                           PDVL     ABS                                   
025707,000382: 32,2475           02366                                    RAS                                   
025708,000383: 32,2476           45421                           BDSU     STADR                                 
025709,000384: 32,2477           51541                           STOVL    DELH                                  
025710,000385: 32,2500           77624                           CALL                                           
025711,000386: 32,2501           62355                                    COE                                   
025712,000387: 
025713,000388: 32,2502           43175                           VLOAD    SET                                   
025714,000389: 32,2503           02366                                    RAS                                   
025715,000390: 32,2504           00075                                    NCINTFLG                              
025716,000391: 32,2505           45515                           PDVL     STADR                                 
025717,000392: 32,2506           74245                           STORE    VASF                                  
025718,000393: 32,2507           65325                           PDDL     PDDL                                  
025719,000394: 32,2510           03651                                    TAS                                   
025720,000395: 32,2511           03643                                    TTPI                                  
025721,000396: 32,2512           34041                           STCALL   TDEC1                                 
025722,000397: 32,2513           65062                                    NCINT                                 
025723,000398: 
025724,000399: 32,2514           40375                           VLOAD    SETPD                                 
025725,000400: 32,2515           00001                                    RATT                                  
025726,000401: 32,2516           00001                                    0                                     
025727,000402: 32,2517           03624                           STORE    RAF                                   
025728,000403: 
025729,000404: 32,2520           43125                           PDDL     SET                                   
025730,000405: 32,2521           02051                                    DELH1                                 
025731,000406: 32,2522           00466                                    NCLPFLG                               
025732,000407: 32,2523           37562                           STCALL   DELHTMP                               
025733,000408: 32,2524           64577                                    EHCOMP                                
025734,000409: 
025735,000410: 32,2525           53575        NC12G              VLOAD    UNIT                                  
025736,000411: 32,2526           03540                                    RAFD                                  
025737,000412: 32,2527           53515                           PDVL     UNIT                                  
025738,000413: 32,2530           03624                                    RAF                                   
025739,000414: 32,2531           72441                           DOT      SL1                                   
025740,000415: 32,2532           63326                           ACOS     PDVL                                  
025741,000416: 32,2533           03624                                    RAF                                   
025742,000417: 32,2534           50235                           VXV      DOT                                   
025743,000418: 32,2535           03540                                    RAFD                                  
025744,000419: 32,2536           02611                                    AM1                                   
025745,000420: 32,2537           75325                           PDDL     SIGN                                  
025746,000421: 32,2540           77626                           STADR                                          
025747,000422: 32,2541           77774                           STORE    2                                     
025748,000423: 
025749,000424: 32,2542           65246                           ABS      PDDL                                  
025750,000425: 32,2543           02043                                    EPS1                                  
025751,000426: 32,2544           44312                           SL2      BDSU                                  
025752,000427: 32,2545           40240                           BMN      SETPD                                 
025753,000428: 32,2546           64700                                    NC12OUT                               
025754,000429: 32,2547           00005                                    4                                     
025755,000430: 
025756,000431: 32,2550           65345                           DLOAD    PDDL                                  
025757,000432: 32,2551           03552                                    DVC                                   
025758,000433: 32,2552           41525                           PDDL     PUSH                                  
025759,000434: 32,2553           03554                                    CF                                    
025760,000435: 32,2554           77745                           DLOAD                                          
025761,000436: 32,2555           03556                                    EOP                                   
025762,000437: 32,2556           16543                           STODL    EO                                    
025763,000438: 32,2557           03560                                    DVOC                                  
025764,000439: 32,2560           36541                           STCALL   DVO                                   
025765,000440: 32,2561           65203                                    ITER                                  
025766,000441: 
025767,000442: 32,2562           77614                           BON                                            
025768,000443: 32,2563           01302                                    ITERFLG                               
025769,000444: 32,2564           65055                                    OLPALRM                               
025770,000445: 
025771,000446: 32,2565           45545                           DLOAD    STADR                                 
025772,000447: 32,2566           60223                           STODL    CF                                    
025773,000448: 32,2567           77626                           STADR                                          
025774,000449: 32,2570           60225                           STODL    DVC                                   
025775,000450: 32,2571           77745                           DLOAD                                          
025776,000451: 32,2572           02541                                    DVO                                   
025777,000452: 32,2573           17560                           STODL    DVOC                                  
025778,000453: 32,2574           02543                                    EO                                    
025779,000454: 32,2575           37556                           STCALL   EOP                                   
025780,000455: 32,2576           64346                                    NC1LOOP                               
025781,000456: 
025782,000457: 32,2577           51575        EHCOMP             VLOAD    ABS                                   
025783,000458: 32,2600           00001                                    0                                     
025784,000459: 32,2601           37564                           STCALL   RATEMP                                
025785,000460: 32,2602           65142                                    RADUP                                 
025786,000461: 32,2603           45246                           ABS      DSU                                   
025787,000462: 32,2604           03564                                    RATEMP                                
025788,000463: 32,2605           41425                           DSU      PUSH                                  
025789,000464: 32,2606           03562                                    DELHTMP                               
025790,000465: 32,2607           14003                           STODL    2                                     
025791,000466: 32,2610           03454                                    PH1                                   
025792,000467: 32,2611           71214                           BOFF     DLOAD                                 
025793,000468: 32,2612           00746                                    NCLPFLG                               
025794,000469: 32,2613           64615                                    +2                                    
025795,000470: 32,2614           03653                                    PH2                                   
025796,000471: 32,2615           00001                           STORE    0                                     
025797,000472: 
025798,000473: 32,2616           71254                           BZE      DLOAD                                 
025799,000474: 32,2617           64624                                    ITERUP                                
025800,000475: 32,2620           45246                           ABS      DSU                                   
025801,000476: 32,2621           02047                                    EPS2                                  
025802,000477: 32,2622           77640                           BMN                                            
025803,000478: 32,2623           64672                                    LOOPX                                 
025804,000479: 
025805,000480: 32,2624           71201        ITERUP             SETPD    DLOAD                                 
025806,000481: 32,2625           00005                                    4                                     
025807,000482: 32,2626           03450                                    DVH1                                  
025808,000483: 32,2627           71214                           BOFF     DLOAD                                 
025809,000484: 32,2630           00746                                    NCLPFLG                               
025810,000485: 32,2631           64633                                    +2                                    
025811,000486: 32,2632           03452                                    DVH2                                  
025812,000487: 32,2633           77725                           PDDL                                           
025813,000488: 32,2634           41525                           PDDL     PUSH                                  
025814,000489: 32,2635           03546                                    CI                                    
025815,000490: 32,2636           43150                           LXA,1    BOFF                                  
025816,000491: 32,2637           03605                                    PSHFT1                                
025817,000492: 32,2640           00746                                    NCLPFLG                               
025818,000493: 32,2641           64644                                    +3                                    
025819,000494: 32,2642           77750                           LXA,1                                          
025820,000495: 32,2643           03606                                    PSHFT2                                
025821,000496: 32,2644           77624                           CALL                                           
025822,000497: 32,2645           65203                                    ITER                                  
025823,000498: 
025824,000499: 32,2646           77614                           BON                                            
025825,000500: 32,2647           01302                                    ITERFLG                               
025826,000501: 32,2650           65047                                    ILPALRM                               
025827,000502: 
025828,000503: 32,2651           45545                           DLOAD    STADR                                 
025829,000504: 32,2652           74231                           STORE    CI                                    
025830,000505: 
025831,000506: 32,2653           71214                           BOFF     DLOAD                                 
025832,000507: 32,2654           00746                                    NCLPFLG                               
025833,000508: 32,2655           64664                                    NC2ITR                                
025834,000509: 32,2656           77730                           SXA,1                                          
025835,000510: 32,2657           03606                                    PSHFT2                                
025836,000511: 32,2660           17452                           STODL    DVH2                                  
025837,000512: 32,2661           77626                           STADR                                          
025838,000513: 32,2662           40124                           STCALL   PH2                                   
025839,000514: 32,2663           64446                                    NCCLOOP                               
025840,000515: 
025841,000516: 32,2664           45545        NC2ITR             DLOAD    STADR                                 
025842,000517: 32,2665           60327                           STODL    DVH1                                  
025843,000518: 32,2666           77730                           SXA,1                                          
025844,000519: 32,2667           03605                                    PSHFT1                                
025845,000520: 32,2670           37454                           STCALL   PH1                                   
025846,000521: 32,2671           64401                                    NC2LOOP                               
025847,000522: 
025848,000523: 32,2672           43001        LOOPX              SETPD    BOFF                                  
025849,000524: 32,2673           00001                                    0                                     
025850,000525: 32,2674           00746                                    NCLPFLG                               
025851,000526: 32,2675           64440                                    NC12D                                 
025852,000527: 32,2676           77650                           GOTO                                           
025853,000528: 32,2677           64525                                    NC12G                                 
025854,000529: 
025855,000530: 32,2700           65375        NC12OUT            VLOAD    PDDL                                  
025856,000531: 32,2701           15204                                    ZEROVECS                              
025857,000532: 32,2702           03552                                    DVC                                   
025858,000533: 32,2703           77666                           VDEF                                           
025859,000534: 32,2704           27405                           STOVL    DELVLVC                               
025860,000535: 32,2705           02611                                    AM1                                   
025861,000536: 32,2706           40276                           VCOMP    SETPD                                 
025862,000537: 32,2707           00007                                    6                                     
025863,000538: 32,2710           53515                           PDVL     UNIT                                  
025864,000539: 32,2711           02366                                    RAS                                   
025865,000540: 32,2712           41476                           VCOMP    PUSH                                  
025866,000541: 32,2713           76435                           VXV      VSL1                                  
025867,000542: 32,2714           02611                                    AM1                                   
025868,000543: 32,2715           24001                           STOVL    0                                     
025869,000544: 32,2716           03532                                    VASF                                  
025870,000545: 32,2717           64251                           VSU      MXV                                   
025871,000546: 32,2720           03524                                    VAS                                   
025872,000547: 32,2721           00001                                    0                                     
025873,000548: 32,2722           77772                           VSL1                                           
025874,000549: 32,2723           16617                           STODL    VGNSR                                 
025875,000550: 32,2724           03651                                    TAS                                   
025876,000551: 32,2725           16461                           STODL    TNSR                                  
025877,000552: 32,2726           03647                                    TH2                                   
025878,000553: 32,2727           16463                           STODL    TNCC                                  
025879,000554: 32,2730           03452                                    DVH2                                  
025880,000555: 32,2731           40214                           BON      SETPD                                 
025881,000556: 32,2732           00312                                    NC12FLG                               
025882,000557: 32,2733           64752                                    NC2N80                                
025883,000558: 32,2734           00001                                    0                                     
025884,000559: 32,2735           17576                           STODL    DVDSP2                                
025885,000560: 32,2736           03450                                    DVH1                                  
025886,000561: 32,2737           17574                           STODL    DVDSP1                                
025887,000562: 32,2740           03645                                    TH1                                   
025888,000563: 32,2741           27770                           STOVL    NC2TIG                                
025889,000564: 32,2742           02445                                    RAH1                                  
025890,000565: 32,2743           45006                           PUSH     CALL                                  
025891,000566: 32,2744           65142                                    RADUP                                 
025892,000567: 
025893,000568: 32,2745           63246                           ABS      PDVL                                  
025894,000569: 32,2746           02445                                    RAH1                                  
025895,000570: 32,2747           44246                           ABS      BDSU                                  
025896,000571: 32,2750           77650                           GOTO                                           
025897,000572: 32,2751           64757                                    NC12DH                                
025898,000573: 
025899,000574: 32,2752           27574        NC2N80             STOVL    DVDSP1                                
025900,000575: 32,2753           02617                                    VGNSR                                 
025901,000576: 32,2754           77646                           ABS                                            
025902,000577: 32,2755           17576                           STODL    DVDSP2                                
025903,000578: 32,2756           02045                                    DHNCC                                 
025904,000579: 
025905,000580: 32,2757           03550        NC12DH             STORE    DHDSP                                 
025906,000581: 
025907,000582: 32,2760           43014                           BON      SET                                   
025908,000583: 32,2761           01311                                    FINALFLG                              
025909,000584: 32,2762           64764                                    +2                                    
025910,000585: 32,2763           00470                                    UPDATFLG                              
025911,000586: 32,2764           77776                           EXIT                                           
025912,000587: 
025913,000588: 32,2765           33020                           CAF      V06N84                                
025914,000589: 32,2766           04647                           TC       BANKCALL                              
025915,000590: 32,2767           20623                           CADR     GOFLASH                               
025916,000591: 32,2770           04103                           TC       GOTOPOOH                              
025917,000592: 32,2771           12773                           TCF      +2                                    
025918,000593: 32,2772           12765                           TCF      -5                                    
025919,000594: 
025920,000595: 32,2773           06006                           TC       INTPRET                               
025921,000596: 32,2774           71214                           BOFF     DLOAD                                 
025922,000597: 32,2775           00352                                    NC12FLG                               
025923,000598: 32,2776           65001                                    NC12H      -1                         
025924,000599: 32,2777           03550                                    DHDSP                                 
025925,000600: 32,3000           02045                           STORE    DHNCC                                 
025926,000601: 32,3001           77776                           EXIT                                           
025927,000602: 
025928,000603: 32,3002           34603        NC12H              CAF      V06N81                                
025929,000604: 32,3003           05550                           TC       VNFLASH                               
025930,000605: 
025931,000606: 32,3004           06006                           TC       INTPRET                               
025932,000607: 32,3005           77624                           CALL                                           
025933,000608: 32,3006           32050                                    S32/33.X                              
025934,000609: 32,3007           61375                           VLOAD    VXM                                   
025935,000610: 32,3010           03405                                    DELVLVC                               
025936,000611: 32,3011           00001                                    0                                     
025937,000612: 32,3012           76414                           SET      VSL1                                  
025938,000613: 32,3013           01067                                    XDELVFLG                              
025939,000614: 32,3014           37624                           STCALL   DELVSIN                               
025940,000615: 32,3015           73430                                    VN1645                                
025941,000616: 32,3016           77650                           GOTO                                           
025942,000617: 32,3017           64050                                    NC12ST                                
025943,000618: 
025944,000619: 32,3020           01524        V06N84             VN       0684                                  
025945,000620: 
025946,000621: 32,3021           45175        PSMALRM            VLOAD    CALL                                  
025947,000622: 32,3022           02453                                    RAC                                   
025948,000623: 32,3023           65173                                    VECPROJ                               
025949,000624: 32,3024           02453                           STORE    RAC                                   
025950,000625: 
025951,000626: 32,3025           77735                           SLOAD                                          
025952,000627: 32,3026           25350                                    ALARM/TB                              
025953,000628: 
025954,000629: 32,3027           43014        DISPALM            BON      SET                                   
025955,000630: 32,3030           01311                                    FINALFLG                              
025956,000631: 32,3031           65033                                    +2                                    
025957,000632: 32,3032           00470                                    UPDATFLG                              
025958,000633: 32,3033           77624                           CALL                                           
025959,000634: 32,3034           65273                                    NCALARM                               
025960,000635: 
025961,000636: 32,3035           77775                           VLOAD                                          
025962,000637: 32,3036           15204                                    ZEROVECS                              
025963,000638: 32,3037           03405                           STORE    DELVLVC                               
025964,000639: 32,3040           77776                           EXIT                                           
025965,000640: 
025966,000641: 32,3041           05367                           TC       CHECKMM                               
025967,000642: 32,3042           00041                           MM       33         B-14                       
025968,000643: 32,3043           13002                           TCF      NC12H                                 
025969,000644: 
025970,000645: 32,3044           07722                           TC       DOWNFLAG                              
025971,000646: 32,3045           00045                           ADRES    XDELVFLG                              
025972,000647: 
025973,000648: 32,3046           13545                           TCF      N81DISP                               
025974,000649: 
025975,000650: 32,3047           52135        ILPALRM            SLOAD    GOTO                                  
025976,000651: 32,3050           25351                                    ALARM/TB   +1                         
025977,000652: 32,3051           65027                                    DISPALM                               
025978,000653: 
025979,000654: 32,3052           52135        QRDALRM            SLOAD    GOTO                                  
025980,000655: 32,3053           25353                                    ALARM/TB   +3                         
025981,000656: 32,3054           65027                                    DISPALM                               
025982,000657: 
025983,000658: 32,3055           45135        OLPALRM            SLOAD    CALL                                  
025984,000659: 32,3056           25352                                    ALARM/TB   +2                         
025985,000660: 32,3057           65273                                    NCALARM                               
025986,000661: 32,3060           77650                           GOTO                                           
025987,000662: 32,3061           64700                                    NC12OUT                               
025988,000663: 
025989,000664: 32,3062           45020        NCINT              STQ      CALL                                  
025990,000665: 32,3063           02633                                    NCINTOUT                              
025991,000666: 32,3064           11720                                    INTSTALL                              
025992,000667: 
025993,000668: 32,3065           43014                           CLEAR    BOFF                                  
025994,000669: 32,3066           01673                                    INTYPFLG                              
025995,000670: 32,3067           00355                                    NCINTFLG                              
025996,000671: 32,3070           65073                                    +3                                    
025997,000672: 32,3071           77614                           SET                                            
025998,000673: 32,3072           01473                                    INTYPFLG                              
025999,000674: 32,3073           45545                           DLOAD    STADR                                 
026000,000675: 32,3074           52260                           STOVL    TET                                   
026001,000676: 32,3075           77626                           STADR                                          
026002,000677: 32,3076           52234                           STOVL    VCV                                   
026003,000678: 32,3077           77626                           STADR                                          
026004,000679: 32,3100           42242                           STCALL   RCV                                   
026005,000680: 32,3101           11444                                    INTEGRVS                              
026006,000681: 32,3102           52001                           SETPD    GOTO                                  
026007,000682: 32,3103           00015                                    12D                                   
026008,000683: 32,3104           02633                                    NCINTOUT                              
026009,000684: 
026010,000685: 32,3105           77220        REVUP              STQ      VLOAD                                 
026011,000686: 32,3106           02552                                    QSAVER                                
026012,000687: 32,3107           00007                                    6                                     
026013,000688: 32,3110           41241                           DOT      DMP                                   
026014,000689: 32,3111           00007                                    6                                     
026015,000690: 32,3112           25320                                    1/MUE                                 
026016,000691: 32,3113           51515                           PDVL     ABS                                   
026017,000692: 32,3114           00001                                    0                                     
026018,000693: 32,3115           55301                           NORM     BDDV                                  
026019,000694: 32,3116           00047                                    X1                                    
026020,000695: 32,3117           15174                                    2B3                                   
026021,000696: 32,3120           45257                           SL*      DSU                                   
026022,000697: 32,3121           20173                                    0          -6,1                       
026023,000698: 32,3122           41465                           BDDV     PUSH                                  
026024,000699: 32,3123           25322                                    1B4                                   
026025,000700: 32,3124           41366                           SQRT     DMP                                   
026026,000701: 32,3125           25324                                    1/SQMU                                
026027,000702: 32,3126           70405                           DMP      SR1                                   
026028,000703: 32,3127           41205                           DMP      DMP                                   
026029,000704: 32,3130           25332                                    2PIB3                                 
026030,000705: 32,3131           43015                           DAD      SET                                   
026031,000706: 32,3132           00015                                    12D                                   
026032,000707: 32,3133           00075                                    NCINTFLG                              
026033,000708: 32,3134           03564                           STORE    RATEMP                                
026034,000709: 32,3135           34041                           STCALL   TDEC1                                 
026035,000710: 32,3136           65062                                    NCINT                                 
026036,000711: 
026037,000712: 32,3137           52001                           SETPD    GOTO                                  
026038,000713: 32,3140           00001                                    0                                     
026039,000714: 32,3141           02552                                    QSAVER                                
026040,000715: 
026041,000716: 32,3142           77220        RADUP              STQ      VLOAD                                 
026042,000717: 32,3143           02552                                    QSAVER                                
026043,000718: 32,3144           02545                                    VPC                                   
026044,000719: 32,3145           26740                           STOVL    VVEC                                  
026045,000720: 32,3146           02533                                    RPC                                   
026046,000721: 32,3147           02651                           STORE    RVEC                                  
026047,000722: 32,3150           47206                           PUSH     VXV                                   
026048,000723: 32,3151           02740                                    VVEC                                  
026049,000724: 32,3152           77715                           PDVL                                           
026050,000725: 32,3153           50235                           VXV      DOT                                   
026051,000726: 32,3154           00001                                    0                                     
026052,000727: 32,3155           53515                           PDVL     UNIT                                  
026053,000728: 32,3156           53515                           PDVL     UNIT                                  
026054,000729: 32,3157           02651                                    RVEC                                  
026055,000730: 32,3160           72441                           DOT      SL1                                   
026056,000731: 32,3161           75326                           ACOS     SIGN                                  
026057,000732: 32,3162           71406                           PUSH     COS                                   
026058,000733: 32,3163           16726                           STODL    CSTH                                  
026059,000734: 32,3164           43156                           SIN      CLEAR                                 
026060,000735: 32,3165           03666                                    RVSW                                  
026061,000736: 32,3166           36724                           STCALL   SNTH                                  
026062,000737: 32,3167           25004                                    TIMETHET                              
026063,000738: 32,3170           77715                           PDVL                                           
026064,000739: 32,3171           77650                           GOTO                                           
026065,000740: 32,3172           02552                                    QSAVER                                
026066,000741: 

The name of the following function is a guess.

026068,000743: 32,3173           41406        VECPROJ            PUSH     PUSH                                  
026069,000744: 32,3174           74241                           DOT      VXSC                                  
026070,000745: 32,3175           02611                                    AM1                                   
026071,000746: 32,3176           02611                                    AM1                                   
026072,000747: 32,3177           51352                           SL1      BVSU                                  
026073,000748: 32,3200           63256                           UNIT     PDVL                                  
026074,000749: 32,3201           74246                           ABS      VXSC                                  
026075,000750: 32,3202           43572                           VSL1     RVQ                                   
026076,000751: 
026077,000752: 32,3203           77745        ITER               DLOAD                                          
026078,000753: 32,3204           45254                           BZE      DSU                                   
026079,000754: 32,3205           65240                                    ITER0                                 
026080,000755: 32,3206           25326                                    0.5B5                                 
026081,000756: 32,3207           71254                           BZE      DLOAD                                 
026082,000757: 32,3210           65246                                    ITER2                                 
026083,000758: 32,3211           53025                           DSU      BZE                                   
026084,000759: 32,3212           02543                                    EO                                    
026085,000760: 32,3213           65243                                    ITER1                                 
026086,000761: 32,3214           70501                           NORM     SR1                                   
026087,000762: 32,3215           00047                                    X1                                    
026088,000763: 32,3216           14011                           STODL    8D                                    
026089,000764: 32,3217           60225                           DSU      NORM                                  
026090,000765: 32,3220           02541                                    DVO                                   
026091,000766: 32,3221           00050                                    X2                                    
026092,000767: 32,3222           54065                           BDDV     XSU,1                                 
026093,000768: 32,3223           00011                                    8D                                    
026094,000769: 32,3224           00047                                    X2                                    
026095,000770: 32,3225           56101                           NORM     XAD,1                                 
026096,000771: 32,3226           00050                                    X2                                    
026097,000772: 32,3227           00047                                    X2                                    
026098,000773: 32,3230           77725                           PDDL                                           
026099,000774: 32,3231           45345                           DLOAD    DSU                                   
026100,000775: 32,3232           00007                                    6D                                    
026101,000776: 32,3233           25334                                    14B5                                  
026102,000777: 32,3234           43040                           BMN      SET                                   
026103,000778: 32,3235           65246                                    ITER2                                 
026104,000779: 32,3236           01062                                    ITERFLG                               
026105,000780: 32,3237           77616                           RVQ                                            
026106,000781: 

The names of the following 3 labels are guesses.

026108,000783: 32,3240           52145        ITER0              DLOAD    GOTO                                  
026109,000784: 32,3241           25340                                    1F/S                                  
026110,000785: 32,3242           65256                                    ITER3                                 
026111,000786: 
026112,000787: 32,3243           52145        ITER1              DLOAD    GOTO                                  
026113,000788: 32,3244           25336                                    0.3F/S                                
026114,000789: 32,3245           65256                                    ITER3                                 
026115,000790: 
026116,000791: 32,3246           60345        ITER2              DLOAD    NORM                                  
026117,000792: 32,3247           00005                                    4D                                    
026118,000793: 32,3250           00050                                    X2                                    
026119,000794: 32,3251           56342                           SR1      DDV                                   
026120,000795: 32,3252           00001                                    0                                     
026121,000796: 32,3253           53664                           XSU,2    SR*                                   
026122,000797: 32,3254           00046                                    X1                                    
026123,000798: 32,3255           57176                                    0,2                                   
026124,000799: 
026125,000800: 32,3256           77601        ITER3              SETPD                                          
026126,000801: 32,3257           00005                                    4                                     
026127,000802: 32,3260           14011                           STODL    8D                                    
026128,000803: 32,3261           00005                                    4                                     
026129,000804: 32,3262           16543                           STODL    EO                                    
026130,000805: 32,3263           77626                           STADR                                          
026131,000806: 32,3264           75236                           STORE    DVO                                   
026132,000807: 32,3265           65225                           DSU      PDDL                                  
026133,000808: 32,3266           00011                                    8D                                    
026134,000809: 32,3267           00007                                    6D                                    
026135,000810: 32,3270           41415                           DAD      PUSH                                  
026136,000811: 32,3271           25330                                    1B5                                   
026137,000812: 32,3272           77616                           RVQ                                            
026138,000813: 

The name of the following function is a guess.

026140,000815: 32,3273           77420        NCALARM            STQ      EXIT                                  
026141,000816: 32,3274           02552                                    QSAVER                                
026142,000817: 
026143,000818: 32,3275           30154                           CA       MPAC                                  
026144,000819: 32,3276           05743                           TC       VARALARM                              
026145,000820: 
026146,000821: 32,3277           35036                           CAF      V05N09                                
026147,000822: 32,3300           04647                           TC       BANKCALL                              
026148,000823: 32,3301           20623                           CADR     GOFLASH                               
026149,000824: 32,3302           04103                           TC       GOTOPOOH                              
026150,000825: 32,3303           03314                           TC       NCALMOUT                              
026151,000826: 
026152,000827: 32,3304           05367                           TC       CHECKMM                               
026153,000828: 32,3305           00041                           MM       33         B-14                       
026154,000829: 32,3306           13310                           TCF      +2                                    
026155,000830: 32,3307           13355                           TCF      P33                                   
026156,000831: 
026157,000832: 32,3310           05367                           TC       CHECKMM                               
026158,000833: 32,3311           00040                           MM       32         B-14                       
026159,000834: 32,3312           12000                           TCF      P31                                   
026160,000835: 
026161,000836: 32,3313           12013                           TCF      P32                                   
026162,000837: 

The name of the following label is a guess.

026164,000839: 32,3314           06006        NCALMOUT           TC       INTPRET                               
026165,000840: 32,3315           77650                           GOTO                                           
026166,000841: 32,3316           02552                                    QSAVER                                
026167,000842: 
026168,000843: 32,3317           15625 21042  1/MUE              2DEC*    .25087606  E-10       B+34*           
026169,000844: 32,3321           02000 00000  1B4                2DEC     1          B-4                        
026170,000845: 32,3323           25004 06702  1/SQMU             2DEC*    .50087529  E-5        B+17*           
026171,000846: 32,3325           00400 00000  0.5B5              2DEC     .5         B-5                        
026172,000847: 32,3327           01000 00000  1B5                2DEC     1          B-5                        
026173,000848: 32,3331  26,3173               2B3                =        DP1/4TH                               
026174,000849: 32,3331           31103 36652  2PIB3              2DEC     6.2831853  B-3                        
026175,000850: 32,3333           16000 00000  14B5               2DEC     14         B-5                        
026176,000851: 32,3335           00001 05350  0.3F/S             2DEC     0.009144   B-7                        
026177,000852: 32,3337           00000 14370  1F/S               2DEC     0.003048   B-7                        
026178,000853: 32,3341           00100 13754  165F/S             2DEC     0.50292    B-7                        
026179,000854: 32,3343           00127 31023  225F/S             2DEC     0.68580    B-7                        
026180,000855: 32,3345           00011 30073  25F/S              2DEC     0.07620    B-7                        
026181,000856: 

The following name was copied from P32-P33, P72-P73 in Artemis 72.

026183,000858: 32,3347           00600        ALARM/TB           OCT      00600                                 #  NO 1
026184,000859: 32,3350           00601                           OCT      00601                                 #     2
026185,000860: 32,3351           00602                           OCT      00602                                 #     3
026186,000861: 32,3352           00603                           OCT      00603                                 #     4
026187,000862: 
026188,000863: 32,3353           22000 00000  18B5               2DEC     18         B-5                        
026189,000864: 
026190,000865: 32,3355           04564        P33                TC       P20FLGON                              
026191,000866: 
026192,000867: 32,3356           34575                           CAF      V06N11                                
026193,000868: 32,3357           05550                           TC       VNFLASH                               
026194,000869: 
026195,000870: 32,3360           06006                           TC       INTPRET                               
026196,000871: 32,3361           43345                           DLOAD    DAD                                   
026197,000872: 32,3362           02463                                    TNCC                                  
026198,000873: 32,3363           02041                                    TCS                                   
026199,000874: 32,3364           02461                           STORE    TNSR                                  
026200,000875: 32,3365           77776                           EXIT                                           
026201,000876: 
026202,000877: 32,3366           34576                           CAF      V06N13                                
026203,000878: 32,3367           05550                           TC       VNFLASH                               
026204,000879: 
026205,000880: 32,3370           34600                           CAF      V06N37                                
026206,000881: 32,3371           05550                           TC       VNFLASH                               
026207,000882: 
026208,000883: 32,3372           06006                           TC       INTPRET                               
026209,000884: 32,3373           43145                           DLOAD    CLEAR                                 
026210,000885: 32,3374           02463                                    TNCC                                  
026211,000886: 32,3375           01271                                    FINALFLG                              
026212,000887: 32,3376           03413                           STORE    TIG                                   
026213,000888: 
026214,000889: 32,3377           77624        DISP45A            CALL                                           
026215,000890: 32,3400           73430                                    VN1645                                
026216,000891: 32,3401           77745                           DLOAD                                          
026217,000892: 32,3402           02463                                    TNCC                                  
026218,000893: 32,3403           00041                           STORE    TDEC1                                 
026219,000894: 32,3404           36332                           STCALL   INTIME                                
026220,000895: 32,3405           11400                                    CSMPREC                               
026221,000896: 
026222,000897: 32,3406           77775                           VLOAD                                          
026223,000898: 32,3407           00001                                    RATT                                  
026224,000899: 32,3410           03546                           STORE    RINIT                                 
026225,000900: 32,3411           27532                           STOVL    RPASS3                                
026226,000901: 32,3412           00007                                    VATT                                  
026227,000902: 32,3413           03554                           STORE    VINIT                                 
026228,000903: 32,3414           17524                           STODL    VACT3                                 
026229,000904: 32,3415           02461                                    TNSR                                  
026230,000905: 32,3416           34041                           STCALL   TDEC1                                 
026231,000906: 32,3417           11414                                    LEMPREC                               
026232,000907: 
026233,000908: 32,3420           43175                           VLOAD    CLEAR                                 
026234,000909: 32,3421           00007                                    VATT                                  
026235,000910: 32,3422           01262                                    ITERFLG                               
026236,000911: 32,3423           25543                           STOVL    VCV                                   
026237,000912: 32,3424           00001                                    RATT                                  
026238,000913: 32,3425           01535                           STORE    RCV                                   
026239,000914: 
026240,000915: 32,3426           53435                           VXV      UNIT                                  
026241,000916: 32,3427           01543                                    VCV                                   
026242,000917: 32,3430           16611                           STODL    UP1                                   
026243,000918: 32,3431           03643                                    TTPI                                  
026244,000919: 
026245,000920: 32,3432           34041        NCCDMP4            STCALL   TDEC1                                 
026246,000921: 32,3433           11414                                    LEMPREC                               
026247,000922: 
026248,000923: 32,3434           43175                           VLOAD    CLEAR                                 
026249,000924: 32,3435           00001                                    RATT                                  
026250,000925: 32,3436           00275                                    NCINTFLG                              
026251,000926: 32,3437           26445                           STOVL    RPTPI                                 
026252,000927: 32,3440           00007                                    VATT                                  
026253,000928: 32,3441           16360                           STODL    VPTPI                                 
026254,000929: 32,3442           02051                                    DELH1                                 
026255,000930: 32,3443           36236                           STCALL   DELH                                  
026256,000931: 32,3444           65605                                    QRDTPI                                
026257,000932: 
026258,000933: 32,3445           77775                           VLOAD                                          
026259,000934: 32,3446           77715                           PDVL                                           
026260,000935: 32,3447           77624                           CALL                                           
026261,000936: 32,3450           62355                                    COE                                   
026262,000937: 32,3451           77624                           CALL                                           
026263,000938: 32,3452           11720                                    INTSTALL                              
026264,000939: 
026265,000940: 32,3453           25535                           STOVL    RCV                                   
026266,000941: 32,3454           77626                           STADR                                          
026267,000942: 32,3455           62234                           STODL    VCV                                   
026268,000943: 32,3456           03643                                    TTPI                                  
026269,000944: 32,3457           01517                           STORE    TET                                   
026270,000945: 32,3460           71214                           CLEAR    DLOAD                                 
026271,000946: 32,3461           01673                                    INTYPFLG                              
026272,000947: 32,3462           02461                                    TNSR                                  
026273,000948: 32,3463           34041                           STCALL   TDEC1                                 
026274,000949: 32,3464           11444                                    INTEGRVS                              
026275,000950: 
026276,000951: 32,3465           77775                           VLOAD                                          
026277,000952: 32,3466           00001                                    RATT                                  
026278,000953: 32,3467           02453                           STORE    RNSR                                  
026279,000954: 32,3470           27415                           STOVL    RTARG                                 
026280,000955: 32,3471           00007                                    VATT                                  
026281,000956: 32,3472           17516                           STODL    VNSRP                                 
026282,000957: 32,3473           02461                                    TNSR                                  
026283,000958: 32,3474           77625                           DSU                                            
026284,000959: 32,3475           02463                                    TNCC                                  
026285,000960: 32,3476           17423                           STODL    DELLT4                                
026286,000961: 32,3477           07155                                    HIGH2                                 
026287,000962: 32,3500           41525                           PDDL     PUSH                                  
026288,000963: 32,3501           25603                                    15DEG                                 
026289,000964: 32,3502           77624                           CALL                                           
026290,000965: 32,3503           22000                                    INITVEL                               
026291,000966: 
026292,000967: 32,3504           52375        NCCDMP7            VLOAD    VSU                                   
026293,000968: 32,3505           03516                                    VNSRP                                 
026294,000969: 32,3506           03576                                    VTPRIME                               
026295,000970: 32,3507           77715                           PDVL                                           
026296,000971: 32,3510           03576                                    VTPRIME                               
026297,000972: 32,3511           27554                           STOVL    VINIT                                 
026298,000973: 32,3512           02453                                    RNSR                                  
026299,000974: 32,3513           37546                           STCALL   RINIT                                 
026300,000975: 32,3514           11151                                    GET.LVC                               
026301,000976: 
026302,000977: 32,3515           50375                           VLOAD    DOT                                   
026303,000978: 32,3516           03576                                    VTPRIME                               
026304,000979: 32,3517           02611                                    UP1                                   
026305,000980: 32,3520           40352                           SL1      SETPD                                 
026306,000981: 32,3521           00001                                    0                                     
026307,000982: 32,3522           27407                           STOVL    DELVLVC    +2                         
026308,000983: 32,3523           03405                                    DELVLVC                               
026309,000984: 32,3524           02617                           STORE    VGNSR                                 
026310,000985: 
026311,000986: 32,3525           43014                           BON      SET                                   
026312,000987: 32,3526           01311                                    FINALFLG                              
026313,000988: 32,3527           65531                                    +2                                    
026314,000989: 32,3530           00470                                    UPDATFLG                              
026315,000990: 32,3531           77776                           EXIT                                           
026316,000991: 
026317,000992: 32,3532           33604                           CAF      V06N82                                
026318,000993: 32,3533           05550                           TC       VNFLASH                               
026319,000994: 
026320,000995: 32,3534           06006                           TC       INTPRET                               
026321,000996: 32,3535           63375                           VLOAD    PDVL                                  
026322,000997: 32,3536           03624                                    DELVEET3                              
026323,000998: 32,3537           03524                                    VACT3                                 
026324,000999: 32,3540           27554                           STOVL    VINIT                                 
026325,001000: 32,3541           03532                                    RPASS3                                
026326,001001: 32,3542           37546                           STCALL   RINIT                                 
026327,001002: 32,3543           11151                                    GET.LVC                               
026328,001003: 32,3544           77776                           EXIT                                           
026329,001004: 
026330,001005: 32,3545           34603        N81DISP            CAF      V06N81                                
026331,001006: 32,3546           05550                           TC       VNFLASH                               
026332,001007: 
026333,001008: 32,3547           06006                           TC       INTPRET                               
026334,001009: 32,3550           45014                           SET      CALL                                  
026335,001010: 32,3551           01072                                    REVFLAG                               
026336,001011: 32,3552           11151                                    GET.LVC                               
026337,001012: 
026338,001013: 32,3553           61375                           VLOAD    VXM                                   
026339,001014: 32,3554           03405                                    DELVLVC                               
026340,001015: 32,3555           00007                                    6                                     
026341,001016: 32,3556           77772                           VSL1                                           
026342,001017: 32,3557           03624                           STORE    DELVSIN                               
026343,001018: 
026344,001019: 32,3560           45055                           VAD      CALL                                  
026345,001020: 32,3561           03554                                    VINIT                                 
026346,001021: 32,3562           11720                                    INTSTALL                              
026347,001022: 32,3563           25543                           STOVL    VCV                                   
026348,001023: 32,3564           03546                                    RINIT                                 
026349,001024: 32,3565           15535                           STODL    RCV                                   
026350,001025: 32,3566           02463                                    TNCC                                  
026351,001026: 32,3567           15517                           STODL    TET                                   
026352,001027: 32,3570           02461                                    TNSR                                  
026353,001028: 32,3571           77614                           SET                                            
026354,001029: 32,3572           01473                                    INTYPFLG                              
026355,001030: 32,3573           03634                           STORE    TPASS4                                
026356,001031: 32,3574           34041                           STCALL   TDEC1                                 
026357,001032: 32,3575           11444                                    INTEGRVS                              
026358,001033: 
026359,001034: 32,3576           77775                           VLOAD                                          
026360,001035: 32,3577           00001                                    RATT                                  
026361,001036: 32,3600           37415                           STCALL   RTARG                                 
026362,001037: 32,3601           65377                                    DISP45A                               
026363,001038: 
026364,001039: 32,3602           01252 25254  15DEG              2DEC     0.04166667                            
026365,001040: 
026366,001041: 32,3604           01522        V06N82             VN       0682                                  
026367,001042: 
026368,001043: 32,3605           71220        QRDTPI             STQ      DLOAD                                 
026369,001044: 32,3606           02371                                    QRDOUT                                
026370,001045: 32,3607           15204                                    HI6ZEROS                              
026371,001046: 32,3610           03647                           STORE    DTQRD                                 
026372,001047: 32,3611           16370                           STODL    ITERCNT                               
026373,001048: 32,3612           03641                                    ELEV                                  
026374,001049: 32,3613           51025                           DSU      BPL                                   
026375,001050: 32,3614           15202                                    DPHALF                                
026376,001051: 32,3615           65620                                    +3                                    
026377,001052: 32,3616           77745                           DLOAD                                          
026378,001053: 32,3617           03641                                    ELEV                                  
026379,001054: 32,3620           03641                           STORE    ELEV                                  
026380,001055: 
026381,001056: 32,3621           77746                           COS                                            
026382,001057: 32,3622           02366                           STORE    COSE                                  
026383,001058: 
026384,001059: 32,3623           77624        GETRJ              CALL                                           
026385,001060: 32,3624           11720                                    INTSTALL                              
026386,001061: 32,3625           43175                           VLOAD    CLEAR                                 
026387,001062: 32,3626           02445                                    RPTPI                                 
026388,001063: 32,3627           01673                                    INTYPFLG                              
026389,001064: 32,3630           25535                           STOVL    RCV                                   
026390,001065: 32,3631           02360                                    VPTPI                                 
026391,001066: 32,3632           15543                           STODL    VCV                                   
026392,001067: 32,3633           03643                                    TTPI                                  
026393,001068: 32,3634           01517                           STORE    TET                                   
026394,001069: 
026395,001070: 32,3635           77615                           DAD                                            
026396,001071: 32,3636           03647                                    DTQRD                                 
026397,001072: 32,3637           00041                           STORE    TDEC1                                 
026398,001073: 
026399,001074: 32,3640           43014                           BOFF     SET                                   
026400,001075: 32,3641           00355                                    NCINTFLG                              
026401,001076: 32,3642           65644                                    GOPREC                                
026402,001077: 32,3643           01473                                    INTYPFLG                              
026403,001078: 
026404,001079: 32,3644           77624        GOPREC             CALL                                           
026405,001080: 32,3645           11444                                    INTEGRVS                              
026406,001081: 
026407,001082: 32,3646           53575                           VLOAD    UNIT                                  
026408,001083: 32,3647           00001                                    RATT                                  
026409,001084: 32,3650           77601                           SETPD                                          
026410,001085: 32,3651           00015                                    12D                                   
026411,001086: 32,3652           16625                           STODL    URJ                                   
026412,001087: 32,3653           00045                                    36D                                   
026413,001088: 32,3654           26465                           STOVL    RJMAG                                 
026414,001089: 32,3655           02445                                    RPTPI                                 
026415,001090: 32,3656           41456                           UNIT     PUSH                                  
026416,001091: 32,3657           63235                           VXV      PDVL                                  
026417,001092: 32,3660           02625                                    URJ                                   
026418,001093: 32,3661           02360                                    VPTPI                                 
026419,001094: 32,3662           50235                           VXV      DOT                                   
026420,001095: 32,3663           02445                                    RPTPI                                 
026421,001096: 32,3664           63254                           BZE      PDVL                                  
026422,001097: 32,3665           65671                                    +4                                    
026423,001098: 32,3666           72441                           DOT      SL1                                   
026424,001099: 32,3667           02625                                    URJ                                   
026425,001100: 32,3670           75326                           ACOS     SIGN                                  
026426,001101: 32,3671           45325                           PDDL     DSU                                   
026427,001102: 32,3672           02465                                    RJMAG                                 
026428,001103: 32,3673           02236                                    DELH                                  
026429,001104: 32,3674           56205                           DMP      DDV                                   
026430,001105: 32,3675           02366                                    COSE                                  
026431,001106: 32,3676           00045                                    36D                                   
026432,001107: 32,3677           43336                           ASIN     DAD                                   
026433,001108: 32,3700           03641                                    ELEV                                  
026434,001109: 32,3701           45221                           BDSU     DSU                                   
026435,001110: 32,3702           15174                                    DP1/4TH                               
026436,001111: 32,3703           77601                           SETPD                                          
026437,001112: 32,3704           00015                                    12D                                   
026438,001113: 32,3705           00015                           STORE    12D                                   
026439,001114: 
026440,001115: 32,3706           45246                           ABS      DSU                                   
026441,001116: 32,3707           02043                                    EPS1                                  
026442,001117: 32,3710           40240                           BMN      SETPD                                 
026443,001118: 32,3711           02371                                    QRDOUT                                
026444,001119: 32,3712           00003                                    2                                     
026445,001120: 32,3713           65345                           DLOAD    PDDL                                  
026446,001121: 32,3714           03647                                    DTQRD                                 
026447,001122: 32,3715           00015                                    12D                                   
026448,001123: 32,3716           41525                           PDDL     PUSH                                  
026449,001124: 32,3717           02370                                    ITERCNT                               
026450,001125: 32,3720           77624                           CALL                                           
026451,001126: 32,3721           65203                                    ITER                                  
026452,001127: 
026453,001128: 32,3722           43145                           DLOAD    BON                                   
026454,001129: 32,3723           00005                                    4                                     
026455,001130: 32,3724           01302                                    ITERFLG                               
026456,001131: 32,3725           65052                                    QRDALRM                               
026457,001132: 32,3726           16370                           STODL    ITERCNT                               
026458,001133: 32,3727           00003                                    2                                     
026459,001134: 32,3730           37647                           STCALL   DTQRD                                 
026460,001135: 32,3731           65623                                    GETRJ                                 
026461,001136: 
026462,001137: 
026463,001138: 31,2000                                           SETLOC   NCPROGS2                              
026464,001139: 31,2000                                           BANK                                           
026465,001140: 31,2355                                           COUNT*   $$/P3133                              
026466,001141: 
026467,001142: 31,2355           65256        COE                UNIT     PDDL                                  
026468,001143: 31,2356           00045                                    36D                                   
026469,001144: 31,2357           41425                           DSU      PUSH                                  
026470,001145: 31,2360           02236                                    DELH                                  
026471,001146: 31,2361           76561                           VXSC     VSL1                                  
026472,001147: 31,2362           00007                                    6                                     
026473,001148: 31,2363           50315                           PDVL     DOT                                   
026474,001149: 31,2364           00007                                    6                                     
026475,001150: 31,2365           00001                                    0                                     
026476,001151: 31,2366           00033                           STORE    26D                                   
026477,001152: 
026478,001153: 31,2367           63552                           SL1      DSQ                                   
026479,001154: 31,2370           47515                           PDVL     VSQ                                   
026480,001155: 31,2371           00001                                    0                                     
026481,001156: 31,2372           56325                           PDDL     DDV                                   
026482,001157: 31,2373           22443                                    MU(-42)                               
026483,001158: 31,2374           00045                                    36D                                   
026484,001159: 31,2375           77625                           DSU                                            
026485,001160: 31,2376           70465                           BDDV     SR1                                   
026486,001161: 31,2377           22443                                    MU(-42)                               
026487,001162: 31,2400           45206                           PUSH     DSU                                   
026488,001163: 31,2401           02236                                    DELH                                  
026489,001164: 31,2402           77752                           SL1                                            
026490,001165: 31,2403           00041                           STORE    32D                                   
026491,001166: 
026492,001167: 31,2404           41465                           BDDV     PUSH                                  
026493,001168: 31,2405           41316                           DSQ      DMP                                   
026494,001169: 31,2406           52405                           DMP      SL3                                   
026495,001170: 31,2407           75406                           PUSH     SQRT                                  
026496,001171: 31,2410           77765                           SIGN                                           
026497,001172: 31,2411           00033                                    26D                                   
026498,001173: 31,2412           14037                           STODL    30D                                   
026499,001174: 31,2413           00041                                    32D                                   
026500,001175: 31,2414           70425                           DSU      SR1                                   
026501,001176: 31,2415           00015                                    12D                                   
026502,001177: 31,2416           41271                           DDV      DMP                                   
026503,001178: 31,2417           00015                                    12D                                   
026504,001179: 31,2420           22443                                    MU(-42)                               
026505,001180: 31,2421           56352                           SL1      DDV                                   
026506,001181: 31,2422           00041                                    32D                                   
026507,001182: 31,2423           75425                           DSU      SQRT                                  
026508,001183: 31,2424           47315                           PDVL     VXV                                   
026509,001184: 31,2425           00007                                    6                                     
026510,001185: 31,2426           00001                                    0                                     
026511,001186: 31,2427           53435                           VXV      UNIT                                  
026512,001187: 31,2430           00007                                    6                                     
026513,001188: 31,2431           77761                           VXSC                                           
026514,001189: 31,2432           74315                           PDVL     VXSC                                  
026515,001190: 31,2433           00007                                    6                                     
026516,001191: 31,2434           00037                                    30D                                   
026517,001192: 31,2435           76455                           VAD      VSL1                                  
026518,001193: 31,2436           63201                           SETPD    PDVL                                  
026519,001194: 31,2437           00001                                    0                                     
026520,001195: 31,2440           00017                                    14D                                   
026521,001196: 31,2441           77616                           RVQ                                            
026522,001197: 
026523,001198: 31,2442           00224 17561  MU(-42)            2DEC     3.986032   E10        B-42            

End of include-file P31-P33.agc.  Parent file is MAIN.agc