(***************************************************************************)
(*                                                                         *)
(*                         Copyright (C) 1987-1990                         *)
(*                      by Gogesch Micro Systems, INC.                     *)
(*                                                                         *)
(*                           All rights reserved.                          *)
(*                                                                         *)
(***************************************************************************)


;THE FOLLOWING MODELS WERE TAKEN FROM 1987 SIGNETICS PROGRAMMABLE
;LOGIC DATA MANUAL

%StartModel
%Manufacturer:Signetics
%Type:16V8
%PartNumber:PLC16V8Q-35
%LastNode ? ?
%NumPins: 20
%FDF AND 0 P2 ~P2 N1 ~N1 P3 ~P3 N2 ~N2 P4 ~P4 N3 ~N3 P5 ~P5 N4 ~N4 P6 ~P6
     N5 ~N5 P7 ~P7 N6 ~N6 P8 ~P8 N7 ~N7 P9 ~P9 N8 ~N8 *

%MACRO V8MAC(S0:%SF, XorFuse:%SF, FeedBack:%TEXT, LorOutput:%TEXT, InFuse:%FF,
             OutPin:%TEXT, TNode:%TEXT, EnableFuse:%SF, TLNode:%TEXT,
	     TSNode:%TEXT);

 %CASE %SF2192,%SF2193,%S0
   0:
     LOR(%InFuse+32,%InFuse+64,%InFuse+96,%InFuse+128,%InFuse+160,
         %InFuse+192,%InFuse+224;LorOutput);
     %IF %EnableFuse..%EnableFuse+31 = 1 %THEN
      %IF %XorFuse = 0 %THEN
       INV(LorOutput; OutPin; 33,33,35,35);
      %ELSE
       BUF(LorOutput; OutPin; 33,33,35,35);
      %END;
     %ELSE
      %IF %XorFuse = 0 %THEN
       INV(LorOutput; TNode; 33,33,35,35);
      %ELSE
       BUF(LorOutput; TNode; 33,33,35,35);
      %END;
      TSB(TNode, %InFuse; OutPin; 33,33,33,33,35,35,35,35);
     %END;
     BUF(OutPin; FeedBack; 0,0,0,0);
  |1:
     TSB(TSNode, ZERO; OutPin; 23,23,23,23,25,25,25,25);
     BUF(OutPin; FeedBack; 0,0,0,0);
  |2:
     LOR(%InFuse,%InFuse+32,%InFuse+64,%InFuse+96,%InFuse+128,%InFuse+160,
         %InFuse+192,%InFuse+224;LorOutput);
     %IF %XorFuse = 0 %THEN
      INV(LorOutput; OutPin; 33,33,35,35);
     %ELSE
      BUF(LorOutput; OutPin; 33,33,35,35);
     %END;
     BUF(ZERO; FeedBack; 0,0,0,0);
   |7:
     LOR(%InFuse,%InFuse+32,%InFuse+64,%InFuse+96,%InFuse+128,%InFuse+160,
         %InFuse+192,%InFuse+224;LorOutput);
     %IF %XorFuse=0 %THEN
      LINV(LorOutput;TLNode);
      DQFFC(TLNode, P1, IPL; TNode; 33,33,35,0,20,20,1,1,1,1,35,35,35,0,20,20,1,1,1,1);
     %ELSE
      DQFFC(LorOutput, P1, IPL; TNode; 33,33,35,0,20,20,1,1,1,1,35,35,35,0,20,20,1,1,1,1);
     %END;
     TSB(TNode, L17; OutPin; 23,23,23,23,25,25,25,25);
     BUF(TNode; FeedBack; 0,0,0,0);
 %END;
%MACEND;

LINV(P11;L17);

V8MAC(%SF2120, %SF2048, N1, L1, %FF00, P19, N9, %SF00, L9, N17);
V8MAC(%SF2121, %SF2049, N2, L2, %FF256, P18, N10, %SF256, L10, N18);
V8MAC(%SF2122, %SF2050, N3, L3, %FF512, P17, N11, %SF512, L11, N19);
V8MAC(%SF2123, %SF2051, N4, L4, %FF768, P16, N12, %SF768, L12, N20);
V8MAC(%SF2124, %SF2052, N5, L5, %FF1024, P15, N13, %SF1024, L13, N21);
V8MAC(%SF2125, %SF2053, N6, L6, %FF1280, P14, N14, %SF1280, L14, N22);
V8MAC(%SF2126, %SF2054, N7, L7, %FF1536, P13, N15, %SF1536, L15, N23);
V8MAC(%SF2127, %SF2055, N8, L8, %FF1792, P12, N16, %SF1792, L16, N24);
%EndModel

%StartModel
%Manufacturer:Signetics
%Type:16V8
%PartNumber:PLC16V8Q-25
%LastNode ? ?
%NumPins: 20
%FDF AND 0 P2 ~P2 N1 ~N1 P3 ~P3 N2 ~N2 P4 ~P4 N3 ~N3 P5 ~P5 N4 ~N4 P6 ~P6
     N5 ~N5 P7 ~P7 N6 ~N6 P8 ~P8 N7 ~N7 P9 ~P9 N8 ~N8 *

