home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 13 / 13.iso / p / p078 / 8.img / MLIB.PLB / RICOH.DEF < prev    next >
Encoding:
Text File  |  1990-12-17  |  9.5 KB  |  293 lines
  1. (***************************************************************************)
  2. (*                                                                         *)
  3. (*                         Copyright (C) 1987-1990                         *)
  4. (*                      by Gogesch Micro Systems, INC.                     *)
  5. (*                                                                         *)
  6. (*                           All rights reserved.                          *)
  7. (*                                                                         *)
  8. (***************************************************************************)
  9.  
  10.  
  11. ;THIS IS A NEW MANUFACTURER IN THE MOD LIBRARY
  12. ;DELAYS ARE GIVEN FOR STANDARD AND MAXIMUM
  13. %StartModel
  14. %Manufacturer:Ricoh
  15. %Type:10P8
  16. %PartNumber:EPL10P8
  17. %LastNode ? ?
  18. %NumPins: 20
  19. %FDF AND 0 P2 ~P2 P1 ~P1 P3 ~P3 P4 ~P4 P5 ~P5 P6 ~P6 P7 ~P7 P8 ~P8 P9 ~P9
  20.      P11 ~P11 *
  21.  
  22. %MACRO POR(InFuse:%FF, XorFuse:%SF, OutPin:%TEXT);
  23.  %IF %XorFuse=0 %THEN
  24.   NOR(%InFuse, %InFuse+20; OutPin; 25,25,35,35);
  25.  %ELSE
  26.   OR(%InFuse, %InFuse+20; OutPin; 25,25,35,35);
  27.  %END;
  28. %MACEND;
  29.  
  30. POR(%FF00, %SF320, P19);
  31. POR(%FF40, %SF321, P18);
  32. POR(%FF80, %SF322, P17);
  33. POR(%FF120, %SF323, P16);
  34. POR(%FF160, %SF324, P15);
  35. POR(%FF200, %SF325, P14);
  36. POR(%FF240, %SF326, P13);
  37. POR(%FF280, %SF327, P12);
  38. %EndModel
  39.  
  40. %StartModel
  41. %Manufacturer:Ricoh
  42. %Type:12P6
  43. %PartNumber:EPL12P6
  44. %LastNode ? ?
  45. %NumPins: 20
  46. %FDF AND 0 P2 ~P2 P1 ~P1 P3 ~P3 P19 ~P19 P4 ~P4 P5 ~P5 P6 ~P6 P7 ~P7
  47.      P8 ~P8 P12 ~P12 P9 ~P9 P11 ~P11 *
  48.  
  49. %MACRO POR2(InFuse:%FF, XorFuse:%SF, OutPin:%TEXT);
  50.  %IF %XorFuse=0 %THEN
  51.   NOR(%InFuse, %InFuse+24; OutPin; 25,25,35,35);
  52.  %ELSE
  53.   OR(%InFuse, %InFuse+24; OutPin; 25,25,35,35);
  54.  %END;
  55. %MACEND;
  56.  
  57. %MACRO POR4(InFuse:%FF, XorFuse:%SF, OutPin:%TEXT);
  58.  %IF %XorFuse=0 %THEN
  59.   NOR(%InFuse, %InFuse+24, %InFuse+48, %InFuse+72; OutPin; 25,25,35,35);
  60.  %ELSE
  61.   OR(%InFuse, %InFuse+24, %InFuse+48, %InFuse+72; OutPin; 25,25,35,35);
  62.  %END;
  63. %MACEND;
  64.  
  65. POR4(%FF00, %SF384, P18);
  66. POR2(%FF96, %SF385, P17);
  67. POR2(%FF144, %SF386, P16);
  68. POR2(%FF192, %SF387, P15);
  69. POR2(%FF240, %SF388, P14);
  70. POR4(%FF288, %SF389, P13);
  71. %EndModel
  72.  
  73. %StartModel
  74. %Manufacturer:Ricoh
  75. %Type:14P4
  76. %PartNumber:EPL14P4
  77. %LastNode ? ?
  78. %NumPins: 20
  79. %FDF AND 0 P2 ~P2 P1 ~P1 P3 ~P3 P19 ~P19 P4 ~P4 P18 ~P18 P5 ~P5 P6 ~P6
  80.      P7 ~P7 P13 ~P13 P8 ~P8 P12 ~P12 P9 ~P9 P11 ~P11 *
  81.  
  82. %MACRO POR4(InFuse:%FF, XorFuse:%SF, OutPin:%TEXT);
  83.  %IF %XorFuse=0 %THEN
  84.   NOR(%InFuse, %InFuse+28, %InFuse+56, %InFuse+84; OutPin; 25,25,35,35);
  85.  %ELSE
  86.   OR(%InFuse, %InFuse+28, %InFuse+56, %InFuse+84; OutPin; 25,25,35,35);
  87.  %END;
  88. %MACEND;
  89.  
  90. POR4(%FF00, %SF448, P17);
  91. POR4(%FF112, %SF449,P16);
  92. POR4(%FF224, %SF450,P15);
  93. POR4(%FF336, %SF451,P14);
  94. %EndModel
  95.  
  96. %StartModel
  97. %Manufacturer:Ricoh
  98. %Type:16P2
  99. %PartNumber:EPL16P2
  100. %LastNode ? ?
  101. %NumPins: 20
  102. %FDF AND 0 P2 ~P2 P1 ~P1 P3 ~P3 P19 ~P19 P4 ~P4 P18 ~P18 P5 ~P5 P17 ~P17
  103.      P6 ~P6 P14 ~P14 P7 ~P7 P13 ~P13 P8 ~P8 P12 ~P12 P9 ~P9 P11 ~P11 *
  104.  
  105. %MACRO POR8(InFuse:%FF, XorFuse:%SF, OutPin:%TEXT);
  106.  %IF %XorFuse=0 %THEN
  107.   NOR(%InFuse, %InFuse+32, %InFuse+64, %InFuse+96, %InFuse+128, %InFuse+160,
  108.       %InFuse+192, %InFuse+224; OutPin; 25,25,35,35);
  109.  %ELSE
  110.   OR(%InFuse, %InFuse+32, %InFuse+64, %InFuse+96, %InFuse+128, %InFuse+160,
  111.       %InFuse+192, %InFuse+224; OutPin; 25,25,35,35);
  112.  %END;
  113. %MACEND;
  114.  
  115. POR8(%FF00, %SF512, P16);
  116. POR8(%FF256, %SF513, P15);
  117. %EndModel
  118.  
  119. %StartModel
  120. %Manufacturer:Ricoh
  121. %Type:16P8
  122. %PartNumber:EPL16P8
  123. %LastNode ? ?
  124. %NumPins: 20
  125. %FDF AND 0 P2 ~P2 P1 ~P1 P3 ~P3 P18 ~P18 P4 ~P4 P17 ~P17 P5 ~P5 P16 ~P16
  126.      P6 ~P6 P15 ~P15 P7 ~P7 P14 ~P14 P8 ~P8 P13 ~P13 P9 ~P9 P11 ~P11 *
  127.  
  128. %MACRO POR7ENABLE(EnableFuse:%SF, InFuse:%FF, XorFuse:%SF, OutPin:%TEXT,
  129.                  TNode:%TEXT);
  130. %IF %EnableFuse..%EnableFuse+31 = 1 %THEN
  131.   %IF %XorFuse=0 %THEN
  132.    NOR(%InFuse+32, %InFuse+64, %InFuse+96, %InFuse+128, %InFuse+160,
  133.       %InFuse+192, %InFuse+224; OutPin; 25,25,35,35);
  134.   %ELSE
  135.    OR(%InFuse+32, %InFuse+64, %InFuse+96, %InFuse+128, %InFuse+160,
  136.       %InFuse+192, %InFuse+224; OutPin; 25,25,35,35);
  137.   %END;
  138. %ELSE
  139.   %IF %XorFuse=0 %THEN
  140.    NOR(%InFuse+32, %InFuse+64, %InFuse+96, %InFuse+128, %InFuse+160,
  141.       %InFuse+192, %InFuse+224; TNode; 25,25,35,35);
  142.   %ELSE
  143.    OR(%InFuse+32, %InFuse+64, %InFuse+96, %InFuse+128, %InFuse+160,
  144.       %InFuse+192, %InFuse+224; TNode; 25,25,35,35);
  145.   %END;
  146.   TSB(TNode, %InFuse; OutPin; 25,25,25,25,35,35,35,35);
  147.  %END;
  148. %MACEND;
  149.  
  150. POR7ENABLE(%SF00, %FF00, %SF2048, P19, N1);
  151. POR7ENABLE(%SF256, %FF256, %SF2049, P18, N2);
  152. POR7ENABLE(%SF512, %FF512, %SF2050, P17, N3);
  153. POR7ENABLE(%SF768, %FF768, %SF2051, P16, N4);
  154. POR7ENABLE(%SF1024, %FF1024, %SF2052, P15, N5);
  155. POR7ENABLE(%SF1280, %FF1280, %SF2053, P14, N6);
  156. POR7ENABLE(%SF1536, %FF1536, %SF2054, P13, N7);
  157. POR7ENABLE(%SF1792, %FF1792, %SF2055, P12, N8);
  158. %EndModel
  159.  
  160. %StartModel
  161. %Manufacturer:Ricoh
  162. %Type:16RP4
  163. %PartNumber:EPL16RP4
  164. %LastNode ? ?
  165. %NumPins: 20
  166. %FDF AND 0 P2 ~P2 P19 ~P19 P3 ~P3 P18 ~P18 P4 ~P4 N3 ~N3 P5 ~P5 N4 ~N4
  167.      P6 ~P6 N5 ~N5 P7 ~P7 N6 ~N6 P8 ~P8 P13 ~P13 P9 ~P9 P12 ~P12 *
  168.  
  169. %MACRO POR7ENABLE(EnableFuse:%SF, XorFuse:%SF, InFuse:%FF, OutPin:%TEXT, TNode:%TEXT);
  170.  %IF %EnableFuse..%EnableFuse+31 = 1 %THEN
  171.   %IF %XorFuse = 0 %THEN
  172.    NOR(%InFuse+32, %InFuse+64, %InFuse+96, %InFuse+128, %InFuse+160,
  173.       %InFuse+192, %InFuse+224; OutPin; 25,25,35,35);
  174.   %ELSE
  175.    OR(%InFuse+32, %InFuse+64, %InFuse+96, %InFuse+128, %InFuse+160,
  176.      %InFuse+192, %InFuse+224; OutPin; 25,25,35,35);
  177.   %END;
  178.  %ELSE
  179.   %IF %XorFuse = 0 %THEN
  180.    NOR(%InFuse+32, %InFuse+64, %InFuse+96, %InFuse+128, %InFuse+160,
  181.       %InFuse+192, %InFuse+224; TNode; 25,25,35,35);
  182.   %ELSE
  183.    OR(%InFuse+32, %InFuse+64, %InFuse+96, %InFuse+128, %InFuse+160,
  184.      %InFuse+192, %InFuse+224; TNode; 25,25,35,35);
  185.   %END;
  186.   TSB(TNode, %InFuse; OutPin; 25,25,25,25,35,35,35,35);
  187.  %END;
  188. %MACEND;
  189.  
  190. %MACRO POR8DFF(InFuse:%FF, XorFuse:%SF, NodeInp:%TEXT, TLNode:%TEXT, OutPin:%TEXT);
  191.  %IF %XorFuse = 0 %THEN
  192.   LNOR(%InFuse,%InFuse+32,%InFuse+64,%InFuse+96,%InFuse+128,%InFuse+160,%InFuse+192,%InFuse+224;TLNode);
  193.  %ELSE
  194.   LOR(%InFuse,%InFuse+32,%InFuse+64,%InFuse+96,%InFuse+128,%InFuse+160,%InFuse+192,%InFuse+224;TLNode);
  195.  %END;
  196.  DQFF(TLNode,P1;NodeInp;15,15,25,0,20,20,25,25,25,0,20,20);
  197.  TSB(NodeInp,L1;OutPin;25,25,25,25,35,35,35,35);
  198. %MACEND;
  199.  
  200. LINV(P11;L1);
  201. POR7ENABLE(%SF00, %SF2048, %FF00, P19, N1);
  202. POR7ENABLE(%SF256, %SF2049, %FF256, P18, N2);
  203. POR8DFF(%FF512, %SF2050, N3, L2, P17);
  204. POR8DFF(%FF768, %SF2051, N4, L3, P16);
  205. POR8DFF(%FF1024, %SF2052, N5, L4, P15);
  206. POR8DFF(%FF1280, %SF2053, N6, L5, P14);
  207. POR7ENABLE(%SF1536, %SF2054, %FF1536, P13, N7);
  208. POR7ENABLE(%SF1792, %SF2055, %FF1792, P12, N8);
  209. %EndModel
  210.  
  211.  
  212. %StartModel
  213. %Manufacturer:Ricoh
  214. %Type:16RP6
  215. %PartNumber:EPL16RP6
  216. %LastNode ? ?
  217. %NumPins: 20
  218. %FDF AND 0 P2 ~P2 P19 ~P19 P3 ~P3 N2 ~N2 P4 ~P4 N3 ~N3 P5 ~P5 N4 ~N4
  219.      P6 ~P6 N5 ~N5 P7 ~P7 N6 ~N6 P8 ~P8 N7 ~N7 P9 ~P9 P12 ~P12 *
  220.  
  221. %MACRO POR7ENABLE(EnableFuse:%SF, XorFuse:%SF, InFuse:%FF, OutPin:%TEXT, TNode:%TEXT);
  222.  %IF %EnableFuse..%EnableFuse+31 = 1 %THEN
  223.   %IF %XorFuse = 0 %THEN
  224.    NOR(%InFuse+32, %InFuse+64, %InFuse+96, %InFuse+128, %InFuse+160,
  225.       %InFuse+192, %InFuse+224; OutPin; 25,25,35,35);
  226.   %ELSE
  227.    OR(%InFuse+32, %InFuse+64, %InFuse+96, %InFuse+128, %InFuse+160,
  228.      %InFuse+192, %InFuse+224; OutPin; 25,25,35,35);
  229.   %END;
  230.  %ELSE
  231.   %IF %XorFuse = 0 %THEN
  232.    NOR(%InFuse+32, %InFuse+64, %InFuse+96, %InFuse+128, %InFuse+160,
  233.       %InFuse+192, %InFuse+224; TNode; 25,25,35,35);
  234.   %ELSE
  235.    OR(%InFuse+32, %InFuse+64, %InFuse+96, %InFuse+128, %InFuse+160,
  236.      %InFuse+192, %InFuse+224; TNode; 25,25,35,35);
  237.   %END;
  238.   TSB(TNode, %InFuse; OutPin; 25,25,25,25,35,35,35,35);
  239.  %END;
  240. %MACEND;
  241.  
  242. %MACRO POR8DFF(InFuse:%FF, XorFuse:%SF, NodeInp:%TEXT, TLNode:%TEXT, OutPin:%TEXT);
  243.  %IF %XorFuse = 0 %THEN
  244.   LNOR(%InFuse,%InFuse+32,%InFuse+64,%InFuse+96,%InFuse+128,%InFuse+160,%InFuse+192,%InFuse+224;TLNode);
  245.  %ELSE
  246.   LOR(%InFuse,%InFuse+32,%InFuse+64,%InFuse+96,%InFuse+128,%InFuse+160,%InFuse+192,%InFuse+224;TLNode);
  247.  %END;
  248.  DQFF(TLNode,P1;NodeInp;15,15,25,0,20,20,25,25,25,0,20,20);
  249.  TSB(NodeInp,L1;OutPin;25,25,25,25,35,35,35,35);
  250. %MACEND;
  251.  
  252. LINV(P11;L1);
  253. POR7ENABLE(%SF00, %SF2048, %FF00, P19, N1);
  254. POR8DFF(%FF256, %SF2049, N2, L2, P18);
  255. POR8DFF(%FF512, %SF2050, N3, L3, P17);
  256. POR8DFF(%FF768, %SF2051, N4, L4, P16);
  257. POR8DFF(%FF1024, %SF2052, N5, L5, P15);
  258. POR8DFF(%FF1280, %SF2053, N6, L6, P14);
  259. POR8DFF(%FF1536, %SF2054, N7, L7, P13);
  260. POR7ENABLE(%SF1792, %SF2055, %FF1792, P12, N8);
  261. %EndModel
  262.  
  263.  
  264. %StartModel
  265. %Manufacturer:Ricoh
  266. %Type:16RP8
  267. %PartNumber:EPL16RP8
  268. %LastNode ? ?
  269. %NumPins: 20
  270. %FDF AND 0 P2 ~P2 N1 ~N1 P3 ~P3 N2 ~N2 P4 ~P4 N3 ~N3 P5 ~P5 N4 ~N4
  271.      P6 ~P6 N5 ~N5 P7 ~P7 N6 ~N6 P8 ~P8 N7 ~N7 P9 ~P9 N8 ~N8 *
  272.  
  273. %MACRO POR8DFF(InFuse:%FF, XorFuse:%SF, NodeInp:%TEXT, TLNode:%TEXT, OutPin:%TEXT);
  274.  %IF %XorFuse = 0 %THEN
  275.   LNOR(%InFuse,%InFuse+32,%InFuse+64,%InFuse+96,%InFuse+128,%InFuse+160,%InFuse+192,%InFuse+224;TLNode);
  276.  %ELSE
  277.   LOR(%InFuse,%InFuse+32,%InFuse+64,%InFuse+96,%InFuse+128,%InFuse+160,%InFuse+192,%InFuse+224;TLNode);
  278.  %END;
  279.  DQFF(TLNode,P1;NodeInp;15,15,25,0,20,20,25,25,25,0,20,20);
  280.  TSB(NodeInp,L1;OutPin;25,25,25,25,35,35,35,35);
  281. %MACEND;
  282.  
  283. LINV(P11; L1);
  284. POR8DFF(%FF00, %SF2048, N1, L2, P19);
  285. POR8DFF(%FF256, %SF2049, N2, L3, P18);
  286. POR8DFF(%FF512, %SF2050, N3, L4, P17);
  287. POR8DFF(%FF768, %SF2051, N4, L5, P16);
  288. POR8DFF(%FF1024, %SF2052, N5, L6, P15);
  289. POR8DFF(%FF1280, %SF2053, N6, L7, P14);
  290. POR8DFF(%FF1536, %SF2054, N7, L8, P13);
  291. POR8DFF(%FF1792, %SF2055, N8, L9, P12);
  292. %EndModel
  293.