projects / pdp8.git / blobdiff
? search:
summary | shortlog | log | commit | commitdiff | tree
raw | inline | side by side
A large commit.
[pdp8.git] / sw / rescue / lab8e_goettingen / disk1_im6100 / rkb / paroff / pls.pa
diff --git a/sw/rescue/lab8e_goettingen/disk1_im6100/rkb/paroff/pls.pa b/sw/rescue/lab8e_goettingen/disk1_im6100/rkb/paroff/pls.pa
new file mode 100644 (file)
index 0000000..3f0f68f
--- /dev/null
+++ b/sw/rescue/lab8e_goettingen/disk1_im6100/rkb/paroff/pls.pa
@@ -0,0 +1,559 @@
+/      PLS.PA\r
+/\r
+/\r
+/      26-NOV-86 REV 1.0 KJ.S.\r
+/      28-NOV-86 REV 1.1 KJ.S.  COUNTER SECTION\r
+/      10-DEC-86 REV 1.2 KJ.S.  MUX SECTION CHANGED\r
+/      12-DEC-86 REV 1.3 KJ.S.  LOGIC INPUT\r
+/      12-DEC-86 REV 1.4 KJ.S.  OUTPUT\r
+/\r
+/\r
+/      TWO PAGES\r
+/\r
+\r
+       COUNT=1\r
+/      LOGIC=1\r
+\r
+       SECT1=1\r
+       SECT2=1\r
+       SECT3=1\r
+       SECT4=1\r
+\r
+       *200\r
+\r
+\r
+\r
+START, CLA CLL\r
+\r
+       IFDEF COUNT     <\r
+\r
+       JMS DRAWA3\r
+       TAD (PLS0\r
+       JMS DRAW\r
+       20\r
+\r
+       IFDEF SECT1     <\r
+       TAD (PLSC1\r
+       JMS DRAW\r
+       20\r
+       >\r
+       IFDEF SECT2     <\r
+       TAD (PLSC2\r
+       JMS DRAW\r
+       20\r
+       >\r
+       IFDEF SECT3     <\r
+       TAD (PLSC3\r
+       JMS DRAW\r
+       20\r
+       >\r
+       IFDEF SECT4     <\r
+       TAD (PLSC4\r
+       JMS DRAW\r
+       20\r
+       >\r
+       >\r
+\r
+\r
+       IFDEF LOGIC     <\r
+\r
+       JMS DRAWA3\r
+       TAD (PLS0\r
+       JMS DRAW\r
+       20\r
+\r
+       IFDEF SECT1     <\r
+       TAD (PLSL1\r
+       JMS DRAW\r
+       20\r
+       >\r
+       IFDEF SECT2     <\r
+       TAD (PLSL2\r
+       JMS DRAW\r
+       20\r
+       >\r
+       IFDEF SECT3     <\r
+       TAD (PLSL3\r
+       JMS DRAW\r
+       20\r
+       >\r
+       >\r
+\r
+       JMP DRAWEX\r
+\r
+       PAGE\r
+\f      FIELD 2\r
+       *0\r
+\r
+PLS0,  TEXT /"COMMON[[[[[[[1[2];/\r
+       TEXT /SP'7;/\r
+       TEXT /VS5;/\r
+       TEXT \PU;PA30,2.5;"SIPART];LBL/M-S 51S$MC$;\\r
+       TEXT \$MC$;PR0,10;"SIPIN];LBPLS V3D 18/20-116\\r
+       IFDEF PLSERR    <\r
+       TEXT /E/\r
+       >\r
+/  >>>VERSION<<<\r
+       TEXT /-1.4$MC$;/\r
+       0\r
+\r
+\f      IFDEF COUNT     <\r
+\r
+PLSC1, TEXT /PA0,200;/\r
+       TEXT /PR50,35;"LSYMB2[L[5];PR0,-5;"LSYMB2[H[5];/\r
+       TEXT /PR0,-5;"LSYMB2[H[5];PR0,-5;"LSYMB2[L[5];/\r
+       TEXT /PR0,-10;"LSYMB2[H[5];"CNT16X[44];/\r
+       TEXT /PD10,0;PU10,0;/\r
+       TEXT /PU;PR0,25;"LSYMB2[L[5];PR0,-5;"LSYMB2[L[5];/\r
+       TEXT /PR0,-5;"LSYMB2[L[5];PR0,-5;"LSYMB2[L[5];/\r
+       TEXT /PR0,-5;"LSYMB2[H[5];PR0,-5;"LSYMB2[H[5];/\r
+       TEXT /"CNT16X[43];PR20,0;/\r
+       TEXT /PU;PR0,25;"LSYMB2[L[5];PR0,-5;"LSYMB2[L[5];/\r
+       TEXT /PR0,-5;"LSYMB2[L[5];PR0,-5;"LSYMB2[L[5];/\r
+       TEXT /PR0,-5;"LSYMB2[H[5];PR0,-5;"CNT16X[42];/\r
+       TEXT /PR20,0;/\r
+       TEXT /PU;PR0,25;"LSYMB2[L[5];PR0,-5;"LSYMB2[L[5];/\r
+       TEXT /PR0,-5;"LSYMB2[L[5];PR0,-5;"LSYMB2[L[5];/\r
+       TEXT /PR0,-5;"LSYMB2[H[5];PR0,-5;"CNT16X[41];/\r
+       TEXT /PR20,0;/\r
+       TEXT /PU;PR0,25;"LSYMB2[L[5];PR0,-5;"LSYMB2[L[5];/\r
+       TEXT /PR0,-5;"LSYMB2[L[5];PR0,-5;"LSYMB2[L[5];/\r
+       TEXT /PR0,-5;"LSYMB2[H[5];PR0,-5;"CNT16X[53];/\r
+       TEXT /PR20,0;/\r
+       TEXT /PU;PR0,25;"LSYMB2[L[5];PR0,-5;"LSYMB2[L[5];/\r
+       TEXT /PR0,-5;"LSYMB2[L[5];PR0,-5;"LSYMB2[L[5];/\r
+       TEXT /PR0,-5;"LSYMB2[H[5];PR0,-5;"CNT16X[52];/\r
+       TEXT /PR20,0;/\r
+       TEXT /PU;PR0,25;"LSYMB2[L[5];PR0,-5;"LSYMB2[L[5];/\r
+       TEXT /PR0,-5;"LSYMB2[L[5];PR0,-5;"LSYMB2[L[5];/\r
+       TEXT /PR0,-5;"LSYMB2[H[5];PR0,-5;"CNT16X[51];/\r
+       TEXT /PR20,0;/\r
+       TEXT /PU;PR0,25;"LSYMB2[L[5];PR0,-5;"LSYMB2[L[5];/\r
+       TEXT /PR0,-5;"LSYMB2[L[5];PR0,-5;"LSYMB2[L[5];/\r
+       TEXT /PR0,-5;"LSYMB2[H[5];PR0,-5;"CNT16X[63];/\r
+       TEXT /PR20,0;/\r
+       TEXT /PU;PR0,25;"LSYMB2[L[5];PR0,-5;"LSYMB2[L[5];/\r
+       TEXT /PR0,-5;"LSYMB2[L[5];PR0,-5;"LSYMB2[L[5];/\r
+       TEXT /PR0,-5;"LSYMB2[H[5];PR0,-5;"CNT16X[40];/\r
+\r
+       IFDEF PLSERR<\r
+       / MUX CONNECTION 0-7\r
+       TEXT /PR10,0,0,-25,-257.5,0,0,-62.5,22.5,0;PU;/\r
+       TEXT /PR0,5;PD;PR-20,0,0,55,220,0,0,27.5;PU;/\r
+       TEXT /PR-35,0;PD;PR0,-30,-182.5,0,0,-47.5,17.5,0;PU;/\r
+       TEXT /PR0,5;PD;PR-15,0,0,40,145,0,0,32.5;PU;/\r
+       TEXT /PR-35,0;PD;PR0,-35;PU;PR45,-32.5;PD;/\r
+       TEXT /PR-12.5,0,0,32.5,-140,0,0,-32.5,12.5,0;/\r
+       TEXT /PU0,5;PD;PR-7.5,0,0,25,137.5,0,0,-25,10,0;PU;/\r
+       TEXT /PR0,5;PD;PR-7.5,0,0,17.5,-137.5,0,0,-17.5,5,0;PU;/\r
+       TEXT /PR0,5;PD;PR-10,0,0,10,145,0,0,-10,5,0;PU;\r
+       TEXT /PR0,-20;PD;PR-15,0,0,40;PU;PU-2.5,2.5;PD0,-47.5,17.5,0;\r
+       TEXT /PU0,-5;PD-20,0,0,55;PU-2.5,2.5;PD0,-62.5,22.5,0;/\r
+       TEXT /PU-80,50;PD0,37.5,10,0;PU-35,0;PD-10,0,0,-40;\r
+       TEXT /PU-35,-2.5;PD0,42.5;PU-35,0;PD0,-20,275,0,0,15,-5,0;/\r
+       TEXT /PU0,10;PD10,0,0,30,-320,0;"ARWIS2[K];/\r
+       TEXT /PU10,-50;PD280,0,0,10,5,0;/\r
+       >\r
+\r
+       IFNDEF PLSERR   <\r
+       / MUX CONNECTION 1-7,0\r
+       TEXT /PR10,0,0,-25,-257.5,0,0,-27.5,22.5,0;PU;/\r
+       TEXT /PR0,-35;PD;PR-20,0,0,60,220,0,0,27.5;PU;/\r
+       TEXT /PR-35,0;PD;PR0,-30,-182.5,0,0,-52.5,17.5,0;PU;/\r
+       TEXT /PR0,5;PD;PR-15,0,0,45,145,0,0,32.5;PU;/\r
+       TEXT /PR-35,0;PD;PR0,-35;PU;PR45,-37.5;PD;/\r
+       TEXT /PR-12.5,0,0,37.5,-140,0,0,-37.5,12.5,0;/\r
+       TEXT /PU0,5;PD;PR-7.5,0,0,30,137.5,0,0,-30,10,0;PU;/\r
+       TEXT /PR0,5;PD;PR-7.5,0,0,22.5,-137.5,0,0,-22.5,5,0;PU;/\r
+       TEXT /PR0,5;PD;PR-10,0,0,15,145,0,0,-15,5,0;PU;\r
+       TEXT /PR0,-20;PD;PR-15,0,0,45;PU-2.5,2.5;PD0,-52.5,17.5,0;\r
+       TEXT /PU0,-5;PD-20,0,0,60;PU-2.5,2.5;PD0,-27.5,22.5,0;/\r
+       TEXT /PU-80,15;PD0,37.5,10,0;PU-35,0;PD-10,0,0,-40;\r
+       TEXT /PU-35,-2.5;PD0,42.5;PU-35,0;PD0,-20,275,0,0,15,-5,0;/\r
+       TEXT /PU0,10;PD10,0,0,30,-317.5,0;"ARWIS2[K];/\r
+       TEXT /PU7.5,-50;PD280,0,0,10,5,0;/\r
+       >\r
+\r
+       TEXT /PU-10,40;PD0,-30,-10,0;PU0,-10;PD5,0,0,-15;PU-25,5;PD0,10,5,0;/\r
+       TEXT /PU-10,40;PD0,-30,-10,0;PU0,-10;PD5,0,0,-15;PU-25,5;PD0,10,5,0;/\r
+       TEXT /PU-10,40;PD0,-30,-10,0;PU0,-10;PD5,0,0,-15;PU-25,5;PD0,10,5,0;/\r
+       TEXT /PU-10,40;PD0,-30,-10,0;PU0,-10;PD5,0,0,-15;PU-25,5;PD0,10,5,0;/\r
+       TEXT /PU-10,40;PD0,-30,-10,0;PU0,-10;PD5,0,0,-15;PU-25,5;PD0,10,5,0;/\r
+       TEXT /PU-10,40;PD0,-30,-10,0;PU0,-10;PD5,0,0,-15;PU-25,5;PD0,10,5,0;/\r
+       TEXT /PU-10,40;PD0,-30,-10,0;PU0,-10;PD5,0,0,-15;PU-25,5;PD0,10,5,0;/\r
+       TEXT /PU;/\r
+       0\r
+\r
+\f/ CLOCK GENERATION\r
+\r
+PLSC2, TEXT /PU;PA37.5,30;PR5,20;"PLUS1];PD0,-5;"RN3[R1];PD0,-5;/\r
+       TEXT /PU-5,0;"ARWIS2[M];/\r
+       TEXT /PD12.5,0;"INV0[54[ 5[6];PD7.5,0,0,27.5,-7.5,0;/\r
+       TEXT /"INV2[84[9[ 8];PD-7.5,0,0,27.5,20,0;/\r
+       TEXT /"NAND20[64[ 9[ 8[10];PD7.5,0,0,40,12.5,0,0,32.5,-30,0;/\r
+       TEXT /"AND22[73[5[6[ 4];PD-7.5,0,0,42.5,5,0;/\r
+       /CLOCK\r
+       TEXT /PU-12.5,-15;"ARWIS2[J];PD32.5,0,0,-7.5,-7.5,0;/\r
+       TEXT /PU32.5,-2.5;PD-10,0;PU10,-5;PD-10,0;/\r
+       TEXT /"NAND22[64[5[6[ 4];PD-12.5,0;"AND22[73[1[2[ 3];/\r
+       TEXT /PD-12.5,0,0,35,10,0;/\r
+       /LOAD\r
+       TEXT /PU12.5,-50;"LSYMB0[H[5];PU30,-17.5;PD-7.5,0;/\r
+       TEXT /"INV2[54[13[12];PD-15,0;"INV2[54[1[ 2];/\r
+       TEXT /PD-7.5,0;PU25,0;PD0,-30,-7.5,0;/\r
+       TEXT /"INV2[54[11[10];PD-7.5,0,0,30;PU25,-15;/\r
+       IFDEF PLSERR    <\r
+       TEXT /PD-7.5,0;"INV2[54[3[ 4];PD-12.5,0;/\r
+       >\r
+       IFNDEF PLSERR   <\r
+       TEXT /PD-7.5,0;"INV2[54[3[ 4];PD-7.5,0;"CROSS];PD-5,0;/\r
+       >\r
+       TEXT /"ARWOS2[L];/\r
+       TEXT /PU15.5,-62.5;PD4,0;PU-2,0;PD0,5;"CAPAN1[C1];/\r
+       TEXT /PD0,27.5,7.5,0;"RN0[R2];PD7.5,0;/\r
+       TEXT /PU-25,-7.5;PD10,0;"QUARZ0[Q1];PD10,0;PU-17.5,-10;PD-7.5,0;PU;/\r
+       / QUARZ\r
+       0\r
+\f/ DURATION MUX AND COUNTER\r
+\r
+PLSC3, TEXT /PA120,157.5;/\r
+       TEXT /PR15,0;"LSYMB0[L[5];PU0,-5;"LSYMB0[L[5];/\r
+       TEXT /PU-15,5;"MUX512[62];PD7.5,0,0,-10,-55,0,0,-7.5,7.5,0;/\r
+       TEXT /PU0,85;PD0,-67.5,-10,0,0,-22.5,10,0;"AND20[64[ 1[ 2[3];/\r
+       TEXT /PD15,0;"CNT102[72];PD-10,0,0,-55,-7.5,0;PU-7.5,15;/\r
+       TEXT /"ARWIS2[I];PD25,0;PU-20,0;PD0,60,20,0;/\r
+       TEXT /PU-10,15;PD0,-10,-5,0,0,-50,15,0;/\r
+       TEXT /PU15,0;"LSYMB0[L[5];PU0,-5;"LSYMB0[L[5];/\r
+       TEXT /PU0,-5;"LSYMB0[L[5];PU0,-5;"LSYMB0[L[5];PU-15,15;/\r
+       TEXT /"CNT102[70];PD-17.5,0;"OR22[50[9[8[10];\r
+       TEXT /PD-7.5,0;"ARWOS2[D];PU35,12.5;"LSYMB2[H[5];/\r
+       TEXT /PU0,10;"LSYMB2[H[5];PU0,5;PD-10,0;PU10,45;"LSYMB2[H[5];/\r
+       TEXT /PU0,10;"LSYMB2[H[5];PU0,5;"LSYMB2[L[5];/\r
+/      MUX SWITCH\r
+       TEXT /PU15,45;PD40,0,0,5;"RN1[N57];PD0,5;/\r
+       TEXT /PU5,0;PD0,-5;"RN3[N56];PD0,-10,-45,0;/\r
+       TEXT /PU0,-5;PD50,0,0,15;"RN1[N55];PD0,5;/\r
+       TEXT /PU-10,0;PD12.5,0;"PLUS0];/\r
+       TEXT /PU-22.5,0;"GRND0];/\r
+       TEXT /PD-15,0,0,-7.5;PU-2,0;PD2,-5,0,-7.5;/\r
+       TEXT /PU5,20;PD0,-7.5;PU-2,0;PD2,-5,0,-12.5;/\r
+       TEXT /PU5,25;PD0,-7.5;PU-2,0;PD2,-5,0,-17.5;/\r
+       TEXT /PU4,15;SP'8;LT2,.75;PD0,10,-18,0,0,-10,18,0;LT;SP'7;/\r
+/      2. SWITCH\r
+       TEXT /PU28.5,-25;/\r
+       TEXT /"PLUS0];PD-17.5,0;PU15,0;/\r
+       TEXT /PD0,-5;"RN3[N37];PD0,-20;PU-5,5;/\r
+       TEXT /PD0,15;"RN1[N36];PD0,5;PU-5,0;/\r
+       TEXT /PD0,-5;"RN3[N35];PD0,-10;PU-5,5;/\r
+       TEXT /PD0,5;"RN1[N34];PD0,5;/\r
+       TEXT /PU-7.5,0;"GRND0];\r
+       TEXT /PD-17.5,0;PU15,0;/\r
+       TEXT /PD0,-7.5;PU-2,0;PD2,-5;PD0,-22.5;PU-5,35;/\r
+       TEXT /PD0,-7.5;PU-2,0;PD2,-5;PD0,-17.5;PU-5,30;/\r
+       TEXT /PD0,-7.5;PU-2,0;PD2,-5;PD0,-12.5;PU-5,25;/\r
+       TEXT /PD0,-7.5;PU-2,0;PD2,-5;PD0,-7.5;PU-4,5;SP'8;LT2,.75;/\r
+       TEXT /PD0,10,23,0,0,-10,-23,0;PU-11,-5;SP'7;LT;/\r
+       TEXT /PD62.5,0;PU0,-5;PD-62.5,0;PU0,-5;PD62.5,0;PU0,-5;PD-62.5,0;/\r
+/      LSD SWITCH\r
+       TEXT /PU57.5,-40;"PLUS0];PD-17.5,0;PU15,0;/\r
+       TEXT /PD0,5;"RN1[N62];PD0,5;PU-5,5;/\r
+       TEXT /PD0,-10;"RN3[N63];PD0,-5;PU-5,0;/\r
+       TEXT /PD0,5;"RN1[N64];PD0,15;PU-5,5;/\r
+       TEXT /PD0,-20;"RN3[N65];PD0,-5;/\r
+       TEXT /PU-7.5,0;"GRND0];\r
+       TEXT /PD-17.5,0;PU15,0;/\r
+       TEXT /PD0,7.5,-2,5;PU2,0;PD0,7.5;PU-5,-20;/\r
+       TEXT /PD0,7.5,-2,5;PU2,0;PD0,12.5;PU-5,-25;/\r
+       TEXT /PD0,7.5,-2,5;PU2,0;PD0,17.5;PU-5,-30;/\r
+       TEXT /PD0,7.5,-2,5;PU2,0;PD0,22.5;PU-4,-30;SP'8;LT2,.75;/\r
+       TEXT /PD0,10,23,0,0,-10,-23,0;PU-11,30;SP'7;LT;/\r
+       TEXT /PD62.5,0;PU0,-5;PD-62.5,0;PU0,-5;PD62.5,0;PU0,-5;PD-62.5,0;/\r
+\r
+       TEXT /PU62.5,0;"NOR80[82];PD7.5,0,0,-30,-20,0,0,-7.5,7.5,0;/\r
+       TEXT /PU-15,-5;/\r
+/      MSB SWITCH\r
+       TEXT /"PLUS0];PD-17.5,0;PU15,0;/\r
+       TEXT /PD0,-5;"RN3[N12];PD0,-20;PU-5,5;/\r
+       TEXT /PD0,15;"RN1[N13];PD0,5;PU-5,0;/\r
+       TEXT /PD0,-5;"RN3[N14];PD0,-10;PU-5,5;/\r
+       TEXT /PD0,5;"RN1[N15];PD0,5;/\r
+       TEXT /PU-7.5,0;"GRND0];\r
+       TEXT /PD-17.5,0;PU15,0;/\r
+       TEXT /PD0,-7.5;PU-2,0;PD2,-5;PD0,-22.5;PU-5,35;/\r
+       TEXT /PD0,-7.5;PU-2,0;PD2,-5;PD0,-17.5;PU-5,30;/\r
+       TEXT /PD0,-7.5;PU-2,0;PD2,-5;PD0,-12.5;PU-5,25;/\r
+       TEXT /PD0,-7.5;PU-2,0;PD2,-5;PD0,-7.5;PU-4,5;SP'8;LT2,.75;/\r
+       TEXT /PD0,10,23,0,0,-10,-23,0;PU-11,-5;SP'7;LT;/\r
+       TEXT /PD62.5,0;PU0,-5;PD-62.5,0;PU0,-5;PD62.5,0;PU0,-5;PD-62.5,0;/\r
+/      DUR ZERO\r
+       TEXT /PU62.5,0;"NOR40[80[ 9[10[11[12[13];/\r
+       TEXT /PD7.5,0,0,20,-20,0,0,7.5,7.5,0;"OR20[50[ 6[ 5[4];/\r
+       TEXT /PD5,0;"ARWOS0[F];/\r
+       0\r
+\f/ PULSE WIDTH MUX AND COUNTER\r
+\r
+PLSC4, TEXT /PA260,157.5;/\r
+       TEXT /PR15,0;"LSYMB0[L[5];PU0,-5;"LSYMB0[L[5];/\r
+       TEXT /PU-15,5;"MUX512[61];PD7.5,0,0,-10,-55,0,0,-7.5,7.5,0;/\r
+       TEXT /PU0,85;PD0,-67.5,-10,0,0,-22.5,10,0;"AND20[64[12[13[11];/\r
+       TEXT /PD15,0;"CNT102[71];PD-10,0,0,-55,-7.5,0;PU-7.5,15;/\r
+       TEXT /"ARWIS2[H];PD25,0;PU-20,0;PD0,60,20,0;/\r
+       TEXT /PU-10,15;PD0,-10,-5,0,0,-50,15,0;/\r
+       TEXT /PU15,0;"LSYMB0[L[5];PU0,-5;"LSYMB0[L[5];/\r
+       TEXT /PU0,-5;"LSYMB0[L[5];PU0,-5;"LSYMB0[L[5];PU-15,15;/\r
+       TEXT /"CNT102[60];PD-17.5,0;"OR22[50[13[12[11];\r
+       TEXT /PD-7.5,0;"ARWOS2[E];PU35,12.5;"LSYMB2[H[5];/\r
+       TEXT /PU0,10;"LSYMB2[H[5];PU0,5;PD-10,0;PU10,45;"LSYMB2[H[5];/\r
+       TEXT /PU0,10;"LSYMB2[H[5];PU0,5;"LSYMB2[L[5];/\r
+/      MUX SWITCH\r
+       TEXT /PU15,45;PD40,0,0,5;"RN1[N27];PD0,5;/\r
+       TEXT /PU5,0;PD0,-5;"RN3[N32];PD0,-10,-45,0;/\r
+       TEXT /PU0,-5;PD50,0,0,15;"RN1[N31];PD0,5;/\r
+       TEXT /PU-10,0;PD12.5,0;"PLUS0];/\r
+       TEXT /PU-22.5,0;"GRND0];/\r
+       TEXT /PD-15,0,0,-7.5;PU-2,0;PD2,-5,0,-7.5;/\r
+       TEXT /PU5,20;PD0,-7.5;PU-2,0;PD2,-5,0,-12.5;/\r
+       TEXT /PU5,25;PD0,-7.5;PU-2,0;PD2,-5,0,-17.5;/\r
+       TEXT /PU4,15;SP'8;LT2,.75;PD0,10,-18,0,0,-10,18,0;LT;SP'7;/\r
+/      2. SWITCH\r
+       TEXT /PU28.5,-25;/\r
+       TEXT /"PLUS0];PD-17.5,0;PU15,0;/\r
+       TEXT /PD0,-5;"RN3[N16];PD0,-20;PU-5,5;/\r
+       TEXT /PD0,15;"RN1[N25];PD0,5;PU-5,0;/\r
+       TEXT /PD0,-5;"RN3[N24];PD0,-10;PU-5,5;/\r
+       TEXT /PD0,5;"RN1[N23];PD0,5;/\r
+       TEXT /PU-7.5,0;"GRND0];\r
+       TEXT /PD-17.5,0;PU15,0;/\r
+       TEXT /PD0,-7.5;PU-2,0;PD2,-5;PD0,-22.5;PU-5,35;/\r
+       TEXT /PD0,-7.5;PU-2,0;PD2,-5;PD0,-17.5;PU-5,30;/\r
+       TEXT /PD0,-7.5;PU-2,0;PD2,-5;PD0,-12.5;PU-5,25;/\r
+       TEXT /PD0,-7.5;PU-2,0;PD2,-5;PD0,-7.5;PU-4,5;SP'8;LT2,.75;/\r
+       TEXT /PD0,10,23,0,0,-10,-23,0;PU-11,-5;SP'7;LT;/\r
+       TEXT /PD62.5,0;PU0,-5;PD-62.5,0;PU0,-5;PD62.5,0;PU0,-5;PD-62.5,0;/\r
+/      LSD SWITCH\r
+       TEXT /PU57.5,-40;"PLUS0];PD-17.5,0;PU15,0;/\r
+       TEXT /PD0,5;"RN1[N51];PD0,5;PU-5,5;/\r
+       TEXT /PD0,-10;"RN3[N52];PD0,-5;PU-5,0;/\r
+       TEXT /PD0,5;"RN1[N53];PD0,15;PU-5,5;/\r
+       TEXT /PD0,-20;"RN3[N54];PD0,-5;/\r
+       TEXT /PU-7.5,0;"GRND0];\r
+       TEXT /PD-17.5,0;PU15,0;/\r
+       TEXT /PD0,7.5,-2,5;PU2,0;PD0,7.5;PU-5,-20;/\r
+       TEXT /PD0,7.5,-2,5;PU2,0;PD0,12.5;PU-5,-25;/\r
+       TEXT /PD0,7.5,-2,5;PU2,0;PD0,17.5;PU-5,-30;/\r
+       TEXT /PD0,7.5,-2,5;PU2,0;PD0,22.5;PU-4,-30;SP'8;LT2,.75;/\r
+       TEXT /PD0,10,23,0,0,-10,-23,0;PU-11,30;SP'7;LT;/\r
+       TEXT /PD62.5,0;PU0,-5;PD-62.5,0;PU0,-5;PD62.5,0;PU0,-5;PD-62.5,0;/\r
+\r
+       TEXT /PU62.5,0;"NOR80[81];PD7.5,0,0,-30,-20,0,0,-7.5,7.5,0;/\r
+       TEXT /PU-15,-5;/\r
+/      MSB SWITCH\r
+       TEXT /"PLUS0];PD-17.5,0;PU15,0;/\r
+       TEXT /PD0,-5;"RN3[N41];PD0,-20;PU-5,5;/\r
+       TEXT /PD0,15;"RN1[N42];PD0,5;PU-5,0;/\r
+       TEXT /PD0,-5;"RN3[N43];PD0,-10;PU-5,5;/\r
+       TEXT /PD0,5;"RN1[N44];PD0,5;/\r
+       TEXT /PU-7.5,0;"GRND0];\r
+       TEXT /PD-17.5,0;PU15,0;/\r
+       TEXT /PD0,-7.5;PU-2,0;PD2,-5;PD0,-22.5;PU-5,35;/\r
+       TEXT /PD0,-7.5;PU-2,0;PD2,-5;PD0,-17.5;PU-5,30;/\r
+       TEXT /PD0,-7.5;PU-2,0;PD2,-5;PD0,-12.5;PU-5,25;/\r
+       TEXT /PD0,-7.5;PU-2,0;PD2,-5;PD0,-7.5;PU-4,5;SP'8;LT2,.75;/\r
+       TEXT /PD0,10,23,0,0,-10,-23,0;PU-11,-5;SP'7;LT;/\r
+       TEXT /PD62.5,0;PU0,-5;PD-62.5,0;PU0,-5;PD62.5,0;PU0,-5;PD-62.5,0;/\r
+/      DUR ZERO\r
+       TEXT /PU62.5,0;"NOR40[80[ 5[ 4[ 3[ 2[1];/\r
+       TEXT /PD7.5,0,0,20,-20,0,0,7.5,7.5,0;"OR20[50[ 6[ 5[4];/\r
+       TEXT /PD5,0;"ARWOS0[G];/\r
+       0\r
+\r
+       >\r
+\f      IFDEF LOGIC     <\r
+/\r
+/      C = RESET\r
+/\r
+PLSL1, TEXT /PA20,235;PR0,0;/\r
+       TEXT /"PLUS1];PD0,-5;"RN3[N66];PD0,-5;"CROSS];PD0,-2.5,"CAPCN3[C5];/\r
+       TEXT /PD0,-2.5;"GRND];PU-7.5,10;"ARWIS2[C];PD15,0;"INV0[83[ 3[4];/\r
+       TEXT /PD15,0;/\r
+       TEXT /"INV0[34[11[10];PD12.5,0,0,-35,80,0,0,-35,20,0;/\r
+       TEXT /PD0,-115,112.5,0,0,67.5,47.5,0;"AND20[12[ 2[ 1[3];/\r
+       TEXT /PD7.5,0,0,45,-35,0,0,40,-12.5,0,0,7.5;/\r
+       TEXT /PU0,-87.5;PD0,-7.5,PU-17.5,-12.5;PD7.5,0;/\r
+       TEXT /"AND20[33[13[12[11];PD72.5,0;"ARWOS0[J];/\r
+       TEXT /PU-180,-50;PD0,-7.5;PU-22.5,95;/\r
+       TEXT /PD30,0,0,-32.5,7.5,0;"AND20[13[ 8[ 9 [10];/\r
+       TEXT /PD7.5,0,0,10;PU-25,20;PD0,22.5,7.5,0;/\r
+       TEXT /"AND20[24[ 2[ 1[3];PD7.5,0,0,10,-32.5,0,0,32.5;/\r
+       TEXT /PU-152.5,22.5;PD0,-15,7.5,0;"INV0[83[ 5[6];/\r
+       TEXT /PD7.5,0,0,-10,-25,0,0,-10,7.5,0;PU-32.5,15;/\r
+/\r
+/      A = RUN\r
+/\r
+       TEXT /"PLUS1];PD0,-5;"RN3[N67];PD0,-5;"CROSS];PD0,-2.5,"CAPCN3[C6];/\r
+       TEXT /PD0,-2.5;"GRND];PU-7.5,10;"ARWIS2[A];PD15,0;"INV0[83[13[12];/\r
+       TEXT /PD15,0;/\r
+       TEXT /"AND20[74[ 1[ 2[3];PD7.5,0,0,-12.5;PU-25,0;/\r
+       TEXT /PD0,-10,7.5,0;"INV0[34[ 9[8];PD7.5,0;/\r
+       TEXT /PU-25,10;PD212.5,0,0,-75,12.5,0;"OR3N0[21[ 2[ 8[ 1[9];/\r
+       TEXT /PD15,0;PU-157.5,62.5;PD-7.5,0,0,12.5;PU90,-47.5;/\r
+       TEXT /PD-10,0,0,12.5,-40,0,0,30,-100,0,0,-12.5,7.5,0;/\r
+       TEXT /PU-57.5,7.5;/\r
+/\r
+/      B = TRIGGER\r
+/\r
+       TEXT /"PLUS1];PD0,-5;"RN3[N61];PD0,-5;"CROSS];PD0,-2.5,"CAPCN3[C4];/\r
+       TEXT /PD0,-2.5;"GRND];PU-7.5,10;"ARWIS2[B];PD15,0;"INV0[83[ 1[2];/\r
+       TEXT /PD15,0;/\r
+       TEXT /PU-7.5,0;PD0,-10,45,0,0,-12.5,55,0;/\r
+       TEXT /PU0,10,;PD12.5,0;PU107.5,-55;/\r
+       TEXT /PD-7.5,0,0,12.5,-112.5,0,0,60,95,0,0,7.5,25,0;/\r
+       TEXT /"AND20[12[ 9[ 8[10];PD20,0;"AND20[12[13[12[11];/\r
+       TEXT /PD7.5,0,0,10,-25,0,0,7.5,7.5,0;"OR20[32[ 2[ 1[3];/\r
+       TEXT /PD7.5,0,0,10,-25,0,0,17.5,7.5,0;/\r
+       IFNDEF ERROR    <\r
+       TEXT /"FF74A[22];/\r
+       >\r
+       IFDEF ERROR     <\r
+       TEXT /"FF13A[22];/\r
+       >\r
+       TEXT /PD7.5,0;PU-27.5,0;"LSYMB2[H[5]PU-242.5,-70;/\r
+       TEXT /"INV0[34[ 5[6];PD177.5,0,0,-2.5,25,0;/\r
+       TEXT /"AND20[33[ 5[ 6[4];PD47.5,0,0,-12.5,12.5,0;/\r
+       TEXT /"OR3N0[21[13[12[11[10];PD12.5,0,0,-77.5,-55,0,0,-7.5,7.5,0;/\r
+       TEXT /PU-240,97.5;/\r
+/\r
+/      GATE\r
+/\r
+       TEXT /PD0,7.5,7.5,0;"AND20[24[ 8[ 9[10];PD20,0;/\r
+       TEXT /"AND20[24[13[12[11];PD20,0;"OR20[14[ 8[ 9[10];PD40,0;/\r
+       TEXT /"OR20[14[12[13[11];PD15,0;PU-112.5,-7.5;/\r
+       TEXT /PD0,-42.5,20,0,0,-5,7.5,0;PU-20,27.5;/\r
+       TEXT /PD-7.5,0;PU-87.5,-12.5;/\r
+/\r
+/      I = INPUT\r
+/\r
+       TEXT /"ARWIS2[I];PD5,0,0,-10;"RN3[R3];PD0,-25;"RN3[R4];/\r
+       TEXT /PD0,-5;"GRND];PU5,0;"GRND];PD0,5;"RN1[R6];PD0,25;"RN1[R5];/\r
+       TEXT /PD0,5;"PLUS1];/\r
+       TEXT /PU37.5,0;"PLUS1];PD0,-5,"RN3[R8];PD0,-17.5;"CROSS];PD0,-10;/\r
+       TEXT /"CAPAN3[C3];PD0,-7.5;"GRND];/\r
+       TEXT /PU0,35;PD-10,0;"RN2[R7];PD-22.5,0;PU0,-10;PD20,0;/\r
+       TEXT /PU-7.5,-25;"GRND];PD0,7.5;"CAPDN1[CX];PD0,7.5;/\r
+       TEXT /PU-7.5,0;PD15,0;PU0,5;"COMP0[91[ 2[ 3[7];PD20,0;/\r
+       TEXT /"INV0[83[11[10];PD7.5,0,0,10,-25,0,0,35,42.5,0;/\r
+       TEXT /"AND20[24[ 5[ 6[4];PD7.5,0,0,62.5,122.5,0,0,12.5,17.5,0;/\r
+       TEXT /PU-200,-102.5;PD7.5,0;"INV0[34[13[12];PD20,0;/\r
+       IFNDEF ERROR    <\r
+       TEXT /PU-12.5,0;PD0,12.5,120,0,0,5,10,0;"FF74B[23];PD7.5,0;/\r
+       TEXT /PU-92.5,-10;PD0,-62.6,32.5,0;"FF74B[11];/\r
+       >\r
+       IFDEF ERROR     <\r
+       TEXT /PU-12.5,0;PD0,12.5,120,0,0,5,10,0;"FF13B[23];PD7.5,0;/\r
+       TEXT /PU-92.5,-10;PD0,-62.6,32.5,0;"FF13B[11];/\r
+       >\r
+       TEXT /PD35,0,0,-5,55,0,0,-12.5,12.5,0;"OR20[32[13[12[11];/\r
+       TEXT /PD7.5,0;PU7.5,2.5;PD-7.5,0,0,-5,7.5,0;/\r
+       TEXT /"NAND20[84[ 1[ 2[3];PD10,0;"RN0[RX];PD12.5,0;"ARWOS0[X];/\r
+       0\r
+\f/\r
+/      D = DUR CO-ZD\r
+/\r
+PLSL2, TEXT /PA12.5,40;PR0,0;/\r
+       TEXT /"ARWIS2[D];PD82.5,0,0,130,170,0;"INV0[34[ 1[2];/\r
+       TEXT /PD7.5,0,0,-57.5,12.5,0;/\r
+       IFNDEF ERROR    <\r
+       TEXT /"FF74B[22];/\r
+       >\r
+       IFDEF ERROR     <\r
+       TEXT /"FF13B[22];/\r
+       >\r
+       TEXT /PD20,0;PU-15,-5;PD-5,0;PU-10,12.5;"LSYMB1[H[5];/\r
+       TEXT /PU-47.5,45;PD0,17.5,7.5,0;PU-25,-17.5;PD0,37.5,7.5,0;/\r
+       TEXT /"AND20[73[ 9[ 8[10];PD7.5,0;"ARWOS0[H];PU-85,-40;/\r
+       TEXT /PD0,-15,7.5,0;PU-92.5,-65;PD7.5,0;"OR20[14[ 6[ 5[4];/\r
+       TEXT /PD15,0;"AND20[13[ 1[ 2[3];PD50,0;"OR20[14[ 1[ 2[3];/\r
+       TEXT /PD15,0;PU82.5,-22.5,PD-200,0;PU-82.5,-45;/\r
+/\r
+/      E = PW CO-ZD\r
+/\r
+       TEXT /"ARWIS2[E];PD137.5,0,0,87.5,7.5,0;"AND20[13[ 5[ 6[4];/\r
+       TEXT /PD12.5,0,0,-20,7.5,0;PU-37.5,-32.5;/\r
+       TEXT /PD97.5,0,0,-12.5,120,0,0,100,-15,0,0,7.5,7.5,0;/\r
+       TEXT /"AND20[73[12[13[11];PD7.5,0;"ARWOS0[I];/\r
+       TEXT /PU-10,-55;PD-40,0,0,-7.5,7.5,0;/\r
+/\r
+/      G = PW ZERO\r
+/\r
+       TEXT /PU42.5,32.5;"ARWIS0[G];PD-50,0,0,-7.5,7.5,0;/\r
+/\r
+/      F = DUR ZERO\r
+/\r
+       TEXT /PU42.5,-77.5;"ARWIS0[F];PD-125,0,0,142.5,12.5,0;/\r
+       TEXT /"OR3N0[21[ 3[ 5 [ 4[6];PD7.5,0,0,27.5,22.5,0,0,-7.5;/\r
+       TEXT /PU-52.5,-52.5;PD35,0,0,-5,7.5,0;PU-30,-17.5;PD-12.5,0;/\r
+       TEXT /PU0,-75;PD12.5,0;"AND20[33[ 1[ 2[3];PD7.5,0,0,5,12.5,0;/\r
+       TEXT /"OR20[32[ 9[ 8[10];PD15,0;"AND20[33[ 9[ 8[10];PD47.5,0;/\r
+       TEXT /"ARWOS0[K];/\r
+/\r
+/      J = PRESCALER PRESET\r
+/\r
+       TEXT /PU-57.5,2.5;PD-7.5,0,0,10;PU50,0;/\r
+       TEXT /PD0,62.5,-35,0,0,80,-112.5,0,0,-15,7.5,0;/\r
+       TEXT /PU105,-45;PD7.5,0;/\r
+/\r
+/      PW FF OUTPUT\r
+/\r
+       TEXT /PU5,55;PD-17.5,0,0,-85,-35,0,0,-22.5;PU7.5,0;/\r
+       TEXT /PD-32.5,0,0,-22.5,7.5,0;PU52.5,70;PD12.5,0;"AND20[12[ 6[ 5[4];/\r
+       TEXT /PD15,0;PU-20,32.5;PD-25,0;/\r
+/\r
+/      IN FF OUTPUT\r
+/\r
+       TEXT /PU-45,-115;PD-90,0,0,-35,7.5,0;PU60,35;/\r
+       TEXT /PD0,90,-147.5,0,0,-25,7.5,0;PU72.5,25;/\r
+       TEXT /PD0,25,7.5,0;/\r
+       IFNDEF ERROR    <\r
+       TEXT /"FF13A[23];/\r
+       >\r
+       IFDEF ERROR     <\r
+       TEXT /"FF74A[23];/\r
+       >\r
+       TEXT /PD7.5,0,0,5,7.5,0;"AND20[13[13[12[11];PD15,0;/\r
+       TEXT /PU0,-60;PD17.5,0;/\r
+/\r
+/      MISSING LINES\r
+/\r
+       TEXT /PU-105,-2.5;PD0,70,10,0;"INV0[34[ 3[4];PD17.5,0,0,-7.5;/\r
+       TEXT /PU-10,-7.5;"LSYMB2[H[5];PU20,-5;PD5,0;PU-52.5,-20;/\r
+       TEXT /PD122.5,0,0,-5,12.5,0;PU;/\r
+/      POS = OR32#2\r
+\r
+       0\r
+\f/\r
+/      P = OUTPUT POLARITY\r
+/\r
+PLSL3, TEXT /PU;PA85,235;PR0,0;/\r
+       TEXT /"PLUS1];PD0,-5;"RN3[R11];PD0,-5;PU0,-30;"GRND];PD0,5;/\r
+       TEXT /"RN1[R12];PD0,5;"POTB1[P1];PD17.5,0,0,7.5,7.5,0;/\r
+       TEXT /"TNA0[T1];PD0,-7.5,5,0;"RN0[R10];PD5,0,0,-5;PU-2,0;/\r
+       TEXT /PD2,-5,0,-5;PU0,35;"PLUS0];PD-5,0;"RN2[R13];/\r
+       TEXT /PD-22.5,0,0,-5;"CAPAN3[C8];PD0,-5;"GRND];/\r
+       TEXT /PU10,5;PD0,-5;"CAPCN3[C9];PD0,-5;"GRND];/\r
+       TEXT /PU7.5,17.5;PD0,7.5;PU260,-22.5;/\r
+       TEXT /"PLUS1];PD0,-5;"RN3[R14];PD0,-7.5,-7.5,0,0,-5;/\r
+       TEXT /PU-22.5,0;PD0,12.5,7.5,0;PU-7.5,-5;PD7.5,0;/\r
+       TEXT /"NAND20[10[12[13[11];PD7.5,0,0,22.5,-42.5,0,0,10,7.5,0;/\r
+       TEXT /"NAND20[10[ 8[ 9[10];PD15,0;PU12.5,-45;"ARWIS0[P];/\r
+       TEXT /PD-45,0,0,17.5,7.5,0;"NAND20[10[ 6[ 5[4];/\r
+       TEXT /PD7.5,0,0,20,7.5,0;"NAND20[10[ 1[ 2[3];/\r
+       TEXT /PD7.5,0,0,15,-285,0,0,-45,7.5,0;"NAND20[84[ 6[ 7[5];/\r
+       TEXT /PD30,0;"ARWOS0[O];PU-40,2.5;PD-7.5,0;/\r
+\r
+       0\r
+\r
+\r
+       >\r
+\r
+       FIELD 0\r
+\f\1a\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0
\ No newline at end of file
My complete PDP-8 universe