%MACRO V8MAC(S0:%SF, XorFuse:%SF, FeedBack:%TEXT, LorOutput:%TEXT, InFuse:%FF,
             OutPin:%TEXT, TNode:%TEXT, EnableFuse:%SF, TLNode:%TEXT,
	     TSNode:%TEXT);

 %CASE %SF2192,%SF2193,%S0
   0:
     LOR(%InFuse+32,%InFuse+64,%InFuse+96,%InFuse+128,%InFuse+160,
         %InFuse+192,%InFuse+224;LorOutput);
     %IF %EnableFuse..%EnableFuse+31 = 1 %THEN
      %IF %XorFuse = 0 %THEN
       INV(LorOutput; OutPin; 43,43,45,45);
      %ELSE
       BUF(LorOutput; OutPin; 43,43,45,45);
      %END;
     %ELSE
      %IF %XorFuse = 0 %THEN
       INV(LorOutput; TNode; 43,43,45,45);
      %ELSE
       BUF(LorOutput; TNode; 43,43,45,45);
      %END;
      TSB(TNode, %InFuse; OutPin; 43,43,43,43,45,45,45,45);
     %END;
     BUF(OutPin; FeedBack; 0,0,0,0);
  |1:
     TSB(TSNode, ZERO; OutPin; 28,28,28,28,30,30,30,30);
     BUF(OutPin; FeedBack; 0,0,0,0);
  |2:
     LOR(%InFuse,%InFuse+32,%InFuse+64,%InFuse+96,%InFuse+128,%InFuse+160,
         %InFuse+192,%InFuse+224;LorOutput);
     %IF %XorFuse = 0 %THEN
      INV(LorOutput; OutPin; 43,43,45,45);
     %ELSE
      BUF(LorOutput; OutPin; 43,43,45,45);
     %END;
     BUF(ZERO; FeedBack; 0,0,0,0);
   |7:
     LOR(%InFuse,%InFuse+32,%InFuse+64,%InFuse+96,%InFuse+128,%InFuse+160,
         %InFuse+192,%InFuse+224;LorOutput);
     %IF %XorFuse=0 %THEN
      LINV(LorOutput;TLNode);
      DQFFC(TLNode, P1, IPL; TNode; 43,43,40,0,25,25,1,1,1,1,45,45,40,0,25,25,1,1,1,1);
     %ELSE
      DQFFC(LorOutput, P1, IPL; TNode; 43,43,40,0,25,25,1,1,1,1,45,45,40,0,25,25,1,1,1,1);
     %END;
     TSB(TNode, L17; OutPin; 28,28,28,28,30,30,30,30);
     BUF(TNode; FeedBack; 0,0,0,0);
 %END;
%MACEND;

LINV(P11;L17);

V8MAC(%SF2120, %SF2048, N1, L1, %FF00, P19, N9, %SF00, L9, N17);
V8MAC(%SF2121, %SF2049, N2, L2, %FF256, P18, N10, %SF256, L10, N18);
V8MAC(%SF2122, %SF2050, N3, L3, %FF512, P17, N11, %SF512, L11, N19);
V8MAC(%SF2123, %SF2051, N4, L4, %FF768, P16, N12, %SF768, L12, N20);
V8MAC(%SF2124, %SF2052, N5, L5, %FF1024, P15, N13, %SF1024, L13, N21);
V8MAC(%SF2125, %SF2053, N6, L6, %FF1280, P14, N14, %SF1280, L14, N22);
V8MAC(%SF2126, %SF2054, N7, L7, %FF1536, P13, N15, %SF1536, L15, N23);
V8MAC(%SF2127, %SF2055, N8, L8, %FF1792, P12, N16, %SF1792, L16, N24);
%EndModel

%StartModel
%Manufacturer:Signetics
%Type:20V8
%PartNumber:PLC20V8Q-35
%LastNode ? ?
%NumPins: 24
%FDF AND 0 P2 ~P2 N1 ~N1 P3 ~P3 N2 ~N2 P4 ~P4 N3 ~N3 P5 ~P5 N4 ~N4 P6 ~P6
     N5 ~N5 P7 ~P7 N6 ~N6 P8 ~P8 N7 ~N7 P9 ~P9 N8 ~N8 P10 ~P10 N9 ~N9
     P11 ~P11 N10 ~N10 *

%MACRO FEEDBACK(FeedBackFuse: %SF, N1FeedBack: %TEXT, N10FeedBack: %TEXT);
 %IF %FeedBackFuse=1 %THEN
  BUF(P1; N1FeedBack; 0,0,0,0);
  BUF(P13; N10FeedBack; 0,0,0,0);
 %ELSE
  BUF(P23; N1FeedBack; 0,0,0,0);
  BUF(P14; N10FeedBack; 0,0,0,0);
 %END;
%MACEND;

