STATES

* SUBR STATES REV A 10-11-70 EI 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
* SUBR STATES REV A 10-11-70 EI PAGE 2

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 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