INTR

* SUBR INTR REV D 7-11-70 EI PAGE 1

0001 * SUBR INTR REV D 7-11-70 EI 0002 * WHEN ALLED THIS SUBROUTINE SWITCHES 0003 * OFF 15 VOLTS ALLOWING THE STRUCTURE 0004 * TO DRIFT UP. WHEW "START" IS PRESSED 0005 * THE PROGRAMME SWITCHES EVERYTHING OFF 0006 SUBR INTR 0007 REL 0008 00000 0 000000 INTR DAC ** 0009 00001 001001 INH 0010 00002 0 04 00111 STA SAVA 0011 00003 101040 SNZ 0012 00004 0 01 00035 JMP PRI0 0013 00005 140040 CRA 0014 00006 0 04 00112 STA IND 0015 00007 0 02 00114 LDA =5 0016 00010 0 10 00000 CALL HOLD 0017 00011 100000 SKP 0018 00012 0 01 00010 JMP *-2 0019 00013 0 02 00040 LDA INT! 0020 00014 0 10 00000 CALL MESS 0021 00015 000000 HLT 0022 00016 140040 CRA 0023 00017 0 10 00000 CALL HOLD 0024 00020 100000 SKP 0025 00021 0 01 00017 JMP *-2 0026 00022 0 02 00111 LDA SAVA 0027 00023 0 10 00000 CALL STATES 0028 00024 0 02 00112 LDA IND 0029 00025 100040 SZE 0030 00026 0 01 00031 JMP *+3 0031 00027 0 02 00061 LDA PRO! 0032 00030 100000 SKP 0033 00031 0 02 00075 LDA PRI! 0034 00032 0 10 00000 CALL MESS 0035 00033 000000 HLT 0036 00034 0 01 00034 JMP * 0037 00035 0 02 00113 PRI0 LDA =1 0038 00036 0 04 00112 STA IND 0039 00037 0 01 00007 JMP INTR+7 0040 00040 0 000041 INT! DAC *+1 0041 00041 150325 BCI 16,PUT ON SLEEVE AND PRESS START @@ 00042 152240 00043 147716 00044 120323 00045 146305 00046 142726 00047 142640 00050 140716 00051 142240 00052 150322
* SUBR INTR REV D 7-11-70 EI PAGE 2

00053 142723 00054 151640 00055 151724 00056 140722 00057 152240 00060 140300 0042 00061 0 000062 PRO! DAC *+1 0043 00062 150322 BCI 11,PROGRAMME INTERRUPT @@ 00063 147707 00064 151301 00065 146715 00066 142640 00067 144716 00070 152305 00071 151322 00072 152720 00073 152240 00074 140300 0044 00075 0 000076 PRI! DAC *+1 0045 00076 150322 BCI 11,PRIORITY INTERRUPT @@ 00077 144717 00100 151311 00101 152331 00102 120311 00103 147324 00104 142722 00105 151325 00106 150324 00107 120300 00110 140240 0046 00111 000000 SAVA BSZ 1 0047 00112 000000 IND BSZ 1 0048 00113 000001 END 00114 000005 IND 000112 INT! 000040 INTR 000000 PRI! 000075 PRI0 000035 PRO! 000061 SAVA 000111 0000 WARNING OR ERROR FLAGS DAP-16 MOD 2 REV. C 01-26-71