%MACRO V8MAC(S0:%SF, XorFuse:%SF, FeedBack:%TEXT, LorOutput:%TEXT, InFuse:%FF,
             OutPin:%TEXT, TNode:%TEXT, EnableFuse:%SF, TLNode:%TEXT,
	     TSNode:%TEXT, OutPin:%TEXT);
 %CASE %SF2704,%SF2705,%S0
   0:
     LOR(%InFuse+32,%InFuse+64,%InFuse+96,%InFuse+128,%InFuse+160,
         %InFuse+192,%InFuse+224;LorOutput);
     %IF %EnableFuse..%EnableFuse+31 = 1 %THEN
      %IF %XorFuse = 0 %THEN
       INV(LorOutput; OutPin; 33,33,35,35);
      %ELSE
       BUF(LorOutput; OutPin; 33,33,35,35);
      %END;
     %ELSE
      %IF %XorFuse = 0 %THEN
       INV(LorOutput; TNode; 33,33,35,35);
      %ELSE
       BUF(LorOutput; TNode; 33,33,35,35);
      %END;
      TSB(TNode, %InFuse; OutPin; 33,33,33,33,35,35,35,35);
     %END;
     BUF(OutPin; FeedBack; 0,0,0,0);
  |1:
     TSB(TSNode, ZERO; OutPin; 23,23,23,23,25,25,25,25);
     BUF(OutPin; FeedBack; 0,0,0,0);
  |2:
     LOR(%InFuse,%InFuse+32,%InFuse+64,%InFuse+96,%InFuse+128,%InFuse+160,
         %InFuse+192,%InFuse+224;LorOutput);
     %IF %XorFuse = 0 %THEN
      INV(LorOutput; OutPin; 33,33,35,35);
     %ELSE
      BUF(LorOutput; OutPin; 33,33,35,35);
     %END;
     BUF(ZERO; FeedBack; 0,0,0,0);
   |7:
     LOR(%InFuse,%InFuse+32,%InFuse+64,%InFuse+96,%InFuse+128,%InFuse+160,
         %InFuse+192,%InFuse+224;LorOutput);
     %IF %XorFuse=0 %THEN
      LINV(LorOutput;TLNode);
      DQFFC(TLNode, P1, IPL; TNode; 33,33,35,0,20,20,1,1,1,1,35,35,35,0,20,20,1,1,1,1);
     %ELSE
      DQFFC(LorOutput, P1, IPL; TNode; 33,33,35,0,20,20,1,1,1,1,35,35,35,0,20,20,1,1,1,1);
     %END;
     TSB(TNode, L17; OutPin; 23,23,23,23,25,25,25,25);
     BUF(TNode; FeedBack; 0,0,0,0);
 %END;
%MACEND;

FEEDBACK(%SF2704, N1, N10);

LINV(P13;L17);

V8MAC(%SF2632, %SF2560, N2, L1, %FF00, P22, N11, %SF00, L9, N17, P23);
V8MAC(%SF2633, %SF2561, N3, L2, %FF320, P21, N12, %SF320, L10, N18, P22);
V8MAC(%SF2634, %SF2562, N4, L3, %FF640, P20, N13, %SF640, L11, N19, P21);
V8MAC(%SF2635, %SF2563, N5, L4, %FF960, P19, N14, %SF960, L12, N20, P20);
V8MAC(%SF2636, %SF2564, N6, L5, %FF1280, P18, N15, %SF1280, L13, N21, P17);
V8MAC(%SF2637, %SF2565, N7, L6, %FF1600, P17, N16, %SF1600, L14, N22, P16);
V8MAC(%SF2638, %SF2566, N8, L7, %FF1920, P16, N17, %SF1920, L15, N23, P15);
V8MAC(%SF2639, %SF2567, N9, L8, %FF2240, P15, N18, %SF2240, L16, N24, P14);
%EndModel

%StartModel
%Manufacturer:Signetics
%Type:20V8
%PartNumber:PLC20V8Q-45
%LastNode ? ?
%NumPins: 24
%FDF AND 0 P2 ~P2 N1 ~N1 P3 ~P3 N2 ~N2 P4 ~P4 N3 ~N3 P5 ~P5 N4 ~N4 P6 ~P6
     N5 ~N5 P7 ~P7 N6 ~N6 P8 ~P8 N7 ~N7 P9 ~P9 N8 ~N8 P10 ~P10 N9 ~N9
     P11 ~P11 N10 ~N10 *

%MACRO FEEDBACK(FeedBackFuse: %SF, N1FeedBack: %TEXT, N10FeedBack: %TEXT);
 %IF %FeedBackFuse=1 %THEN
  BUF(P1; N1FeedBack; 0,0,0,0);
  BUF(P13; N10FeedBack; 0,0,0,0);
 %ELSE
  BUF(P23; N1FeedBack; 0,0,0,0);
  BUF(P14; N10FeedBack; 0,0,0,0);
 %END;
%MACEND;

%MACRO V8MAC(S0:%SF, XorFuse:%SF, FeedBack:%TEXT, LorOutput:%TEXT, InFuse:%FF,
             OutPin:%TEXT, TNode:%TEXT, EnableFuse:%SF, TLNode:%TEXT,
	     TSNode:%TEXT, OutPin:%TEXT);
 %CASE %SF2704,%SF2705,%S0
   0:
     LOR(%InFuse+32,%InFuse+64,%InFuse+96,%InFuse+128,%InFuse+160,
         %InFuse+192,%InFuse+224;LorOutput);
     %IF %EnableFuse..%EnableFuse+31 = 1 %THEN
      %IF %XorFuse = 0 %THEN
       INV(LorOutput; OutPin; 33,33,35,35);
      %ELSE
       BUF(LorOutput; OutPin; 33,33,35,35);
      %END;
     %ELSE
      %IF %XorFuse = 0 %THEN
       INV(LorOutput; TNode; 33,33,35,35);
      %ELSE
       BUF(LorOutput; TNode; 33,33,35,35);
      %END;
      TSB(TNode, %InFuse; OutPin; 33,33,33,33,35,35,35,35);
     %END;
     BUF(OutPin; FeedBack; 0,0,0,0);
  |1:
     TSB(TSNode, ZERO; OutPin; 23,23,23,23,25,25,25,25);
     BUF(OutPin; FeedBack; 0,0,0,0);
  |2:
     LOR(%InFuse,%InFuse+32,%InFuse+64,%InFuse+96,%InFuse+128,%InFuse+160,
         %InFuse+192,%InFuse+224;LorOutput);
     %IF %XorFuse = 0 %THEN
      INV(LorOutput; OutPin; 33,33,35,35);
     %ELSE
      BUF(LorOutput; OutPin; 33,33,35,35);
     %END;
     BUF(ZERO; FeedBack; 0,0,0,0);
   |7:
     LOR(%InFuse,%InFuse+32,%InFuse+64,%InFuse+96,%InFuse+128,%InFuse+160,
         %InFuse+192,%InFuse+224;LorOutput);
     %IF %XorFuse=0 %THEN
      LINV(LorOutput;TLNode);
      DQFFC(TLNode, P1, IPL; TNode; 33,33,35,0,20,20,1,1,1,1,35,35,35,0,20,20,1,1,1,1);
     %ELSE
      DQFFC(LorOutput, P1, IPL; TNode; 33,33,35,0,20,20,1,1,1,1,35,35,35,0,20,20,1,1,1,1);
     %END;
     TSB(TNode, L17; OutPin; 23,23,23,23,25,25,25,25);
     BUF(TNode; FeedBack; 0,0,0,0);
 %END;
