* SUBR STATES REV A 10 PAGE 1
0001 * SUBR STATES REV A 10-11-70 EI
0002 * RECEIVES BIT PATTERN FROM MAIN PRGM
0003 * CHECKS WHICH BITS ARE NOT SET AND
0004 * TYPES OUT THEIR MNEMONICS
0005 REL
0006 SUBR STATES
0007 00000 0 000000 STAT DAC **
0008 00001 0 04 00076 STA SAVB
0009 00002 140040 CRA
0010 00003 74 0020 SMK '20
0011 00004 0 02 00107 LDA =-16
0012 00005 0 04 00077 STA M16
0013 00006 34 0104 SKS '104
0014 00007 0 01 00006 JMP *-1
0015 00010 14 0104 OCP '104
0016 00011 0 02 00106 LDA ='106612
0017 00012 0 10 00037 JST TYP2
0018 00013 0 02 00054 LDA NAM!
0019 00014 0 04 00055 STA NAM^
0020 00015 0 02 00076 LOOP LDA SAVB
0021 00016 100400 SPL
0022 00017 0 01 00026 JMP IRS
0023 00020 -0 02 00055 LDA*
NAM^
0024 00021 101040 SNZ
0025 00022 0 01 00026 JMP IRS UNUSED BIT
0026 00023 0 10 00037 JST TYP2
0027 00024 0 02 00105 LDA ='126240
, & SPACE
0028 00025 0 10 00037 JST TYP2
0029 00026 0 12 00055 IRS IRS NAM^
0030 00027 0 02 00076 LDA SAVB
0031 00030 0416 77 ALR 1
0032 00031 0 04 00076 STA SAVB
0033 00032 0 12 00077 IRS M16
0034 00033 0 01 00015 JMP LOOP
0035 00034 0 02 00100 LDA OFF!
0036 00035 0 10 00000 CALL MESS
0037 00036 -0 01 00000 JMP*
STAT
0038 00037 0 000000 TYP2 DAC **
0039 00040 0406 70 ARR 8
0040 00041 74 0004 OTA 4
0041 00042 0 01 00041 JMP *-1
0042 00043 0406 70 ARR 8
0043 00044 74 0004 OTA 4
0044 00045 0 01 00044 JMP *-1
0045 00046 34 0104 SKS '104
0046 00047 0 01 00046 JMP *-1
0047 00050 14 0004 OCP 4
0048 00051 0 02 00104 LDA ='40
0049 00052 74 0020 SMK '20
0050 00053 -0 01 00037 JMP*
TYP2
0051 00054 0 000056 NAM! DAC *+2
0052 00055 0 000056 NAM^ DAC *+1
0053 00056 000000 OCT 0
NOT USED
0054 00057 142314 BCI 1,DL
DELTA
0055 00060 147726 BCI 1,OV
OVERRIDE
0056 00061 146720 BCI 1,MP
MAIN PRESSURE
0057 00062 147324 BCI 1,NT
INTERRUPT
* SUBR STATES REV A 10 PAGE 2
0058 00063 000000 OCT 0
0059 00064 146320 BCI 1,LP
LOW PRESSURE
0060 00065 144320 BCI 1,HP
HIGH PRESSURE
0061 00066 153301 BCI 1,VA
15 VOLTS ACTUAL
0062 00067 146707 BCI 1,MG
MOOG
0063 00070 150322 BCI 1,PR
PREDICTORS
0064 00071 000000 OCT 0
0065 00072 151322 BCI 1,RR
BIG PUMP
0066 00073 151714 BCI 1,SL
SOLENOIDS
0067 00074 153306 BCI 1,VF
15 VOLTS FLIP-FLOP
0068 00075 146706 BCI 1,MF
MOOG FLIP-FLOP
0069 00076 000000 SAVB BSZ 1
0070 00077 000000 M16 BSZ 1
0071 00100 0 000101 OFF! DAC *+1
0072 00101 147706 BCI 3,OFF @@
00102 143240
00103 140300
0073 00104 000040 END
00105 126240
00106 106612
00107 177760
IRS 000026 LOOP 000015 M16 000077 NAM! 000054
NAM^ 000055 OFF! 000100 SAVB 000076 STAT 000000
TYP2 000037
0000 WARNING OR ERROR FLAGS
DAP-16 MOD 2 REV. C 01-26-71