1588 lines
65 KiB
Plaintext
1588 lines
65 KiB
Plaintext
|
#usage "en: <qt><nobr>Command draw<p><u>Options</u>:<p>"
|
|||
|
|
"<b>+</b> distance/radius <br>"
|
|||
|
|
"<b>A</b>ngle start [A<b>n</b>gle step] [<b>E</b>nd angle] <br>"
|
|||
|
|
"[<b>L</b>ayer] <br>"
|
|||
|
|
"[<b>W</b>ire & width] <br>"
|
|||
|
|
"[<b>X</b>coordinate] [<b>Y</b>coordinate] **<br>"
|
|||
|
|
"[P<b>o</b>lygon] <br>"
|
|||
|
|
"[<b>P</b>ad || <b>S</b>md || <b>V</b>ia] <br>"
|
|||
|
|
"[W<b>i</b>dth Leng<b>t</b>h] SMD_dx SMD_dy <br>"
|
|||
|
|
"[<b>-</b>Name] signal/pad/smd <br>"
|
|||
|
|
"[<b>D</b>iameter] for Pad/Via, if used <br>"
|
|||
|
|
"[D<b>r</b>ill] for Pad/Via/Hole, if used <br>"
|
|||
|
|
"[<b><3E></b>] define angle (in degrees) for step <br>"
|
|||
|
|
"[<b>/</b>] define number of steps within start and end angle <br>"
|
|||
|
|
"[<b>G</b>roup] rotate and paste <br>"
|
|||
|
|
"[rotate <b>m</b>atch] <br>"
|
|||
|
|
"[<b>MOVE</b>] elements on place by order <br>start with name (<i>only in Board</i>) <br>"
|
|||
|
|
"[<b>C</b>ircle] emulate/draw a cricle with wire or polygon <br>"
|
|||
|
|
"[full ellipse <b>0</b>] <br>"
|
|||
|
|
"[Ellipse <b>f</b>actor] height = radius * f <br>"
|
|||
|
|
"[1/<b>4</b> ellipse] 90 degree, 1st quadrant <br>"
|
|||
|
|
"<br>"
|
|||
|
|
"** If <b>MARK</b> is set in PAC/BRD/SCH editor, coordinates are relativ. <br>"
|
|||
|
|
"Parameters can be used in any order; not case sensitive."
|
|||
|
|
"<p>"
|
|||
|
|
"<author>Author: alf@cadsoft.de </author></nobr></qt>",
|
|||
|
|
|
|||
|
|
"de: <qt><nobr>Command draw<p><u>Optionen</u>:<p>"
|
|||
|
|
"<b>+</b> Distance/Radius <br>"
|
|||
|
|
"St<b>a</b>rtwinkel [Wi<b>n</b>kelschritt oder A<b>n</b>zahl (# .)] [<b>E</b>ndwinkel] <br>"
|
|||
|
|
"[<b>L</b>ayer] <br>"
|
|||
|
|
"[<b>W</b>re width] setzt die Breite (width) und den Befehl WIRE. <br>"
|
|||
|
|
"<i>Für Polygon muß <b>W</b> vor <b>O</b> angegeben werden.</i><br>"
|
|||
|
|
"[<b>X</b>-Koordinate] [<b>Y</b>-Koordinate] **<br>"
|
|||
|
|
"[P<b>o</b>lygon] <br>"
|
|||
|
|
"[<b>P</b>ad || <b>S</b>md || <b>V</b>ia] <br>"
|
|||
|
|
"[W<b>i</b>dth Leng<b>t</b>h] SMD_dx SMD_dy <br>"
|
|||
|
|
"[<b>-</b>Name] Signal/Pad/Smd <br>"
|
|||
|
|
"[<b>D</b>iameter] für Pad/Via, wenn benutzt <br>"
|
|||
|
|
"[D<b>r</b>ill] für Pad/Via/Hole, wenn benutzt <br>"
|
|||
|
|
"[<b><3E></b>] Winkelschritt in Grad <br>"
|
|||
|
|
"[<b>/</b>] berechnet den Winkel (End - Start / Anzahl <br>"
|
|||
|
|
"[<b>G</b>roup] Pasted die Gruppe rotiert.<br>"
|
|||
|
|
"Die Gruppe kann vor dem Start des ULP definiert werden,<br>"
|
|||
|
|
"oder das ULP selektiert alle sichtbaren Objekte als Gruppe.<br>"
|
|||
|
|
"[Rotate <b>m</b>atch] dreht die Bauteile/Pad/Smd im selben Winkel <br>in dem sie angeordnet werden<br>"
|
|||
|
|
"[<b>MOVE</b>] plaziert Elemente aufsteigend beginnend mit dem <br>angegebenen Namen (<i>nur im Board nutzbar</i> ) <br>"
|
|||
|
|
"[<b>C</b>ircle] zeichnet einen Kreis oder Ellipse als Wire oder Polygon <br>je nach Option (W/O) <br>"
|
|||
|
|
"[full ellipse <b>0</b>] zeichnet eine volle Ellipse <br>"
|
|||
|
|
"[Ellipse <b>f</b>aktor] der Wert mit dem die Länge multipliziert wird <br>(Raduis * f) ergibt die Länge in y <br>"
|
|||
|
|
"[1/<b>4</b> ellipse] zeichnet nur den ersten Qudranten <br>einer Ellipse oder Kreises <br>"
|
|||
|
|
"<br>"
|
|||
|
|
"** Ist <b>MARK</b> im benutzten PAC/BRD/SCH Editor gesezt, <br>werden die Koordinaten relativ zur Marke benutzt.<br>"
|
|||
|
|
"Die Parameter können in beliebiger Reihenfolge angegeben <br>und groß oder klein geschrieben werden."
|
|||
|
|
"<p>"
|
|||
|
|
"<author>Author: alf@cadsoft.de </author></nobr></qt>"
|
|||
|
|
|
|||
|
|
string Help = "<nobr>" +
|
|||
|
|
"RUN cmd-draw w0.4 -gnd x1.3 y2.56 +17.45 a115 n75 e180 # lTop <br>" +
|
|||
|
|
"RUN cmd-draw w0.4 -gnd x1.3 y2.56 +17.45 a115 n75 e180 . lTop <br>" +
|
|||
|
|
"RUN cmd-draw w0.4 -gnd x1.3 y2.56 +17.45 a115 ltop <br>" +
|
|||
|
|
"RUN cmd-draw a0 e150.0 x30 y4 w0.2 n9 # o +2.27 -gnd l1 <br>" +
|
|||
|
|
"RUN cmd-draw a0 e50.0 x30 y4 w0.2 n9 o 0 f1.7 +2.27 -gnd l1 <br>" +
|
|||
|
|
"RUN cmd-draw w0.4 +1.5 -gnd a2 y2.56 l16 <br>" +
|
|||
|
|
"RUN cmd-draw +2.0 e270.0 n9.0 w0.2 x-2.54 y5.08 <br>" +
|
|||
|
|
"RUN cmd-draw x1 y3.33 l1 w.2 +4.77 # n5 <br>" +
|
|||
|
|
"RUN cmd-draw s -1 +9 n7 # <br>" +
|
|||
|
|
"RUN cmd-draw r1.2 +19.9 n7 # <br>" +
|
|||
|
|
"RUN cmd-draw r1.2 +9.5 n7 . <br>" +
|
|||
|
|
"RUN cmd-draw +2.20 n9.0 w0.2 x-2.54 y-5.08 w.01 l1 O 0 f1.75 <br>" +
|
|||
|
|
"RUN cmd-draw +2.20 n9.0 w0.2 x-2.54 y-5.08 w.01 l1 O 4 f1.75 <br>" +
|
|||
|
|
"RUN cmd-draw s -1 +9 a22.5 m <br>" +
|
|||
|
|
"RUN cmd-draw s i1.55 t2.7 -A +2.20 n20.0 x-2.54 y-5.08 l1 f1.75 m <br>" +
|
|||
|
|
"RUN cmd-draw r.8 d1.4 v -A +4.20 n20.0 x-2.54 y-5.08 l1 f1.75 <br>" +
|
|||
|
|
"RUN cmd-draw g n33.333 # A0.0 e359.9 <br>" +
|
|||
|
|
"RUN cmd-draw G n33.333 . A0.0 e359.9 <br>" +
|
|||
|
|
"RUN cmd-draw +10 MOVE -R1 M a33 L16 N7 E322 .<br>"+
|
|||
|
|
"<p>" +
|
|||
|
|
"</nobr>";
|
|||
|
|
|
|||
|
|
// THIS PROGRAM IS PROVIDED AS IS AND WITHOUT WARRANTY OF ANY KIND, EXPRESSED OR IMPLIED
|
|||
|
|
|
|||
|
|
#require 6.0400;
|
|||
|
|
|
|||
|
|
string Help_Move = "<qt>MOVE, PAD, SMD can be used clockwise, too. " +
|
|||
|
|
"In this case <b>Angle step</b> has to be negative. Is <b>Angle start</b> less than " +
|
|||
|
|
"<b>Angle end</b> for negative <b>Angle step</b>, 360<36> will be added to <b>Angle start</b>." +
|
|||
|
|
"Thus you are allowed to arrange elements clockwise.</qt>";
|
|||
|
|
|
|||
|
|
string Mark_Info = "<nobr>If <font color=\"blue\"><b>MARK</b></font> is set coordinates are <b>relativ</b>.</nobr>";
|
|||
|
|
|
|||
|
|
|
|||
|
|
if (language() == "de") {
|
|||
|
|
Help_Move = "MOVE, PAD, SMD können auch rechtsdrehend benutzt werden. " +
|
|||
|
|
"Dazu muß <b>Angle step</b> negativ sein.<br>" +
|
|||
|
|
"Ist <b>Angle start</b> bei <i>negativen</i> <b>Angle step</b> " +
|
|||
|
|
"kleiner als <b>Angle end</b> wird auf <b>Angle start</b> 360<36> aufaddiert.<br>" +
|
|||
|
|
"Damit ist es möglich die Elemente rechtsdrehen anzuordnen.";
|
|||
|
|
|
|||
|
|
Mark_Info = "<nobr>Ist <font color=\"blue\"><b>MARK</b></font> gesetzt, dann sind die Koordinaten relativ zu der Marke.</nobr>";
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
string Label_Move = " ";
|
|||
|
|
|
|||
|
|
int test = 1;
|
|||
|
|
|
|||
|
|
string Version = " Version 2.01 "; // 2006-08-10 alf@cadsoft.de
|
|||
|
|
// 2008-04-10 changed GROUP ... (>x y); alf@cadsoft.de
|
|||
|
|
// 2008-05-06 SMD generierung mit Name berichtigt
|
|||
|
|
// 2010-06-09 Generierung des PAD-Namen berichtigt.
|
|||
|
|
// 2010-10-15 Startwinkel auf 720 erhöht, um Bauteile
|
|||
|
|
// im Uhrzeigersinn mit größerem Endwinkel
|
|||
|
|
// als 0.0 zu platzieren.
|
|||
|
|
// Beispiel Start 620.0<EFBFBD> End 260.1<EFBFBD>
|
|||
|
|
// Hier muß der Startwinkel 260+360 = 620<32> sein.
|
|||
|
|
// Neue Option: Winkeloffset
|
|||
|
|
// 2011-10-21 Option Group akzeptiert jetzt auch Radius = 0.
|
|||
|
|
// die Gruppe wird jetzt gedreht gapastetd.
|
|||
|
|
// Checkbox use selected, es wird die vor dem Start des ULP
|
|||
|
|
// definirte Gruppe benutzt, oder das ULP definiert alle
|
|||
|
|
// sichtbaren Objekte als Gruppe.
|
|||
|
|
// 2012-04-12 min max Wert absolut und nicht mehr in Eagle-Internen Einheiten
|
|||
|
|
// wegen der höheren Auflösung von V6
|
|||
|
|
// 2013-03-26 Auflösung und max. Werte an V6 und feinere Auflösung angepasst.
|
|||
|
|
// 2013-08-05 Shape von VIA ausgeben, HOLE berichtigt.
|
|||
|
|
// 2013-12-12 In #usage Zeilenumbruch <br> eingefügt.
|
|||
|
|
|
|||
|
|
enum { DrawWIRE, // ** do not change this list **
|
|||
|
|
DrawPOLYGON,
|
|||
|
|
DrawMOVE, // to place Elements in Board
|
|||
|
|
DrawGROUP, // Group CUT paste, select all in group ** see also >> dlgGroup("Option") <<
|
|||
|
|
DrawHOLE,
|
|||
|
|
DrawPAD,
|
|||
|
|
DrawSMD
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
int DrawType = DrawWIRE;
|
|||
|
|
string cmd_Draw_Info = "<img src=cmd-draw-move-match-none.bmp>";
|
|||
|
|
string Draw_Info = " ";
|
|||
|
|
string Name_used;
|
|||
|
|
string require = " <font color=\"red\">required</font> ";
|
|||
|
|
string Not_Used = " <font color=\"darkgreen\">not used</font> ";
|
|||
|
|
string Can_Used = " <font color=\"blue\">can be used</font> ";
|
|||
|
|
if (library) Name_used = Not_Used;
|
|||
|
|
else Name_used = Can_Used;
|
|||
|
|
|
|||
|
|
|
|||
|
|
string Para = "";
|
|||
|
|
string SigName = "";
|
|||
|
|
string width = "";
|
|||
|
|
string layer = "";
|
|||
|
|
string Angle_step_used = Not_Used;
|
|||
|
|
string Angle_end_used = Not_Used;
|
|||
|
|
|
|||
|
|
real x1, y1, x2;
|
|||
|
|
real StartAngle = 0.0; // start the rotated draw on degree
|
|||
|
|
real AngleStep = 0.0; // angle step in degree to next element or steps at 90<39> for Ellipse
|
|||
|
|
real EangleOffset = 0.0; // the rotation off the element self + offset
|
|||
|
|
real EndAngle = 360.0; // end the rotated draw on degree
|
|||
|
|
enum { None, Degreestep, Calcstep };
|
|||
|
|
int AngleStepTyp = None; // flag to calculate the anglestep from count (anglestep)
|
|||
|
|
int RotateMatch = 0; // rotate element with same angle with rotate
|
|||
|
|
int UseMarkedGroup = 0;
|
|||
|
|
|
|||
|
|
enum { NONE, CIRCLE, FULL_ELLIPSE, ELLIPSE_4 };
|
|||
|
|
int Placeform = NONE;
|
|||
|
|
real EllipsFactor = 1.0; // ratio x to y radius
|
|||
|
|
real M_EllipsFactor = 1.0; // copy for menue
|
|||
|
|
|
|||
|
|
//int polygon = 0; // draw ellipse as polygon
|
|||
|
|
//int smd = 0; // place a smd on endpoint
|
|||
|
|
real SMD_dx = 0; // SMD length
|
|||
|
|
real SMD_dy = 0; // SMD width
|
|||
|
|
string PadVia = ""; // draw Pad or Via as used in editor
|
|||
|
|
string PAD_diameter = ""; // pad diameter
|
|||
|
|
string Shapes[];
|
|||
|
|
int ShapeSelect = PAD_SHAPE_OFFSET+1;
|
|||
|
|
|
|||
|
|
string Drill_Hole = ""; // drill diameter
|
|||
|
|
|
|||
|
|
int grid = 1;
|
|||
|
|
string GridUnit[] = { "MIC", "MM", "MIL", "INCH" };
|
|||
|
|
int gridunit;
|
|||
|
|
real minx, maxx, miny, maxy;
|
|||
|
|
|
|||
|
|
string Length_Distance_Radius = "&+ radius ";
|
|||
|
|
|
|||
|
|
|
|||
|
|
int PressOk = 0;
|
|||
|
|
|
|||
|
|
string s;
|
|||
|
|
string h;
|
|||
|
|
string Help_Err = " ";
|
|||
|
|
|
|||
|
|
string Name1st, NameExt; // use as variable Label in Menu
|
|||
|
|
|
|||
|
|
// ### functions ###
|
|||
|
|
void Set_MinMax_Unit(int Grid) { // 2012-04-12
|
|||
|
|
switch(Grid) {
|
|||
|
|
case GRID_UNIT_MIC : { // Micron
|
|||
|
|
minx = -1990000;
|
|||
|
|
maxx = 1990000;
|
|||
|
|
miny = -1990000;
|
|||
|
|
maxy = 1990000;
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
case GRID_UNIT_MM : { // Millimeter
|
|||
|
|
minx = -1990;
|
|||
|
|
maxx = 1990;
|
|||
|
|
miny = -1990;
|
|||
|
|
maxy = 1990;
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
case GRID_UNIT_MIL : { // Mil
|
|||
|
|
minx = -78340;
|
|||
|
|
maxx = 78340;
|
|||
|
|
miny = -78340;
|
|||
|
|
maxy = 78340;
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
case GRID_UNIT_INCH : { // Inch
|
|||
|
|
minx = -78.34;
|
|||
|
|
maxx = 78.34;
|
|||
|
|
miny = -78.34;
|
|||
|
|
maxy = 78.34;
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
return;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
|
|||
|
|
real u2u(int val) {
|
|||
|
|
switch (gridunit) {
|
|||
|
|
case GRID_UNIT_MIC : return u2mic(val);
|
|||
|
|
case GRID_UNIT_MM : return u2mm(val);
|
|||
|
|
case GRID_UNIT_MIL : return u2mil(val);
|
|||
|
|
case GRID_UNIT_INCH : return u2inch(val);
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
|
|||
|
|
void info(void) {
|
|||
|
|
dlgDialog("cmd-draw HELP") {
|
|||
|
|
dlgHBoxLayout {
|
|||
|
|
dlgLabel(usage);
|
|||
|
|
dlgVBoxLayout {
|
|||
|
|
if (language() == "de") dlgLabel("<u>Beispiele</u>:");
|
|||
|
|
else dlgLabel("<u>Examples</u>:");
|
|||
|
|
dlgLabel(Help);
|
|||
|
|
dlgStretch(1);
|
|||
|
|
dlgHBoxLayout {
|
|||
|
|
dlgStretch(1);
|
|||
|
|
dlgPushButton("+Ok") dlgAccept();
|
|||
|
|
dlgStretch(1);
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
};
|
|||
|
|
return;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
|
|||
|
|
// *** analysis User Error ***
|
|||
|
|
int error(void) {
|
|||
|
|
int err = 0;
|
|||
|
|
if (DrawType == DrawGROUP) {
|
|||
|
|
if (!AngleStep || !AngleStep || !EndAngle) { Help_Err = "Angle start or Angle step or Angle end = 0"; return -1; }
|
|||
|
|
if (!AngleStepTyp) {
|
|||
|
|
if (AngleStepTyp && AngleStep == 0) {
|
|||
|
|
Help_Err = "Missing parameter: Angle step";
|
|||
|
|
return -1;
|
|||
|
|
}
|
|||
|
|
Help_Err = "Select Angle step type :\n<> degree step\ncalc. steps.";
|
|||
|
|
return -1;
|
|||
|
|
}
|
|||
|
|
return 0;
|
|||
|
|
}
|
|||
|
|
if (strtod(width) >= x2) { Help_Err = "Width > Radius"; err = -1; }
|
|||
|
|
if (!x2) { Help_Err = "Radius = 0"; err = -1; }
|
|||
|
|
if (DrawType == DrawSMD) {
|
|||
|
|
if (layer == "1" || layer == "16") ;
|
|||
|
|
else { err = -1; Help_Err = "Layer for SMD ?"; }
|
|||
|
|
}
|
|||
|
|
if (DrawType == DrawMOVE) {
|
|||
|
|
if (!SigName) { Help_Err = "1.st Element name ?"; err = -1; }
|
|||
|
|
}
|
|||
|
|
if (AngleStepTyp && AngleStep == 0) {
|
|||
|
|
err = -1; Help_Err = "Missing parameter: Angle step";
|
|||
|
|
}
|
|||
|
|
return err;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
|
|||
|
|
// *** set info for Menu *** Pictures and Texts ***
|
|||
|
|
void set_Draw_Info(void) {
|
|||
|
|
Label_Move = " ";
|
|||
|
|
if (DrawType == DrawWIRE) {
|
|||
|
|
switch (AngleStepTyp) {
|
|||
|
|
case None :
|
|||
|
|
Angle_step_used = Not_Used;
|
|||
|
|
Angle_end_used = Not_Used;
|
|||
|
|
switch (Placeform) {
|
|||
|
|
case NONE : cmd_Draw_Info = "<img src=cmd-draw-wire-none.bmp>";
|
|||
|
|
break;
|
|||
|
|
case CIRCLE : cmd_Draw_Info = "<img src=cmd-draw-wire-none.bmp>";
|
|||
|
|
break;
|
|||
|
|
case FULL_ELLIPSE : cmd_Draw_Info = "<img src=cmd-draw-wire-ellipse.bmp>";
|
|||
|
|
break;
|
|||
|
|
case ELLIPSE_4 : cmd_Draw_Info = "<img src=cmd-draw-wire-ellipse.bmp>";
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case Degreestep :
|
|||
|
|
Angle_step_used = require;
|
|||
|
|
Angle_end_used = require;
|
|||
|
|
switch (Placeform) {
|
|||
|
|
case NONE : cmd_Draw_Info = "<img src=cmd-draw-wire-degstep-none.bmp>";
|
|||
|
|
break;
|
|||
|
|
case CIRCLE : cmd_Draw_Info = "<img src=cmd-draw-wire-circle-degstep.bmp>";
|
|||
|
|
break;
|
|||
|
|
case FULL_ELLIPSE : cmd_Draw_Info = "<img src=cmd-draw-wire-step-ellipse.bmp>";
|
|||
|
|
break;
|
|||
|
|
case ELLIPSE_4 : cmd_Draw_Info = "<img src=cmd-draw-wire-step-ellipse4.bmp>";
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
break;
|
|||
|
|
case Calcstep :
|
|||
|
|
Angle_step_used = require;
|
|||
|
|
Angle_end_used = require;
|
|||
|
|
switch (Placeform) {
|
|||
|
|
case NONE : cmd_Draw_Info = "<img src=cmd-draw-wire-calcstep-none.bmp>";
|
|||
|
|
break;
|
|||
|
|
case CIRCLE : cmd_Draw_Info = "<img src=cmd-draw-wire-circle-calcstep.bmp>";
|
|||
|
|
break;
|
|||
|
|
case FULL_ELLIPSE : cmd_Draw_Info = "<img src=cmd-draw-wire-calc-ellipse.bmp>";
|
|||
|
|
break;
|
|||
|
|
case ELLIPSE_4 : cmd_Draw_Info = "<img src=cmd-draw-wire-clac-ellipse4.bmp>";
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
else if(DrawType == DrawPOLYGON) {
|
|||
|
|
Angle_step_used = require;
|
|||
|
|
Angle_end_used = require;
|
|||
|
|
switch (AngleStepTyp) {
|
|||
|
|
case None : switch (Placeform) {
|
|||
|
|
case NONE : cmd_Draw_Info = "<img src=cmd-draw-polygon-none.bmp>";
|
|||
|
|
break;
|
|||
|
|
case CIRCLE : cmd_Draw_Info = "<img src=cmd-draw-polygon-none.bmp>";
|
|||
|
|
break;
|
|||
|
|
case FULL_ELLIPSE : cmd_Draw_Info = "<img src=cmd-draw-polygon-ellipse-none.bmp>";
|
|||
|
|
break;
|
|||
|
|
case ELLIPSE_4 : cmd_Draw_Info = "<img src=cmd-draw-polygon-ellipse4-none.bmp>";
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
break;
|
|||
|
|
case Degreestep : switch (Placeform) {
|
|||
|
|
case NONE : cmd_Draw_Info = "<img src=cmd-draw-polygon-none.bmp>";
|
|||
|
|
break;
|
|||
|
|
case CIRCLE : cmd_Draw_Info = "<img src=cmd-draw-polygon-circle-degstep.bmp>";
|
|||
|
|
break;
|
|||
|
|
case FULL_ELLIPSE : cmd_Draw_Info = "<img src=cmd-draw-polygon-ellipse-degstep.bmp>";
|
|||
|
|
break;
|
|||
|
|
case ELLIPSE_4 : cmd_Draw_Info = "<img src=cmd-draw-polygon-ellipse4-degstep.bmp>";
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
break;
|
|||
|
|
case Calcstep : switch (Placeform) {
|
|||
|
|
case NONE : cmd_Draw_Info = "<img src=cmd-draw-polygon-none-calcstep.bmp>";
|
|||
|
|
break;
|
|||
|
|
case CIRCLE : cmd_Draw_Info = "<img src=cmd-draw-polygon-circle-calcstep.bmp>";
|
|||
|
|
break;
|
|||
|
|
case FULL_ELLIPSE : cmd_Draw_Info = "<img src=cmd-draw-polygon-ellipse-calcstep.bmp>";
|
|||
|
|
break;
|
|||
|
|
case ELLIPSE_4 : cmd_Draw_Info = "<img src=cmd-draw-polygon-ellipse4-calcstep.bmp>";
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
else if(DrawType == DrawMOVE) {
|
|||
|
|
if (library || schematic) {
|
|||
|
|
dlgMessageBox("! MOVE\nYou can use this function ponly in a Board.", "OK");
|
|||
|
|
}
|
|||
|
|
else {
|
|||
|
|
Label_Move = Help_Move;
|
|||
|
|
switch (AngleStepTyp) {
|
|||
|
|
case None :
|
|||
|
|
Angle_step_used = Not_Used;
|
|||
|
|
Angle_end_used = Not_Used;
|
|||
|
|
switch (Placeform) {
|
|||
|
|
case NONE : if (!RotateMatch) cmd_Draw_Info = "<img src=cmd-draw-move-no_match-none.bmp>";
|
|||
|
|
else cmd_Draw_Info = "<img src=cmd-draw-move-match-none.bmp>";
|
|||
|
|
break;
|
|||
|
|
case CIRCLE : if (!RotateMatch) cmd_Draw_Info = "<img src=cmd-draw-move-no_match-none.bmp>";
|
|||
|
|
else cmd_Draw_Info = "<img src=cmd-draw-move-match-none.bmp>";
|
|||
|
|
break;
|
|||
|
|
case FULL_ELLIPSE : if (!RotateMatch) cmd_Draw_Info = "<img src=cmd-draw-move-no_match-ellipse-none.bmp>";
|
|||
|
|
else cmd_Draw_Info = "<img src=cmd-draw-move-match-ellipse-none.bmp>";
|
|||
|
|
break;
|
|||
|
|
case ELLIPSE_4 : if (!RotateMatch) cmd_Draw_Info = "<img src=cmd-draw-move-no_match-ellipse-none.bmp>";
|
|||
|
|
else cmd_Draw_Info = "<img src=cmd-draw-move-match-ellipse-none.bmp>";
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case Degreestep :
|
|||
|
|
Angle_step_used = require;
|
|||
|
|
Angle_end_used = require;
|
|||
|
|
switch (Placeform) {
|
|||
|
|
case NONE : if (!RotateMatch) cmd_Draw_Info = "<img src=cmd-draw-move-no_match-none.bmp>";
|
|||
|
|
else cmd_Draw_Info = "<img src=cmd-draw-move-match-none.bmp>";
|
|||
|
|
break;
|
|||
|
|
case CIRCLE : if (!RotateMatch) cmd_Draw_Info = "<img src=cmd-draw-move-circle-no_match-degstep.bmp>";
|
|||
|
|
else cmd_Draw_Info = "<img src=cmd-draw-move-circle-match-degstep.bmp>";
|
|||
|
|
break;
|
|||
|
|
case FULL_ELLIPSE : if (!RotateMatch) cmd_Draw_Info = "<img src=cmd-draw-move-ellipse-no_match-degstep.bmp>";
|
|||
|
|
else cmd_Draw_Info = "<img src=cmd-draw-move-ellipse-match-degstep.bmp>";
|
|||
|
|
break;
|
|||
|
|
case ELLIPSE_4 : if (!RotateMatch) cmd_Draw_Info = "<img src=cmd-draw-move-ellipse4-no_match-degstep.bmp>";
|
|||
|
|
else cmd_Draw_Info = "<img src=cmd-draw-move-ellipse4-match-degstep.bmp>";
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case Calcstep :
|
|||
|
|
Angle_step_used = require;
|
|||
|
|
Angle_end_used = require;
|
|||
|
|
switch (Placeform) {
|
|||
|
|
case NONE : if (!RotateMatch) cmd_Draw_Info = "<img src=cmd-draw-move-no_match-none.bmp>";
|
|||
|
|
else cmd_Draw_Info = "<img src=cmd-draw-move-match-none.bmp>";
|
|||
|
|
break;
|
|||
|
|
case CIRCLE : if (!RotateMatch) cmd_Draw_Info = "<img src=cmd-draw-move-circle-no_match-calcstep.bmp>";
|
|||
|
|
else cmd_Draw_Info = "<img src=cmd-draw-move-circle-match-calcstep.bmp>";
|
|||
|
|
break;
|
|||
|
|
case FULL_ELLIPSE : if (!RotateMatch) cmd_Draw_Info = "<img src=cmd-draw-move-ellipse-no_match-calcstep.bmp>";
|
|||
|
|
else cmd_Draw_Info = "<img src=cmd-draw-move-ellipse-match-calcstep.bmp>";
|
|||
|
|
break;
|
|||
|
|
case ELLIPSE_4 : if (!RotateMatch) cmd_Draw_Info = "<img src=cmd-draw-move-ellipse4-no_match-calcstep.bmp>";
|
|||
|
|
else cmd_Draw_Info = "<img src=cmd-draw-move-ellipse4-match-calcstep.bmp>";
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
else if(DrawType == DrawGROUP) {
|
|||
|
|
Angle_step_used = require;
|
|||
|
|
Angle_end_used = require;
|
|||
|
|
cmd_Draw_Info = "<img src=cmd-draw-group.bmp>";
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
else if(DrawType == DrawPAD) {
|
|||
|
|
Label_Move = Help_Move;
|
|||
|
|
switch (AngleStepTyp) {
|
|||
|
|
case None :
|
|||
|
|
Angle_step_used = Not_Used;
|
|||
|
|
Angle_end_used = Not_Used;
|
|||
|
|
switch (Placeform) {
|
|||
|
|
case NONE : cmd_Draw_Info = "<img src=cmd-draw-pad-none.bmp>";
|
|||
|
|
break;
|
|||
|
|
case CIRCLE : cmd_Draw_Info = "<img src=cmd-draw-pad-none.bmp>";
|
|||
|
|
break;
|
|||
|
|
case FULL_ELLIPSE : cmd_Draw_Info = "<img src=cmd-draw-pad-none.bmp>";
|
|||
|
|
break;
|
|||
|
|
case ELLIPSE_4 : cmd_Draw_Info = "<img src=cmd-draw-pad-none.bmp>";
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case Degreestep :
|
|||
|
|
Angle_step_used = require;
|
|||
|
|
Angle_end_used = require;
|
|||
|
|
switch (Placeform) {
|
|||
|
|
case NONE : cmd_Draw_Info = "<img src=cmd-draw-pad-none-degstep.bmp>";
|
|||
|
|
break;
|
|||
|
|
case CIRCLE : cmd_Draw_Info = "<img src=cmd-draw-pad-none-degstep.bmp>";
|
|||
|
|
break;
|
|||
|
|
case FULL_ELLIPSE : cmd_Draw_Info = "<img src=cmd-draw-pad-ellipse-degstep.bmp>";
|
|||
|
|
break;
|
|||
|
|
case ELLIPSE_4 : cmd_Draw_Info = "<img src=cmd-draw-pad-ellipse4-degstep.bmp>";
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case Calcstep :
|
|||
|
|
Angle_step_used = require;
|
|||
|
|
Angle_end_used = require;
|
|||
|
|
switch (Placeform) {
|
|||
|
|
case NONE : cmd_Draw_Info = "<img src=cmd-draw-pad-none-calcstep.bmp>";
|
|||
|
|
break;
|
|||
|
|
case CIRCLE : cmd_Draw_Info = "<img src=cmd-draw-pad-none-calcstep.bmp>";
|
|||
|
|
break;
|
|||
|
|
case FULL_ELLIPSE : cmd_Draw_Info = "<img src=cmd-draw-pad-ellipse-calcstep.bmp>";
|
|||
|
|
break;
|
|||
|
|
case ELLIPSE_4 : cmd_Draw_Info = "<img src=cmd-draw-pad-ellipse4-calcstep.bmp>";
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
else if(DrawType == DrawSMD) {
|
|||
|
|
Label_Move = Help_Move;
|
|||
|
|
switch (AngleStepTyp) {
|
|||
|
|
case None :
|
|||
|
|
Angle_step_used = Not_Used;
|
|||
|
|
Angle_end_used = Not_Used;
|
|||
|
|
switch (Placeform) {
|
|||
|
|
case NONE : if (!RotateMatch) cmd_Draw_Info = "<img src=cmd-draw-smd-no_match-none.bmp>";
|
|||
|
|
else cmd_Draw_Info = "<img src=cmd-draw-smd-match-none.bmp>";
|
|||
|
|
break;
|
|||
|
|
case CIRCLE : if (!RotateMatch) cmd_Draw_Info = "<img src=cmd-draw-smd-no_match-none.bmp>";
|
|||
|
|
else cmd_Draw_Info = "<img src=cmd-draw-smd-match-none.bmp>";
|
|||
|
|
break;
|
|||
|
|
case FULL_ELLIPSE : if (!RotateMatch) cmd_Draw_Info = "<img src=cmd-draw-smd-no_match-none.bmp>";
|
|||
|
|
else cmd_Draw_Info = "<img src=cmd-draw-smd-match-none.bmp>";
|
|||
|
|
break;
|
|||
|
|
case ELLIPSE_4 : if (!RotateMatch) cmd_Draw_Info = "<img src=cmd-draw-smd-no_match-none.bmp>";
|
|||
|
|
else cmd_Draw_Info = "<img src=cmd-draw-smd-match-none.bmp>";
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case Degreestep :
|
|||
|
|
Angle_step_used = require;
|
|||
|
|
Angle_end_used = require;
|
|||
|
|
switch (Placeform) {
|
|||
|
|
case NONE : if (!RotateMatch) cmd_Draw_Info = "<img src=cmd-draw-smd-no_match-degsetp.bmp>";
|
|||
|
|
else cmd_Draw_Info = "<img src=cmd-draw-smd-match-degstep.bmp>";
|
|||
|
|
break;
|
|||
|
|
case CIRCLE : if (!RotateMatch) cmd_Draw_Info = "<img src=cmd-draw-smd-cricle-no_match-degstep.bmp>";
|
|||
|
|
else cmd_Draw_Info = "<img src=cmd-draw-smd-circle-match-degstep.bmp>";
|
|||
|
|
break;
|
|||
|
|
case FULL_ELLIPSE : if (!RotateMatch) cmd_Draw_Info = "<img src=cmd-draw-smd-ellipse-no_match-degstep.bmp>";
|
|||
|
|
else cmd_Draw_Info = "<img src=cmd-draw-smd-ellipse-match-degstap.bmp>";
|
|||
|
|
break;
|
|||
|
|
case ELLIPSE_4 : if (!RotateMatch) cmd_Draw_Info = "<img src=cmd-draw-smd-ellipse4-no_match-degstep.bmp>";
|
|||
|
|
else cmd_Draw_Info = "<img src=cmd-draw-smd-ellipse4-match-degstep.bmp>";
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case Calcstep :
|
|||
|
|
Angle_step_used = require;
|
|||
|
|
Angle_end_used = require;
|
|||
|
|
switch (Placeform) {
|
|||
|
|
case NONE : if (!RotateMatch) cmd_Draw_Info = "<img src=cmd-draw-smd-no_match-none.bmp>";
|
|||
|
|
else cmd_Draw_Info = "<img src=cmd-draw-smd-match-none.bmp>";
|
|||
|
|
break;
|
|||
|
|
case CIRCLE : if (!RotateMatch) cmd_Draw_Info = "<img src=cmd-draw-smd-circle-no_match-calcstep.bmp>";
|
|||
|
|
else cmd_Draw_Info = "<img src=cmd-draw-smd-circle-match-calcstep.bmp>";
|
|||
|
|
break;
|
|||
|
|
case FULL_ELLIPSE : if (!RotateMatch) cmd_Draw_Info = "<img src=cmd-draw-smd-ellipse-no_match-calcstep.bmp>";
|
|||
|
|
else cmd_Draw_Info = "<img src=cmd-draw-smd-ellipse-match-calcstep.bmp>";
|
|||
|
|
break;
|
|||
|
|
case ELLIPSE_4 : if (!RotateMatch) cmd_Draw_Info = "<img src=cmd-draw-smd-ellipse4-no_match-calcstep.bmp>";
|
|||
|
|
else cmd_Draw_Info = "<img src=cmd-draw-smd-ellipse4-match-calcstep.bmp>";
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
else if(DrawType == DrawHOLE) {
|
|||
|
|
switch (AngleStepTyp) {
|
|||
|
|
case None :
|
|||
|
|
Angle_step_used = Not_Used;
|
|||
|
|
Angle_end_used = Not_Used;
|
|||
|
|
switch (Placeform) {
|
|||
|
|
case NONE : cmd_Draw_Info = "<img src=cmd-draw-hole-none.bmp>";
|
|||
|
|
break;
|
|||
|
|
case CIRCLE : cmd_Draw_Info = "<img src=cmd-draw-hole-none.bmp>";
|
|||
|
|
break;
|
|||
|
|
case FULL_ELLIPSE : cmd_Draw_Info = "<img src=cmd-draw-hole-none.bmp>";
|
|||
|
|
break;
|
|||
|
|
case ELLIPSE_4 : cmd_Draw_Info = "<img src=cmd-draw-hole-none.bmp>";
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case Degreestep :
|
|||
|
|
Angle_step_used = require;
|
|||
|
|
Angle_end_used = require;
|
|||
|
|
switch (Placeform) {
|
|||
|
|
case NONE : cmd_Draw_Info = "<img src=cmd-draw-hole-none-degstep.bmp>";
|
|||
|
|
break;
|
|||
|
|
case CIRCLE : cmd_Draw_Info = "<img src=cmd-draw-hole-none-degstep.bmp>";
|
|||
|
|
break;
|
|||
|
|
case FULL_ELLIPSE : cmd_Draw_Info = "<img src=cmd-draw-hole-ellipse-degstep.bmp>";
|
|||
|
|
break;
|
|||
|
|
case ELLIPSE_4 : cmd_Draw_Info = "<img src=cmd-draw-hole-ellipse4-degstep.bmp>";
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case Calcstep :
|
|||
|
|
Angle_step_used = require;
|
|||
|
|
Angle_end_used = require;
|
|||
|
|
switch (Placeform) {
|
|||
|
|
case NONE : cmd_Draw_Info = "<img src=cmd-draw-hole-none-calcstep.bmp>";
|
|||
|
|
break;
|
|||
|
|
case CIRCLE : cmd_Draw_Info = "<img src=cmd-draw-hole-none-calcstep.bmp>";
|
|||
|
|
break;
|
|||
|
|
case FULL_ELLIPSE : cmd_Draw_Info = "<img src=cmd-draw-hole-ellipse-calcstep.bmp>";
|
|||
|
|
break;
|
|||
|
|
case ELLIPSE_4 : cmd_Draw_Info = "<img src=cmd-draw-hole-ellipse4-calcstep.bmp>";
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
if (DrawType == DrawGROUP) {
|
|||
|
|
Angle_step_used = require;
|
|||
|
|
Angle_end_used = require;
|
|||
|
|
cmd_Draw_Info = "<img src=cmd-draw-group.bmp>";
|
|||
|
|
RotateMatch = 1;
|
|||
|
|
}
|
|||
|
|
else if (DrawType != DrawMOVE && PadVia == "VIA") {
|
|||
|
|
RotateMatch = 0;
|
|||
|
|
}
|
|||
|
|
return;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
|
|||
|
|
|
|||
|
|
// ****** main menu ******
|
|||
|
|
int menue(void) {
|
|||
|
|
int RESULT;
|
|||
|
|
if (Placeform == NONE) {
|
|||
|
|
if (DrawType == DrawGROUP) Length_Distance_Radius = " not used "; // 2012-04-12
|
|||
|
|
else Length_Distance_Radius = "&+ radius ";
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
Name1st = " ";
|
|||
|
|
NameExt = " ";
|
|||
|
|
if (board && DrawType == DrawMOVE) {
|
|||
|
|
Name1st = " &- 1st. Element ";
|
|||
|
|
NameExt = " name";
|
|||
|
|
}
|
|||
|
|
if (board && DrawType == DrawWIRE) {
|
|||
|
|
Name1st = " &- Signal ";
|
|||
|
|
NameExt = " name";
|
|||
|
|
}
|
|||
|
|
if (board && DrawType == DrawPOLYGON) {
|
|||
|
|
Name1st = " &- Signal ";
|
|||
|
|
NameExt = " name";
|
|||
|
|
}
|
|||
|
|
if (library && DrawType == DrawPOLYGON) {
|
|||
|
|
Name1st = " ";
|
|||
|
|
NameExt = " ";
|
|||
|
|
}
|
|||
|
|
if (package && DrawType == DrawPAD) {
|
|||
|
|
Name1st = " &- 1st. Pad ";
|
|||
|
|
NameExt = " name";
|
|||
|
|
}
|
|||
|
|
if (board && DrawType == DrawPAD) {
|
|||
|
|
Name1st = " &- Signal ";
|
|||
|
|
NameExt = " name";
|
|||
|
|
}
|
|||
|
|
if (package && DrawType == DrawSMD) {
|
|||
|
|
Name1st = " &- 1st. Smd ";
|
|||
|
|
NameExt = " name";
|
|||
|
|
}
|
|||
|
|
if (package && DrawType == DrawMOVE || package && DrawType == DrawWIRE) {
|
|||
|
|
Name1st = " ";
|
|||
|
|
NameExt = " ";
|
|||
|
|
}
|
|||
|
|
if ( schematic) {
|
|||
|
|
Name1st = " &- Net name ";
|
|||
|
|
NameExt = " ";
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
RESULT = dlgDialog("Command Draw") {
|
|||
|
|
dlgVBoxLayout {
|
|||
|
|
dlgHBoxLayout {
|
|||
|
|
dlgSpacing (8);
|
|||
|
|
dlgLabel (Draw_Info, 1);
|
|||
|
|
}
|
|||
|
|
dlgHBoxLayout {
|
|||
|
|
dlgGroup("Option") {
|
|||
|
|
set_Draw_Info();
|
|||
|
|
dlgGridLayout {
|
|||
|
|
|
|||
|
|
dlgCell( 1, 1) dlgHBoxLayout dlgSpacing(10);
|
|||
|
|
dlgCell( 1, 4) dlgHBoxLayout dlgSpacing(10);
|
|||
|
|
|
|||
|
|
if (DrawType == DrawWIRE || DrawType == DrawPOLYGON) {
|
|||
|
|
dlgCell( 5, 2) dlgLabel( "&Width ");
|
|||
|
|
dlgCell( 5, 3) dlgStringEdit( width);
|
|||
|
|
}
|
|||
|
|
if (DrawType == DrawWIRE || DrawType == DrawPOLYGON || DrawType == DrawSMD || DrawType == DrawMOVE) {
|
|||
|
|
dlgCell( 5, 5) dlgLabel(" &Layer");
|
|||
|
|
dlgCell( 5, 6) dlgStringEdit(layer);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
dlgCell( 5, 8) dlgLabel(Name1st, 1);
|
|||
|
|
if ( Name1st != " ") {
|
|||
|
|
dlgCell( 5, 9) dlgStringEdit(SigName); // Signal-, Element-, Net-Name
|
|||
|
|
}
|
|||
|
|
dlgCell( 5, 10) dlgLabel(NameExt ,1);
|
|||
|
|
|
|||
|
|
dlgCell( 7, 2) dlgLabel( "&X center coord. ");
|
|||
|
|
dlgCell( 7, 3) dlgRealEdit( x1, minx, maxx);
|
|||
|
|
dlgCell( 7, 5) dlgLabel( "&Y center coord. ");
|
|||
|
|
dlgCell( 7, 6) dlgRealEdit( y1, miny, maxy);
|
|||
|
|
dlgCell( 7, 8) dlgHBoxLayout { dlgLabel( Length_Distance_Radius, 1); dlgStretch(1); }
|
|||
|
|
dlgCell( 7, 9) dlgHBoxLayout { dlgRealEdit( x2, 0, maxx); dlgStretch(1); }
|
|||
|
|
|
|||
|
|
dlgCell( 8, 2) dlgLabel("Angle st&art <20> ");
|
|||
|
|
dlgCell( 8, 3) dlgRealEdit( StartAngle, 0.0, 720.0); // 2010-10-15
|
|||
|
|
dlgCell( 8, 5) dlgLabel("A&ngle step ");
|
|||
|
|
dlgCell( 8, 6) dlgRealEdit( AngleStep, -360.0, 360.0);
|
|||
|
|
dlgCell( 8, 7) dlgSpacing(12);
|
|||
|
|
dlgCell( 8, 8) dlgLabel(" Angle &end <20> ");
|
|||
|
|
dlgCell( 8, 9) dlgRealEdit( EndAngle, 0.0, 720.0);
|
|||
|
|
dlgCell( 8,10) dlgSpacing(50);
|
|||
|
|
|
|||
|
|
dlgCell( 9, 0) dlgVBoxLayout dlgSpacing(12);
|
|||
|
|
dlgCell( 9, 3) if(DrawType == DrawGROUP) { // 2011-10-21
|
|||
|
|
dlgCheckBox("Use selected group", UseMarkedGroup);
|
|||
|
|
}
|
|||
|
|
dlgCell( 9, 6) dlgLabel(Angle_step_used, 1);
|
|||
|
|
dlgCell( 9, 9) dlgLabel(Angle_end_used, 1);
|
|||
|
|
|
|||
|
|
|
|||
|
|
dlgCell( 5, 0) dlgRadioButton("Wire &1 ", DrawType) {
|
|||
|
|
Draw_Info = " ";
|
|||
|
|
if (library) Name_used = Not_Used;
|
|||
|
|
else Name_used = " ";
|
|||
|
|
//Length_Distance_Radius = "&+ radius ";
|
|||
|
|
dlgReject();
|
|||
|
|
dlgAccept();
|
|||
|
|
}
|
|||
|
|
dlgCell( 6, 0) dlgRadioButton("P&olygon ", DrawType) {
|
|||
|
|
Draw_Info = " ";
|
|||
|
|
if (library) Name_used = Not_Used;
|
|||
|
|
else Name_used = " ";
|
|||
|
|
//Length_Distance_Radius = "&+ radius ";
|
|||
|
|
dlgAccept();
|
|||
|
|
}
|
|||
|
|
dlgCell( 6, 9) dlgLabel(Name_used, 1);
|
|||
|
|
|
|||
|
|
dlgCell( 7, 0) dlgRadioButton("&Move ", DrawType) { // 2006.07.06 alf@cadsoft.de
|
|||
|
|
Draw_Info = "MOVE Elements by Name";
|
|||
|
|
Name_used = require;
|
|||
|
|
//Length_Distance_Radius = "&+ radius ";
|
|||
|
|
dlgAccept();
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
dlgCell( 8, 0) dlgRadioButton("&Group *", DrawType) {
|
|||
|
|
Draw_Info = "GROUP CUT all elements displayed and PASTE (rotated).";
|
|||
|
|
Name_used = " ";
|
|||
|
|
Length_Distance_Radius = "&+ distance ";
|
|||
|
|
RotateMatch = 1;
|
|||
|
|
dlgAccept();
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
if (board || package) {
|
|||
|
|
dlgCell( 12, 0) dlgRadioButton("&Hole ", DrawType) {
|
|||
|
|
Draw_Info = " ";
|
|||
|
|
Name_used = " ";
|
|||
|
|
Length_Distance_Radius = "%+ distance ";
|
|||
|
|
dlgAccept();
|
|||
|
|
}
|
|||
|
|
if (DrawType == DrawPAD || DrawType == DrawHOLE) {
|
|||
|
|
if (DrawType == DrawHOLE) {
|
|||
|
|
dlgCell( 12, 2) dlgLabel( " Hole d&rill ");
|
|||
|
|
}
|
|||
|
|
if (DrawType == DrawPAD) {
|
|||
|
|
if (package) {
|
|||
|
|
dlgCell( 12, 2) dlgLabel( " Pad d&rill ");
|
|||
|
|
}
|
|||
|
|
if (board) {
|
|||
|
|
dlgCell( 12, 2) dlgLabel( " Via d&rill ");
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
dlgCell( 12, 3) dlgStringEdit( Drill_Hole);
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
if (package) {
|
|||
|
|
PadVia = "PAD";
|
|||
|
|
Shapes[PAD_SHAPE_SQUARE] = "Square";
|
|||
|
|
Shapes[PAD_SHAPE_ROUND] = "Round";
|
|||
|
|
Shapes[PAD_SHAPE_OCTAGON] = "Octagon";
|
|||
|
|
Shapes[PAD_SHAPE_LONG] = "Long";
|
|||
|
|
Shapes[PAD_SHAPE_OFFSET] = "Offset";
|
|||
|
|
Shapes[PAD_SHAPE_OFFSET+1] = " "; // last must be empty
|
|||
|
|
|
|||
|
|
dlgCell( 13, 0) dlgRadioButton("&Pad ", DrawType) {
|
|||
|
|
Draw_Info = " ";
|
|||
|
|
Name_used = " can be used";
|
|||
|
|
Length_Distance_Radius = "&+ distance ";
|
|||
|
|
dlgAccept();
|
|||
|
|
}
|
|||
|
|
if (DrawType == DrawPAD) {
|
|||
|
|
dlgCell( 13, 2) dlgLabel( " PAD &Diameter ");
|
|||
|
|
dlgCell( 13, 3) dlgStringEdit( PAD_diameter);
|
|||
|
|
dlgCell( 13, 5) dlgLabel( " Schape ");
|
|||
|
|
dlgCell( 13, 6) dlgComboBox(Shapes, ShapeSelect);
|
|||
|
|
}
|
|||
|
|
dlgCell( 14, 0) dlgRadioButton("&Smd ", DrawType) {
|
|||
|
|
Draw_Info = " ";
|
|||
|
|
Name_used = " ";
|
|||
|
|
Length_Distance_Radius = "&+ distance ";
|
|||
|
|
dlgAccept();
|
|||
|
|
}
|
|||
|
|
if (DrawType == DrawSMD) {
|
|||
|
|
dlgCell( 14, 2) dlgLabel( " &Wide dx ");
|
|||
|
|
dlgCell( 14, 3) dlgRealEdit( SMD_dx);
|
|||
|
|
dlgCell( 14, 5) dlgLabel( " Heigh&t dy ");
|
|||
|
|
dlgCell( 14, 6) dlgRealEdit( SMD_dy);
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
if (board) {
|
|||
|
|
PadVia = "VIA";
|
|||
|
|
Shapes[PAD_SHAPE_SQUARE] = "Square";
|
|||
|
|
Shapes[PAD_SHAPE_ROUND] = "Round";
|
|||
|
|
Shapes[PAD_SHAPE_OCTAGON] = "Octagon";
|
|||
|
|
Shapes[PAD_SHAPE_OCTAGON+1] = " ";
|
|||
|
|
ShapeSelect = PAD_SHAPE_OCTAGON+1;
|
|||
|
|
|
|||
|
|
dlgCell( 13, 0) dlgRadioButton("&Via ", DrawType) { // ** Via in Board / Pad in Package **
|
|||
|
|
Draw_Info = " ";
|
|||
|
|
Name_used = " can be used";
|
|||
|
|
Length_Distance_Radius = "&+ distance ";
|
|||
|
|
RotateMatch = 0;
|
|||
|
|
dlgAccept();
|
|||
|
|
}
|
|||
|
|
if (DrawType == DrawPAD) {
|
|||
|
|
dlgCell( 13, 2) dlgLabel( " VIA &Diameter ");
|
|||
|
|
dlgCell( 13, 3) dlgStringEdit( PAD_diameter);
|
|||
|
|
dlgCell( 13, 5) dlgLabel( " Schape ");
|
|||
|
|
dlgCell( 13, 6) dlgComboBox(Shapes, ShapeSelect);
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
dlgStretch(1);
|
|||
|
|
}
|
|||
|
|
dlgSpacing(8);
|
|||
|
|
dlgHBoxLayout {
|
|||
|
|
dlgLabel(cmd_Draw_Info, 1); // picture for info
|
|||
|
|
dlgGroup("Angle step type") {
|
|||
|
|
dlgRadioButton("Not used ", AngleStepTyp) set_Draw_Info();
|
|||
|
|
dlgRadioButton("&<26> degree step ", AngleStepTyp) set_Draw_Info();
|
|||
|
|
dlgRadioButton("&/ calc. steps ", AngleStepTyp) set_Draw_Info();
|
|||
|
|
dlgLabel(" ");
|
|||
|
|
if (DrawType == DrawMOVE || DrawType == DrawSMD ) {
|
|||
|
|
dlgCheckBox("Rotate &item to match ", RotateMatch) {
|
|||
|
|
set_Draw_Info();
|
|||
|
|
}
|
|||
|
|
dlgHBoxLayout {
|
|||
|
|
dlgLabel( " I&tem ");
|
|||
|
|
dlgRealEdit(EangleOffset, 0.0, 359.9);
|
|||
|
|
dlgLabel( " rotate offset");
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
dlgGroup("Form") {
|
|||
|
|
dlgHBoxLayout {
|
|||
|
|
//set_Draw_Info();
|
|||
|
|
dlgRadioButton("Not &Used", Placeform) {
|
|||
|
|
set_Draw_Info();
|
|||
|
|
if (EllipsFactor != 1.0) {
|
|||
|
|
M_EllipsFactor = EllipsFactor;
|
|||
|
|
EllipsFactor = 1;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
dlgRadioButton("&Circle", Placeform) {
|
|||
|
|
set_Draw_Info();
|
|||
|
|
if (EllipsFactor != 1.0) {
|
|||
|
|
M_EllipsFactor = EllipsFactor;
|
|||
|
|
EllipsFactor = 1;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
dlgRadioButton("Full ellipse &0", Placeform) {
|
|||
|
|
set_Draw_Info();
|
|||
|
|
if (EllipsFactor != 1.0) {
|
|||
|
|
M_EllipsFactor = EllipsFactor;
|
|||
|
|
}
|
|||
|
|
else EllipsFactor = M_EllipsFactor;
|
|||
|
|
}
|
|||
|
|
dlgRadioButton("1/&4 ellipse", Placeform) {
|
|||
|
|
set_Draw_Info();
|
|||
|
|
if (EllipsFactor != 1.0) {
|
|||
|
|
M_EllipsFactor = EllipsFactor;
|
|||
|
|
}
|
|||
|
|
else EllipsFactor = M_EllipsFactor;
|
|||
|
|
}
|
|||
|
|
dlgStretch(1);
|
|||
|
|
}
|
|||
|
|
dlgSpacing(8);
|
|||
|
|
dlgHBoxLayout {
|
|||
|
|
dlgLabel( " Ellipse &factor y = x*f ");
|
|||
|
|
dlgRealEdit( EllipsFactor, +0.01, +100.0);
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
dlgStretch(1);
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
dlgHBoxLayout {
|
|||
|
|
dlgLabel("<font color=\"blue\"><b>Grid " + GridUnit[grid] + "</b></font>");
|
|||
|
|
dlgSpacing(12);
|
|||
|
|
dlgLabel(Mark_Info);
|
|||
|
|
dlgStretch(1);
|
|||
|
|
}
|
|||
|
|
dlgLabel(Label_Move, 1);
|
|||
|
|
dlgHBoxLayout {
|
|||
|
|
dlgLabel("<nobr><font color=\"red\">" + Help_Err + "</font><nobr>", 1);
|
|||
|
|
dlgStretch(1);
|
|||
|
|
}
|
|||
|
|
dlgHBoxLayout {
|
|||
|
|
dlgPushButton("+OK") {
|
|||
|
|
dlgAccept();
|
|||
|
|
PressOk = 1;
|
|||
|
|
}
|
|||
|
|
dlgPushButton("-Cancel") { dlgReject(); exit(0); }
|
|||
|
|
dlgStretch(1);
|
|||
|
|
dlgLabel(Version);
|
|||
|
|
dlgPushButton("Help") info();
|
|||
|
|
}
|
|||
|
|
};
|
|||
|
|
return RESULT;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
|
|||
|
|
string getPrefix(string s) {
|
|||
|
|
int l = strlen(s);
|
|||
|
|
string prfx;
|
|||
|
|
for (int n = 0; n <= l; n++) {
|
|||
|
|
if (s[n] < '0' || s[n] > '9');
|
|||
|
|
else {
|
|||
|
|
prfx = strsub(s, 0, n);
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
return prfx;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
|
|||
|
|
int getNumber(string s) {
|
|||
|
|
int l = strlen(s);
|
|||
|
|
for (int n = 0; n <= l; n++) {
|
|||
|
|
if (s[n] < '0' || s[n] > '9');
|
|||
|
|
else return strtol(strsub(s, n));
|
|||
|
|
}
|
|||
|
|
return 0;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
|
|||
|
|
// if Element in Project
|
|||
|
|
int exist(string e) {
|
|||
|
|
board(B) {
|
|||
|
|
B.elements(E) {
|
|||
|
|
if (E.name == e) return 1;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
return 0;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
|
|||
|
|
// ** draw wire Ellipse **
|
|||
|
|
string wireEllipse(void) {
|
|||
|
|
string e;
|
|||
|
|
real rad;
|
|||
|
|
string xystart;
|
|||
|
|
int start = 1;
|
|||
|
|
for (real winkel = StartAngle; winkel <= EndAngle; winkel += AngleStep) {
|
|||
|
|
rad = PI / 180 * winkel;
|
|||
|
|
sprintf(h, "(R%.9f %.9f)\n",
|
|||
|
|
x1 + (cos(rad) * x2),
|
|||
|
|
y1 + (sin(rad) * x2 * EllipsFactor) );
|
|||
|
|
e += h;
|
|||
|
|
if (start) {
|
|||
|
|
xystart = h;
|
|||
|
|
start = 0;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
if (DrawType == DrawPOLYGON && AngleStepTyp != None) {
|
|||
|
|
e += xystart;
|
|||
|
|
}
|
|||
|
|
return e;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
|
|||
|
|
// *** generate Script to draw WIRE ***
|
|||
|
|
void drawWire(void) {
|
|||
|
|
if (board && SigName) SigName = "'"+SigName+"'";
|
|||
|
|
if (library) SigName = "";
|
|||
|
|
|
|||
|
|
real rad = PI / 180 * StartAngle;
|
|||
|
|
real a;
|
|||
|
|
|
|||
|
|
if (AngleStepTyp) {
|
|||
|
|
switch(Placeform) {
|
|||
|
|
case NONE :
|
|||
|
|
for (a = StartAngle; a <= EndAngle; a += AngleStep) {
|
|||
|
|
rad = PI / 180 * a;
|
|||
|
|
sprintf(h, "WIRE %s %s (R%.9f %.9f) (R%.9f %.9f);\n",
|
|||
|
|
width, SigName,
|
|||
|
|
x1, y1,
|
|||
|
|
x1 + (cos(rad) * x2),
|
|||
|
|
y1 + (sin(rad) * x2 * EllipsFactor) );
|
|||
|
|
s += h;
|
|||
|
|
}
|
|||
|
|
break;
|
|||
|
|
case CIRCLE :
|
|||
|
|
sprintf(h, "WIRE %s %s ", width, SigName);
|
|||
|
|
s += h;
|
|||
|
|
for (a = StartAngle; a <= EndAngle; a += AngleStep) {
|
|||
|
|
rad = PI / 180 * a;
|
|||
|
|
sprintf(h, " (R%.9f %.9f) ", x1 + (cos(rad) * x2), y1 + (sin(rad) * x2 * EllipsFactor) );
|
|||
|
|
s += h;
|
|||
|
|
}
|
|||
|
|
s += ";\n";
|
|||
|
|
break;
|
|||
|
|
case FULL_ELLIPSE :
|
|||
|
|
sprintf(h, "WIRE %s %s ", width, SigName);
|
|||
|
|
s += h;
|
|||
|
|
s += wireEllipse() + ";\n";
|
|||
|
|
break;
|
|||
|
|
case ELLIPSE_4 :
|
|||
|
|
sprintf(h, "WIRE %s %s ", width, SigName);
|
|||
|
|
s += h;
|
|||
|
|
s += wireEllipse() + ";\n";
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
else {
|
|||
|
|
sprintf(h, "WIRE %s %s (R%.9f %.9f) (R%.9f %.9f);\n",
|
|||
|
|
width, SigName,
|
|||
|
|
x1, y1,
|
|||
|
|
x1 + (cos(rad) * x2),
|
|||
|
|
y1 + (sin(rad) * x2 * EllipsFactor) );
|
|||
|
|
s += h;
|
|||
|
|
}
|
|||
|
|
return;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
|
|||
|
|
// ** draw Polygon ***
|
|||
|
|
void drawPolygon(void) {
|
|||
|
|
if (board && SigName) SigName = "'"+SigName+"'";
|
|||
|
|
if (library) SigName = "";
|
|||
|
|
|
|||
|
|
if((Placeform == FULL_ELLIPSE || Placeform == ELLIPSE_4) && EllipsFactor == 1.0) {
|
|||
|
|
dlgMessageBox("!Da fehlt der Ellipsfaktor", "OK");
|
|||
|
|
exit(-2);
|
|||
|
|
}
|
|||
|
|
string ecmd;
|
|||
|
|
|
|||
|
|
if (AngleStepTyp) {
|
|||
|
|
switch(Placeform) {
|
|||
|
|
case NONE :
|
|||
|
|
sprintf(ecmd, "POLYGON %s %s ", width, SigName );
|
|||
|
|
s += ecmd;
|
|||
|
|
s += wireEllipse();
|
|||
|
|
break;
|
|||
|
|
case CIRCLE :
|
|||
|
|
sprintf(ecmd, "POLYG %s %s ", width, SigName );
|
|||
|
|
s += ecmd;
|
|||
|
|
s += wireEllipse();
|
|||
|
|
s += ";\n";
|
|||
|
|
break;
|
|||
|
|
case FULL_ELLIPSE :
|
|||
|
|
sprintf(ecmd, "Polygo %s %s ", width, SigName );
|
|||
|
|
s += ecmd;
|
|||
|
|
s += wireEllipse();
|
|||
|
|
s += ";\n";
|
|||
|
|
break;
|
|||
|
|
case ELLIPSE_4 :
|
|||
|
|
sprintf(ecmd, "Polygon %s %s ", width, SigName );
|
|||
|
|
s += ecmd;
|
|||
|
|
s += wireEllipse();
|
|||
|
|
s += ";\n";
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
else {
|
|||
|
|
switch(Placeform) {
|
|||
|
|
case NONE :
|
|||
|
|
sprintf(ecmd, "POLy %s %s ", width, SigName );
|
|||
|
|
s += ecmd;
|
|||
|
|
sprintf(ecmd, " (R%.9f %.9f)\n", x1, y1 );
|
|||
|
|
s += ecmd;
|
|||
|
|
s += wireEllipse();
|
|||
|
|
s += ecmd +";\n";
|
|||
|
|
break;
|
|||
|
|
case CIRCLE :
|
|||
|
|
sprintf(ecmd, "POLY %s %s ", width, SigName );
|
|||
|
|
s += ecmd;
|
|||
|
|
sprintf(ecmd, " (R%.9f %.9f)\n", x1, y1 );
|
|||
|
|
s += ecmd;
|
|||
|
|
s += wireEllipse();
|
|||
|
|
s += ecmd;
|
|||
|
|
s += ";\n";
|
|||
|
|
break;
|
|||
|
|
case FULL_ELLIPSE :
|
|||
|
|
sprintf(ecmd, "POlY %s %s ", width, SigName );
|
|||
|
|
s += ecmd;
|
|||
|
|
sprintf(ecmd, " (R%.9f %.9f)\n", x1, y1 );
|
|||
|
|
s += ecmd;
|
|||
|
|
s += wireEllipse();
|
|||
|
|
s += ecmd;
|
|||
|
|
s += ";\n";
|
|||
|
|
break;
|
|||
|
|
case ELLIPSE_4 :
|
|||
|
|
sprintf(ecmd, "pOLYGON %s %s ", width, SigName );
|
|||
|
|
s += ecmd;
|
|||
|
|
sprintf(ecmd, " (R%.9f %.9f)\n", x1, y1 );
|
|||
|
|
s += ecmd;
|
|||
|
|
s += wireEllipse();
|
|||
|
|
s += ecmd;
|
|||
|
|
s += ";\n";
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
return ;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
|
|||
|
|
// *** generate Script to MOVE packages ***
|
|||
|
|
void drawMove(void) {
|
|||
|
|
real rad = PI / 180 * StartAngle;
|
|||
|
|
string Prefix = getPrefix(SigName);
|
|||
|
|
int NameCount = getNumber(SigName);
|
|||
|
|
string m = "";
|
|||
|
|
if (layer == "16") {
|
|||
|
|
m = "M"; // to mirror the Element
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
if (AngleStepTyp) {
|
|||
|
|
if (AngleStep < 0) {
|
|||
|
|
if (StartAngle < EndAngle) StartAngle+= 360;
|
|||
|
|
for (real a = StartAngle; a > EndAngle; a += AngleStep) {
|
|||
|
|
string eName;
|
|||
|
|
sprintf(eName, "%s%d", Prefix, NameCount);
|
|||
|
|
if (exist(eName)) {
|
|||
|
|
rad = PI / 180 * a;
|
|||
|
|
sprintf(h, "MOVE '%s' (R%.9f %.9f);\n",
|
|||
|
|
eName,
|
|||
|
|
x1 + (cos(rad) * x2),
|
|||
|
|
y1 + (sin(rad) * x2 * EllipsFactor)
|
|||
|
|
);
|
|||
|
|
s += h;
|
|||
|
|
real ang = 0;
|
|||
|
|
if (RotateMatch) {
|
|||
|
|
if (m) ang = 180.0 - a;
|
|||
|
|
else ang = a;
|
|||
|
|
}
|
|||
|
|
sprintf(h, "ROTATE =%sR%.2f '%s';\n", m, ang+EangleOffset, eName);
|
|||
|
|
s += h;
|
|||
|
|
NameCount++;
|
|||
|
|
}
|
|||
|
|
else break;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
else {
|
|||
|
|
for (real a = StartAngle; a < EndAngle; a += AngleStep) {
|
|||
|
|
string eName;
|
|||
|
|
sprintf(eName, "%s%d", Prefix, NameCount);
|
|||
|
|
if (exist(eName)) {
|
|||
|
|
rad = PI / 180 * a;
|
|||
|
|
sprintf(h, "MOVE '%s' (R%.9f %.9f);\n", eName,
|
|||
|
|
x1 + (cos(rad) * x2),
|
|||
|
|
y1 + (sin(rad) * x2 * EllipsFactor) );
|
|||
|
|
s += h;
|
|||
|
|
real ang = 0;
|
|||
|
|
if (RotateMatch) {
|
|||
|
|
if (m) ang = 180.0 - a;
|
|||
|
|
else ang = a;
|
|||
|
|
}
|
|||
|
|
sprintf(h, "ROTATE =%sR%.2f '%s';\n", m, ang, eName);
|
|||
|
|
s += h;
|
|||
|
|
NameCount++;
|
|||
|
|
}
|
|||
|
|
else break;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
else {
|
|||
|
|
if (exist(SigName)) {
|
|||
|
|
sprintf(h, "MOVE '%s' (R%.9f %.9f);\n", SigName,
|
|||
|
|
x1 + (cos(rad) * x2),
|
|||
|
|
y1 + (sin(rad) * x2 * EllipsFactor) );
|
|||
|
|
s += h;
|
|||
|
|
real ang = StartAngle;
|
|||
|
|
if (RotateMatch) {
|
|||
|
|
if (m) ang = 180.0 - StartAngle;
|
|||
|
|
else ang = StartAngle;
|
|||
|
|
}
|
|||
|
|
else ang = 0;
|
|||
|
|
sprintf(h, "ROTATE =%sR%.2f '%s';\n", m, ang, SigName);
|
|||
|
|
s += h;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
return;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
|
|||
|
|
// *** generate Script to place SMDs ***
|
|||
|
|
void drawSmd(void) {
|
|||
|
|
if (SigName) SigName = "'"+SigName+"'";
|
|||
|
|
if (SMD_dx && SMD_dy) {
|
|||
|
|
sprintf(h, "CHANGE SMD %.9f %.9f;\n", SMD_dx, SMD_dy);
|
|||
|
|
s += h;
|
|||
|
|
}
|
|||
|
|
real rad = PI / 180 * StartAngle;
|
|||
|
|
if (AngleStep) {
|
|||
|
|
if (AngleStep < 0) {
|
|||
|
|
if (StartAngle > EndAngle) StartAngle+= 360;
|
|||
|
|
for (real a = StartAngle; a > EndAngle; a += AngleStep) {
|
|||
|
|
rad = PI / 180 * a;
|
|||
|
|
if (EAGLE_VERSION >= 4 && EAGLE_RELEASE >= 10 || EAGLE_VERSION >= 5) {
|
|||
|
|
string rm = "";
|
|||
|
|
if (RotateMatch) sprintf(rm, "R%.2f", a);
|
|||
|
|
sprintf(h, "SMD %s %s (R%.9f %.9f);\n", // 2008-05-06
|
|||
|
|
rm,
|
|||
|
|
SigName,
|
|||
|
|
x1 + (cos(rad) * x2),
|
|||
|
|
y1 + (sin(rad) * x2 * EllipsFactor)
|
|||
|
|
);
|
|||
|
|
s += h;
|
|||
|
|
}
|
|||
|
|
else {
|
|||
|
|
sprintf(h, "SMD (R%.9f %.9f);\n",
|
|||
|
|
x1 + (cos(rad) * x2),
|
|||
|
|
y1 + (sin(rad) * x2 * EllipsFactor)
|
|||
|
|
);
|
|||
|
|
s += h;
|
|||
|
|
}
|
|||
|
|
if (SigName) SigName = ""; // 2008-05-06
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
else {
|
|||
|
|
for (real a = StartAngle; a < EndAngle; a += AngleStep) {
|
|||
|
|
rad = PI / 180 * a;
|
|||
|
|
if (EAGLE_VERSION >= 4 && EAGLE_RELEASE >= 10 || EAGLE_VERSION >= 5) {
|
|||
|
|
string rm;
|
|||
|
|
if (RotateMatch) sprintf(rm, "R%.2f", a);
|
|||
|
|
sprintf(h, "SMD %s %s (R%.9f %.9f);\n", // 2008-05-06
|
|||
|
|
rm,
|
|||
|
|
SigName,
|
|||
|
|
x1 + (cos(rad) * x2),
|
|||
|
|
y1 + (sin(rad) * x2 * EllipsFactor)
|
|||
|
|
);
|
|||
|
|
s += h;
|
|||
|
|
if (SigName) SigName = ""; // 2008-05-06
|
|||
|
|
}
|
|||
|
|
else {
|
|||
|
|
sprintf(h, "SMD (R%.9f %.9f);\n",
|
|||
|
|
x1 + (cos(rad) * x2),
|
|||
|
|
y1 + (sin(rad) * x2 * EllipsFactor)
|
|||
|
|
);
|
|||
|
|
s += h;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
else {
|
|||
|
|
if (EAGLE_VERSION >= 4 && EAGLE_RELEASE >= 10 || EAGLE_VERSION >= 5) {
|
|||
|
|
string rm;
|
|||
|
|
if (RotateMatch) sprintf(rm, "R%.2f", StartAngle);
|
|||
|
|
|
|||
|
|
sprintf(h, "SMD %s %s (R%.9f %.9f);\n", // 2008-05-06
|
|||
|
|
rm,
|
|||
|
|
SigName,
|
|||
|
|
x1 + (cos(rad) * x2),
|
|||
|
|
y1 + (sin(rad) * x2 * EllipsFactor)
|
|||
|
|
);
|
|||
|
|
s+= h;
|
|||
|
|
if (SigName) SigName = ""; // 2008-05-06
|
|||
|
|
}
|
|||
|
|
else {
|
|||
|
|
sprintf(h, "SMD (R%.9f %.9f);\n",
|
|||
|
|
x1 + (cos(rad) * x2),
|
|||
|
|
y1 + (sin(rad) * x2 * EllipsFactor)
|
|||
|
|
);
|
|||
|
|
s+= h;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
return ;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
|
|||
|
|
// *** generate Script to place PADs ***
|
|||
|
|
void drawPad(void) {
|
|||
|
|
if (SigName) SigName = "'"+SigName+"'";
|
|||
|
|
real rad = PI / 180 * StartAngle;
|
|||
|
|
if (PadVia == "PAD" || PadVia == "VIA") { // 2013-08-05 change shape auch bei Via
|
|||
|
|
if (ShapeSelect < PAD_SHAPE_OFFSET+1)
|
|||
|
|
s += "CHANGE SHAPE " + Shapes[ShapeSelect] + ";\n";
|
|||
|
|
}
|
|||
|
|
string Rotate_option = "";
|
|||
|
|
if (AngleStep) {
|
|||
|
|
string h;
|
|||
|
|
if (AngleStep < 0) {
|
|||
|
|
if (StartAngle < EndAngle) StartAngle+= 360;
|
|||
|
|
for (real a = StartAngle; a > EndAngle; a += AngleStep) {
|
|||
|
|
rad = PI / 180 * a;
|
|||
|
|
if (PadVia == "PAD") sprintf(Rotate_option, "R%.2f", a);
|
|||
|
|
if (EAGLE_VERSION >= 4 && EAGLE_RELEASE >= 10 || EAGLE_VERSION >= 5) {
|
|||
|
|
sprintf(h, "%s %s %s (R%.9f %.9f);\n", PadVia, Rotate_option, SigName, // 2010-06-09 alf
|
|||
|
|
x1 + (cos(rad) * x2),
|
|||
|
|
y1 + (sin(rad) * x2 * EllipsFactor) );
|
|||
|
|
}
|
|||
|
|
else {
|
|||
|
|
sprintf(h, "%s %s (R%.9f %.9f);\n", PadVia, SigName,
|
|||
|
|
x1 + (cos(rad) * x2),
|
|||
|
|
y1 + (sin(rad) * x2 * EllipsFactor) );
|
|||
|
|
}
|
|||
|
|
s += h;
|
|||
|
|
SigName = "";
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
else {
|
|||
|
|
for (real a = StartAngle; a < EndAngle; a += AngleStep) {
|
|||
|
|
rad = PI / 180 * a;
|
|||
|
|
if (PadVia == "PAD") sprintf(Rotate_option, "R%.2f", a);
|
|||
|
|
if (EAGLE_VERSION >= 4 && EAGLE_RELEASE >= 10 || EAGLE_VERSION >= 5) {
|
|||
|
|
sprintf(h, "%s %s %s (R%.9f %.9f);\n", // 2010-06-09
|
|||
|
|
PadVia,
|
|||
|
|
Rotate_option,
|
|||
|
|
SigName,
|
|||
|
|
x1 + (cos(rad) * x2),
|
|||
|
|
y1 + (sin(rad) * x2 * EllipsFactor) );
|
|||
|
|
}
|
|||
|
|
else {
|
|||
|
|
sprintf(h, "%s '%s' (R%.9f %.9f);\n",
|
|||
|
|
PadVia,
|
|||
|
|
SigName,
|
|||
|
|
x1 + (cos(rad) * x2),
|
|||
|
|
y1 + (sin(rad) * x2 * EllipsFactor) );
|
|||
|
|
}
|
|||
|
|
s += h;
|
|||
|
|
SigName = "";
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
else {
|
|||
|
|
if (PadVia == "PAD") sprintf(Rotate_option, "R%.2f", StartAngle);
|
|||
|
|
if (EAGLE_VERSION >= 4 && EAGLE_RELEASE >= 10 || EAGLE_VERSION >= 5) {
|
|||
|
|
sprintf(h, "%s %s %s (R%.9f %.9f);\n", // 2010-06-09
|
|||
|
|
PadVia,
|
|||
|
|
Rotate_option,
|
|||
|
|
SigName,
|
|||
|
|
x1 + (cos(rad) * x2),
|
|||
|
|
y1 + (sin(rad) * x2 * EllipsFactor) );
|
|||
|
|
s+= h;
|
|||
|
|
}
|
|||
|
|
else {
|
|||
|
|
sprintf(h, "%s '%s' (R%.9f %.9f);\n", // Via
|
|||
|
|
PadVia,
|
|||
|
|
SigName,
|
|||
|
|
x1 + (cos(rad) * x2),
|
|||
|
|
y1 + (sin(rad) * x2 * EllipsFactor) );
|
|||
|
|
s += h;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
return ;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
// *** generate Script to place HOLEs ***
|
|||
|
|
void drawHole(void) {
|
|||
|
|
real rad = PI / 180 * StartAngle;
|
|||
|
|
|
|||
|
|
sprintf(h, "HOLE %s ", Drill_Hole);
|
|||
|
|
s += h;
|
|||
|
|
if (Placeform == ELLIPSE_4) {
|
|||
|
|
s += wireEllipse() + ";\n";;
|
|||
|
|
}
|
|||
|
|
else if (AngleStep) {
|
|||
|
|
if (AngleStep < 0) {
|
|||
|
|
if (StartAngle < EndAngle) StartAngle+= 360;
|
|||
|
|
for (real a = StartAngle; a > EndAngle; a += AngleStep) {
|
|||
|
|
rad = PI / 180 * a;
|
|||
|
|
sprintf(h, " (R%.9f %.9f)\n", x1 + (cos(rad) * x2), y1 + (sin(rad) * x2 * EllipsFactor) ); // 2013-08-05 kein Semikolon
|
|||
|
|
s += h;
|
|||
|
|
}
|
|||
|
|
s += ";\n";
|
|||
|
|
}
|
|||
|
|
else {
|
|||
|
|
for (real a = StartAngle; a < EndAngle; a += AngleStep) {
|
|||
|
|
rad = PI / 180 * a;
|
|||
|
|
sprintf(h, " (R%.9f %.9f)\n", x1 + (cos(rad) * x2), y1 + (sin(rad) * x2 * EllipsFactor) ); // 2013-08-05 kein Semikolon
|
|||
|
|
s += h;
|
|||
|
|
}
|
|||
|
|
s += ";\n";
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
else {
|
|||
|
|
sprintf(h, "HOLE %s (R%.9f %.9f);\n", Drill_Hole,
|
|||
|
|
x1 + (cos(rad) * x2),
|
|||
|
|
y1 + (sin(rad) * x2 * EllipsFactor) );
|
|||
|
|
s += h;
|
|||
|
|
}
|
|||
|
|
return ;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
|
|||
|
|
void drawGroup(void) {
|
|||
|
|
real groupdistance, m;
|
|||
|
|
if (board) board(B) {
|
|||
|
|
gridunit = (B.grid.unit);
|
|||
|
|
m = abs(B.area.x2);
|
|||
|
|
if (groupdistance < m) groupdistance = m;
|
|||
|
|
m = abs(B.area.x1);
|
|||
|
|
if (groupdistance < m) groupdistance = m;
|
|||
|
|
m = abs(B.area.y2);
|
|||
|
|
if (groupdistance < m) groupdistance = m;
|
|||
|
|
m = abs(B.area.y1);
|
|||
|
|
if (groupdistance < m) groupdistance = m;
|
|||
|
|
}
|
|||
|
|
if (library) library(L) {
|
|||
|
|
gridunit = (L.grid.unit);
|
|||
|
|
if (package) package(P) {
|
|||
|
|
m = abs(P.area.x2);
|
|||
|
|
if (groupdistance < m) groupdistance = m;
|
|||
|
|
m = abs(P.area.x1);
|
|||
|
|
if (groupdistance < m) groupdistance = m;
|
|||
|
|
m = abs(P.area.y2);
|
|||
|
|
if (groupdistance < m) groupdistance = m;
|
|||
|
|
m = abs(P.area.y1);
|
|||
|
|
if (groupdistance < m) groupdistance = m;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
groupdistance = maxx; // maximum
|
|||
|
|
if (!UseMarkedGroup) { // 2011-10-21
|
|||
|
|
sprintf(s, "GROUP (%.9f %.9f) (%.9f %.9f) (%.9f %.9f) (%.9f %.9f) (>%.9f %.9f);\n",
|
|||
|
|
-groupdistance, -groupdistance,
|
|||
|
|
groupdistance, -groupdistance,
|
|||
|
|
groupdistance, groupdistance,
|
|||
|
|
-groupdistance, groupdistance,
|
|||
|
|
-groupdistance, -groupdistance
|
|||
|
|
);
|
|||
|
|
}
|
|||
|
|
sprintf(h, "CUT (R0 0);\n");
|
|||
|
|
s += h;
|
|||
|
|
for (real a = StartAngle; a <= EndAngle-AngleStep; a += AngleStep) {
|
|||
|
|
sprintf(h, "PASTE R%.2f (R0 0);\n", a); // 2011-10-21
|
|||
|
|
s += h;
|
|||
|
|
}
|
|||
|
|
return;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
void unknown(string m) {
|
|||
|
|
if (dlgMessageBox("unknown parameter\n" + m, "OK", "Cancel" ) != 0) exit(-1);
|
|||
|
|
return;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
|
|||
|
|
// ******* Main ***************************************************************
|
|||
|
|
int n = 1;
|
|||
|
|
if (argc > 1) {
|
|||
|
|
do {
|
|||
|
|
Para = strupr(argv[n]);
|
|||
|
|
// *** Order of parameters can changed here ***
|
|||
|
|
// *** Eagle-Parser cut character ' from argument ***
|
|||
|
|
if (Para[0] == '+' ) { Para[0] = ' '; x2 = strtod(Para); }
|
|||
|
|
else if (Para[0] == 'A' ) { Para[0] = ' '; StartAngle = strtod(Para); }
|
|||
|
|
else if (Para[0] == 'N' ) { Para[0] = ' '; AngleStep = strtod(Para); }
|
|||
|
|
else if (Para[0] == 'E' ) { Para[0] = ' '; EndAngle = strtod(Para); }
|
|||
|
|
else if (Para[0] == 'L' ) { layer = strsub(Para, 1); }
|
|||
|
|
else if (Para[0] == 'W' ) { Para[0] = ' '; width = Para; DrawType = DrawWIRE; }
|
|||
|
|
else if (Para[0] == 'X' ) { Para[0] = ' '; x1 = strtod(Para); }
|
|||
|
|
else if (Para[0] == 'Y' ) { Para[0] = ' '; y1 = strtod(Para); }
|
|||
|
|
else if (Para[0] == 'O' ) { DrawType = DrawPOLYGON; }
|
|||
|
|
else if (Para[0] == 'P' ) { PadVia = "PAD"; DrawType = DrawPAD; }
|
|||
|
|
else if (Para[0] == 'V' ) { PadVia = "VIA"; DrawType = DrawPAD; }
|
|||
|
|
else if (Para[0] == 'S' ) { DrawType = DrawSMD; }
|
|||
|
|
else if (Para[0] == 'I' ) { Para[0] = ' '; SMD_dx = strtod(Para); }
|
|||
|
|
else if (Para[0] == 'T' ) { Para[0] = ' '; SMD_dy = strtod(Para); }
|
|||
|
|
else if (Para[0] == '-' ) { SigName = strsub(Para, 1); }
|
|||
|
|
else if (Para[0] == 'D' ) { Para[0] = ' '; PAD_diameter = Para; } // Pad/Via diameter
|
|||
|
|
else if (Para[0] == 'R' ) { Para[0] = ' '; Drill_Hole = Para; DrawType = DrawHOLE; }
|
|||
|
|
else if (Para[0] == 0xb0) { AngleStepTyp = Degreestep; } // <20>
|
|||
|
|
else if (Para[0] == '/' ) { AngleStepTyp = Calcstep; }
|
|||
|
|
else if (Para[0] == 'G' ) { DrawType = DrawGROUP; }
|
|||
|
|
else if (strstr(Para, "MOVE") == 0) { DrawType = DrawMOVE; } // ** do not change order with next line **
|
|||
|
|
else if (Para[0] == 'M' ) { RotateMatch = 1; } // ** do not change order with prior line **
|
|||
|
|
else if (Para[0] == 'C' ) { Placeform = CIRCLE; }
|
|||
|
|
else if (Para[0] == '0' ) { Para[0] = ' '; Placeform = FULL_ELLIPSE; }
|
|||
|
|
else if (Para[0] == 'F' ) { Para[0] = ' '; EllipsFactor = strtod(Para); }
|
|||
|
|
else if (Para[0] == '4' ) { Placeform = ELLIPSE_4; }
|
|||
|
|
else unknown(Para);
|
|||
|
|
n++;
|
|||
|
|
} while (argv[n]);
|
|||
|
|
}
|
|||
|
|
else {
|
|||
|
|
if (board) {
|
|||
|
|
board(B) grid = B.grid.unit;
|
|||
|
|
}
|
|||
|
|
if (schematic) { schematic(S) grid = S.grid.unit; }
|
|||
|
|
if (library) {
|
|||
|
|
if (package || symbol) {
|
|||
|
|
library(L) grid = L.grid.unit;
|
|||
|
|
}
|
|||
|
|
else {
|
|||
|
|
dlgMessageBox("!Start this ULP in a Package or Symbol Editor", "OK");
|
|||
|
|
exit(0);
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
Set_MinMax_Unit(grid);
|
|||
|
|
|
|||
|
|
int Result;
|
|||
|
|
do {
|
|||
|
|
Result = menue();
|
|||
|
|
if(PressOk) {
|
|||
|
|
if (error()) {
|
|||
|
|
string h;
|
|||
|
|
sprintf(h, "error = %d", error());
|
|||
|
|
dlgMessageBox(h + " \n" + Help_Err, "OK");
|
|||
|
|
PressOk = 0;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
} while(!PressOk);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
SigName = strupr(SigName);
|
|||
|
|
|
|||
|
|
sprintf(s, "SET Wire_Bend 2;\n"); // *** Script header ***
|
|||
|
|
if (layer) s += "CHANGE LAYER " + layer + ";\n";
|
|||
|
|
if (PAD_diameter) s += "CHANGE DIAMETER " + PAD_diameter + ";\n";
|
|||
|
|
if (Drill_Hole) s += "CHANGE DRILL " + Drill_Hole + ";\n";
|
|||
|
|
//if (SigName && DrawType == DrawSMD || DrawType == DrawSMD) s += "SMD " + SigName + ";\n"; // 2008.05.05
|
|||
|
|
|
|||
|
|
if (Placeform == ELLIPSE_4) {
|
|||
|
|
if (EndAngle > 90.0) EndAngle = 90.0;
|
|||
|
|
if (StartAngle > EndAngle) StartAngle = 0.0;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
switch(AngleStepTyp) {
|
|||
|
|
case None : if (DrawType != DrawPOLYGON) {
|
|||
|
|
AngleStep = 360;
|
|||
|
|
}
|
|||
|
|
break;
|
|||
|
|
case Degreestep : if (!AngleStep) AngleStepTyp = None;
|
|||
|
|
break;
|
|||
|
|
case Calcstep : AngleStep = (EndAngle - StartAngle) / AngleStep;
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
switch(DrawType) {
|
|||
|
|
case DrawWIRE : drawWire();
|
|||
|
|
break;
|
|||
|
|
case DrawPOLYGON : drawPolygon();
|
|||
|
|
break;
|
|||
|
|
case DrawMOVE : drawMove();
|
|||
|
|
break;
|
|||
|
|
case DrawGROUP : drawGroup();
|
|||
|
|
break;
|
|||
|
|
case DrawHOLE : drawHole();
|
|||
|
|
break;
|
|||
|
|
case DrawPAD : drawPad();
|
|||
|
|
break;
|
|||
|
|
case DrawSMD : drawSmd();
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
|
|||
|
|
if (test) dlgDialog("Test") {
|
|||
|
|
dlgHBoxLayout dlgSpacing(500);
|
|||
|
|
dlgHBoxLayout {
|
|||
|
|
dlgVBoxLayout dlgSpacing(500);
|
|||
|
|
dlgTextView(s);
|
|||
|
|
}
|
|||
|
|
dlgHBoxLayout {
|
|||
|
|
dlgPushButton("OK") dlgAccept();
|
|||
|
|
dlgPushButton("ESC") { dlgReject(); exit(-1); }
|
|||
|
|
dlgStretch(1);
|
|||
|
|
dlgLabel(Version);
|
|||
|
|
}
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
exit (s);
|
|||
|
|
|
|||
|
|
|