%MACEND;

FEEDBACK(%SF2704, N1, N10);

LINV(P13;L17);

V8MAC(%SF2632, %SF2560, N2, L1, %FF00, P22, N11, %SF00, L9, N17, P23);
V8MAC(%SF2633, %SF2561, N3, L2, %FF320, P21, N12, %SF320, L10, N18, P22);
V8MAC(%SF2634, %SF2562, N4, L3, %FF640, P20, N13, %SF640, L11, N19, P21);
V8MAC(%SF2635, %SF2563, N5, L4, %FF960, P19, N14, %SF960, L12, N20, P20);
V8MAC(%SF2636, %SF2564, N6, L5, %FF1280, P18, N15, %SF1280, L13, N21, P17);
V8MAC(%SF2637, %SF2565, N7, L6, %FF1600, P17, N16, %SF1600, L14, N22, P16);
V8MAC(%SF2638, %SF2566, N8, L7, %FF1920, P16, N17, %SF1920, L15, N23, P15);
V8MAC(%SF2639, %SF2567, N9, L8, %FF2240, P15, N18, %SF2240, L16, N24, P14);
%EndModel

;Delays for the following device are `typical' and `maximum'.
%StartModel
%Manufacturer:Signetics
%Type:16L8
%PartNumber:PLHS16L8A
%LastNode ? ?
%NumPins: 20
%FDF AND 0 P2 ~P2 P1 ~P1 P3 ~P3 P18 ~P18 P4 ~P4 P17 ~P17 P5 ~P5 P16 ~P16
     P6 ~P6 P15 ~P15 P7 ~P7 P14 ~P14 P8 ~P8 P13 ~P13 P9 ~P9 P11 ~P11 *

%MACRO NOR7ENABLE(EnableFuse:%SF, InFuse:%FF, OutPin:%TEXT, TNode:%TEXT);
 %IF %EnableFuse..%EnableFuse+31 = 1 %THEN
  NOR(%InFuse+32, %InFuse+64, %InFuse+96, %InFuse+128, %InFuse+160,
     %InFuse+192, %InFuse+224; OutPin; 14,14,20,20);
 %ELSE
  NOR(%InFuse+32, %InFuse+64, %InFuse+96, %InFuse+128, %InFuse+160,
     %InFuse+192, %InFuse+224; TNode; 14,14,20,20);
  TSB(TNode, %InFuse; OutPin; 14,14,14,14,20,20,20,20);
 %END;
%MACEND;

NOR7ENABLE(%SF00, %FF00, P19, N1);
NOR7ENABLE(%SF256, %FF256, P18, N2);
NOR7ENABLE(%SF512, %FF512, P17, N3);
NOR7ENABLE(%SF768, %FF768, P16, N4);
NOR7ENABLE(%SF1024, %FF1024, P15, N5);
NOR7ENABLE(%SF1280, %FF1280, P14, N6);
NOR7ENABLE(%SF1536, %FF1536, P13, N7);
NOR7ENABLE(%SF1792, %FF1792, P12, N8);
%EndModel

;Delays for the following device are `typical' and `maximum'.
%StartModel
%Manufacturer:Signetics
%Type:16L8
%PartNumber:PLHS16L8B
%LastNode ? ?
%NumPins: 20
%FDF AND 0 P2 ~P2 P1 ~P1 P3 ~P3 P18 ~P18 P4 ~P4 P17 ~P17 P5 ~P5 P16 ~P16
     P6 ~P6 P15 ~P15 P7 ~P7 P14 ~P14 P8 ~P8 P13 ~P13 P9 ~P9 P11 ~P11 *

%MACRO NOR7ENABLE(EnableFuse:%SF, InFuse:%FF, OutPin:%TEXT, TNode:%TEXT);
 %IF %EnableFuse..%EnableFuse+31 = 1 %THEN
  NOR(%InFuse+32, %InFuse+64, %InFuse+96, %InFuse+128, %InFuse+160,
     %InFuse+192, %InFuse+224; OutPin; 12,12,15,15);
 %ELSE
  NOR(%InFuse+32, %InFuse+64, %InFuse+96, %InFuse+128, %InFuse+160,
     %InFuse+192, %InFuse+224; TNode; 12,12,15,15);
  TSB(TNode, %InFuse; OutPin; 12,12,12,12,15,15,15,15);
 %END;
%MACEND;

NOR7ENABLE(%SF00, %FF00, P19, N1);
NOR7ENABLE(%SF256, %FF256, P18, N2);
NOR7ENABLE(%SF512, %FF512, P17, N3);
NOR7ENABLE(%SF768, %FF768, P16, N4);
NOR7ENABLE(%SF1024, %FF1024, P15, N5);
NOR7ENABLE(%SF1280, %FF1280, P14, N6);
NOR7ENABLE(%SF1536, %FF1536, P13, N7);
NOR7ENABLE(%SF1792, %FF1792, P12, N8);
%EndModel

