home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 13 / 13.iso / p / p078 / 3.img / NETFORMS.PLB / APPLBRAV.CF < prev    next >
Encoding:
Text File  |  1991-10-14  |  2.4 KB  |  130 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.     while (LoadInstance())
  40.     {
  41.         WriteString(1, "*** Desig ");
  42.         len = SymbolLength(ModuleName);
  43.         /* if the ModuleName is empty, then output the PartName */
  44.         if (len > 0)
  45.         {
  46.             WriteSymbol(1, ModuleName);
  47.         }
  48.         else
  49.         {
  50.             WriteSymbol(1, PartName);
  51.         }
  52.         WriteCrLf(1);
  53.         WriteSymbol(1, ReferenceString);
  54.         WriteCrLf(1);
  55.     }
  56. }
  57.  
  58. /*-----------------------*/
  59.  
  60. HandleNodeName()
  61. {
  62.     int i;
  63.  
  64.     WriteString(1, "*** NET ");
  65.     i = GetStandardSymbol(TypeCode);
  66.     if (i == 'L')
  67.     {
  68.         if (sw_L == 0)
  69.         {
  70.             SetNumberWidth(1);
  71.             MakeLocalSignal("-");
  72.             SetNumberWidth(5);
  73.             WriteSymbol(1, LocalSignal);
  74.         }
  75.         else
  76.         {
  77.             WriteSymbol(1, SignalNameString);
  78.         }
  79.     }
  80.     if (i == 'P')
  81.     {
  82.         WriteSymbol(1, SignalNameString);
  83.     }
  84.     if (i == 'S')
  85.     {
  86.         WriteSymbol(1, SignalNameString);
  87.     }
  88.     if (i == 'N')
  89.     {
  90.         WriteString(1, "N");
  91.         WriteSymbol(1, NetNumber);
  92.     }
  93.     if (i == 'U')
  94.     {
  95.         WriteString(1, "N");
  96.         WriteSymbol(1, NetNumber);
  97.     }
  98.     WriteCrLf(1);
  99. }
  100.  
  101. /*-----------------------*/
  102.  
  103. WriteNet()
  104. {
  105.     WriteSymbol(1, ReferenceString);
  106.     WriteString(1, " ");
  107.     WriteSymbol(1, PinNumberString);
  108.     WriteCrLf(1);
  109. }
  110.  
  111. /*-----------------------*/
  112.  
  113. WriteNetEnding()
  114. {
  115. }
  116.  
  117. /*-----------------------*/
  118.  
  119. ProcessFieldStrings()
  120. {
  121. }
  122.  
  123. /*-----------------------*/
  124.  
  125. WriteNetListEnd()
  126. {
  127.     WriteString(0, "Done");
  128.     WriteCrLf(0);
  129. }
  130.