neingeist
/
arduinisten
Archived
1
0
Fork 0
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.
This repo is archived. You can view files and clone it, but cannot push or open issues/pull-requests.

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."));
}