;Delays for the following device are `typical' and `maximum'.
%StartModel
%Manufacturer:Signetics
%Type:18P8
%PartNumber:PLHS18P8A
%LastNode ? ?
%NumPins: 20
%FDF AND 0 P2 ~P2 P1 ~P1 P3 ~P3 P18 ~P18 P4 ~P4 P17 ~P17 P5 ~P5 P16 ~P16 P6 ~P6
   P15 ~P15 P7 ~P7 P14 ~P14 P8 ~P8 P13 ~P13 P9 ~P9 P11 ~P11 P19 ~P19 P12 ~P12 *

%MACRO POR8ENABLE(EnableFuse:%SF, InFuse:%FF, XorFuse:%SF, OutPin:%TEXT, TNode:%TEXT);
 %IF %EnableFuse..%EnableFuse+35 = 1 %THEN
  %IF %XorFuse = 0 %THEN
   NOR(%InFuse+36, %InFuse+72, %InFuse+108, %InFuse+144, %InFuse+180,
      %InFuse+216, %InFuse+252, %InFuse+288; OutPin; 14,14,20,20);
  %ELSE
   OR(%InFuse+36, %InFuse+72, %InFuse+108, %InFuse+144, %InFuse+180,
       %InFuse+216, %InFuse+252, %InFuse+288; OutPin; 14,14,20,20);
  %END;
 %ELSE
  %IF %XorFuse = 0 %THEN
   NOR(%InFuse+36, %InFuse+72, %InFuse+108, %InFuse+144, %InFuse+180,
      %InFuse+216, %InFuse+252, %InFuse+288; TNode; 14,14,20,20);
  %ELSE
   OR(%InFuse+36, %InFuse+72, %InFuse+108, %InFuse+144, %InFuse+180,
     %InFuse+216, %InFuse+252, %InFuse+288; TNode; 14,14,20,20);
  %END;
  TSB(TNode, %InFuse; OutPin; 14,14,14,14,20,20,20,20);
 %END;
%MACEND;

POR8ENABLE(%SF00, %FF00, %SF2592, P19, N1);
POR8ENABLE(%SF324, %FF324, %SF2593, P18, N2);
POR8ENABLE(%SF648, %FF648, %SF2594, P17, N3);
POR8ENABLE(%SF972, %FF972, %SF2595, P16, N4);
POR8ENABLE(%SF1296, %FF1296, %SF2596, P15, N5);
POR8ENABLE(%SF1620, %FF1620, %SF2597, P14, N6);
POR8ENABLE(%SF1944, %FF1944, %SF2598, P13, N7);
POR8ENABLE(%SF2268, %FF2268, %SF2599, P12, N8);
%EndModel

;Delays for the following device are `typical' and `maximum'.
%StartModel
%Manufacturer:Signetics
%Type:18P8
%PartNumber:PLHS18P8B
%LastNode ? ?
%NumPins: 20
%FDF AND 0 P2 ~P2 P1 ~P1 P3 ~P3 P18 ~P18 P4 ~P4 P17 ~P17 P5 ~P5 P16 ~P16 P6 ~P6
   P15 ~P15 P7 ~P7 P14 ~P14 P8 ~P8 P13 ~P13 P9 ~P9 P11 ~P11 P19 ~P19 P12 ~P12 *

%MACRO POR8ENABLE(EnableFuse:%SF, InFuse:%FF, XorFuse:%SF, OutPin:%TEXT, TNode:%TEXT);
 %IF %EnableFuse..%EnableFuse+35 = 1 %THEN
  %IF %XorFuse = 0 %THEN
   NOR(%InFuse+36, %InFuse+72, %InFuse+108, %InFuse+144, %InFuse+180,
      %InFuse+216, %InFuse+252, %InFuse+288; OutPin; 12,12,15,15);
  %ELSE
   OR(%InFuse+36, %InFuse+72, %InFuse+108, %InFuse+144, %InFuse+180,
       %InFuse+216, %InFuse+252, %InFuse+288; OutPin; 12,12,15,15);
  %END;
 %ELSE
  %IF %XorFuse = 0 %THEN
   NOR(%InFuse+36, %InFuse+72, %InFuse+108, %InFuse+144, %InFuse+180,
      %InFuse+216, %InFuse+252, %InFuse+288; TNode; 12,12,15,15);
  %ELSE
   OR(%InFuse+36, %InFuse+72, %InFuse+108, %InFuse+144, %InFuse+180,
     %InFuse+216, %InFuse+252, %InFuse+288; TNode; 12,12,15,15);
  %END;
  TSB(TNode, %InFuse; OutPin; 12,12,12,12,15,15,15,15);
 %END;
%MACEND;

POR8ENABLE(%SF00, %FF00, %SF2592, P19, N1);
POR8ENABLE(%SF324, %FF324, %SF2593, P18, N2);
POR8ENABLE(%SF648, %FF648, %SF2594, P17, N3);
POR8ENABLE(%SF972, %FF972, %SF2595, P16, N4);
POR8ENABLE(%SF1296, %FF1296, %SF2596, P15, N5);
POR8ENABLE(%SF1620, %FF1620, %SF2597, P14, N6);
POR8ENABLE(%SF1944, %FF1944, %SF2598, P13, N7);
POR8ENABLE(%SF2268, %FF2268, %SF2599, P12, N8);
%EndModel

