You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
116 lines
3.0 KiB
Plaintext
116 lines
3.0 KiB
Plaintext
15 years ago
|
#usage "en: <h3>Highlights all net with a given CLASS.</h3>\n"
|
||
|
|
"This ULPs works from within a board or a schematic.<br>"
|
||
|
|
"<p><author>Author: alf@cadsoft.de</author>",
|
||
|
|
"de: <h3>Hebt Signale der gegebenen CLASS hervor.</h3>\n"
|
||
|
|
"Dieses ULP arbeitet aus Boards oder Schematics heraus.<br>"
|
||
|
|
"<p><author>Author: alf@cadsoft.de</author>"
|
||
|
|
|
||
|
|
#require 5.0300
|
||
|
|
|
||
|
|
string strTexts[] = {
|
||
|
|
"en\v"
|
||
|
|
"de\v"
|
||
|
|
,
|
||
|
|
";This ULP requires a board or a schematic.\v"
|
||
|
|
";Dieses Ulp funktioniert nur in Boards und Schematics.\v"
|
||
|
|
,
|
||
|
|
"Please type in the CLASS you want to highlight.\v"
|
||
|
|
"Geben Sie dei hervorzuhebende CLASS ein.\v"
|
||
|
|
,
|
||
|
|
";No Nets/Signals found with CLASS \"%s\".\v"
|
||
|
|
";Es wurden keine Signale der CLASS \"%s\" gefunden.\v"
|
||
|
|
};
|
||
|
|
|
||
|
|
string strMessage;
|
||
|
|
string strScript, s;
|
||
|
|
int nCount;
|
||
|
|
string strValue;
|
||
|
|
|
||
|
|
/*** functions ***/
|
||
|
|
string Translate(string src) {
|
||
|
|
string strLoc = lookup(strTexts, src, strstr(strTexts[0], language()) / 3, '\v');
|
||
|
|
return((strLoc != "") ? strLoc : src);
|
||
|
|
}
|
||
|
|
|
||
|
|
string InputBox(string strPrompt, string strTitle, string strDefault) {
|
||
|
|
string strReturn = strDefault;
|
||
|
|
int nResult = dlgDialog(strTitle) {
|
||
|
|
dlgGridLayout {
|
||
|
|
dlgCell(1, 0) dlgStringEdit(strReturn);
|
||
|
|
dlgCell(0, 0) dlgHBoxLayout {
|
||
|
|
dlgLabel(strPrompt);
|
||
|
|
dlgSpacing(20);
|
||
|
|
dlgVBoxLayout {
|
||
|
|
dlgPushButton("+OK") dlgAccept();
|
||
|
|
dlgPushButton("Cancel") dlgReject();
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
};
|
||
|
|
return((nResult > 0) ? strReturn : "");
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
if (argv[1]) {
|
||
|
|
strValue = argv[1];
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
if(board) board(B) {
|
||
|
|
if (!strValue) {
|
||
|
|
strValue = InputBox(Translate("Please type in the CLASS you want to highlight."), filename(argv[0]), B.name);
|
||
|
|
}
|
||
|
|
if(!strValue) exit(EXIT_SUCCESS);
|
||
|
|
sprintf(strScript, "WINDOW;\n SHOW "); // 2008-11-03
|
||
|
|
B.signals(S) {
|
||
|
|
if(S.class.number == strtol(strValue)) {
|
||
|
|
sprintf(s, " %s ", S.name);
|
||
|
|
strScript += s;
|
||
|
|
++nCount;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
strScript +=" ";
|
||
|
|
|
||
|
|
if(!nCount) {
|
||
|
|
sprintf(strMessage, Translate(";No Nets/Signals found with CLASS \"%s\"."), strValue);
|
||
|
|
dlgMessageBox(strMessage);
|
||
|
|
exit(EXIT_FAILURE);
|
||
|
|
}
|
||
|
|
else {
|
||
|
|
exit(strScript);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
else if(sheet) sheet(S) {
|
||
|
|
string strName;
|
||
|
|
schematic(SCH) {
|
||
|
|
strName = SCH.name;
|
||
|
|
}
|
||
|
|
if (!strValue) {
|
||
|
|
strValue = InputBox(Translate("Please type in the value you want to highlight."), filename(argv[0]), "");
|
||
|
|
}
|
||
|
|
if(!strValue) exit(EXIT_SUCCESS);
|
||
|
|
|
||
|
|
sprintf(strScript, "WINDOW;\nSHOW ");
|
||
|
|
S.nets(N) {
|
||
|
|
if(N.class.number == strtol(strValue)) {
|
||
|
|
sprintf(s, " %s", N.name);
|
||
|
|
strScript += s;
|
||
|
|
++nCount;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
strScript += " ";
|
||
|
|
if(!nCount) {
|
||
|
|
sprintf(strMessage, Translate(";No Nets/Signals found with CLASS \"%s\"."), strValue);
|
||
|
|
dlgMessageBox(strMessage);
|
||
|
|
exit(EXIT_FAILURE);
|
||
|
|
}
|
||
|
|
else {
|
||
|
|
exit(strScript);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
else {
|
||
|
|
dlgMessageBox(Translate(";This ULP requires a board or a schematic."));
|
||
|
|
}
|
||
|
|
|