home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 13 / 13.iso / p / p070 / 9.ddi / MLIB.PLB / HARRIS.DEF < prev    next >
Encoding:
Text File  |  1990-12-10  |  5.2 KB  |  144 lines
  1. (***************************************************************************)
  2. (*                                                                         *)
  3. (*                         Copyright (C) 1987-1990                         *)
  4. (*                      by Gogesch Micro Systems, INC.                     *)
  5. (*                                                                         *)
  6. (*                           All rights reserved.                          *)
  7. (*                                                                         *)
  8. (***************************************************************************)
  9.  
  10.  
  11. ;MODELS WERE TAKEN FROM 1988 HARRIS DIGITAL PRODUCT DATA BOOK.
  12. ;Delays for the Harris devices were not given for "other";
  13. ;therefore used "max" delays
  14.  
  15. %StartModel
  16. %Manufacturer:Harris
  17. %Type:16L8
  18. %PartNumber:HPL-16LC8
  19. %LastNode ? ?
  20. %NumPins: 20
  21. %FDF AND 0 P2 ~P2 P1 ~P1 P3 ~P3 P18 ~P18 P4 ~P4 P17 ~P17 P5 ~P5 P16 ~P16
  22.      P6 ~P6 P15 ~P15 P7 ~P7 P14 ~P14 P8 ~P8 P13 ~P13 P9 ~P9 P11 ~P11 *
  23.  
  24. %MACRO NOR7ENABLE(EnableFuse:%SF, InFuse:%FF, OutPin:%TEXT, TNode:%TEXT);
  25.  %IF %EnableFuse..%EnableFuse+31 = 1 %THEN
  26.   NOR(%InFuse+32, %InFuse+64, %InFuse+96, %InFuse+128, %InFuse+160,
  27.      %InFuse+192, %InFuse+224; OutPin; 125,125,125,125);
  28.  %ELSE
  29.   NOR(%InFuse+32, %InFuse+64, %InFuse+96, %InFuse+128, %InFuse+160,
  30.      %InFuse+192, %InFuse+224; TNode; 125,125,125,125);
  31.   TSB(TNode, %InFuse; OutPin; 125,125,125,125,125,125,125,125);
  32.  %END;
  33. %MACEND;
  34.  
  35. NOR7ENABLE(%SF00, %FF00, P19, N1);
  36. NOR7ENABLE(%SF256, %FF256, P18, N2);
  37. NOR7ENABLE(%SF512, %FF512, P17, N3);
  38. NOR7ENABLE(%SF768, %FF768, P16, N4);
  39. NOR7ENABLE(%SF1024, %FF1024, P15, N5);
  40. NOR7ENABLE(%SF1280, %FF1280, P14, N6);
  41. NOR7ENABLE(%SF1536, %FF1536, P13, N7);
  42. NOR7ENABLE(%SF1792, %FF1792, P12, N8);
  43. %EndModel
  44.  
  45. %StartModel
  46. %Manufacturer:Harris
  47. %Type:16R4
  48. %PartNumber:HPL-16RC4
  49. %LastNode ? ?
  50. %NumPins: 20
  51. %FDF AND 0 P2 ~P2 P19 ~P19 P3 ~P3 P18 ~P18 P4 ~P4 N3 ~N3 P5 ~P5 N4 ~N4
  52.      P6 ~P6 N5 ~N5 P7 ~P7 N6 ~N6 P8 ~P8 P13 ~P13 P9 ~P9 P12 ~P12 *
  53.  
  54. %MACRO NOR7ENABLE(EnableFuse:%SF, InFuse:%FF, OutPin:%TEXT, TNode:%TEXT);
  55.  %IF %EnableFuse..%EnableFuse+31 = 1 %THEN
  56.   NOR(%InFuse+32, %InFuse+64, %InFuse+96, %InFuse+128, %InFuse+160,
  57.      %InFuse+192, %InFuse+224; OutPin; 125,125,125,125);
  58.  %ELSE
  59.   NOR(%InFuse+32, %InFuse+64, %InFuse+96, %InFuse+128, %InFuse+160,
  60.      %InFuse+192, %InFuse+224; TNode; 125,125,125,125);
  61.   TSB(TNode, %InFuse; OutPin; 125,125,125,125,125,125,125,125);
  62.  %END;
  63. %MACEND;
  64.  
  65. %MACRO NOR8DFF(InFuse:%FF, NodeInp:%TEXT, TLNode:%TEXT, OutPin:%TEXT);
  66.  LNOR(%InFuse,%InFuse+32,%InFuse+64,%InFuse+96,%InFuse+128,%InFuse+160,%InFuse+192,%InFuse+224;TLNode);
  67.  DQFF(TLNode,P1;NodeInp;60,60,125,0,25,25,60,60,125,0,25,25);
  68.  TSB(NodeInp,L1;OutPin;125,125,125,125,125,125,125,125);
  69. %MACEND;
  70.  
  71. LINV(P11;L1);
  72. NOR7ENABLE(%SF00, %FF00, P19, N1);
  73. NOR7ENABLE(%SF256, %FF256, P18, N2);
  74. NOR8DFF(%FF512, N3, L2, P17);
  75. NOR8DFF(%FF768, N4, L3, P16);
  76. NOR8DFF(%FF1024, N5, L4, P15);
  77. NOR8DFF(%FF1280, N6, L5, P14);
  78. NOR7ENABLE(%SF1536, %FF1536, P13, N7);
  79. NOR7ENABLE(%SF1792, %FF1792, P12, N8);
  80. %EndModel
  81.  
  82. %StartModel
  83. %Manufacturer:Harris
  84. %Type:16R6
  85. %PartNumber:HPL-16RC6
  86. %LastNode ? ?
  87. %NumPins: 20
  88. %FDF AND 0 P2 ~P2 P19 ~P19 P3 ~P3 N2 ~N2 P4 ~P4 N3 ~N3 P5 ~P5 N4 ~N4
  89.      P6 ~P6 N5 ~N5 P7 ~P7 N6 ~N6 P8 ~P8 N7 ~N7 P9 ~P9 P12 ~P12 *
  90.  
  91. %MACRO NOR7ENABLE(EnableFuse:%SF, InFuse:%FF, OutPin:%TEXT, TNode:%TEXT);
  92.  %IF %EnableFuse..%EnableFuse+31 = 1 %THEN
  93.   NOR(%InFuse+32, %InFuse+64, %InFuse+96, %InFuse+128, %InFuse+160,
  94.      %InFuse+192, %InFuse+224; OutPin; 125,125,125,125);
  95.  %ELSE
  96.   NOR(%InFuse+32, %InFuse+64, %InFuse+96, %InFuse+128, %InFuse+160,
  97.      %InFuse+192, %InFuse+224; TNode; 125,125,125,125);
  98.   TSB(TNode, %InFuse; OutPin; 125,125,125,125,125,125,125,125);
  99.  %END;
  100. %MACEND;
  101.  
  102. %MACRO NOR8DFF(InFuse:%FF, NodeInp:%TEXT, TLNode:%TEXT, OutPin:%TEXT);
  103.  LNOR(%InFuse,%InFuse+32,%InFuse+64,%InFuse+96,%InFuse+128,%InFuse+160,%InFuse+192,%InFuse+224;TLNode);
  104.  DQFF(TLNode,P1;NodeInp;60,60,125,0,25,25,60,60,125,0,25,25);
  105.  TSB(NodeInp,L1;OutPin;125,125,125,125,125,125,125,125);
  106. %MACEND;
  107.  
  108. LINV(P11;L1);
  109. NOR7ENABLE(%SF00, %FF00, P19, N1);
  110. NOR8DFF(%FF256, N2, L2, P18);
  111. NOR8DFF(%FF512, N3, L3, P17);
  112. NOR8DFF(%FF768, N4, L4, P16);
  113. NOR8DFF(%FF1024, N5, L5, P15);
  114. NOR8DFF(%FF1280, N6, L6, P14);
  115. NOR8DFF(%FF1536, N7, L7, P13);
  116. NOR7ENABLE(%SF1792, %FF1792, P12, N8);
  117. %EndModel
  118.  
  119. %StartModel
  120. %Manufacturer:Harris
  121. %Type:16R8
  122. %PartNumber:HPL-16RC8
  123. %LastNode ? ?
  124. %NumPins: 20
  125. %FDF AND 0 P2 ~P2 N1 ~N1 P3 ~P3 N2 ~N2 P4 ~P4 N3 ~N3 P5 ~P5 N4 ~N4
  126.      P6 ~P6 N5 ~N5 P7 ~P7 N6 ~N6 P8 ~P8 N7 ~N7 P9 ~P9 N8 ~N8 *
  127.  
  128. %MACRO NOR8DFF(InFuse:%FF, NodeInp:%TEXT, TLNode:%TEXT, OutPin:%TEXT);
  129.  LNOR(%InFuse,%InFuse+32,%InFuse+64,%InFuse+96,%InFuse+128,%InFuse+160,%InFuse+192,%InFuse+224;TLNode);
  130.  DQFF(TLNode,P1;NodeInp;60,60,125,0,25,25,60,60,125,0,25,25);
  131.  TSB(NodeInp,L1;OutPin;125,125,125,125,125,125,125,125);
  132. %MACEND;
  133.  
  134. LINV(P11;L1);
  135. NOR8DFF(%FF00, N1, L2, P19);
  136. NOR8DFF(%FF256, N2, L3, P18);
  137. NOR8DFF(%FF512, N3, L4, P17);
  138. NOR8DFF(%FF768, N4, L5, P16);
  139. NOR8DFF(%FF1024, N5, L6, P15);
  140. NOR8DFF(%FF1280, N6, L7, P14);
  141. NOR8DFF(%FF1536, N7, L8, P13);
  142. NOR8DFF(%FF1792, N8, L9, P12);
  143. %EndModel
  144.