;Delays for the following device are `typical' and `maximum'.
%StartModel
%Manufacturer:Signetics
%Type:16L8
%PartNumber:PLUS16L8-7
%LastNode ? ?
%NumPins: 20
%FDF AND 0 P2 ~P2 P1 ~P1 P3 ~P3 P18 ~P18 P4 ~P4 P17 ~P17 P5 ~P5 P16 ~P16
     P6 ~P6 P15 ~P15 P7 ~P7 P14 ~P14 P8 ~P8 P13 ~P13 P9 ~P9 P11 ~P11 *

%MACRO NOR7ENABLE(EnableFuse:%SF, InFuse:%FF, OutPin:%TEXT, TNode:%TEXT);
 %IF %EnableFuse..%EnableFuse+31 = 1 %THEN
  NOR(%InFuse+32, %InFuse+64, %InFuse+96, %InFuse+128, %InFuse+160,
     %InFuse+192, %InFuse+224; OutPin; 7,7,8,8);
 %ELSE
  NOR(%InFuse+32, %InFuse+64, %InFuse+96, %InFuse+128, %InFuse+160,
     %InFuse+192, %InFuse+224; TNode; 7,7,8,8);
  TSB(TNode, %InFuse; OutPin; 3,3,3,3,10,10,10,10);
 %END;
%MACEND;

NOR7ENABLE(%SF00, %FF00, P19, N1);
NOR7ENABLE(%SF256, %FF256, P18, N2);
NOR7ENABLE(%SF512, %FF512, P17, N3);
NOR7ENABLE(%SF768, %FF768, P16, N4);
NOR7ENABLE(%SF1024, %FF1024, P15, N5);
NOR7ENABLE(%SF1280, %FF1280, P14, N6);
NOR7ENABLE(%SF1536, %FF1536, P13, N7);
NOR7ENABLE(%SF1792, %FF1792, P12, N8);
%EndModel

;Delays for the following device are `typical' and `maximum'.
%StartModel
%Manufacturer:Signetics
%Type:16R4
%PartNumber:PLUS16R4-7
%LastNode ? ?
%NumPins: 20
%FDF AND 0 P2 ~P2 P19 ~P19 P3 ~P3 P18 ~P18 P4 ~P4 N3 ~N3 P5 ~P5 N4 ~N4
     P6 ~P6 N5 ~N5 P7 ~P7 N6 ~N6 P8 ~P8 P13 ~P13 P9 ~P9 P12 ~P12 *

%MACRO NOR7ENABLE(EnableFuse:%SF, InFuse:%FF, OutPin:%TEXT, TNode:%TEXT);
 %IF %EnableFuse..%EnableFuse+31 = 1 %THEN
  NOR(%InFuse+32, %InFuse+64, %InFuse+96, %InFuse+128, %InFuse+160,
     %InFuse+192, %InFuse+224; OutPin; 7,7,8,8);
 %ELSE
  NOR(%InFuse+32, %InFuse+64, %InFuse+96, %InFuse+128, %InFuse+160,
     %InFuse+192, %InFuse+224; TNode; 7,7,8,8);
  TSB(TNode, %InFuse; OutPin; 3,3,3,3,10,10,10,10);
 %END;
%MACEND;

%MACRO NOR8DFF(InFuse:%FF, NodeInp:%TEXT, TLNode:%TEXT, OutPin:%TEXT);
 LNOR(%InFuse,%InFuse+32,%InFuse+64,%InFuse+96,%InFuse+128,%InFuse+160,%InFuse+192,%InFuse+224;TLNode);
 DQFF(TLNode,P1;NodeInp;2,2,7,0,5,5,7,7,7,0,5,5);
 TSB(NodeInp,L1;OutPin;3,3,3,3,8,8,8,8);
%MACEND;

LINV(P11;L1);
NOR7ENABLE(%SF00, %FF00, P19, N1);
NOR7ENABLE(%SF256, %FF256, P18, N2);
NOR8DFF(%FF512, N3, L2, P17);
NOR8DFF(%FF768, N4, L3, P16);
NOR8DFF(%FF1024, N5, L4, P15);
NOR8DFF(%FF1280, N6, L5, P14);
NOR7ENABLE(%SF1536, %FF1536, P13, N7);
NOR7ENABLE(%SF1792, %FF1792, P12, N8);
%EndModel

;Delays for the following device are `typical' and `maximum'.
%StartModel
%Manufacturer:Signetics
%Type:16R6
%PartNumber:PLUS16R6-7
%LastNode ? ?
%NumPins: 20
%FDF AND 0 P2 ~P2 P19 ~P19 P3 ~P3 N2 ~N2 P4 ~P4 N3 ~N3 P5 ~P5 N4 ~N4
     P6 ~P6 N5 ~N5 P7 ~P7 N6 ~N6 P8 ~P8 N7 ~N7 P9 ~P9 P12 ~P12 *

%MACRO NOR7ENABLE(EnableFuse:%SF, InFuse:%FF, OutPin:%TEXT, TNode:%TEXT);
 %IF %EnableFuse..%EnableFuse+31 = 1 %THEN
  NOR(%InFuse+32, %InFuse+64, %InFuse+96, %InFuse+128, %InFuse+160,
     %InFuse+192, %InFuse+224; OutPin; 7,7,8,8);
 %ELSE
  NOR(%InFuse+32, %InFuse+64, %InFuse+96, %InFuse+128, %InFuse+160,
     %InFuse+192, %InFuse+224; TNode; 7,7,8,8);
  TSB(TNode, %InFuse; OutPin; 3,3,3,3,10,10,10,10);
 %END;
%MACEND;

