File: editnext-sheet.ulp

package info (click to toggle)
eagle 4.16-5
  • links: PTS
  • area: non-free
  • in suites: etch, etch-m68k
  • size: 36,508 kB
  • sloc: sh: 82; makefile: 32
file content (23 lines) | stat: -rw-r--r-- 463 bytes parent folder | download | duplicates (6) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
 
#usage "<b>Edit next sheet</b>\n"
       "<p>"
       "<author>Author: support@cadsoft.de</author>"

// THIS PROGRAM IS PROVIDED AS IS AND WITHOUT WARRANTY OF ANY KIND, EXPRESSED OR IMPLIED

string cmd = "";

if (schematic) {
  int scnt = 0;
  int s;
  schematic(SH) {
     sheet(SH) s = SH.number;
     SH.sheets(S) {
        scnt = S.number;
        }
     if (s < scnt) {
        s++;
        sprintf(cmd, "EDIT .s%d;\n", s);
        }
     }
  exit(cmd);
  }