projects / pdp8.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
A large commit.
[pdp8.git] / sw / rescue / lab8e_goettingen / disk1_im6100 / rkb / paroff / pls.pa
CommitLineData
81e70d48
PH		 1/ PLS.PA\r
2/\r
3/\r
4/ 26-NOV-86 REV 1.0 KJ.S.\r
5/ 28-NOV-86 REV 1.1 KJ.S. COUNTER SECTION\r
6/ 10-DEC-86 REV 1.2 KJ.S. MUX SECTION CHANGED\r
7/ 12-DEC-86 REV 1.3 KJ.S. LOGIC INPUT\r
8/ 12-DEC-86 REV 1.4 KJ.S. OUTPUT\r
9/\r
10/\r
11/ TWO PAGES\r
12/\r
13\r
14 COUNT=1\r
15/ LOGIC=1\r
16\r
17 SECT1=1\r
18 SECT2=1\r
19 SECT3=1\r
20 SECT4=1\r
21\r
22 *200\r
23\r
24\r
25\r
26START, CLA CLL\r
27\r
28 IFDEF COUNT <\r
29\r
30 JMS DRAWA3\r
31 TAD (PLS0\r
32 JMS DRAW\r
33 20\r
34\r
35 IFDEF SECT1 <\r
36 TAD (PLSC1\r
37 JMS DRAW\r
38 20\r
39 >\r
40 IFDEF SECT2 <\r
41 TAD (PLSC2\r
42 JMS DRAW\r
43 20\r
44 >\r
45 IFDEF SECT3 <\r
46 TAD (PLSC3\r
47 JMS DRAW\r
48 20\r
49 >\r
50 IFDEF SECT4 <\r
51 TAD (PLSC4\r
52 JMS DRAW\r
53 20\r
54 >\r
55 >\r
56\r
57\r
58 IFDEF LOGIC <\r
59\r
60 JMS DRAWA3\r
61 TAD (PLS0\r
62 JMS DRAW\r
63 20\r
64\r
65 IFDEF SECT1 <\r
66 TAD (PLSL1\r
67 JMS DRAW\r
68 20\r
69 >\r
70 IFDEF SECT2 <\r
71 TAD (PLSL2\r
72 JMS DRAW\r
73 20\r
74 >\r
75 IFDEF SECT3 <\r
76 TAD (PLSL3\r
77 JMS DRAW\r
78 20\r
79 >\r
80 >\r
81\r
82 JMP DRAWEX\r
83\r
84 PAGE\r
85\f FIELD 2\r
86 *0\r
87\r
88PLS0, TEXT /"COMMON[[[[[[[1[2];/\r
89 TEXT /SP'7;/\r
90 TEXT /VS5;/\r
91 TEXT \PU;PA30,2.5;"SIPART];LBL/M-S 51S$MC$;\\r
92 TEXT \$MC$;PR0,10;"SIPIN];LBPLS V3D 18/20-116\\r
93 IFDEF PLSERR <\r
94 TEXT /E/\r
95 >\r
96/ >>>VERSION<<<\r
97 TEXT /-1.4$MC$;/\r
98 0\r
99\r
100\f IFDEF COUNT <\r
101\r
102PLSC1, TEXT /PA0,200;/\r
103 TEXT /PR50,35;"LSYMB2[L[5];PR0,-5;"LSYMB2[H[5];/\r
104 TEXT /PR0,-5;"LSYMB2[H[5];PR0,-5;"LSYMB2[L[5];/\r
105 TEXT /PR0,-10;"LSYMB2[H[5];"CNT16X[44];/\r
106 TEXT /PD10,0;PU10,0;/\r
107 TEXT /PU;PR0,25;"LSYMB2[L[5];PR0,-5;"LSYMB2[L[5];/\r
108 TEXT /PR0,-5;"LSYMB2[L[5];PR0,-5;"LSYMB2[L[5];/\r
109 TEXT /PR0,-5;"LSYMB2[H[5];PR0,-5;"LSYMB2[H[5];/\r
110 TEXT /"CNT16X[43];PR20,0;/\r
111 TEXT /PU;PR0,25;"LSYMB2[L[5];PR0,-5;"LSYMB2[L[5];/\r
112 TEXT /PR0,-5;"LSYMB2[L[5];PR0,-5;"LSYMB2[L[5];/\r
113 TEXT /PR0,-5;"LSYMB2[H[5];PR0,-5;"CNT16X[42];/\r
114 TEXT /PR20,0;/\r
115 TEXT /PU;PR0,25;"LSYMB2[L[5];PR0,-5;"LSYMB2[L[5];/\r
116 TEXT /PR0,-5;"LSYMB2[L[5];PR0,-5;"LSYMB2[L[5];/\r
117 TEXT /PR0,-5;"LSYMB2[H[5];PR0,-5;"CNT16X[41];/\r
118 TEXT /PR20,0;/\r
119 TEXT /PU;PR0,25;"LSYMB2[L[5];PR0,-5;"LSYMB2[L[5];/\r
120 TEXT /PR0,-5;"LSYMB2[L[5];PR0,-5;"LSYMB2[L[5];/\r
121 TEXT /PR0,-5;"LSYMB2[H[5];PR0,-5;"CNT16X[53];/\r
122 TEXT /PR20,0;/\r
123 TEXT /PU;PR0,25;"LSYMB2[L[5];PR0,-5;"LSYMB2[L[5];/\r
124 TEXT /PR0,-5;"LSYMB2[L[5];PR0,-5;"LSYMB2[L[5];/\r
125 TEXT /PR0,-5;"LSYMB2[H[5];PR0,-5;"CNT16X[52];/\r
126 TEXT /PR20,0;/\r
127 TEXT /PU;PR0,25;"LSYMB2[L[5];PR0,-5;"LSYMB2[L[5];/\r
128 TEXT /PR0,-5;"LSYMB2[L[5];PR0,-5;"LSYMB2[L[5];/\r
129 TEXT /PR0,-5;"LSYMB2[H[5];PR0,-5;"CNT16X[51];/\r
130 TEXT /PR20,0;/\r
131 TEXT /PU;PR0,25;"LSYMB2[L[5];PR0,-5;"LSYMB2[L[5];/\r
132 TEXT /PR0,-5;"LSYMB2[L[5];PR0,-5;"LSYMB2[L[5];/\r
133 TEXT /PR0,-5;"LSYMB2[H[5];PR0,-5;"CNT16X[63];/\r
134 TEXT /PR20,0;/\r
135 TEXT /PU;PR0,25;"LSYMB2[L[5];PR0,-5;"LSYMB2[L[5];/\r
136 TEXT /PR0,-5;"LSYMB2[L[5];PR0,-5;"LSYMB2[L[5];/\r
137 TEXT /PR0,-5;"LSYMB2[H[5];PR0,-5;"CNT16X[40];/\r
138\r
139 IFDEF PLSERR<\r
140 / MUX CONNECTION 0-7\r
141 TEXT /PR10,0,0,-25,-257.5,0,0,-62.5,22.5,0;PU;/\r
142 TEXT /PR0,5;PD;PR-20,0,0,55,220,0,0,27.5;PU;/\r
143 TEXT /PR-35,0;PD;PR0,-30,-182.5,0,0,-47.5,17.5,0;PU;/\r
144 TEXT /PR0,5;PD;PR-15,0,0,40,145,0,0,32.5;PU;/\r
145 TEXT /PR-35,0;PD;PR0,-35;PU;PR45,-32.5;PD;/\r
146 TEXT /PR-12.5,0,0,32.5,-140,0,0,-32.5,12.5,0;/\r
147 TEXT /PU0,5;PD;PR-7.5,0,0,25,137.5,0,0,-25,10,0;PU;/\r
148 TEXT /PR0,5;PD;PR-7.5,0,0,17.5,-137.5,0,0,-17.5,5,0;PU;/\r
149 TEXT /PR0,5;PD;PR-10,0,0,10,145,0,0,-10,5,0;PU;\r
150 TEXT /PR0,-20;PD;PR-15,0,0,40;PU;PU-2.5,2.5;PD0,-47.5,17.5,0;\r
151 TEXT /PU0,-5;PD-20,0,0,55;PU-2.5,2.5;PD0,-62.5,22.5,0;/\r
152 TEXT /PU-80,50;PD0,37.5,10,0;PU-35,0;PD-10,0,0,-40;\r
153 TEXT /PU-35,-2.5;PD0,42.5;PU-35,0;PD0,-20,275,0,0,15,-5,0;/\r
154 TEXT /PU0,10;PD10,0,0,30,-320,0;"ARWIS2[K];/\r
155 TEXT /PU10,-50;PD280,0,0,10,5,0;/\r
156 >\r
157\r
158 IFNDEF PLSERR <\r
159 / MUX CONNECTION 1-7,0\r
160 TEXT /PR10,0,0,-25,-257.5,0,0,-27.5,22.5,0;PU;/\r
161 TEXT /PR0,-35;PD;PR-20,0,0,60,220,0,0,27.5;PU;/\r
162 TEXT /PR-35,0;PD;PR0,-30,-182.5,0,0,-52.5,17.5,0;PU;/\r
163 TEXT /PR0,5;PD;PR-15,0,0,45,145,0,0,32.5;PU;/\r
164 TEXT /PR-35,0;PD;PR0,-35;PU;PR45,-37.5;PD;/\r
165 TEXT /PR-12.5,0,0,37.5,-140,0,0,-37.5,12.5,0;/\r
166 TEXT /PU0,5;PD;PR-7.5,0,0,30,137.5,0,0,-30,10,0;PU;/\r
167 TEXT /PR0,5;PD;PR-7.5,0,0,22.5,-137.5,0,0,-22.5,5,0;PU;/\r
168 TEXT /PR0,5;PD;PR-10,0,0,15,145,0,0,-15,5,0;PU;\r
169 TEXT /PR0,-20;PD;PR-15,0,0,45;PU-2.5,2.5;PD0,-52.5,17.5,0;\r
170 TEXT /PU0,-5;PD-20,0,0,60;PU-2.5,2.5;PD0,-27.5,22.5,0;/\r
171 TEXT /PU-80,15;PD0,37.5,10,0;PU-35,0;PD-10,0,0,-40;\r
172 TEXT /PU-35,-2.5;PD0,42.5;PU-35,0;PD0,-20,275,0,0,15,-5,0;/\r
173 TEXT /PU0,10;PD10,0,0,30,-317.5,0;"ARWIS2[K];/\r
174 TEXT /PU7.5,-50;PD280,0,0,10,5,0;/\r
175 >\r
176\r
177 TEXT /PU-10,40;PD0,-30,-10,0;PU0,-10;PD5,0,0,-15;PU-25,5;PD0,10,5,0;/\r
178 TEXT /PU-10,40;PD0,-30,-10,0;PU0,-10;PD5,0,0,-15;PU-25,5;PD0,10,5,0;/\r
179 TEXT /PU-10,40;PD0,-30,-10,0;PU0,-10;PD5,0,0,-15;PU-25,5;PD0,10,5,0;/\r
180 TEXT /PU-10,40;PD0,-30,-10,0;PU0,-10;PD5,0,0,-15;PU-25,5;PD0,10,5,0;/\r
181 TEXT /PU-10,40;PD0,-30,-10,0;PU0,-10;PD5,0,0,-15;PU-25,5;PD0,10,5,0;/\r
182 TEXT /PU-10,40;PD0,-30,-10,0;PU0,-10;PD5,0,0,-15;PU-25,5;PD0,10,5,0;/\r
183 TEXT /PU-10,40;PD0,-30,-10,0;PU0,-10;PD5,0,0,-15;PU-25,5;PD0,10,5,0;/\r
184 TEXT /PU;/\r
185 0\r
186\r
187\f/ CLOCK GENERATION\r
188\r
189PLSC2, TEXT /PU;PA37.5,30;PR5,20;"PLUS1];PD0,-5;"RN3[R1];PD0,-5;/\r
190 TEXT /PU-5,0;"ARWIS2[M];/\r
191 TEXT /PD12.5,0;"INV0[54[ 5[6];PD7.5,0,0,27.5,-7.5,0;/\r
192 TEXT /"INV2[84[9[ 8];PD-7.5,0,0,27.5,20,0;/\r
193 TEXT /"NAND20[64[ 9[ 8[10];PD7.5,0,0,40,12.5,0,0,32.5,-30,0;/\r
194 TEXT /"AND22[73[5[6[ 4];PD-7.5,0,0,42.5,5,0;/\r
195 /CLOCK\r
196 TEXT /PU-12.5,-15;"ARWIS2[J];PD32.5,0,0,-7.5,-7.5,0;/\r
197 TEXT /PU32.5,-2.5;PD-10,0;PU10,-5;PD-10,0;/\r
198 TEXT /"NAND22[64[5[6[ 4];PD-12.5,0;"AND22[73[1[2[ 3];/\r
199 TEXT /PD-12.5,0,0,35,10,0;/\r
200 /LOAD\r
201 TEXT /PU12.5,-50;"LSYMB0[H[5];PU30,-17.5;PD-7.5,0;/\r
202 TEXT /"INV2[54[13[12];PD-15,0;"INV2[54[1[ 2];/\r
203 TEXT /PD-7.5,0;PU25,0;PD0,-30,-7.5,0;/\r
204 TEXT /"INV2[54[11[10];PD-7.5,0,0,30;PU25,-15;/\r
205 IFDEF PLSERR <\r
206 TEXT /PD-7.5,0;"INV2[54[3[ 4];PD-12.5,0;/\r
207 >\r
208 IFNDEF PLSERR <\r
209 TEXT /PD-7.5,0;"INV2[54[3[ 4];PD-7.5,0;"CROSS];PD-5,0;/\r
210 >\r
211 TEXT /"ARWOS2[L];/\r
212 TEXT /PU15.5,-62.5;PD4,0;PU-2,0;PD0,5;"CAPAN1[C1];/\r
213 TEXT /PD0,27.5,7.5,0;"RN0[R2];PD7.5,0;/\r
214 TEXT /PU-25,-7.5;PD10,0;"QUARZ0[Q1];PD10,0;PU-17.5,-10;PD-7.5,0;PU;/\r
215 / QUARZ\r
216 0\r
217\f/ DURATION MUX AND COUNTER\r
218\r
219PLSC3, TEXT /PA120,157.5;/\r
220 TEXT /PR15,0;"LSYMB0[L[5];PU0,-5;"LSYMB0[L[5];/\r
221 TEXT /PU-15,5;"MUX512[62];PD7.5,0,0,-10,-55,0,0,-7.5,7.5,0;/\r
222 TEXT /PU0,85;PD0,-67.5,-10,0,0,-22.5,10,0;"AND20[64[ 1[ 2[3];/\r
223 TEXT /PD15,0;"CNT102[72];PD-10,0,0,-55,-7.5,0;PU-7.5,15;/\r
224 TEXT /"ARWIS2[I];PD25,0;PU-20,0;PD0,60,20,0;/\r
225 TEXT /PU-10,15;PD0,-10,-5,0,0,-50,15,0;/\r
226 TEXT /PU15,0;"LSYMB0[L[5];PU0,-5;"LSYMB0[L[5];/\r
227 TEXT /PU0,-5;"LSYMB0[L[5];PU0,-5;"LSYMB0[L[5];PU-15,15;/\r
228 TEXT /"CNT102[70];PD-17.5,0;"OR22[50[9[8[10];\r
229 TEXT /PD-7.5,0;"ARWOS2[D];PU35,12.5;"LSYMB2[H[5];/\r
230 TEXT /PU0,10;"LSYMB2[H[5];PU0,5;PD-10,0;PU10,45;"LSYMB2[H[5];/\r
231 TEXT /PU0,10;"LSYMB2[H[5];PU0,5;"LSYMB2[L[5];/\r
232/ MUX SWITCH\r
233 TEXT /PU15,45;PD40,0,0,5;"RN1[N57];PD0,5;/\r
234 TEXT /PU5,0;PD0,-5;"RN3[N56];PD0,-10,-45,0;/\r
235 TEXT /PU0,-5;PD50,0,0,15;"RN1[N55];PD0,5;/\r
236 TEXT /PU-10,0;PD12.5,0;"PLUS0];/\r
237 TEXT /PU-22.5,0;"GRND0];/\r
238 TEXT /PD-15,0,0,-7.5;PU-2,0;PD2,-5,0,-7.5;/\r
239 TEXT /PU5,20;PD0,-7.5;PU-2,0;PD2,-5,0,-12.5;/\r
240 TEXT /PU5,25;PD0,-7.5;PU-2,0;PD2,-5,0,-17.5;/\r
241 TEXT /PU4,15;SP'8;LT2,.75;PD0,10,-18,0,0,-10,18,0;LT;SP'7;/\r
242/ 2. SWITCH\r
243 TEXT /PU28.5,-25;/\r
244 TEXT /"PLUS0];PD-17.5,0;PU15,0;/\r
245 TEXT /PD0,-5;"RN3[N37];PD0,-20;PU-5,5;/\r
246 TEXT /PD0,15;"RN1[N36];PD0,5;PU-5,0;/\r
247 TEXT /PD0,-5;"RN3[N35];PD0,-10;PU-5,5;/\r
248 TEXT /PD0,5;"RN1[N34];PD0,5;/\r
249 TEXT /PU-7.5,0;"GRND0];\r
250 TEXT /PD-17.5,0;PU15,0;/\r
251 TEXT /PD0,-7.5;PU-2,0;PD2,-5;PD0,-22.5;PU-5,35;/\r
252 TEXT /PD0,-7.5;PU-2,0;PD2,-5;PD0,-17.5;PU-5,30;/\r
253 TEXT /PD0,-7.5;PU-2,0;PD2,-5;PD0,-12.5;PU-5,25;/\r
254 TEXT /PD0,-7.5;PU-2,0;PD2,-5;PD0,-7.5;PU-4,5;SP'8;LT2,.75;/\r
255 TEXT /PD0,10,23,0,0,-10,-23,0;PU-11,-5;SP'7;LT;/\r
256 TEXT /PD62.5,0;PU0,-5;PD-62.5,0;PU0,-5;PD62.5,0;PU0,-5;PD-62.5,0;/\r
257/ LSD SWITCH\r
258 TEXT /PU57.5,-40;"PLUS0];PD-17.5,0;PU15,0;/\r
259 TEXT /PD0,5;"RN1[N62];PD0,5;PU-5,5;/\r
260 TEXT /PD0,-10;"RN3[N63];PD0,-5;PU-5,0;/\r
261 TEXT /PD0,5;"RN1[N64];PD0,15;PU-5,5;/\r
262 TEXT /PD0,-20;"RN3[N65];PD0,-5;/\r
263 TEXT /PU-7.5,0;"GRND0];\r
264 TEXT /PD-17.5,0;PU15,0;/\r
265 TEXT /PD0,7.5,-2,5;PU2,0;PD0,7.5;PU-5,-20;/\r
266 TEXT /PD0,7.5,-2,5;PU2,0;PD0,12.5;PU-5,-25;/\r
267 TEXT /PD0,7.5,-2,5;PU2,0;PD0,17.5;PU-5,-30;/\r
268 TEXT /PD0,7.5,-2,5;PU2,0;PD0,22.5;PU-4,-30;SP'8;LT2,.75;/\r
269 TEXT /PD0,10,23,0,0,-10,-23,0;PU-11,30;SP'7;LT;/\r
270 TEXT /PD62.5,0;PU0,-5;PD-62.5,0;PU0,-5;PD62.5,0;PU0,-5;PD-62.5,0;/\r
271\r
272 TEXT /PU62.5,0;"NOR80[82];PD7.5,0,0,-30,-20,0,0,-7.5,7.5,0;/\r
273 TEXT /PU-15,-5;/\r
274/ MSB SWITCH\r
275 TEXT /"PLUS0];PD-17.5,0;PU15,0;/\r
276 TEXT /PD0,-5;"RN3[N12];PD0,-20;PU-5,5;/\r
277 TEXT /PD0,15;"RN1[N13];PD0,5;PU-5,0;/\r
278 TEXT /PD0,-5;"RN3[N14];PD0,-10;PU-5,5;/\r
279 TEXT /PD0,5;"RN1[N15];PD0,5;/\r
280 TEXT /PU-7.5,0;"GRND0];\r
281 TEXT /PD-17.5,0;PU15,0;/\r
282 TEXT /PD0,-7.5;PU-2,0;PD2,-5;PD0,-22.5;PU-5,35;/\r
283 TEXT /PD0,-7.5;PU-2,0;PD2,-5;PD0,-17.5;PU-5,30;/\r
284 TEXT /PD0,-7.5;PU-2,0;PD2,-5;PD0,-12.5;PU-5,25;/\r
285 TEXT /PD0,-7.5;PU-2,0;PD2,-5;PD0,-7.5;PU-4,5;SP'8;LT2,.75;/\r
286 TEXT /PD0,10,23,0,0,-10,-23,0;PU-11,-5;SP'7;LT;/\r
287 TEXT /PD62.5,0;PU0,-5;PD-62.5,0;PU0,-5;PD62.5,0;PU0,-5;PD-62.5,0;/\r
288/ DUR ZERO\r
289 TEXT /PU62.5,0;"NOR40[80[ 9[10[11[12[13];/\r
290 TEXT /PD7.5,0,0,20,-20,0,0,7.5,7.5,0;"OR20[50[ 6[ 5[4];/\r
291 TEXT /PD5,0;"ARWOS0[F];/\r
292 0\r
293\f/ PULSE WIDTH MUX AND COUNTER\r
294\r
295PLSC4, TEXT /PA260,157.5;/\r
296 TEXT /PR15,0;"LSYMB0[L[5];PU0,-5;"LSYMB0[L[5];/\r
297 TEXT /PU-15,5;"MUX512[61];PD7.5,0,0,-10,-55,0,0,-7.5,7.5,0;/\r
298 TEXT /PU0,85;PD0,-67.5,-10,0,0,-22.5,10,0;"AND20[64[12[13[11];/\r
299 TEXT /PD15,0;"CNT102[71];PD-10,0,0,-55,-7.5,0;PU-7.5,15;/\r
300 TEXT /"ARWIS2[H];PD25,0;PU-20,0;PD0,60,20,0;/\r
301 TEXT /PU-10,15;PD0,-10,-5,0,0,-50,15,0;/\r
302 TEXT /PU15,0;"LSYMB0[L[5];PU0,-5;"LSYMB0[L[5];/\r
303 TEXT /PU0,-5;"LSYMB0[L[5];PU0,-5;"LSYMB0[L[5];PU-15,15;/\r
304 TEXT /"CNT102[60];PD-17.5,0;"OR22[50[13[12[11];\r
305 TEXT /PD-7.5,0;"ARWOS2[E];PU35,12.5;"LSYMB2[H[5];/\r
306 TEXT /PU0,10;"LSYMB2[H[5];PU0,5;PD-10,0;PU10,45;"LSYMB2[H[5];/\r
307 TEXT /PU0,10;"LSYMB2[H[5];PU0,5;"LSYMB2[L[5];/\r
308/ MUX SWITCH\r
309 TEXT /PU15,45;PD40,0,0,5;"RN1[N27];PD0,5;/\r
310 TEXT /PU5,0;PD0,-5;"RN3[N32];PD0,-10,-45,0;/\r
311 TEXT /PU0,-5;PD50,0,0,15;"RN1[N31];PD0,5;/\r
312 TEXT /PU-10,0;PD12.5,0;"PLUS0];/\r
313 TEXT /PU-22.5,0;"GRND0];/\r
314 TEXT /PD-15,0,0,-7.5;PU-2,0;PD2,-5,0,-7.5;/\r
315 TEXT /PU5,20;PD0,-7.5;PU-2,0;PD2,-5,0,-12.5;/\r
316 TEXT /PU5,25;PD0,-7.5;PU-2,0;PD2,-5,0,-17.5;/\r
317 TEXT /PU4,15;SP'8;LT2,.75;PD0,10,-18,0,0,-10,18,0;LT;SP'7;/\r
318/ 2. SWITCH\r
319 TEXT /PU28.5,-25;/\r
320 TEXT /"PLUS0];PD-17.5,0;PU15,0;/\r
321 TEXT /PD0,-5;"RN3[N16];PD0,-20;PU-5,5;/\r
322 TEXT /PD0,15;"RN1[N25];PD0,5;PU-5,0;/\r
323 TEXT /PD0,-5;"RN3[N24];PD0,-10;PU-5,5;/\r
324 TEXT /PD0,5;"RN1[N23];PD0,5;/\r
325 TEXT /PU-7.5,0;"GRND0];\r
326 TEXT /PD-17.5,0;PU15,0;/\r
327 TEXT /PD0,-7.5;PU-2,0;PD2,-5;PD0,-22.5;PU-5,35;/\r
328 TEXT /PD0,-7.5;PU-2,0;PD2,-5;PD0,-17.5;PU-5,30;/\r
329 TEXT /PD0,-7.5;PU-2,0;PD2,-5;PD0,-12.5;PU-5,25;/\r
330 TEXT /PD0,-7.5;PU-2,0;PD2,-5;PD0,-7.5;PU-4,5;SP'8;LT2,.75;/\r
331 TEXT /PD0,10,23,0,0,-10,-23,0;PU-11,-5;SP'7;LT;/\r
332 TEXT /PD62.5,0;PU0,-5;PD-62.5,0;PU0,-5;PD62.5,0;PU0,-5;PD-62.5,0;/\r
333/ LSD SWITCH\r
334 TEXT /PU57.5,-40;"PLUS0];PD-17.5,0;PU15,0;/\r
335 TEXT /PD0,5;"RN1[N51];PD0,5;PU-5,5;/\r
336 TEXT /PD0,-10;"RN3[N52];PD0,-5;PU-5,0;/\r
337 TEXT /PD0,5;"RN1[N53];PD0,15;PU-5,5;/\r
338 TEXT /PD0,-20;"RN3[N54];PD0,-5;/\r
339 TEXT /PU-7.5,0;"GRND0];\r
340 TEXT /PD-17.5,0;PU15,0;/\r
341 TEXT /PD0,7.5,-2,5;PU2,0;PD0,7.5;PU-5,-20;/\r
342 TEXT /PD0,7.5,-2,5;PU2,0;PD0,12.5;PU-5,-25;/\r
343 TEXT /PD0,7.5,-2,5;PU2,0;PD0,17.5;PU-5,-30;/\r
344 TEXT /PD0,7.5,-2,5;PU2,0;PD0,22.5;PU-4,-30;SP'8;LT2,.75;/\r
345 TEXT /PD0,10,23,0,0,-10,-23,0;PU-11,30;SP'7;LT;/\r
346 TEXT /PD62.5,0;PU0,-5;PD-62.5,0;PU0,-5;PD62.5,0;PU0,-5;PD-62.5,0;/\r
347\r
348 TEXT /PU62.5,0;"NOR80[81];PD7.5,0,0,-30,-20,0,0,-7.5,7.5,0;/\r
349 TEXT /PU-15,-5;/\r
350/ MSB SWITCH\r
351 TEXT /"PLUS0];PD-17.5,0;PU15,0;/\r
352 TEXT /PD0,-5;"RN3[N41];PD0,-20;PU-5,5;/\r
353 TEXT /PD0,15;"RN1[N42];PD0,5;PU-5,0;/\r
354 TEXT /PD0,-5;"RN3[N43];PD0,-10;PU-5,5;/\r
355 TEXT /PD0,5;"RN1[N44];PD0,5;/\r
356 TEXT /PU-7.5,0;"GRND0];\r
357 TEXT /PD-17.5,0;PU15,0;/\r
358 TEXT /PD0,-7.5;PU-2,0;PD2,-5;PD0,-22.5;PU-5,35;/\r
359 TEXT /PD0,-7.5;PU-2,0;PD2,-5;PD0,-17.5;PU-5,30;/\r
360 TEXT /PD0,-7.5;PU-2,0;PD2,-5;PD0,-12.5;PU-5,25;/\r
361 TEXT /PD0,-7.5;PU-2,0;PD2,-5;PD0,-7.5;PU-4,5;SP'8;LT2,.75;/\r
362 TEXT /PD0,10,23,0,0,-10,-23,0;PU-11,-5;SP'7;LT;/\r
363 TEXT /PD62.5,0;PU0,-5;PD-62.5,0;PU0,-5;PD62.5,0;PU0,-5;PD-62.5,0;/\r
364/ DUR ZERO\r
365 TEXT /PU62.5,0;"NOR40[80[ 5[ 4[ 3[ 2[1];/\r
366 TEXT /PD7.5,0,0,20,-20,0,0,7.5,7.5,0;"OR20[50[ 6[ 5[4];/\r
367 TEXT /PD5,0;"ARWOS0[G];/\r
368 0\r
369\r
370 >\r
371\f IFDEF LOGIC <\r
372/\r
373/ C = RESET\r
374/\r
375PLSL1, TEXT /PA20,235;PR0,0;/\r
376 TEXT /"PLUS1];PD0,-5;"RN3[N66];PD0,-5;"CROSS];PD0,-2.5,"CAPCN3[C5];/\r
377 TEXT /PD0,-2.5;"GRND];PU-7.5,10;"ARWIS2[C];PD15,0;"INV0[83[ 3[4];/\r
378 TEXT /PD15,0;/\r
379 TEXT /"INV0[34[11[10];PD12.5,0,0,-35,80,0,0,-35,20,0;/\r
380 TEXT /PD0,-115,112.5,0,0,67.5,47.5,0;"AND20[12[ 2[ 1[3];/\r
381 TEXT /PD7.5,0,0,45,-35,0,0,40,-12.5,0,0,7.5;/\r
382 TEXT /PU0,-87.5;PD0,-7.5,PU-17.5,-12.5;PD7.5,0;/\r
383 TEXT /"AND20[33[13[12[11];PD72.5,0;"ARWOS0[J];/\r
384 TEXT /PU-180,-50;PD0,-7.5;PU-22.5,95;/\r
385 TEXT /PD30,0,0,-32.5,7.5,0;"AND20[13[ 8[ 9 [10];/\r
386 TEXT /PD7.5,0,0,10;PU-25,20;PD0,22.5,7.5,0;/\r
387 TEXT /"AND20[24[ 2[ 1[3];PD7.5,0,0,10,-32.5,0,0,32.5;/\r
388 TEXT /PU-152.5,22.5;PD0,-15,7.5,0;"INV0[83[ 5[6];/\r
389 TEXT /PD7.5,0,0,-10,-25,0,0,-10,7.5,0;PU-32.5,15;/\r
390/\r
391/ A = RUN\r
392/\r
393 TEXT /"PLUS1];PD0,-5;"RN3[N67];PD0,-5;"CROSS];PD0,-2.5,"CAPCN3[C6];/\r
394 TEXT /PD0,-2.5;"GRND];PU-7.5,10;"ARWIS2[A];PD15,0;"INV0[83[13[12];/\r
395 TEXT /PD15,0;/\r
396 TEXT /"AND20[74[ 1[ 2[3];PD7.5,0,0,-12.5;PU-25,0;/\r
397 TEXT /PD0,-10,7.5,0;"INV0[34[ 9[8];PD7.5,0;/\r
398 TEXT /PU-25,10;PD212.5,0,0,-75,12.5,0;"OR3N0[21[ 2[ 8[ 1[9];/\r
399 TEXT /PD15,0;PU-157.5,62.5;PD-7.5,0,0,12.5;PU90,-47.5;/\r
400 TEXT /PD-10,0,0,12.5,-40,0,0,30,-100,0,0,-12.5,7.5,0;/\r
401 TEXT /PU-57.5,7.5;/\r
402/\r
403/ B = TRIGGER\r
404/\r
405 TEXT /"PLUS1];PD0,-5;"RN3[N61];PD0,-5;"CROSS];PD0,-2.5,"CAPCN3[C4];/\r
406 TEXT /PD0,-2.5;"GRND];PU-7.5,10;"ARWIS2[B];PD15,0;"INV0[83[ 1[2];/\r
407 TEXT /PD15,0;/\r
408 TEXT /PU-7.5,0;PD0,-10,45,0,0,-12.5,55,0;/\r
409 TEXT /PU0,10,;PD12.5,0;PU107.5,-55;/\r
410 TEXT /PD-7.5,0,0,12.5,-112.5,0,0,60,95,0,0,7.5,25,0;/\r
411 TEXT /"AND20[12[ 9[ 8[10];PD20,0;"AND20[12[13[12[11];/\r
412 TEXT /PD7.5,0,0,10,-25,0,0,7.5,7.5,0;"OR20[32[ 2[ 1[3];/\r
413 TEXT /PD7.5,0,0,10,-25,0,0,17.5,7.5,0;/\r
414 IFNDEF ERROR <\r
415 TEXT /"FF74A[22];/\r
416 >\r
417 IFDEF ERROR <\r
418 TEXT /"FF13A[22];/\r
419 >\r
420 TEXT /PD7.5,0;PU-27.5,0;"LSYMB2[H[5]PU-242.5,-70;/\r
421 TEXT /"INV0[34[ 5[6];PD177.5,0,0,-2.5,25,0;/\r
422 TEXT /"AND20[33[ 5[ 6[4];PD47.5,0,0,-12.5,12.5,0;/\r
423 TEXT /"OR3N0[21[13[12[11[10];PD12.5,0,0,-77.5,-55,0,0,-7.5,7.5,0;/\r
424 TEXT /PU-240,97.5;/\r
425/\r
426/ GATE\r
427/\r
428 TEXT /PD0,7.5,7.5,0;"AND20[24[ 8[ 9[10];PD20,0;/\r
429 TEXT /"AND20[24[13[12[11];PD20,0;"OR20[14[ 8[ 9[10];PD40,0;/\r
430 TEXT /"OR20[14[12[13[11];PD15,0;PU-112.5,-7.5;/\r
431 TEXT /PD0,-42.5,20,0,0,-5,7.5,0;PU-20,27.5;/\r
432 TEXT /PD-7.5,0;PU-87.5,-12.5;/\r
433/\r
434/ I = INPUT\r
435/\r
436 TEXT /"ARWIS2[I];PD5,0,0,-10;"RN3[R3];PD0,-25;"RN3[R4];/\r
437 TEXT /PD0,-5;"GRND];PU5,0;"GRND];PD0,5;"RN1[R6];PD0,25;"RN1[R5];/\r
438 TEXT /PD0,5;"PLUS1];/\r
439 TEXT /PU37.5,0;"PLUS1];PD0,-5,"RN3[R8];PD0,-17.5;"CROSS];PD0,-10;/\r
440 TEXT /"CAPAN3[C3];PD0,-7.5;"GRND];/\r
441 TEXT /PU0,35;PD-10,0;"RN2[R7];PD-22.5,0;PU0,-10;PD20,0;/\r
442 TEXT /PU-7.5,-25;"GRND];PD0,7.5;"CAPDN1[CX];PD0,7.5;/\r
443 TEXT /PU-7.5,0;PD15,0;PU0,5;"COMP0[91[ 2[ 3[7];PD20,0;/\r
444 TEXT /"INV0[83[11[10];PD7.5,0,0,10,-25,0,0,35,42.5,0;/\r
445 TEXT /"AND20[24[ 5[ 6[4];PD7.5,0,0,62.5,122.5,0,0,12.5,17.5,0;/\r
446 TEXT /PU-200,-102.5;PD7.5,0;"INV0[34[13[12];PD20,0;/\r
447 IFNDEF ERROR <\r
448 TEXT /PU-12.5,0;PD0,12.5,120,0,0,5,10,0;"FF74B[23];PD7.5,0;/\r
449 TEXT /PU-92.5,-10;PD0,-62.6,32.5,0;"FF74B[11];/\r
450 >\r
451 IFDEF ERROR <\r
452 TEXT /PU-12.5,0;PD0,12.5,120,0,0,5,10,0;"FF13B[23];PD7.5,0;/\r
453 TEXT /PU-92.5,-10;PD0,-62.6,32.5,0;"FF13B[11];/\r
454 >\r
455 TEXT /PD35,0,0,-5,55,0,0,-12.5,12.5,0;"OR20[32[13[12[11];/\r
456 TEXT /PD7.5,0;PU7.5,2.5;PD-7.5,0,0,-5,7.5,0;/\r
457 TEXT /"NAND20[84[ 1[ 2[3];PD10,0;"RN0[RX];PD12.5,0;"ARWOS0[X];/\r
458 0\r
459\f/\r
460/ D = DUR CO-ZD\r
461/\r
462PLSL2, TEXT /PA12.5,40;PR0,0;/\r
463 TEXT /"ARWIS2[D];PD82.5,0,0,130,170,0;"INV0[34[ 1[2];/\r
464 TEXT /PD7.5,0,0,-57.5,12.5,0;/\r
465 IFNDEF ERROR <\r
466 TEXT /"FF74B[22];/\r
467 >\r
468 IFDEF ERROR <\r
469 TEXT /"FF13B[22];/\r
470 >\r
471 TEXT /PD20,0;PU-15,-5;PD-5,0;PU-10,12.5;"LSYMB1[H[5];/\r
472 TEXT /PU-47.5,45;PD0,17.5,7.5,0;PU-25,-17.5;PD0,37.5,7.5,0;/\r
473 TEXT /"AND20[73[ 9[ 8[10];PD7.5,0;"ARWOS0[H];PU-85,-40;/\r
474 TEXT /PD0,-15,7.5,0;PU-92.5,-65;PD7.5,0;"OR20[14[ 6[ 5[4];/\r
475 TEXT /PD15,0;"AND20[13[ 1[ 2[3];PD50,0;"OR20[14[ 1[ 2[3];/\r
476 TEXT /PD15,0;PU82.5,-22.5,PD-200,0;PU-82.5,-45;/\r
477/\r
478/ E = PW CO-ZD\r
479/\r
480 TEXT /"ARWIS2[E];PD137.5,0,0,87.5,7.5,0;"AND20[13[ 5[ 6[4];/\r
481 TEXT /PD12.5,0,0,-20,7.5,0;PU-37.5,-32.5;/\r
482 TEXT /PD97.5,0,0,-12.5,120,0,0,100,-15,0,0,7.5,7.5,0;/\r
483 TEXT /"AND20[73[12[13[11];PD7.5,0;"ARWOS0[I];/\r
484 TEXT /PU-10,-55;PD-40,0,0,-7.5,7.5,0;/\r
485/\r
486/ G = PW ZERO\r
487/\r
488 TEXT /PU42.5,32.5;"ARWIS0[G];PD-50,0,0,-7.5,7.5,0;/\r
489/\r
490/ F = DUR ZERO\r
491/\r
492 TEXT /PU42.5,-77.5;"ARWIS0[F];PD-125,0,0,142.5,12.5,0;/\r
493 TEXT /"OR3N0[21[ 3[ 5 [ 4[6];PD7.5,0,0,27.5,22.5,0,0,-7.5;/\r
494 TEXT /PU-52.5,-52.5;PD35,0,0,-5,7.5,0;PU-30,-17.5;PD-12.5,0;/\r
495 TEXT /PU0,-75;PD12.5,0;"AND20[33[ 1[ 2[3];PD7.5,0,0,5,12.5,0;/\r
496 TEXT /"OR20[32[ 9[ 8[10];PD15,0;"AND20[33[ 9[ 8[10];PD47.5,0;/\r
497 TEXT /"ARWOS0[K];/\r
498/\r
499/ J = PRESCALER PRESET\r
500/\r
501 TEXT /PU-57.5,2.5;PD-7.5,0,0,10;PU50,0;/\r
502 TEXT /PD0,62.5,-35,0,0,80,-112.5,0,0,-15,7.5,0;/\r
503 TEXT /PU105,-45;PD7.5,0;/\r
504/\r
505/ PW FF OUTPUT\r
506/\r
507 TEXT /PU5,55;PD-17.5,0,0,-85,-35,0,0,-22.5;PU7.5,0;/\r
508 TEXT /PD-32.5,0,0,-22.5,7.5,0;PU52.5,70;PD12.5,0;"AND20[12[ 6[ 5[4];/\r
509 TEXT /PD15,0;PU-20,32.5;PD-25,0;/\r
510/\r
511/ IN FF OUTPUT\r
512/\r
513 TEXT /PU-45,-115;PD-90,0,0,-35,7.5,0;PU60,35;/\r
514 TEXT /PD0,90,-147.5,0,0,-25,7.5,0;PU72.5,25;/\r
515 TEXT /PD0,25,7.5,0;/\r
516 IFNDEF ERROR <\r
517 TEXT /"FF13A[23];/\r
518 >\r
519 IFDEF ERROR <\r
520 TEXT /"FF74A[23];/\r
521 >\r
522 TEXT /PD7.5,0,0,5,7.5,0;"AND20[13[13[12[11];PD15,0;/\r
523 TEXT /PU0,-60;PD17.5,0;/\r
524/\r
525/ MISSING LINES\r
526/\r
527 TEXT /PU-105,-2.5;PD0,70,10,0;"INV0[34[ 3[4];PD17.5,0,0,-7.5;/\r
528 TEXT /PU-10,-7.5;"LSYMB2[H[5];PU20,-5;PD5,0;PU-52.5,-20;/\r
529 TEXT /PD122.5,0,0,-5,12.5,0;PU;/\r
530/ POS = OR32#2\r
531\r
532 0\r
533\f/\r
534/ P = OUTPUT POLARITY\r
535/\r
536PLSL3, TEXT /PU;PA85,235;PR0,0;/\r
537 TEXT /"PLUS1];PD0,-5;"RN3[R11];PD0,-5;PU0,-30;"GRND];PD0,5;/\r
538 TEXT /"RN1[R12];PD0,5;"POTB1[P1];PD17.5,0,0,7.5,7.5,0;/\r
539 TEXT /"TNA0[T1];PD0,-7.5,5,0;"RN0[R10];PD5,0,0,-5;PU-2,0;/\r
540 TEXT /PD2,-5,0,-5;PU0,35;"PLUS0];PD-5,0;"RN2[R13];/\r
541 TEXT /PD-22.5,0,0,-5;"CAPAN3[C8];PD0,-5;"GRND];/\r
542 TEXT /PU10,5;PD0,-5;"CAPCN3[C9];PD0,-5;"GRND];/\r
543 TEXT /PU7.5,17.5;PD0,7.5;PU260,-22.5;/\r
544 TEXT /"PLUS1];PD0,-5;"RN3[R14];PD0,-7.5,-7.5,0,0,-5;/\r
545 TEXT /PU-22.5,0;PD0,12.5,7.5,0;PU-7.5,-5;PD7.5,0;/\r
546 TEXT /"NAND20[10[12[13[11];PD7.5,0,0,22.5,-42.5,0,0,10,7.5,0;/\r
547 TEXT /"NAND20[10[ 8[ 9[10];PD15,0;PU12.5,-45;"ARWIS0[P];/\r
548 TEXT /PD-45,0,0,17.5,7.5,0;"NAND20[10[ 6[ 5[4];/\r
549 TEXT /PD7.5,0,0,20,7.5,0;"NAND20[10[ 1[ 2[3];/\r
550 TEXT /PD7.5,0,0,15,-285,0,0,-45,7.5,0;"NAND20[84[ 6[ 7[5];/\r
551 TEXT /PD30,0;"ARWOS0[O];PU-40,2.5;PD-7.5,0;/\r
552\r
553 0\r
554\r
555\r
556 >\r
557\r
558 FIELD 0\r
559\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
My complete PDP-8 universe