%MACRO NOR8DFF(InFuse:%FF, NodeInp:%TEXT, TLNode:%TEXT, OutPin:%TEXT);
 LNOR(%InFuse,%InFuse+32,%InFuse+64,%InFuse+96,%InFuse+128,%InFuse+160,%InFuse+192,%InFuse+224;TLNode);
 DQFF(TLNode,P1;NodeInp;2,2,7,0,5,5,7,7,7,0,5,5);
 TSB(NodeInp,L1;OutPin;3,3,3,3,8,8,8,8);
%MACEND;

LINV(P11;L1);
NOR7ENABLE(%SF00, %FF00, P19, N1);
NOR8DFF(%FF256, N2, L2, P18);
NOR8DFF(%FF512, N3, L3, P17);
NOR8DFF(%FF768, N4, L4, P16);
NOR8DFF(%FF1024, N5, L5, P15);
NOR8DFF(%FF1280, N6, L6, P14);
NOR8DFF(%FF1536, N7, L7, P13);
NOR7ENABLE(%SF1792, %FF1792, P12, N8);
%EndModel

;Delays for the following device are `typical' and `maximum'.
%StartModel
%Manufacturer:Signetics
%Type:16R8
%PartNumber:PLUS16R8-7
%LastNode ? ?
%NumPins: 20
%FDF AND 0 P2 ~P2 N1 ~N1 P3 ~P3 N2 ~N2 P4 ~P4 N3 ~N3 P5 ~P5 N4 ~N4
     P6 ~P6 N5 ~N5 P7 ~P7 N6 ~N6 P8 ~P8 N7 ~N7 P9 ~P9 N8 ~N8 *

%MACRO NOR8DFF(InFuse:%FF, NodeInp:%TEXT, TLNode:%TEXT, OutPin:%TEXT);
 LNOR(%InFuse,%InFuse+32,%InFuse+64,%InFuse+96,%InFuse+128,%InFuse+160,%InFuse+192,%InFuse+224;TLNode);
 DQFF(TLNode,P1;NodeInp;2,2,7,0,5,5,7,7,7,0,5,5);
 TSB(NodeInp,L1;OutPin;3,3,3,3,8,8,8,8);
%MACEND;

LINV(P11;L1);
NOR8DFF(%FF00, N1, L2, P19);
NOR8DFF(%FF256, N2, L3, P18);
NOR8DFF(%FF512, N3, L4, P17);
NOR8DFF(%FF768, N4, L5, P16);
NOR8DFF(%FF1024, N5, L6, P15);
NOR8DFF(%FF1280, N6, L7, P14);
NOR8DFF(%FF1536, N7, L8, P13);
NOR8DFF(%FF1792, N8, L9, P12);
%EndModel

;Delays for the following device are `typical' and `maximum'.
%StartModel
%Manufacturer:Signetics
%Type:20L8
%PartNumber:PLUS20L8-7
%LastNode ? ?
%NumPins: 24
%FDF AND 0 P2 ~P2 P1 ~P1 P3 ~P3 P23 ~P23 P4 ~P4 P21 ~P21 P5 ~P5 P20 ~P20
     P6 ~P6 P19 ~P19 P7 ~P7 P18 ~P18 P8 ~P8 P17 ~P17 P9 ~P9 P16 ~P16
     P10 ~P10 P14 ~P14 P11 ~P11 P13 ~P13 *

%MACRO NOR7ENABLE(EnableFuse:%SF, InFuse:%FF, OutPin:%TEXT, TNode:%TEXT);
 %IF %EnableFuse..%EnableFuse+39 = 1 %THEN
  NOR(%InFuse+40, %InFuse+80, %InFuse+120, %InFuse+160, %InFuse+200,
     %InFuse+240, %InFuse+280; OutPin; 7,7,8,8);
 %ELSE
  NOR(%InFuse+40, %InFuse+80, %InFuse+120, %InFuse+160, %InFuse+200,
      %InFuse+240, %InFuse+280; TNode; 7,7,8,8);
  TSB(TNode, %InFuse; OutPin; 3,3,3,3,10,10,10,10);
 %END;
%MACEND;

NOR7ENABLE(%SF00, %FF00, P22, N1);
NOR7ENABLE(%SF320, %FF320, P21, N2);
NOR7ENABLE(%SF640, %FF640, P20, N3);
NOR7ENABLE(%SF960, %FF960, P19, N4);
NOR7ENABLE(%SF1280, %FF1280, P18, N5);
NOR7ENABLE(%SF1600, %FF1600, P17, N6);
NOR7ENABLE(%SF1920, %FF1920, P16, N7);
NOR7ENABLE(%SF2240, %FF2240, P15, N8);
%EndModel

;Delays for the following device are `typical' and `maximum'.
%StartModel
%Manufacturer:Signetics
%Type:20R4
%PartNumber:PLUS20R4-7
%LastNode ? ?
%NumPins: 24
%FDF AND 0 P2 ~P2 P23 ~P23  P3 ~P3 P22 ~P22 P4 ~P4 P21 ~P21 P5 ~P5 N3 ~N3 P6 ~P6
   N4 ~N4 P7 ~P7 N5 ~N5 P8 ~P8 N6 ~N6 P9 ~P9 P16 ~P16 P10 ~P10 P15 ~P15
   P11 ~P11 P14 ~P14 *

%MACRO NOR8DFF(InFuse:%FF, NodeInp:%TEXT, TLNode:%TEXT, OutPin:%TEXT);
  LNOR(%InFuse,%InFuse+40,%InFuse+80,%InFuse+120,%InFuse+160,%InFuse+200,%InFuse+240,%InFuse+280;TLNode);
  DQFF(TLNode,P1;NodeInp;2,2,7,0,5,5,7,7,7,0,5,5);
  TSB(NodeInp,L1;OutPin;3,3,3,3,8,8,8,8);
