home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 13 / 13.iso / p / p078 / 3.img / NETFORMS.PLB / APPLLEAP.CF < prev    next >
Encoding:
Text File  |  1991-10-14  |  2.2 KB  |  126 lines
  1. /*
  2.     /L Do not append sheet number to labels
  3.  */
  4.  
  5. /*  VERSION="1.10   14-OCT-91"
  6.  *      - Added Version message
  7.  *
  8.  *  Capacities:
  9.  *      - Part Names are not checked for length
  10.  *      - Module Names are not checked for length
  11.  *      - Reference Strings are not checked for length
  12.  *      - Node Names are not checked for length
  13.  *      - Node Numbers are limited to 5 digits (plus the leading 'N')
  14.  *      - Pin Numbers are not checked for length
  15.  *
  16.  *  Characters:
  17.  *      - All ASCII keyboard characters are legal
  18.  */
  19.  
  20. int sw_L;
  21.  
  22. int len;
  23.  
  24. /*-----------------------*/
  25.  
  26. Initialize()
  27. {
  28.     WriteString(0, "Creating Netlist...");
  29.     WriteCrLf(0);
  30.     SetNumberWidth(5);
  31.  
  32.     sw_L = SwitchIsSet("L");
  33. }
  34.  
  35. /*-----------------------*/
  36.  
  37. WriteHeader()
  38. {
  39. }
  40.  
  41. /*-----------------------*/
  42.  
  43. HandleNodeName()
  44. {
  45.     int i;
  46.  
  47.     WriteString(1, "*** NET ");
  48.     i = GetStandardSymbol(TypeCode);
  49.     if (i == 'L')
  50.     {
  51.         if (sw_L == 0)
  52.         {
  53.             SetNumberWidth(1);
  54.             MakeLocalSignal("-");
  55.             SetNumberWidth(5);
  56.             WriteSymbol(1, LocalSignal);
  57.         }
  58.         else
  59.         {
  60.             WriteSymbol(1, SignalNameString);
  61.         }
  62.     }
  63.     if (i == 'P')
  64.     {
  65.         WriteSymbol(1, SignalNameString);
  66.     }
  67.     if (i == 'S')
  68.     {
  69.         WriteSymbol(1, SignalNameString);
  70.     }
  71.     if (i == 'N')
  72.     {
  73.         WriteString(1, "N");
  74.         WriteSymbol(1, NetNumber);
  75.     }
  76.     if (i == 'U')
  77.     {
  78.         WriteString(1, "N");
  79.         WriteSymbol(1, NetNumber);
  80.     }
  81.     WriteCrLf(1);
  82. }
  83.  
  84. /*-----------------------*/
  85.  
  86. WriteNet()
  87. {
  88.     WriteSymbol(1, ReferenceString);
  89.     WriteString(1, " ");
  90.     WriteSymbol(1, PinNumberString);
  91.     WriteString(1, " ");
  92.     len = SymbolLength(ModuleName);
  93.     /* if the ModuleName is empty, then output the PartName */
  94.     if (len > 0)
  95.     {
  96.         WriteSymbol(1, ModuleName);
  97.     }
  98.     else
  99.     {
  100.         WriteSymbol(1, PartName);
  101.     }
  102.     WriteCrLf(1);
  103. }
  104.  
  105. /*-----------------------*/
  106.  
  107. WriteNetEnding()
  108. {
  109. }
  110.  
  111. /*-----------------------*/
  112.  
  113. ProcessFieldStrings()
  114. {
  115. }
  116.  
  117. /*-----------------------*/
  118.  
  119. WriteNetListEnd()
  120. {
  121.     WriteString(0, "Done");
  122.     WriteCrLf(0);
  123. }
  124.  
  125.  
  126.