sw/rescue/lab8e_goettingen/disk1_im6100/rka/paroff/pls.pa

   1 /       PLS.PA
   2 /
   3 /
   4 /       26-NOV-86 REV 1.0 KJ.S.
   5 /
   6 /
   7 /       TWO PAGES
   8 /
   9         COUNT=1
  10 /       LOGIC=1
  11 /
  12         *200
  13
  14
  15 START,  CLA CLL
  16         JMS DRAWA3
  17
  18         IFDEF COUNT     <
  19
  20         TAD (PLSC0
  21         JMS DRAW
  22         20
  23         TAD (PLSC1
  24         JMS DRAW
  25         20
  26         TAD (PLSC2
  27         JMS DRAW
  28         20
  29         TAD (PLSC3
  30         JMS DRAW
  31         20
  32         TAD (PLSC4
  33         JMS DRAW
  34         20
  35 /       TAD (PLSC5
  36 /       JMS DRAW
  37 /       20
  38 /       TAD (PLSC6
  39 /       JMS DRAW
  40 /       20
  41
  42         >
  43
  44
  45         IFDEF LOGIC     <
  46         TAD (PLSL0
  47         JMS DRAW
  48         20
  49         TAD (PLSL1
  50         JMS DRAW
  51         20
  52         TAD (PLSL2
  53         JMS DRAW
  54         20
  55         TAD (PLSL3
  56         JMS DRAW
  57         20
  58         TAD (PLSL4
  59         JMS DRAW
  60         20
  61         TAD (PLSL5
  62         JMS DRAW
  63         20
  64         >
  65
  66         JMP DRAWEX
  67
  68         PAGE
  69 \f       FIELD 2
  70         *0
  71
  72         IFDEF COUNT     <
  73
  74 PLSC0,  TEXT /"COMMON[[[[[[[1[1];/
  75         TEXT /SP'7;/
  76 /       TEXT /VS5;/
  77         0
  78
  79 PLSC1,  TEXT /PA0,200;/
  80         TEXT /PR50,35;"LSYMB2[L[5];PR0,-5;"LSYMB2[H[5];/
  81         TEXT /PR0,-5;"LSYMB2[H[5];PR0,-5;"LSYMB2[L[5];/
  82         TEXT /PR0,-10;"LSYMB2[H[5];"CNT16X[44];/
  83         TEXT /PD10,0;PU10,0;/
  84         TEXT /PU;PR0,25;"LSYMB2[L[5];PR0,-5;"LSYMB2[L[5];/
  85         TEXT /PR0,-5;"LSYMB2[L[5];PR0,-5;"LSYMB2[L[5];/
  86         TEXT /PR0,-5;"LSYMB2[H[5];PR0,-5;"LSYMB2[H[5];/
  87         TEXT /"CNT16X[43];PR20,0;/
  88         TEXT /PU;PR0,25;"LSYMB2[L[5];PR0,-5;"LSYMB2[L[5];/
  89         TEXT /PR0,-5;"LSYMB2[L[5];PR0,-5;"LSYMB2[L[5];/
  90         TEXT /PR0,-5;"LSYMB2[H[5];PR0,-5;"CNT16X[42];/
  91         TEXT /PR20,0;/
  92         TEXT /PU;PR0,25;"LSYMB2[L[5];PR0,-5;"LSYMB2[L[5];/
  93         TEXT /PR0,-5;"LSYMB2[L[5];PR0,-5;"LSYMB2[L[5];/
  94         TEXT /PR0,-5;"LSYMB2[H[5];PR0,-5;"CNT16X[41];/
  95         TEXT /PR20,0;/
  96         TEXT /PU;PR0,25;"LSYMB2[L[5];PR0,-5;"LSYMB2[L[5];/
  97         TEXT /PR0,-5;"LSYMB2[L[5];PR0,-5;"LSYMB2[L[5];/
  98         TEXT /PR0,-5;"LSYMB2[H[5];PR0,-5;"CNT16X[53];/
  99         TEXT /PR20,0;/
 100         TEXT /PU;PR0,25;"LSYMB2[L[5];PR0,-5;"LSYMB2[L[5];/
 101         TEXT /PR0,-5;"LSYMB2[L[5];PR0,-5;"LSYMB2[L[5];/
 102         TEXT /PR0,-5;"LSYMB2[H[5];PR0,-5;"CNT16X[52];/
 103         TEXT /PR20,0;/
 104         TEXT /PU;PR0,25;"LSYMB2[L[5];PR0,-5;"LSYMB2[L[5];/
 105         TEXT /PR0,-5;"LSYMB2[L[5];PR0,-5;"LSYMB2[L[5];/
 106         TEXT /PR0,-5;"LSYMB2[H[5];PR0,-5;"CNT16X[51];/
 107         TEXT /PR20,0;/
 108         TEXT /PU;PR0,25;"LSYMB2[L[5];PR0,-5;"LSYMB2[L[5];/
 109         TEXT /PR0,-5;"LSYMB2[L[5];PR0,-5;"LSYMB2[L[5];/
 110         TEXT /PR0,-5;"LSYMB2[H[5];PR0,-5;"CNT16X[63];/
 111         TEXT /PR20,0;/
 112         TEXT /PU;PR0,25;"LSYMB2[L[5];PR0,-5;"LSYMB2[L[5];/
 113         TEXT /PR0,-5;"LSYMB2[L[5];PR0,-5;"LSYMB2[L[5];/
 114         TEXT /PR0,-5;"LSYMB2[H[5];PR0,-5;"CNT16X[40];/
 115
 116         TEXT /PR10,0,0,-25,-257.5,0,0,-62.5,22.5,0;PU;/
 117         TEXT /PR0,5;PD;PR-20,0,0,55,220,0,0,27.5;PU;/
 118         TEXT /PR-35,0;PD;PR0,-30,-182.5,0,0,-47.5,17.5,0;PU;/
 119         TEXT /PR0,5;PD;PR-15,0,0,40,145,0,0,32.5;PU;/
 120         TEXT /PR-35,0;PD;PR0,-35;PU;PR45,-32.5;PD;/
 121         TEXT /PR-12.5,0,0,32.5,-140,0,0,-32.5,12.5,0;/
 122         TEXT /PU0,5;PD;PR-7.5,0,0,25,137.5,0,0,-25,10,0;PU;/
 123         TEXT /PR0,5;PD;PR-7.5,0,0,17.5,-137.5,0,0,-17.5,5,0;PU;/
 124         TEXT /PR0,5;PD;PR-10,0,0,10,145,0,0,-10,5,0;PU;
 125         TEXT /PR0,-20;PD;PR-15,0,0,40;PU;PU-2.5,2.5;PD0,-47.5,17.5,0;
 126         TEXT /PU0,-5;PD-20,0,0,55;PU-2.5,2.5;PD0,-62.5,22.5,0;/
 127         TEXT /PU-80,50;PD0,37.5,10,0;PU-35,0;PD-10,0,0,-40;
 128         TEXT /PU-35,-2.5;PD0,42.5;PU-35,0;PD0,-20,275,0,0,15,-5,0;/
 129         TEXT /PU0,10;PD10,0,0,30,-320,0;"ARWIS2[K];/
 130         TEXT /PU10,-50;PD280,0,0,10,5,0;/
 131         TEXT /PU-10,40;PD0,-30,-10,0;PU0,-10;PD5,0,0,-15;PU-25,5;PD0,10,5,0;/
 132         TEXT /PU-10,40;PD0,-30,-10,0;PU0,-10;PD5,0,0,-15;PU-25,5;PD0,10,5,0;/
 133         TEXT /PU-10,40;PD0,-30,-10,0;PU0,-10;PD5,0,0,-15;PU-25,5;PD0,10,5,0;/
 134         TEXT /PU-10,40;PD0,-30,-10,0;PU0,-10;PD5,0,0,-15;PU-25,5;PD0,10,5,0;/
 135         TEXT /PU-10,40;PD0,-30,-10,0;PU0,-10;PD5,0,0,-15;PU-25,5;PD0,10,5,0;/
 136         TEXT /PU-10,40;PD0,-30,-10,0;PU0,-10;PD5,0,0,-15;PU-25,5;PD0,10,5,0;/
 137         TEXT /PU-10,40;PD0,-30,-10,0;PU0,-10;PD5,0,0,-15;PU-25,5;PD0,10,5,0;/
 138         TEXT /PU;/
 139         0
 140
 141 \f/ CLOCK GENERATION
 142
 143 PLSC2,  TEXT /PU;PA37.5,30;PR5,20;PD0,-5;"RN3[R1];PD0,-5;PU-5,0;"ARWIS2[M];/
 144         TEXT /PD12.5,0;"INV0[54[ 5[6];PD7.5,0,0,27.5,-7.5,0;/
 145         TEXT /"INV2[84[9[ 8];PD-7.5;0,0,27.5,20,0;/
 146         TEXT /"NAND20[64[ 9[ 8[10];PD7.5,0,0,35,12.5,0,0,37.5,-30,0;/
 147         TEXT /"AND22[73[5[6[ 4];PD-7.5,0,0,42.5,10,0;/
 148         /CLOCK
 149         TEXT /PU-12.5,-15;"ARWIS2[J];PD32.5,0,0,-7.5,-7.5,0;/
 150         TEXT /PU32.5,-2.5;PD-10,0;PU10,-5;PD-10,0;/
 151         TEXT /"NAND22[64[5[6[ 4];PD-12.5,0;"AND22[73[1[2[ 3];/
 152         TEXT /PD-12.5,0,0,35,10,0;/
 153         /LOAD
 154         TEXT /PU12.5,-50;"LSYMB[H[5];PU30,-17.5;PD-7.5,0;/
 155         TEXT /"INV2[54[13[12];PD-15,0;"INV2[54[1[ 2];/
 156         TEXT /PD-7.5,0;PU25,0;PD0,-30,-7.5,0;/
 157         TEXT /"INV2[54[11[10];PD-7.5,0,0,30;PU25,-15;/
 158         TEXT /PD-7.5,0;"INV2[54[3[ 4];PD-12.5,0;/
 159         TEXT /"ARWOS2[L];/
 160         0
 161 \f/ DURATION MUX AND COUNTER
 162
 163 PLSC2,  TEXT /PA120,157.5;/
 164         TEXT /PR15,0;"LSYMB0[L[5];PU0,-5;"LSYMB0[L[5];/
 165         TEXT /PU-15,5;"MUX512[62];PD7.5,0,0,-10,-55,0,0,-7.5,7.5,0;/
 166         TEXT /PU0,85;PD0,-65,-10,0,0,-25,10,0;"AND20[64[ 1[ 2[3];/
 167         TEXT /PD15,0;"CNT102[72];PD-10,0,0,-55,-7.5,0;PU-7.5,15;/
 168         TEXT /"ARWIS2[I];PD25,0;PU-20,0;PD0,60,20,0;/
 169         TEXT /PU-10,15;PD0,-10,-5,0,0,-50,15,0;/
 170         TEXT /PU15,0;"LSYMB0[L[5];PU0,-5;"LSYMB0[L[5];/
 171         TEXT /PU0,-5;"LSYMB0[L[5];PU0,-5;"LSYMB0[L[5];PU-15,15;/
 172         TEXT /"CNT102[70];PD-17.5,0;"OR22[50[9[8[10];
 173         TEXT /PD-7.5,0;"ARWOS2[D];PU35,12.5;"LSYMB2[H[5];/
 174         TEXT /PU0,10;"LSYMB2[H[5];PU0,5;PD-10,0;PU10,45;"LSYMB2[H[5];/
 175         TEXT /PU0,10;"LSYMB2[H[5];PU0,5;"LSYMB2[L[5];/
 176 /       MUX SWITCH
 177         TEXT /PU15,45;PD37.5,0,0,5;"RN1[N57];PD0,5;/
 178         TEXT /PU5,0;PD0,-5;"RN3[N56];PD0,-10,-42.5,0;/
 179         TEXT /PU0,-5;PD47.5,0,0,15;"RN1[N55];PD0,5;/
 180         TEXT /PU-10,0;PD12.5,0;"PLUS0];/
 181         TEXT /PU-20,0;/
 182         /"GRND0];
 183         TEXT /PU1.5,-1;PD2,0;PU-1,2;PD0,-2;PU-2.5,1;/
 184         TEXT /PD-15,0,0,-7.5;PU-2,0;PD2,-5,0,-7.5;/
 185         TEXT /PU5,20;PD0,-7.5;PU-2,0;PD2,-5,0,-12.5;/
 186         TEXT /PU5,25;PD0,-7.5;PU-2,0;PD2,-5,0,-17.5;/
 187         TEXT /PU4,15;SP'8;LT2,.75;PD0,10,-18,0,0,-10,18,0;LT;SP'7;/
 188 /       LSD SWITCH
 189         TEXT /PU-16.5,-25;PD0,-5;"RN3[N34];PD0,-47.5;PU-2,0;PD2,-5,0,-7.5;/
 190         TEXT /PU5,75;PD0,-5;"RN3[N35];PD0,-47.5;PU-2,0;PD2,-5,0,-7.5;/
 191         TEXT /PU5,75;PD0,-5;"RN3[N36];PD0,-47.5;PU-2,0;PD2,-5,0,-7.5;/
 192         TEXT /PU5,75;PD0,-5;"RN3[N37];PD0,-47.5;PU-2,0;PD2,-5,0,-7.5;/
 193         TEXT /PU5,75;PD0,-5;"RN3[N65];PD0,-47.5;PU-2,0;PD2,-5,0,-7.5;/
 194         TEXT /PU5,75;PD0,-5;"RN3[N64];PD0,-47.5;PU-2,0;PD2,-5,0,-7.5;/
 195         TEXT /PU5,75;PD0,-5;"RN3[N63];PD0,-47.5;PU-2,0;PD2,-5,0,-7.5;/
 196         TEXT /PU5,75;PD0,-5;"RN3[N62];PD0,-47.5;PU-2,0;PD2,-5,0,-7.5;/
 197         TEXT /PU2.5,0;/
 198         /"GRND0];
 199         TEXT /PU1.5,-1;PD2,0;PU-1,2;PD0,-2;PU-2.5,1;/
 200         TEXT /PD-37.5,0;PU-4,5;LT2,.75;SP'8;PD0,10,43,0,0,-10,-43,0;/
 201         TEXT /PU-8.5,15;LT;SP'7;/
 202         TEXT /PD47.5,0;"CROSS];PD7.5,0;PU0,5;/
 203         TEXT /PD-12.5,0;"CROSS];PD-42.5,0;PU0,5;/
 204         TEXT /PD37.5,0;"CROSS];PD17.5,0;PU0,5;/
 205         TEXT /PD-22.5,0;"CROSS];PD-32.5,0;PU0,5;/
 206         TEXT /PD27.5,0;"CROSS];PD27.5,0;PU0,5;/
 207         TEXT /PD-32.5,0;"CROSS];PD-22.5,0;PU0,5;/
 208         TEXT /PD17.5,0;"CROSS];PD37.5,0;PU0,5;/
 209         TEXT /PD-42.5,0;"CROSS];PD-12.5,0;/
 210         TEXT /PU12.5,20;PD37.5,0;"PLUS0];/
 211 /       MSB SWITCH
 212         TEXT /PU7.5,-80;"PLUS0];PD-17.5,0;PU15,0;/
 213         TEXT /PD0,-5;"RN3[N12];PD0,-20;PU-5,5;/
 214         TEXT /PD0,15;"RN1[N13];PD0,5;PU-5,0;/
 215         TEXT /PD0,-5;"RN3[N14];PD0,-10;PU-5,5;/
 216         TEXT /PD0,5;"RN1[N15];PD0,5;/
 217         TEXT /PU-7.5,0;/
 218         /"GRND0];
 219         TEXT /PU1.5,-1;PD2,0;PU-1,2;PD0,-2;PU-2.5,1;/
 220         TEXT /PD-17.5,0;PU15,0;/
 221         TEXT /PD0,-7.5;PU-2,0;PD2,-5;PD0,-22.5;PU-5,35;/
 222         TEXT /PD0,-7.5;PU-2,0;PD2,-5;PD0,-17.5;PU-5,30;/
 223         TEXT /PD0,-7.5;PU-2,0;PD2,-5;PD0,-12.5;PU-5,25;/
 224         TEXT /PD0,-7.5;PU-2,0;PD2,-5;PD0,-7.5;PU-4,5;SP'8;LT2,.75;/
 225         TEXT /PD0,10,23,0,0,-10,-23,0;PU-11,-5;SP'7;LT;/
 226         TEXT /PD62.5,0;PU0,-5;PD-62.5,0;PU0,-5;PD62.5,0;PU0,-5;PD-62.5,0;/
 227 /       DUR ZERO
 228         TEXT /PU62.5,0;"NOR40[80[ 9[10[11[12[13];/
 229         TEXT /PD7.5,0,0,20,-22.5,0,0,7.5,7.5,0;"OR20[50[ 2[ 1[3];/
 230         TEXT /PD7.5,0;"ARWOS0[F];/
 231         TEXT /PU-32.5,22.5;"NOR80[82];/
 232         TEXT /PD7.5,0,0,-30,-15,0,0,-7.5,7.5,0;/
 233         0
 234
 235 \f/ PULSE WIDTH MUX AND COUNTER
 236
 237 PLSC4,  TEXT /PA260,157.5;/
 238         TEXT /PR15,0;"LSYMB0[L[5];PU0,-5;"LSYMB0[L[5];/
 239         TEXT /PU-15,5;"MUX512[61];PD7.5,0,0,-10,-55,0,0,-7.5,7.5,0;/
 240         TEXT /PU0,85;PD0,-65,-10,0,0,-25,10,0;"AND20[64[12[13[11];/
 241         TEXT /PD15,0;"CNT102[71];PD-10,0,0,-55,-7.5,0;PU-7.5,15;/
 242         TEXT /"ARWIS2[H];PD25,0;PU-20,0;PD0,60,20,0;/
 243         TEXT /PU-10,15;PD0,-10,-5,0,0,-50,15,0;/
 244         TEXT /PU15,0;"LSYMB0[L[5];PU0,-5;"LSYMB0[L[5];/
 245         TEXT /PU0,-5;"LSYMB0[L[5];PU0,-5;"LSYMB0[L[5];PU-15,15;/
 246         TEXT /"CNT102[60];PD-17.5,0;"OR22[50[13[12[11];
 247         TEXT /PD-7.5,0;"ARWOS2[E];PU35,12.5;"LSYMB2[H[5];/
 248         TEXT /PU0,10;"LSYMB2[H[5];PU0,5;PD-10,0;PU10,45;"LSYMB2[H[5];/
 249         TEXT /PU0,10;"LSYMB2[H[5];PU0,5;"LSYMB2[L[5];/
 250 /       MUX SWITCH
 251         TEXT /PU15,45;PD37.5,0,0,5;"RN1[N27];PD0,5;/
 252         TEXT /PU5,0;PD0,-5;"RN3[N32];PD0,-10,-42.5,0;/
 253         TEXT /PU0,-5;PD47.5,0,0,15;"RN1[N31];PD0,5;/
 254         TEXT /PU-10,0;PD12.5,0;"PLUS0];/
 255         TEXT /PU-20,0;/
 256         /"GRND0];
 257         TEXT /PU1.5,-1;PD2,0;PU-1,2;PD0,-2;PU-2.5,1;/
 258         TEXT /PD-15,0,0,-7.5;PU-2,0;PD2,-5,0,-7.5;/
 259         TEXT /PU5,20;PD0,-7.5;PU-2,0;PD2,-5,0,-12.5;/
 260         TEXT /PU5,25;PD0,-7.5;PU-2,0;PD2,-5,0,-17.5;/
 261         TEXT /PU4,15;SP'8;LT2,.75;PD0,10,-18,0,0,-10,18,0;LT;SP'7;/
 262 /       LSD SWITCH
 263         TEXT /PU-16.5,-25;PD0,-5;"RN3[N23];PD0,-47.5;PU-2,0;PD2,-5,0,-7.5;/
 264         TEXT /PU5,75;PD0,-5;"RN3[N24];PD0,-47.5;PU-2,0;PD2,-5,0,-7.5;/
 265         TEXT /PU5,75;PD0,-5;"RN3[N25];PD0,-47.5;PU-2,0;PD2,-5,0,-7.5;/
 266         TEXT /PU5,75;PD0,-5;"RN3[N16];PD0,-47.5;PU-2,0;PD2,-5,0,-7.5;/
 267         TEXT /PU5,75;PD0,-5;"RN3[N54];PD0,-47.5;PU-2,0;PD2,-5,0,-7.5;/
 268         TEXT /PU5,75;PD0,-5;"RN3[N53];PD0,-47.5;PU-2,0;PD2,-5,0,-7.5;/
 269         TEXT /PU5,75;PD0,-5;"RN3[N52];PD0,-47.5;PU-2,0;PD2,-5,0,-7.5;/
 270         TEXT /PU5,75;PD0,-5;"RN3[N51];PD0,-47.5;PU-2,0;PD2,-5,0,-7.5;/
 271         TEXT /PU2.5,0;/
 272         /"GRND0];
 273         TEXT /PU1.5,-1;PD2,0;PU-1,2;PD0,-2;PU-2.5,1;/
 274         TEXT /PD-37.5,0;PU-4,5;LT2,.75;SP'8;PD0,10,43,0,0,-10,-43,0;/
 275         TEXT /PU-8.5,15;LT;SP'7;/
 276         TEXT /PD47.5,0;"CROSS];PD7.5,0;PU0,5;/
 277         TEXT /PD-12.5,0;"CROSS];PD-42.5,0;PU0,5;/
 278         TEXT /PD37.5,0;"CROSS];PD17.5,0;PU0,5;/
 279         TEXT /PD-22.5,0;"CROSS];PD-32.5,0;PU0,5;/
 280         TEXT /PD27.5,0;"CROSS];PD27.5,0;PU0,5;/
 281         TEXT /PD-32.5,0;"CROSS];PD-22.5,0;PU0,5;/
 282         TEXT /PD17.5,0;"CROSS];PD37.5,0;PU0,5;/
 283         TEXT /PD-42.5,0;"CROSS];PD-12.5,0;/
 284         TEXT /PU12.5,20;PD37.5,0;"PLUS0];/
 285 /       MSB SWITCH
 286         TEXT /PU7.5,-80;"PLUS0];PD-17.5,0;PU15,0;/
 287         TEXT /PD0,-5;"RN3[N41];PD0,-20;PU-5,5;/
 288         TEXT /PD0,15;"RN1[N42];PD0,5;PU-5,0;/
 289         TEXT /PD0,-5;"RN3[N43];PD0,-10;PU-5,5;/
 290         TEXT /PD0,5;"RN1[N44];PD0,5;/
 291         TEXT /PU-7.5,0;/
 292         /"GRND0];
 293         TEXT /PU1.5,-1;PD2,0;PU-1,2;PD0,-2;PU-2.5,1;/
 294         TEXT /PD-17.5,0;PU15,0;/
 295         TEXT /PD0,-7.5;PU-2,0;PD2,-5;PD0,-22.5;PU-5,35;/
 296         TEXT /PD0,-7.5;PU-2,0;PD2,-5;PD0,-17.5;PU-5,30;/
 297         TEXT /PD0,-7.5;PU-2,0;PD2,-5;PD0,-12.5;PU-5,25;/
 298         TEXT /PD0,-7.5;PU-2,0;PD2,-5;PD0,-7.5;PU-4,5;SP'8;LT2,.75;/
 299         TEXT /PD0,10,23,0,0,-10,-23,0;PU-11,-5;SP'7;LT;/
 300         TEXT /PD62.5,0;PU0,-5;PD-62.5,0;PU0,-5;PD62.5,0;PU0,-5;PD-62.5,0;/
 301 /       DUR ZERO
 302         TEXT /PU62.5,0;"NOR40[80[ 5[ 4[ 3[ 2[1];/
 303         TEXT /PD7.5,0,0,20,-22.5,0,0,7.5,7.5,0;"OR20[50[ 6[ 5[4];/
 304         TEXT /PD7.5,0;"ARWOS0[G];/
 305         TEXT /PU-32.5,22.5;"NOR80[81];/
 306         TEXT /PD7.5,0,0,-30,-15,0,0,-7.5,7.5,0;/
 307         0
 308
 309         >
 310 \f       IFDEF LOGIC     <
 311 PLSC0,  TEXT /"COMMON[[[[[[[1[1];/
 312         TEXT /SP'7;/
 313 /       TEXT /VS5;/
 314         0
 315
 316         >
 317
 318         FIELD 0
 319 \f       IFDEF LOGIC     <
 320 PLSC0,  TEXT /"COMMON[[[[[[[1[1];/
 321         TEXT /SP'7;/
 322 /       TEXT /VS5;/
 323         0
 324
 325         >
 326
 327         FIELD 0
 328 \f\1a