%MACEND;

%MACRO NOR7ENABLE(InFuse:%FF, EnableFuse:%SF, OutPin:%TEXT, TNode:%TEXT);
 %IF %EnableFuse..%EnableFuse+39 = 1 %THEN
   NOR(%InFuse+40, %InFuse+80, %InFuse+120, %InFuse+160, %InFuse+200,
      %InFuse+240, %InFuse+280; OutPin; 7,7,8,8);
 %ELSE
   NOR(%InFuse+40, %InFuse+80, %InFuse+120, %InFuse+160, %InFuse+200,
      %InFuse+240, %InFuse+280; TNode; 7,7,8,8);
   TSB(TNode, %InFuse; OutPin; 3,3,3,3,10,10,10,10);
 %END;
%MACEND;

LINV(P13; L1);
NOR7ENABLE(%FF00, %SF00, P22, N1);
NOR7ENABLE(%FF320, %SF320, P21, N2);
NOR8DFF(%FF640, N3, L2, P20);
NOR8DFF(%FF960, N4, L3, P19);
NOR8DFF(%FF1280, N5, L4, P18);
NOR8DFF(%FF1600, N6, L5, P17);
NOR7ENABLE(%FF1920, %SF1920, P16, N7);
NOR7ENABLE(%FF2240, %SF2240, P15, N8);
%EndModel

;Delays for the following device are `typical' and `maximum'.
%StartModel
%Manufacturer:Signetics
%Type:20R6
%PartNumber:PLUS20R6-7
%LastNode ? ?
%NumPins: 24
%FDF AND 0 P2 ~P2 P23 ~P23  P3 ~P3 P22 ~P22 P4 ~P4 N2 ~N2 P5 ~P5 N3 ~N3 P6 ~P6
   N4 ~N4 P7 ~P7 N5 ~N5 P8 ~P8 N6 ~N6 P9 ~P9 N7 ~N7 P10 ~P10 P15 ~P15
   P11 ~P11 P14 ~P14 *

%MACRO NOR8DFF(InFuse:%FF, NodeInp:%TEXT, TLNode:%TEXT, OutPin:%TEXT);
  LNOR(%InFuse,%InFuse+40,%InFuse+80,%InFuse+120,%InFuse+160,%InFuse+200,%InFuse+240,%InFuse+280;TLNode);
  DQFF(TLNode,P1;NodeInp;2,2,7,0,5,5,7,7,7,0,5,5);
  TSB(NodeInp,L1;OutPin;3,3,3,3,8,8,8,8);
%MACEND;

%MACRO NOR7ENABLE(InFuse:%FF, EnableFuse:%SF, OutPin:%TEXT, TNode:%TEXT);
 %IF %EnableFuse..%EnableFuse+39 = 1 %THEN
   NOR(%InFuse+40, %InFuse+80, %InFuse+120, %InFuse+160, %InFuse+200,
      %InFuse+240, %InFuse+280; OutPin; 7,7,8,8);
 %ELSE
   NOR(%InFuse+40, %InFuse+80, %InFuse+120, %InFuse+160, %InFuse+200,
      %InFuse+240, %InFuse+280; TNode; 7,7,8,8);
  TSB(TNode, %InFuse; OutPin; 3,3,3,3,10,10,10,10);
 %END;
%MACEND;

LINV(P13; L1);
NOR7ENABLE(%FF00, %SF00, P22, N1);
NOR8DFF(%FF320, N2, L2, P21);
NOR8DFF(%FF640, N3, L3, P20);
NOR8DFF(%FF960, N4, L4, P19);
NOR8DFF(%FF1280, N5, L5, P18);
NOR8DFF(%FF1600, N6, L6, P17);
NOR8DFF(%FF1920, N7, L7, P16);
NOR7ENABLE(%FF2240, %SF2240, P15, N8);
%EndModel

;Delays for the following device are `typical' and `maximum'.
%StartModel
%Manufacturer:Signetics
%Type:20R8
%PartNumber:PLUS20R8-7
%LastNode ? ?
%NumPins: 24
%FDF AND 0 P2 ~P2 P23 ~P23  P3 ~P3 N1 ~N1 P4 ~P4 N2 ~N2 P5 ~P5 N3 ~N3 P6 ~P6
   N4 ~N4 P7 ~P7 N5 ~N5 P8 ~P8 N6 ~N6 P9 ~P9 N7 ~N7 P10 ~P10 N8 ~N8
   P11 ~P11 P14 ~P14 *

%MACRO NOR8DFF(InFuse:%FF, NodeInp:%TEXT, TLNode:%TEXT, OutPin:%TEXT);
  LNOR(%InFuse,%InFuse+40,%InFuse+80,%InFuse+120,%InFuse+160,%InFuse+200,%InFuse+240,%InFuse+280;TLNode);
  DQFF(TLNode,P1;NodeInp;2,2,7,0,5,5,7,7,7,0,5,5);
  TSB(NodeInp,L1;OutPin;3,3,3,3,8,8,8,8);
%MACEND;

LINV(P13; L1);
NOR8DFF(%FF00, N1, L2, P22);
NOR8DFF(%FF320, N2, L3, P21);
NOR8DFF(%FF640, N3, L4, P20);
NOR8DFF(%FF960, N4, L5, P19);
NOR8DFF(%FF1280, N5, L6, P18);
NOR8DFF(%FF1600, N6, L7, P17);
NOR8DFF(%FF1920, N7, L8, P16);
NOR8DFF(%FF2240, N8, L9, P15);
%EndModel