#usage "Converter from Eagle-BRD to POV-Ray v1.05"
""
"See Eagle3D.pdf or Eagle3D_e.pdf for reference"
"
"
"Use only for Eagle v4.10 and later"
"
"
"Author: Matthias Weißer matthias@matwei.de"
#include "3dfunc41.ulp"
//Includes und Standardeinstellungen
string usrinc =
"#version 3.5;\n\n"
"//Set to on if the file should be used as .inc\n"
"#local use_file_as_inc = off;\n"
"#if(use_file_as_inc=off)\n\n\n"
"//changes the apperance of resistors (1 Blob / 0 real)\n"
"#declare global_res_shape = 1;\n"
"//randomize color of resistors 1=random 0=same color\n"
"#declare global_res_colselect = 0;\n"
"//Number of the color for the resistors\n"
"//0=Green, 1=\"normal color\" 2=Blue 3=Brown\n"
"#declare global_res_col = 1;\n"
"//Set to on if you want to render the PCB upside-down\n"
"#declare pcb_upsidedown = off;\n"
"//Set to x or z to rotate around the corresponding axis (referring to pcb_upsidedown)\n"
"#declare pcb_rotdir = x;\n"
"//Set the length off short pins over the PCB\n"
"#declare pin_length = 2.5;\n"
"#declare global_diode_bend_radius = 1;\n"
"#declare global_res_bend_radius = 1;\n"
"#declare global_solder = on;\n\n"
"#declare global_show_screws = on;\n"
"#declare global_show_washers = on;\n"
"#declare global_show_nuts = on;\n\n"
;
string incfiles =
"#include \"tools.inc\"\n"
"#include \"user.inc\"\n"
"\nglobal_settings{charset utf8}\n"
"\n";
//String für die Umgebung
string ambient =
"#if(environment=on)\n"
"sky_sphere {pigment {Navy}\n"
"pigment {bozo turbulence 0.65 octaves 7 omega 0.7 lambda 2\n"
"color_map {\n"
"[0.0 0.1 color rgb <0.85, 0.85, 0.85> color rgb <0.75, 0.75, 0.75>]\n"
"[0.1 0.5 color rgb <0.75, 0.75, 0.75> color rgbt <1, 1, 1, 1>]\n"
"[0.5 1.0 color rgbt <1, 1, 1, 1> color rgbt <1, 1, 1, 1>]}\n"
"scale <0.1, 0.5, 0.1>} rotate -90*x}\n"
"plane{y, -10.0-max(pcb_x_size,pcb_y_size)*abs(max(sin((pcb_rotate_x/180)*pi),sin((pcb_rotate_z/180)*pi)))\n"
"texture{T_Chrome_2D\n"
"normal{waves 0.1 frequency 3000.0 scale 3000.0}} translate<0,0,0>}\n"
"#end\n\n";
//used in the logo assignment
string logo_names[] =
{
"ATMEL",
"FTDI",
"PHILIPS",
"ST"
};
//Variablendeklaration
string depp;
string out_file; //Dateiname der POV-Ray Datei
string pack_file; //Dateiname der 3dpack.dat (Package-Zuordnungsdatei)
string usrpack_file; //Dateiname der 3dusrpac.dat (User Package-Zuordnungsdatei)
string color_file; //Dateiname der 3dcol.dat (Farbdatei)
string conf_file; //Dateiname der Konfigurationsdatei
string lang_file; //Dateiname der Sprachdatei
string mpd_file; //Dateiname der manuellen Package Definition
string brd_file; //Dateiname der BRD-Datei (inkl. Pfad)
string color_t = "texture {T_Gold_5C finish{reflection 0.1}}"; //Farbe des Widerstand-Toleranzrings
string color_ukpack = "pigment{Red filter 0.2}"; //Farbe für die Markierung unbekannter Bauteile
string pack_con[]; //Enthält die Datei 3dpack.dat
string pack_tra[]; //Nimmt jeweils eine Zeile aus der 3dpack.dat
string color_lgt[]; //Lichtfarben als Sprache
string color_lgtp[] = {"White","Red","Green","Blue","Yellow","Gray50","Gray25"};//Lichtfarbenausgabe
string color_slct[]; //Farbenzuordnung -> 3dcol.dat
string color_slctp[]; //Farbausgabe -> 3dcol.dat
string color_preset[]; //diverse Farbpresets
string tempstr; //temp halt
string makro[]; //für manuelle Zuordnung der Packages
string lang[]; //Array für Sprachen
string langslct[] = {"Deutsch","English", "French", "Italian", "Portuguese","Spanish"}; //Sprachauswahl
string config[]; //Optionsspeicher
string main_path; //Pfad des ULP-Ordners
string tmp_comment; //Für Anpassung der Kommentarsprache
string mpd_tmp1[],mpd_tmp2[]; //temporär zum Aufbau der Listview
string mpd[]; //enthält die Anpassungszeilen in Reinform
string mpd_view[]; //Für manuelle Auswahl der Packages per Listview
string mpd_search[]; //Zum Suchen in der Liste
string macro_name; //Der Name des Platinenmakros
string socket_str; //Der Sockelaufruf wird hier zusammengebaut
string slk_layers[]={"21,22,51,52","21,22,51,52","","21,22,23,24,25,26,27,28"}; //Enthält die Layer die für den BD genutzt werden
string ukpack; //Enthält die unbekannten Bauteile ->Ende der POVRay-Datei
string pov_pack; //Hier werden alle Packages reingeschrieben landet in .pov und .mpd
string ps_tmp; //Eingeführt für Prefix-Aufnahme
string mpd_show_pic[]; //Für die Anzeige des Bildes im manuellen Auswahldialog
string tempar[]; //Temporäres Stringarray
string anim_points_cam_flight_path[]; //Punkte für die Animation
string anim_points_cam_view_path[]; //Punkte für die Animation
string packgen_layers; //Layer zur Erzeugung von Gehäusen
real pcb_cuheight = 0.035; //Dicke der Kupferauflage
real pcb_height = 1.5; //Dicke der Platine
real x1,x2,y1,y2; //Variablen zur Berechnung von Leiterbahnen
real x_max,y_max,x_min,y_min; //Die Maximalwerte der Platine
real x_ver,y_ver; //Verschiebung der Platine zur Platzierung vor der Kamera
real angel; //Drehwinkel von Leiterbahnen/Bauteilen
real length; //Länge von Leiterbahnen
real width; //Breite von Leiterbahnen
real layer_dis; //Variable zur Top/Bottom-Platzierung
real temp; //temp halt
real ar_x[]; //Array für x-Werte
real ar_y[]; //Array für y-Werte
real ar_layerdis[]; //Array für Layerverschiebung
real bedruck_dis = 0.001; //Zusätzlich Höhe des Bestückungsdruck über Leiterbahnen
real pad_dis = 0.002; //Zusätzlich Höhe der Pad,Vias&SMD's über Leiterbahnen
real boh_dis = 0.003; //Zusätzlich Höhe der Pseudobohrungen über Leiterbahnen
real real_boh = 2.0; //Ab diesem Durchmesser werden reale Bohrungen erzeugt
real lgt1_int, lgt2_int, lgt3_int, lgt4_int; //Lichtintensität
real via_silk = 0.0; //Unter diesem Durchmesser werden VIA's überlackiert
real pcb_area; //Fläche der Platine in mm^2
real ri,rj; //Real-Schleifenvariablen
//Das hier sind die beim Start eingestellten Optionen
//This are the options which are selected on the start of the ULP
int opt_bau = 1; //Bauteile//Parts
int opt_lei = 1; //Leiterbahnen//Wires
int opt_pad = 1; //Lötaugen//PAD's and SMD's
int opt_pol = 1; //Polygone
int opt_boh = 1; //Bohrungen echte Löcher in der Platine/Leiterbahnen//real Holes
int opt_bohf = 0; //Bohrungen angedeutet durch schwarze Zylinder//fast Holes
int opt_obj = 1; //Wenn aktiviert werden weitere Informationen in die POVRay-Datei geschrieben -> weiterer Konverter
int opt_mup = 0; //Unbekannte Bauteile markieren//mark unknown parts
int opt_spn = 1; //Kurze Pins//short pins
int opt_pcb = 1; //Platine einblenden//show PCB
int opt_man = 0; //Bauteile manuell zuordnen//user assigned models
int opt_opcb = 0; //Platine wir nicht aus Polygonen erzeugt//rec. Board
int opt_bsd = 1; //Bestückungsdruck (Layer21/22)//Silk Screen
int opt_amb = 1; //Sorgt für eine nicht allzu langweilige Umgebung//environment
int opt_umpd = 0; //Manuelle Zuordnung aus vorhergehendem Lauf benutzen//use mpd-File
int opt_lang = 0; //Sprachauswahl//language preset
int opt_dur = 0; //Durchbrüche erzeugen//create holes in the pcb
//End
int pack_count; //Anzahl der aus pack.dat eingelesenen Gehäuse
int cam_inf[]; //Kamerainformation
int lgt1_inf[]; //Licht1 Daten
int lgt2_inf[]; //Licht2 Daten
int lgt3_inf[]; //Licht3 Daten
int lgt4_inf[]; //Licht4 Daten
int col_inf[] = {15,14,11,10,5,1,1,5,0,14}; //Farbeinstellungen der einzelnen Farben
int col_preset = 2; //Standareinstellung des Farbpreset
int col_count; //Anzahl Farben in der 3dcol.dat
int colc_r = 0; //Farberzeugung Rot
int colc_g = 0; //Farberzeugung Gelb
int colc_b = 0; //Farberzeugung Blau
int height_dlg = 3; //Std.-Höhe für Quarzdialog
int i,j,k,l; //Schleifenvariablen
int layer_cnt; //Anzahl benutzte Signallayer
int layer_used[]; //Für jeden Signal-Layer der benutzt wird wird hier eine 1 eingetragen
int pcb_angel[]; //Drehwinkel der Platine um x,y und z-Achse
int maindialog; //Nimmt das Ergebnis des Hauptdialog zur Auswertung auf
int socket_dlg=0; //Rückgabe des Sockeldialog
int jumper_dlg=0; //Rückgabe des Jumperdialog
int pcb_shape; //Form der Platine (rund/eckig)
int pcb_round_main_p; //Radius des als Platine gewählten Circle
int pcb_arc_prc=10; //Anzahl der Drehungen bei einem Arc in der Platine.
int mpd_slct; //Index manuell ausgewähltes Package
int mpd_dlg; //Rückgabewert des MPD-Dialog
int via_pos_x[],via_pos_y[],via_pos_d[]; //Hier werden alle VIA und PAD Positionen/Drill gespeichert
int via_ls[],via_le[]; //Informationen für Blind und Burried-Vias in 4.10
int via_cnt; //Anzahl der VIA's und PAD's
int via_sort_i[]; //Sortierindex für VIA/PAD
int wrs_pos_x1[],wrs_pos_y1[],wrs_pos_x2[],wrs_pos_y2[],wrs_wdt[],wrs_l[],wrs_p[];//Alle WIRES's aus Wires und Polygon werden hier eingetragen
int wrs_cnt; //Anzahl der wires
int wrs_sort_i1[],wrs_sort_i2[]; //Sortierindices für wires (x1,x2)
int pol_pos_x1[],pol_pos_y1[],pol_pos_x2[],pol_pos_y2[],pol_wdt[],pol_l[],pol_p[];//Alle WIRES's aus Polygon werden hier eingetragen
int pol_cnt; //Anzahl der Polygon-wires
int pol_sort_i1[],pol_sort_i2[]; //Sortierindices für Polygon-wires
int eagle3d_layer=230; //Layer der von Eagle3D verwendet wird (z.Z. für Animationspunkte)
int anim_npoints_cam_flight_path=0; //Anzahl der gegebenen Punkte (Kameraflugpfad)
int anim_npoints_cam_view_path=0; //Anzahl der gegebenen Punkte (Kamerablickpunktpfad)
int anim_nframes=20; //Anzahl der zu erzeugenden Frames
int logo_dialog=0; //Status des Logodialogs
//Ermittlung von Standardpfad und Dateinamen
main_path = filedir(argv[0]);
conf_file = main_path + "/3dconf.dat";
pack_file = main_path + "/3dpack.dat";
usrpack_file = main_path + "/3dusrpac.dat";
//legt eine neue 3dusrpac.dat bzw. 3dconf.dat an falls nicht vorhanden.
output(usrpack_file,"a") printf("");
output(conf_file,"a") printf("");
//Einlesen der Konfiguration evtl. vorhandenen Ausgabenamen
//Sprachdefinition
fileread(pack_con, conf_file);
fileread(config, conf_file);
if(pack_con[0] != "") out_file = pack_con[0];
if((pack_con[1] == "")||(pack_con[2] == ""))
{
dlgDialog("Select Language/Sprache auswählen")
{
dlgHBoxLayout
{
dlgGridLayout
{
dlgCell(0, 0) dlgLabel("Language/Sprache:");
dlgCell(0, 2) dlgComboBox(langslct, opt_lang);
}
}
dlgHBoxLayout dlgPushButton("&Ok")
{
if(opt_lang==0)
{
color_file = main_path + "/3dcol.dat";
lang_file = main_path + "/3dlang.dat";
}
else if(opt_lang==1)
{
color_file = main_path + "/3dcol_e.dat";
lang_file = main_path + "/3dlang_e.dat";
}
else if(opt_lang==2)
{
color_file = main_path + "/3dcol_fr.dat";
lang_file = main_path + "/3dlang_fr.dat";
}
else if(opt_lang==3)
{
color_file = main_path + "/3dcol_it.dat";
lang_file = main_path + "/3dlang_it.dat";
}
else if(opt_lang==4)
{
color_file = main_path + "/3dcol_pt.dat";
lang_file = main_path + "/3dlang_pt.dat";
}
else if(opt_lang==5)
{
color_file = main_path + "/3dcol_sp.dat";
lang_file = main_path + "/3dlang_sp.dat";
}
config[1] = color_file;
config[2] = lang_file;
dlgAccept();
}
};
}
else
{
//Wird gebraucht wenn Konfiguration zurückeschrieben wird!
color_file = pack_con[1];
lang_file = pack_con[2];
config[1] = color_file;
config[2] = lang_file;
if(filename(lang_file)=="3dlang.dat") opt_lang=0;
if(filename(lang_file)=="3dlang_e.dat") opt_lang=1;
if(filename(lang_file)=="3dlang_fr.dat") opt_lang=2;
if(filename(lang_file)=="3dlang_it.dat") opt_lang=3;
if(filename(lang_file)=="3dlang_pt.dat") opt_lang=4;
if(filename(lang_file)=="3dlang_sp.dat") opt_lang=5;
}
/*************************************
*Optionen aus der 3dconf.dat einlesen*
*************************************/
//Layer für den Bestückungsdruck
if(pack_con[3]!=""){config[3] = pack_con[3]; slk_layers[0] = pack_con[3];} else {config[3] = slk_layers[0];}
if(pack_con[4]!=""){config[4] = pack_con[4]; slk_layers[1] = pack_con[4];} else {config[4] = slk_layers[1];}
if(pack_con[5]!=""){config[5] = pack_con[5]; slk_layers[2] = pack_con[5];} else {config[5] = slk_layers[2];}
if(pack_con[6]!=""){config[6] = pack_con[6]; slk_layers[3] = pack_con[6];} else {config[6] = slk_layers[3];}
//Eagle3D Informationslayer
if(pack_con[7]!=""){config[7] = pack_con[7]; eagle3d_layer = strtol(pack_con[7]);} else {sprintf(config[7],"%d",eagle3d_layer);}
//Gehäusegenerierungslayer
if(pack_con[8]!=""){config[8] = pack_con[8]; packgen_layers = pack_con[8];} else {config[8] = packgen_layers;}
/***********************
*Einlesen der Farbdatei*
***********************/
fileread(tempar, color_file);
col_count = strsplit(color_slct, tempar[0], ':');
strsplit(color_slctp, tempar[1], ':');
col_count--;
//Einlesen der einzelnen Makros aus der 3dpack.dat
//für evtl. manuelle Zuordnung von Bauteilen
//zu 3D-Modellen
fileread(depp, pack_file);
fileread(tempstr, usrpack_file);
depp = tempstr + depp;
pack_count = strsplit(mpd, depp, '\n');
for(i=0;i0)
{
x1i = W.arc.x1;
y1i = W.arc.y1;
}
else
{
x1i = W.arc.x2;
y1i = W.arc.y2;
}
//rotate point
real x_rot = (u2mm(x1i-W.arc.xc) * cos(da) - u2mm(y1i-W.arc.yc) * sin(da)) + u2mm(W.arc.xc);
real y_rot = (u2mm(x1i-W.arc.xc) * sin(da) + u2mm(y1i-W.arc.yc) * cos(da)) + u2mm(W.arc.yc);
x_max = max(x_max,x_rot);
x_min = min(x_min,x_rot);
y_max = max(y_max,y_rot);
y_min = min(y_min,y_rot);
}
}
}
B.circles(C)
{
if(C.layer == 20)
{
x_max = max(x_max,u2mm(C.x+C.radius));
y_max = max(y_max,u2mm(C.y+C.radius));
x_min = min(x_min,u2mm(C.x-C.radius));
y_min = min(y_min,u2mm(C.y-C.radius));
pcb_round_main_p = max(pcb_round_main_p,C.radius);
}
}
if((x_min >= x_max)||(y_min >= y_max))
{
dlgMessageBox(lang[158]);
pcb_area = 10000;
y_min = x_min = 0;
y_max = x_max = 100;
}
else
{
pcb_area = (x_max-x_min)*(y_max-y_min);
}
cam_inf[0] = 0; //Kameraposition X
if ((x_max-x_min)>=(y_max-y_min)*4/3) cam_inf[1] = (x_max-x_min)*3.2; //Kameraposition Y
else cam_inf[1] = (y_max-y_min)*4.3;
cam_inf[2] = -(y_max-y_min)*2.3; //Kameraposition Z
cam_inf[3] = 0; //Kamerazielpunkt X
cam_inf[4] = -(y_max-y_min)/10; //Kamerazielpunkt X
cam_inf[5] = 0; //Kamerazielpunkt Z
cam_inf[6] = 20; //Kamerawinkel
lgt1_inf[0] = (x_max-x_min)*0.38; //Licht1 Position X
lgt1_inf[2] = (y_max-y_min)*0.53; //Licht1 Position Z
lgt2_inf[0] = -(x_max-x_min)*0.38; //Licht2 Position X
lgt2_inf[2] = (y_max-y_min)*0.53; //Licht2 Position Z
lgt3_inf[0] = (x_max-x_min)*0.38; //Licht3 Position X
lgt3_inf[2] = -(y_max-y_min)*0.36; //Licht3 Position Z
lgt4_inf[0] = -(x_max-x_min)*0.38; //Licht4 Position X
lgt4_inf[2] = -(y_max-y_min)*0.36; //Licht4 Position Z
if((x_max-x_min)>(y_max-y_min))
{
lgt1_inf[1] = (x_max-x_min)*0.57; //Licht1 Höhe
lgt2_inf[1] = (x_max-x_min)*0.57; //Licht2 Höhe
lgt3_inf[1] = (x_max-x_min)*0.57; //Licht3 Höhe
lgt4_inf[1] = (x_max-x_min)*0.57; //Licht4 Höhe
}
else
{
lgt1_inf[1] = (y_max-y_min)*0.57;
lgt2_inf[1] = (y_max-y_min)*0.57;
lgt3_inf[1] = (y_max-y_min)*0.57;
lgt4_inf[1] = (y_max-y_min)*0.57;
}
lgt1_inf[7] = 10; //Licht1 Spotlight Radius
lgt2_inf[7] = 10; //Licht2 Spotlight Radius
lgt3_inf[7] = 10; //Licht3 Spotlight Radius
lgt4_inf[7] = 10; //Licht4 Spotlight Radius
lgt1_inf[8] = 12; //Licht1 Spotlight Falloff
lgt2_inf[8] = 12; //Licht2 Spotlight Falloff
lgt3_inf[8] = 12; //Licht3 Spotlight Falloff
lgt4_inf[8] = 12; //Licht4 Spotlight Falloff
lgt1_inf[10] = 1; //Licht1 aktiviert?
lgt2_inf[10] = 1; //Licht2 aktiviert?
lgt3_inf[10] = 1; //Licht3 aktiviert?
lgt4_inf[10] = 1; //Licht4 aktiviert?
lgt1_inf[11] = 0; //Licht1 ohne schatten?
lgt2_inf[11] = 0; //Licht2 ohne schatten?
lgt3_inf[11] = 0; //Licht3 ohne schatten?
lgt4_inf[11] = 0; //Licht4 ohne schatten?
lgt1_int = 0.7+(pcb_area/70000); //Licht1 Intensität
lgt2_int = 0.7+(pcb_area/70000); //Licht2 Intensität
lgt3_int = 0.7+(pcb_area/70000); //Licht3 Intensität
lgt4_int = 0.7+(pcb_area/70000); //Licht4 Intensität
B.layers(L)
{
if((L.number<17)&&(L.used==1))
{
layer_cnt++;
layer_used[L.number] = 1;
}
}
i=0;
B.signals(S)
{
S.polygons(P)
{
if(u2mm(P.width)<0.1)
{
dlgMessageBox(lang[98]+"\n"+lang[99]+"\n"+lang[100]);
i=1;
break;
}
}
if(i==1) break;
}
if(x_max<0) x_ver = -x_max+((x_max-x_min)/2);
else if(x_max<((x_max-x_min)/2))x_ver = ((x_max-x_min)/2)-x_max;
else if(x_max<(x_max-x_min)) x_ver = -((x_max-x_min)/2+x_min);
else if(x_max>=(x_max-x_min)) x_ver = -x_min-(x_max-x_min)/2;
if(y_max<0) y_ver = abs(y_max)+((y_max-y_min)/2);
else if(y_max<((y_max-y_min)/2))y_ver = (y_max-y_min)/2-y_max;
else if(y_max<(y_max-y_min)) y_ver = -((y_max-y_min)/2+y_min);
else if(y_max>=(y_max-y_min)) y_ver = -(y_min+(y_max-y_min)/2);
}
}
else
{
//Meldung wenn ULP nicht im BRD gestartet
dlgMessageBox(lang[4]);
exit(0);
}
do{//do-Schleife um alles
do{//do-Schleife für Sprachumstellung (dlgAccept(1000);)
//Auswahlliste für Farbpresets laden
color_preset[0] = lang[107];
color_preset[1] = lang[108];
color_preset[2] = lang[112];
color_preset[3] = lang[112]+" 2";
color_preset[4] = lang[155];
color_preset[5] = lang[109];
//Farbnamen laden
if(opt_lang==0)
{
color_lgt[0] = "Weiß";
color_lgt[1] = "Rot";
color_lgt[2] = "Grün";
color_lgt[3] = "Blau";
color_lgt[4] = "Gelb";
color_lgt[5] = "Grau50";
color_lgt[6] = "Grau25";
}
else if(opt_lang==1)
{
color_lgt[0] = "White";
color_lgt[1] = "Red";
color_lgt[2] = "Green";
color_lgt[3] = "Blue";
color_lgt[4] = "Yellow";
color_lgt[5] = "Gray50";
color_lgt[6] = "Gray25";
}
else
{
color_lgt[0] = "White";
color_lgt[1] = "Red";
color_lgt[2] = "Green";
color_lgt[3] = "Blue";
color_lgt[4] = "Yellow";
color_lgt[5] = "Gray50";
color_lgt[6] = "Gray25";
}
anim_npoints_cam_flight_path=0;
anim_npoints_cam_view_path=0;
tempstr = "";
//Einstellungsdialog
maindialog = dlgDialog(lang[5])
{
dlgTabWidget
{
//Allgemein
dlgTabPage(lang[6])
{
dlgGroup(lang[7])
{
dlgGridLayout
{
dlgCell(0,0) dlgCheckBox(lang[8], opt_bau){if(opt_umpd==1) opt_bau=0;}
dlgCell(0,1) dlgCheckBox(lang[9], opt_pol);
dlgCell(1,0) dlgCheckBox(lang[10], opt_lei);
dlgCell(1,1) dlgCheckBox(lang[11], opt_boh) if(opt_boh==1) opt_bohf = 0;
dlgCell(2,0) dlgCheckBox(lang[12], opt_pad);
dlgCell(2,1) dlgCheckBox(lang[13], opt_bohf) if(opt_bohf==1) opt_boh = 0;
dlgCell(3,0) dlgCheckBox(lang[15], opt_mup){if(opt_man==1) opt_man=0; if(opt_umpd==1) {opt_mup=0; opt_man=0;}}
dlgCell(4,0) dlgCheckBox(lang[16], opt_man){if(opt_mup==0) opt_mup=1; if(opt_umpd==1) {opt_man=0; opt_mup=0;}}
dlgCell(4,1) dlgCheckBox(lang[17], opt_pcb);
dlgCell(5,0) dlgCheckBox(lang[18], opt_spn);
dlgCell(5,1) dlgCheckBox(lang[19], opt_opcb);
dlgCell(6,0) dlgCheckBox(lang[20], opt_bsd);
dlgCell(6,1) dlgCheckBox(lang[21], opt_amb);
dlgCell(7,0) dlgCheckBox(lang[97], opt_umpd) if(opt_umpd==1) {opt_bau=0; opt_man=0; opt_mup=0;}
dlgCell(7,1) dlgCheckBox(lang[121], opt_dur) if(opt_dur==1);
//Sorgt für gleichbleibende Breite des ULP-Fenster
dlgCell(8,0) dlgSpacing(220);
dlgCell(8,1) dlgSpacing(240);
}
}
dlgSpacing(5);
dlgGroup(lang[28])
{
dlgGridLayout
{
dlgCell(0,0,0,1) dlgStringEdit(out_file);
dlgCell(1,0) dlgPushButton(lang[29])
{
tempstr = dlgFileSave(lang[30], out_file,"*.pov");
if(tempstr!="") out_file = tempstr;
};
dlgCell(1,1) dlgPushButton(lang[132])
{
out_file = filesetext(brd_file, ".pov");
}
}
}
dlgSpacing(5);
dlgGroup("Sprache/Language")
{
dlgGridLayout
{
dlgCell(0, 0) dlgComboBox(langslct, opt_lang)
{
if(opt_lang==0)
{
color_file = main_path + "/3dcol.dat";
lang_file = main_path + "/3dlang.dat";
}
if(opt_lang==1)
{
for(i=0;i<6;i++) color_lgt[i] = color_lgtp[i];
color_file = main_path + "/3dcol_e.dat";
lang_file = main_path + "/3dlang_e.dat";
}
if(opt_lang==2)
{
for(i=0;i<6;i++) color_lgt[i] = color_lgtp[i];
color_file = main_path + "/3dcol_fr.dat";
lang_file = main_path + "/3dlang_fr.dat";
}
if(opt_lang==3)
{
for(i=0;i<6;i++) color_lgt[i] = color_lgtp[i];
color_file = main_path + "/3dcol_it.dat";
lang_file = main_path + "/3dlang_it.dat";
}
if(opt_lang==4)
{
for(i=0;i<6;i++) color_lgt[i] = color_lgtp[i];
color_file = main_path + "/3dcol_pt.dat";
lang_file = main_path + "/3dlang_pt.dat";
}
config[1] = color_file;
config[2] = lang_file;
config[3] = slk_layers[0];
config[4] = slk_layers[1];
config[5] = slk_layers[2];
config[6] = slk_layers[3];
sprintf(config[7],"%d",eagle3d_layer);
config[8] = packgen_layers;
//Einlesen der Sprachdatei
fileread(lang, lang_file);
//Einlesen der Farbdatei
fileread(tempar, color_file);
col_count = strsplit(color_slct, tempar[0], ':');
strsplit(color_slctp, tempar[1], ':');
col_count--;
if(out_file!="") config[0] = filedir(out_file);
output(conf_file,"w") for(i=0;i<9;i++) printf("%s\n",config[i]);
dlgAccept(1000);
};
}
}
}
//Platine
dlgTabPage(lang[31])
{
dlgGroup(lang[32]){
dlgGridLayout
{
dlgCell(0,0,0,2) dlgLabel(lang[33]);
dlgCell(0,3,0,5) dlgRealEdit(pcb_height,0.01,1000.0);
dlgCell(1,0,1,2) dlgLabel(lang[34]);
dlgCell(1,3,1,5) dlgRealEdit(pcb_cuheight,0.00001,1000.0);
dlgCell(2,0,2,2) dlgLabel(lang[102]+"\t");
dlgCell(2,3,2,5) dlgRealEdit(real_boh,0,50);
dlgCell(3,0,3,2) dlgLabel(lang[122]);
dlgCell(3,3,3,5) dlgRealEdit(via_silk,0,50);
dlgCell(4,0,4,2) dlgLabel(lang[89] + " X,Y,Z ");
dlgCell(4,3,4,3) dlgSpinBox(pcb_angel[0],-360,360);
dlgCell(4,4,4,4) dlgSpinBox(pcb_angel[1],-360,360);
dlgCell(4,5,4,5) dlgSpinBox(pcb_angel[2],-360,360);
dlgCell(5,0,5,5) dlgTextView("![](\"3d_ko.png\")
");
}}
}
//Kamera
dlgTabPage(lang[36])
{
dlgGroup(lang[37]){
dlgGridLayout
{
dlgCell(0, 0) dlgLabel(lang[38]);
dlgCell(0, 1) {dlgLabel(" X: "); dlgSpinBox(cam_inf[0],-10000,10000);}
dlgCell(0, 2) {dlgLabel(" Y: "); dlgSpinBox(cam_inf[1],-10000,10000);}
dlgCell(0, 3) {dlgLabel(" Z: "); dlgSpinBox(cam_inf[2],-10000,10000);}
dlgCell(1, 0) dlgLabel(lang[39]);
dlgCell(1, 1) {dlgLabel(" X: "); dlgSpinBox(cam_inf[3],-10000,10000);}
dlgCell(1, 2) {dlgLabel(" Y: "); dlgSpinBox(cam_inf[4],-10000,10000);}
dlgCell(1, 3) {dlgLabel(" Z: "); dlgSpinBox(cam_inf[5],-10000,10000);}
dlgCell(2, 0) dlgLabel(lang[40]);
dlgCell(2, 1,2,3) {dlgSpacing(20);dlgSpinBox(cam_inf[6],1,179);}
dlgCell(3,0,3,3) dlgTextView("![](\"3d_cam.png\")
");
}}
}
//Licht 1+2
dlgTabPage(lang[88] + " 1+2")
{
dlgGroup(lang[88] + " 1"){
dlgGridLayout
{
dlgCell(0,0) dlgCheckBox(lang[41],lgt1_inf[10]);
dlgCell(0,1) dlgLabel(lang[42]+" ");
dlgCell(0,2) dlgComboBox(color_lgt,lgt1_inf[9]);
dlgCell(1,0) dlgLabel(lang[43]);
dlgCell(1,1) dlgLabel("X:");
dlgCell(1,2) dlgSpinBox(lgt1_inf[0],-10000,10000);
dlgCell(1,3) dlgLabel("Y:");
dlgCell(1,4) dlgSpinBox(lgt1_inf[1],-10000,10000);
dlgCell(1,5) dlgLabel("Z:");
dlgCell(1,6) dlgSpinBox(lgt1_inf[2],-10000,10000);
dlgCell(2,0) dlgLabel(lang[44]);
dlgCell(2,1) dlgLabel("X: ");
dlgCell(2,2) dlgSpinBox(lgt1_inf[3],-10000,10000);
dlgCell(2,3) dlgLabel("Y: ");
dlgCell(2,4) dlgSpinBox(lgt1_inf[4],-10000,10000);
dlgCell(2,5) dlgLabel("Z: ");
dlgCell(2,6) dlgSpinBox(lgt1_inf[5],-10000,10000);
dlgCell(3,0) dlgCheckBox(lang[45], lgt1_inf[6]);
dlgCell(3,1) dlgLabel(lang[46]);
dlgCell(3,2) dlgSpinBox(lgt1_inf[7],1,1000);
dlgCell(3,3) dlgLabel(lang[47]);
dlgCell(3,4) dlgSpinBox(lgt1_inf[8],1,1000);
dlgCell(4,0) dlgCheckBox(lang[48],lgt1_inf[11]);
dlgCell(4,1) dlgLabel(lang[129]+" ");
dlgCell(4,2) dlgRealEdit(lgt1_int);
}}
dlgGroup(lang[88] + " 2"){
dlgGridLayout
{
dlgCell(0,0) dlgCheckBox(lang[41],lgt2_inf[10]);
dlgCell(0,1) dlgLabel(lang[42]+" ");
dlgCell(0,2) dlgComboBox(color_lgt,lgt2_inf[9]);
dlgCell(1,0) dlgLabel(lang[43]);
dlgCell(1,1) dlgLabel("X:");
dlgCell(1,2) dlgSpinBox(lgt2_inf[0],-10000,10000);
dlgCell(1,3) dlgLabel("Y:");
dlgCell(1,4) dlgSpinBox(lgt2_inf[1],-10000,10000);
dlgCell(1,5) dlgLabel("Z:");
dlgCell(1,6) dlgSpinBox(lgt2_inf[2],-10000,10000);
dlgCell(2,0) dlgLabel(lang[44]);
dlgCell(2,1) dlgLabel("X: ");
dlgCell(2,2) dlgSpinBox(lgt2_inf[3],-10000,10000);
dlgCell(2,3) dlgLabel("Y: ");
dlgCell(2,4) dlgSpinBox(lgt2_inf[4],-10000,10000);
dlgCell(2,5) dlgLabel("Z: ");
dlgCell(2,6) dlgSpinBox(lgt2_inf[5],-10000,10000);
dlgCell(3,0) dlgCheckBox(lang[45], lgt2_inf[6]);
dlgCell(3,1) dlgLabel(lang[46]);
dlgCell(3,2) dlgSpinBox(lgt2_inf[7],1,1000);
dlgCell(3,3) dlgLabel(lang[47]);
dlgCell(3,4) dlgSpinBox(lgt2_inf[8],1,1000);
dlgCell(4,0) dlgCheckBox(lang[48],lgt2_inf[11]);
dlgCell(4,1) dlgLabel(lang[129]+" ");
dlgCell(4,2) dlgRealEdit(lgt2_int);
}}
}
//Licht 3+4
dlgTabPage(lang[88] + " 3+4")
{
dlgGroup(lang[88] + " 3"){
dlgGridLayout
{
dlgCell(0,0) dlgCheckBox(lang[41],lgt3_inf[10]);
dlgCell(0,1) dlgLabel(lang[42]+" ");
dlgCell(0,2) dlgComboBox(color_lgt,lgt3_inf[9]);
dlgCell(1,0) dlgLabel(lang[43]);
dlgCell(1,1) dlgLabel("X:");
dlgCell(1,2) dlgSpinBox(lgt3_inf[0],-10000,10000);
dlgCell(1,3) dlgLabel("Y:");
dlgCell(1,4) dlgSpinBox(lgt3_inf[1],-10000,10000);
dlgCell(1,5) dlgLabel("Z:");
dlgCell(1,6) dlgSpinBox(lgt3_inf[2],-10000,10000);
dlgCell(2,0) dlgLabel(lang[44]);
dlgCell(2,1) dlgLabel("X: ");
dlgCell(2,2) dlgSpinBox(lgt3_inf[3],-10000,10000);
dlgCell(2,3) dlgLabel("Y: ");
dlgCell(2,4) dlgSpinBox(lgt3_inf[4],-10000,10000);
dlgCell(2,5) dlgLabel("Z: ");
dlgCell(2,6) dlgSpinBox(lgt3_inf[5],-10000,10000);
dlgCell(3,0) dlgCheckBox(lang[45], lgt3_inf[6]);
dlgCell(3,1) dlgLabel(lang[46]);
dlgCell(3,2) dlgSpinBox(lgt3_inf[7],1,1000);
dlgCell(3,3) dlgLabel(lang[47]);
dlgCell(3,4) dlgSpinBox(lgt3_inf[8],1,1000);
dlgCell(4,0) dlgCheckBox(lang[48],lgt3_inf[11]);
dlgCell(4,1) dlgLabel(lang[129]+" ");
dlgCell(4,2) dlgRealEdit(lgt3_int);
}}
dlgGroup(lang[88] + " 4"){
dlgGridLayout
{
dlgCell(0,0) dlgCheckBox(lang[41],lgt4_inf[10]);
dlgCell(0,1) dlgLabel(lang[42]+" ");
dlgCell(0,2) dlgComboBox(color_lgt,lgt4_inf[9]);
dlgCell(1,0) dlgLabel(lang[43]);
dlgCell(1,1) dlgLabel("X:");
dlgCell(1,2) dlgSpinBox(lgt4_inf[0],-10000,10000);
dlgCell(1,3) dlgLabel("Y:");
dlgCell(1,4) dlgSpinBox(lgt4_inf[1],-10000,10000);
dlgCell(1,5) dlgLabel("Z:");
dlgCell(1,6) dlgSpinBox(lgt4_inf[2],-10000,10000);
dlgCell(2,0) dlgLabel(lang[44]);
dlgCell(2,1) dlgLabel("X: ");
dlgCell(2,2) dlgSpinBox(lgt4_inf[3],-10000,10000);
dlgCell(2,3) dlgLabel("Y: ");
dlgCell(2,4) dlgSpinBox(lgt4_inf[4],-10000,10000);
dlgCell(2,5) dlgLabel("Z: ");
dlgCell(2,6) dlgSpinBox(lgt4_inf[5],-10000,10000);
dlgCell(3,0) dlgCheckBox(lang[45], lgt4_inf[6]);
dlgCell(3,1) dlgLabel(lang[46]);
dlgCell(3,2) dlgSpinBox(lgt4_inf[7],1,1000);
dlgCell(3,3) dlgLabel(lang[47]);
dlgCell(3,4) dlgSpinBox(lgt4_inf[8],1,1000);
dlgCell(4,0) dlgCheckBox(lang[48],lgt4_inf[11]);
dlgCell(4,1) dlgLabel(lang[129]+" ");
dlgCell(4,2) dlgRealEdit(lgt4_int);
}}
}
//Diverses
dlgTabPage(lang[148])
{
dlgGroup(lang[133]){
dlgGridLayout
{
dlgCell(0,0) dlgLabel(lang[134]);
dlgCell(0,1) dlgStringEdit(slk_layers[0]);
dlgCell(1,0) dlgLabel(lang[135]);
dlgCell(1,1) dlgStringEdit(slk_layers[1]);
dlgCell(2,0) dlgLabel(lang[136]);
dlgCell(2,1) dlgStringEdit(slk_layers[2]);
dlgCell(3,0) dlgLabel(lang[137]);
dlgCell(3,1) dlgStringEdit(slk_layers[3]);
dlgCell(4,0) dlgSpacing(100);
}}
dlgGroup("Animation"){
dlgGridLayout
{
dlgCell(0,0) dlgLabel("Eagle3D Layer ");
dlgCell(0,1) dlgSpinBox(eagle3d_layer,100,255);
dlgCell(1,0) dlgLabel(lang[151]);
dlgCell(1,1) dlgSpinBox(anim_nframes,5,5000);
}}
dlgGroup(lang[154]){
dlgGridLayout
{
dlgCell(0,0) dlgStringEdit(packgen_layers);
}}
};
//Farben
dlgTabPage(lang[49])
{
dlgGroup(lang[105]){
dlgGridLayout
{
dlgCell(0,0) dlgLabel(lang[106]);
dlgCell(0,1) dlgComboBox(color_preset,col_preset);
}}
dlgGroup(lang[50]){
dlgGridLayout
{
dlgCell(0,0) dlgLabel(lang[51]);
dlgCell(0,1) dlgComboBox(color_slct,col_inf[0]);
dlgCell(1,0) dlgLabel(lang[52]);
dlgCell(1,1) dlgComboBox(color_slct,col_inf[1]);
dlgCell(2,0) dlgLabel(lang[53]);
dlgCell(2,1) dlgComboBox(color_slct,col_inf[2]);
dlgCell(3,0) dlgLabel(lang[54]);
dlgCell(3,1) dlgComboBox(color_slct,col_inf[3]);
dlgCell(4,0) dlgLabel(lang[55]);
dlgCell(4,1) dlgComboBox(color_lgt,col_inf[4]);
dlgCell(5,0) dlgLabel(lang[56]);
dlgCell(5,1) dlgComboBox(color_slct,col_inf[8]);
dlgCell(6,0) dlgLabel(lang[104]);
dlgCell(6,1) dlgComboBox(color_slct,col_inf[9]);
}}
dlgGroup(lang[57]){
dlgGridLayout
{
dlgCell(0,0) dlgLabel(lang[58]);
dlgCell(0,1) dlgSpinBox(colc_r,0,255);
dlgCell(1,0) dlgLabel(lang[59]);
dlgCell(1,1) dlgSpinBox(colc_g,0,255);
dlgCell(2,0) dlgLabel(lang[60]);
dlgCell(2,1) dlgSpinBox(colc_b,0,255);
dlgCell(3,0) dlgLabel(lang[61]);
dlgCell(3,1) dlgStringEdit(tempstr)
dlgCell(0,3,3,3) dlgPushButton(lang[62]+"\n"+lang[63])
{
sprintf(depp,"pigment{rgb<%f,%f,%f>}",(1.0/255.0)*real(colc_r),(1.0/255.0)*real(colc_g),(1.0/255.0)*real(colc_b));
color_slctp[col_count] = depp;
color_slct[col_count++] = tempstr;
output(color_file,"w")
{
for(i=0;i1)
{
ar_layerdis[i] = (pcb_height/(layer_cnt-1))*j;
if(i==15) ar_layerdis[i] = ar_layerdis[i] + pcb_cuheight;
j++;
}
}
output(out_file,"a"){
//Animationseinstellungen
printf("//Animation\n");
printf("#declare global_anim = off;\n");
printf("#local global_anim_showcampath = no;\n\n");
printf("#declare global_fast_mode = off;\n\n");
//Colorpreset
printf("#declare col_preset = %d;\n",col_preset);
//Lange/Kurze Pins
if(opt_spn==1) printf("#declare pin_short = on;\n");
else printf("#declare pin_short = off;\n");
//Umgebung
if(opt_amb==1) printf("\n#declare environment = on;\n");
else printf("\n#declare environment = off;\n");
//Kameraeinstellungen
printf("\n#local cam_x = %d;\n",cam_inf[0]);
printf("#local cam_y = %d;\n",cam_inf[1]);
printf("#local cam_z = %d;\n",cam_inf[2]);
printf("#local cam_a = %d;\n",cam_inf[6]);
printf("#local cam_look_x = %d;\n",cam_inf[3]);
printf("#local cam_look_y = %d;\n",cam_inf[4]);
printf("#local cam_look_z = %d;\n",cam_inf[5]);
//Drehung um Achsen
printf("\n#local pcb_rotate_x = %d;\n",pcb_angel[0]);
printf("#local pcb_rotate_y = %d;\n",pcb_angel[1]);
printf("#local pcb_rotate_z = %d;\n\n",pcb_angel[2]);
printf("#local pcb_board = on;\n");
printf("#local pcb_parts = on;\n");
printf("#if(global_fast_mode=off)\n");
printf("\t#local pcb_polygons = on;\n");
printf("\t#local pcb_silkscreen = on;\n");
printf("\t#local pcb_wires = on;\n");
printf("\t#local pcb_pads_smds = on;\n");
printf("#else\n");
printf("\t#local pcb_polygons = off;\n");
printf("\t#local pcb_silkscreen = off;\n");
printf("\t#local pcb_wires = off;\n");
printf("\t#local pcb_pads_smds = off;\n");
printf("#end\n\n");
//Lichtpositionen/Intensität
printf("#local lgt1_pos_x = %d;\n",lgt1_inf[0]);
printf("#local lgt1_pos_y = %d;\n",lgt1_inf[1]);
printf("#local lgt1_pos_z = %d;\n",lgt1_inf[2]);
printf("#local lgt1_intense = %f;\n",lgt1_int);
printf("#local lgt2_pos_x = %d;\n",lgt2_inf[0]);
printf("#local lgt2_pos_y = %d;\n",lgt2_inf[1]);
printf("#local lgt2_pos_z = %d;\n",lgt2_inf[2]);
printf("#local lgt2_intense = %f;\n",lgt2_int);
printf("#local lgt3_pos_x = %d;\n",lgt3_inf[0]);
printf("#local lgt3_pos_y = %d;\n",lgt3_inf[1]);
printf("#local lgt3_pos_z = %d;\n",lgt3_inf[2]);
printf("#local lgt3_intense = %f;\n",lgt3_int);
printf("#local lgt4_pos_x = %d;\n",lgt4_inf[0]);
printf("#local lgt4_pos_y = %d;\n",lgt4_inf[1]);
printf("#local lgt4_pos_z = %d;\n",lgt4_inf[2]);
printf("#local lgt4_intense = %f;\n",lgt4_int);
//Platinendicke ausgeben
printf("\n//Do not change these values\n");
printf("#declare pcb_height = %f;\n",pcb_height);
printf("#declare pcb_cuheight = %f;\n",pcb_cuheight);
//Platinenmaße ausgeben
printf("#declare pcb_x_size = %f;\n",abs(x_max-x_min));
printf("#declare pcb_y_size = %f;\n",abs(y_max-y_min));
//Top und Bottom-Layer benutzt?
printf("#declare pcb_layer1_used = %d;\n",layer_used[1]);
printf("#declare pcb_layer16_used = %d;\n",layer_used[16]);
//Wenn das hier off ist wird in sämtlichen INC's der Testmodus eingeschaltet
printf("#declare inc_testmode = off;\n");
//Zufallsstrom für Widerstandsfarbgebung
printf("#declare global_seed=seed(%d);\n",time()%1024);
//Layerverschiebungen ausgeben
printf("#declare global_pcb_layer_dis = array[16]\n{\n");
for(i=0;i<16;i++)
{
printf("\t%f,\n",ar_layerdis[i]);
}
printf("}\n");
//Durchmesser für reale Bohrungen
printf("#declare global_pcb_real_hole = %f;\n",real_boh);
//Includefiles
printf("\n%s",incfiles);
//manuelle Farben schreiben
if(col_preset==0)
{
printf("#declare col_brd = texture{%s}\n",color_slctp[col_inf[0]]);
printf("#declare col_wrs = texture{%s}\n",color_slctp[col_inf[1]]);
printf("#declare col_pds = texture{%s}\n",color_slctp[col_inf[2]]);
printf("#declare col_hls = texture{%s}\n",color_slctp[col_inf[3]]);
printf("#declare col_bgr = %s;\n",color_lgtp[col_inf[4]]);
printf("#declare col_slk = texture{%s}\n",color_slctp[col_inf[8]]);
printf("#declare col_thl = texture{%s}\n",color_slctp[col_inf[9]]);
printf("#declare col_pol = texture{%s}\n\n",color_slctp[col_inf[1]]);
}
board(B)
{
//Eintragen aller difference-VIA's und PAD's in Array
via_cnt=0;
B.signals(S)
{
S.vias(V)
{
if((opt_pcb==1)&&(V.start>1)&&(V.end<16)) continue;
if(u2mm(V.drill)>=real_boh)
{
via_pos_x[via_cnt]=V.x;
via_pos_y[via_cnt]=V.y;
via_pos_d[via_cnt]=V.drill;
via_ls[via_cnt]=V.start;
via_le[via_cnt]=V.end;
via_cnt++;
}
}
}
B.elements(E)
{
E.package.contacts(C)
{
if(C.pad)
{
if(u2mm(C.pad.drill)>=real_boh)
{
via_pos_x[via_cnt]=C.pad.x;
via_pos_y[via_cnt]=C.pad.y;
via_pos_d[via_cnt]=C.pad.drill;
via_ls[via_cnt]=1;
via_le[via_cnt]=16;
via_cnt++;
}
}
}
}
//sortieren der VIA's in x-Richtung
sort(via_cnt, via_sort_i, via_pos_x, via_pos_y, via_pos_d, via_ls, via_le);
if(opt_lei==1){
//Alle wires in Array eintragen
wrs_cnt=0;
B.signals(S)
{
S.wires(W)
{
if(( ((W.layer<17)&&(opt_pcb==0)) || (W.layer==1) || (W.layer==16) )&&
is_in_range(W.x1,W.x2,x_min,x_max)&&
is_in_range(W.y1,W.y2,y_min,y_max)
&&(!W.arc)
)
{
if(W.x1<=W.x2)
{
wrs_pos_x1[wrs_cnt]=W.x1;wrs_pos_y1[wrs_cnt]=W.y1;wrs_pos_x2[wrs_cnt]=W.x2;wrs_pos_y2[wrs_cnt]=W.y2;
}
else
{
wrs_pos_x1[wrs_cnt]=W.x2;wrs_pos_y1[wrs_cnt]=W.y2;wrs_pos_x2[wrs_cnt]=W.x1;wrs_pos_y2[wrs_cnt]=W.y1;
}
wrs_wdt[wrs_cnt]=W.width;
wrs_l[wrs_cnt]=W.layer;
wrs_p[wrs_cnt]=0;
wrs_cnt++;
}
}
}
//wires in x-Richtung sortieren
sort(wrs_cnt, wrs_sort_i1, wrs_pos_x1, wrs_pos_y1, wrs_pos_x2, wrs_pos_y2, wrs_wdt, wrs_l);
sort(wrs_cnt, wrs_sort_i2, wrs_pos_x2, wrs_pos_y2, wrs_pos_x1, wrs_pos_y1, wrs_wdt, wrs_l);
}
//Alle Polygon-Wires in Array eintragen
if(opt_pol==1){
pol_cnt=0;
B.signals(S)
{
S.polygons(P)
{
P.fillings(W)
{
if( ((W.layer<17)&&(opt_pcb==0)) || (W.layer==1) || (W.layer==16) )
{
if(W.x1<=W.x2)
{
pol_pos_x1[pol_cnt]=W.x1;pol_pos_y1[pol_cnt]=W.y1;pol_pos_x2[pol_cnt]=W.x2;pol_pos_y2[pol_cnt]=W.y2;
}
else
{
pol_pos_x1[pol_cnt]=W.x2;pol_pos_y1[pol_cnt]=W.y2;pol_pos_x2[pol_cnt]=W.x1;pol_pos_y2[pol_cnt]=W.y1;
}
pol_wdt[pol_cnt]=W.width;
pol_l[pol_cnt]=W.layer;
pol_p[pol_cnt]=0;
pol_cnt++;
}
}
P.contours(W)
{
if( ((W.layer<17)&&(opt_pcb==0)) || (W.layer==1) || (W.layer==16) )
{
if(W.x1<=W.x2)
{
pol_pos_x1[pol_cnt]=W.x1;pol_pos_y1[pol_cnt]=W.y1;pol_pos_x2[pol_cnt]=W.x2;pol_pos_y2[pol_cnt]=W.y2;
}
else
{
pol_pos_x1[pol_cnt]=W.x2;pol_pos_y1[pol_cnt]=W.y2;pol_pos_x2[pol_cnt]=W.x1;pol_pos_y2[pol_cnt]=W.y1;
}
pol_wdt[pol_cnt]=W.width;
pol_l[pol_cnt]=W.layer;
pol_p[pol_cnt]=0;
pol_cnt++;
}
}
}
}
//polygons in x-Richtung sortieren
sort(pol_cnt, pol_sort_i1, pol_pos_x1, pol_pos_y1, pol_pos_x2, pol_pos_y2, pol_wdt, pol_l);
sort(pol_cnt, pol_sort_i2, pol_pos_x1, pol_pos_y1, pol_pos_x2, pol_pos_y2, pol_wdt, pol_l);
}
//Umgebung wird geschrieben
printf("%s",ambient);
//*************************************************************************************
//* Animation *
//*************************************************************************************
printf("//%s\n",lang[149]);
B.texts(T)
{
if(T.layer==eagle3d_layer)
{
tempstr=strupr(T.value);
//Viewpoints
if(tempstr[0]=='V')
{
tempstr=strsub(tempstr,1);
anim_npoints_cam_view_path++;
i = strtol(strsub(tempstr,0,strchr(tempstr,' ')));
ri = strtod(strsub(tempstr,strchr(tempstr,' ')));
sprintf(anim_points_cam_view_path[i-1],"<%f,%f,%f>",u2mm(T.x),ri,u2mm(T.y));
}
else //Flightpoints
{
anim_npoints_cam_flight_path++;
i = strtol(strsub(T.value,0,strchr(T.value,' ')));
ri = strtod(strsub(T.value,strchr(T.value,' ')));
//sprintf("//%f\t%f\t%d\t%f\n",u2mm(T.x),u2mm(T.y),i,ri);
sprintf(anim_points_cam_flight_path[i-1],"<%f,%f,%f>",u2mm(T.x),ri,u2mm(T.y));
}
}
}
printf( "#if(global_anim=on)\n"
"#declare global_anim_showcampath = no;\n"
"#end\n\n");
if(anim_npoints_cam_flight_path>2)
{
printf("#declare global_anim_npoints_cam_flight=%d;\n",anim_npoints_cam_flight_path);
printf("#local global_anim_points_cam_flight=array[global_anim_npoints_cam_flight]\n{");
for(i=0;i2)
{
printf("#declare global_anim_npoints_cam_view=%d;\n",anim_npoints_cam_view_path);
printf("#local global_anim_points_cam_view=array[global_anim_npoints_cam_view]\n{");
for(i=0;i2)
{
printf( "#local global_anim_spline_cam_flight = \nspline{\n"
"\tnatural_spline"
"\t#local i=0;\n"
"\t#local cnt=0;\n"
"\t#local inc=1/(global_anim_npoints_cam_flight-1);\n\n"
"\t#while(i<1.0000001)\n"
"\t\ti,\tglobal_anim_points_cam_flight[cnt]+<%f,0,%f>\n\n"
"\t\t#local i = i+inc;\n"
"\t\t#local cnt = cnt+1;\n"
"\t#end\n"
"}\n",x_ver,y_ver);
}
//Viewspline
if(anim_npoints_cam_view_path>2)
{
printf( "#local global_anim_spline_cam_view = \nspline{\n"
"\tnatural_spline"
"\t#local i=0;\n"
"\t#local cnt=0;\n"
"\t#local inc=1/(global_anim_npoints_cam_view-1);\n\n"
"\t#while(i<1.0000001)\n"
"\t\ti,\tglobal_anim_points_cam_view[cnt]+<%f,0,%f>\n\n"
"\t\t#local i = i+inc;\n"
"\t\t#local cnt = cnt+1;\n"
"\t#end\n"
"}\n",x_ver,y_ver);
}
printf( "#end\n\n");
//Splines sichtbar machen
printf( "#if((global_anim_showcampath=yes)&(global_anim=off))\n");
//Flugspline
if(anim_npoints_cam_flight_path>2)
{
printf( "#local ctr = 0;\n"
"#while (ctr < 1)\n"
"\tsphere {\n"
"\t\tglobal_anim_spline_cam_flight(ctr),0.4\n"
"\t\tpigment { rgb <1-ctr,0,0> }\n"
"\t}\n"
"#local ctr = ctr + 0.001;\n"
"#end\n"
"#local ctr = 0;\n"
"#while (ctr < global_anim_npoints_cam_flight)\n"
"\tsphere {\n"
"\tglobal_anim_points_cam_flight[ctr]+<%f,0,%f>,0.5\n"
"\tpigment { Blue }\n"
"\t}\n"
"#local ctr = ctr + 1;\n"
"#end\n",x_ver,y_ver);
}
//Viewspline
if(anim_npoints_cam_view_path>2)
{
printf( "#local ctr = 0;\n"
"#while (ctr < 1)\n"
"\tsphere {\n"
"\t\tglobal_anim_spline_cam_view(ctr),0.4\n"
"\t\tpigment { rgb <1-ctr,1,1-ctr> }\n"
"\t}\n"
"#local ctr = ctr + 0.001;\n"
"#end\n"
"#local ctr = 0;\n"
"#while (ctr < global_anim_npoints_cam_view)\n"
"\tsphere {\n"
"\tglobal_anim_points_cam_view[ctr]+<%f,0,%f>,0.5\n"
"\tpigment { Red }\n"
"\t}\n"
"#local ctr = ctr + 1;\n"
"#end\n",x_ver,y_ver);
}
printf( "#end\n");
//Camera and light
printf( "#if(global_anim=on)\n"
"camera\n"
"{\n"
"\tlocation global_anim_spline_cam_flight(clock)\n"
"\t#if(global_anim_npoints_cam_view>2)\n"
"\t\tlook_at global_anim_spline_cam_view(clock)\n"
"\t#else\n"
"\t\tlook_at global_anim_spline_cam_flight(clock+0.01)-<0,-0.01,0>\n"
"\t#end\n"
"\tangle 45\n"
"}\n");
printf( "light_source\n"
"{\n"
"\tglobal_anim_spline_cam_flight(clock)\n"
"\tcolor rgb <1,1,1>\n"
"\tspotlight point_at \n"
"\t#if(global_anim_npoints_cam_view>2)\n"
"\t\tglobal_anim_spline_cam_view(clock)\n"
"\t#else\n"
"\t\tglobal_anim_spline_cam_flight(clock+0.01)-<0,-0.01,0>\n"
"\t#end\n"
"\tradius 35 falloff 40\n"
"}\n");
printf("#else\n");
//*************************************************************************************
//* Kamera *
//*************************************************************************************
printf("camera\n{\n\t");
printf("location \n\t");
printf("look_at \n\t");
printf("angle cam_a\n\t");
printf("%s\n\t",lang[103]);
printf("//translate<%f,0,%f>\n",-(x_max-x_min)/2,-(y_max-y_min)/2);
printf("}\n");
printf("#end\n\n");
//*************************************************************************************
//* Hintergrund *
//*************************************************************************************
printf("background{col_bgr}\n");
//*************************************************************************************
//* Hintergrund *
//*************************************************************************************
printf( "\n\n//Axis uncomment to activate\n"
"//object{TOOLS_AXIS_XYZ(100,100,100 "
"//texture{ pigment{rgb<1,0,0>} finish{diffuse 0.8 phong 1}}, "
"//texture{ pigment{rgb<1,1,1>} finish{diffuse 0.8 phong 1}})}\n\n");
//*************************************************************************************
//* Lichter *
//*************************************************************************************
if(lgt1_inf[10]==1)
{
printf("light_source{ %s*lgt1_intense",color_lgtp[lgt1_inf[9]]);
if(lgt1_inf[11]==1) printf(" shadowless");
if(lgt1_inf[6]==1) printf(" spotlight radius %d falloff %d point_at<%d,%d,%d>",lgt1_inf[7],lgt1_inf[8],lgt1_inf[3],lgt1_inf[4],lgt1_inf[5]);
printf("}\n");
}
if(lgt2_inf[10]==1)
{
printf("light_source{ %s*lgt2_intense",color_lgtp[lgt2_inf[9]]);
if(lgt2_inf[11]==1) printf(" shadowless");
if(lgt2_inf[6]==1) printf(" spotlight radius %d falloff %d point_at<%d,%d,%d>",lgt2_inf[7],lgt2_inf[8],lgt2_inf[3],lgt2_inf[4],lgt2_inf[5]);
printf("}\n");
}
if(lgt3_inf[10]==1)
{
printf("light_source{ %s*lgt3_intense",color_lgtp[lgt3_inf[9]]);
if(lgt3_inf[11]==1) printf(" shadowless");
if(lgt3_inf[6]==1) printf(" spotlight radius %d falloff %d point_at<%d,%d,%d>",lgt3_inf[7],lgt3_inf[8],lgt3_inf[3],lgt3_inf[4],lgt3_inf[5]);
printf("}\n");
}
if(lgt4_inf[10]==1)
{
printf("light_source{ %s*lgt4_intense",color_lgtp[lgt4_inf[9]]);
if(lgt4_inf[11]==1) printf(" shadowless");
if(lgt4_inf[6]==1) printf(" spotlight radius %d falloff %d point_at<%d,%d,%d>",lgt4_inf[7],lgt4_inf[8],lgt4_inf[3],lgt4_inf[4],lgt4_inf[5]);
printf("}\n");
}
printf("#end\n");
printf("\n\n#macro %s(mac_x_ver,mac_y_ver,mac_z_ver,mac_x_rot,mac_y_rot,mac_z_rot)\n",macro_name);
//Gesamt-Union um alle Teile
printf("union{\n");
printf("#if(pcb_board = on)\n");
//*************************************************************************************
//* Platine *
//*************************************************************************************
if(opt_pcb==1)
{
//Difference wenn reale Bohrungen oder Durchbrüche verwendet werden
if((opt_boh==1)||(opt_dur==1)) printf("difference{\n");
//Rechteckige Platinen
if(opt_opcb==1)
{
printf("//"+lang[67]+"\n");
printf("box{<%f,0,%f><%f,%f,%f> texture{col_brd}}\n",x_max,y_max,x_min,-pcb_height,y_min);
}
else
{ //runde oder prism-Platine
//union um Platine
printf("union{\n");
pcb_shape=0;
B.circles(C)
{
if(C.layer == 20) pcb_shape=1;
}
B.wires(W)
{
if((W.layer == 20)&&(pcb_shape==1)) pcb_shape=2;
}
//Wenn Circle und wire vorhanden wird gefragt
if(pcb_shape==2)
{
pcb_shape = dlgDialog("PCB")
{
dlgGridLayout
{
dlgCell(0,0) dlgPushButton("+"+lang[119]) dlgAccept(0);
dlgCell(1,0) dlgPushButton(lang[120]) dlgAccept(1);
dlgCell(2,0) dlgSpacing(250);
}
};
}
printf("//"+lang[67]+"\n");
if(pcb_shape==0)
{
//prismplatinen
printf(make_prism_from_board_layer(B, 20, pcb_arc_prc, -pcb_height, 0, "texture{col_brd}"));
//printf("texture{col_brd}}\n");
}
else
{
//Runde Platine
i=0;
B.circles(C)
{
if((C.layer == 20)&&(pcb_round_main_p==C.radius))
{
printf("cylinder{<%f,0,%f><%f,%f,%f>%f",u2mm(C.x),u2mm(C.y),u2mm(C.x),-pcb_height,u2mm(C.y),u2mm(C.radius));
printf(" texture{col_brd}}\n");
}
}
}
printf("}//End union(Platine)");
}
printf("\n");
if(opt_boh==1){
//Parsing der Bohrungen (real) (Echte Durchbrüche ab Durchmesser >= real_boh)
printf("//"+lang[72]+"\n");
B.elements(E)
{
E.package.holes(H)
{
if(u2mm(H.drill)>=real_boh) printf("cylinder{<%f,1,%f><%f,-5,%f>%f texture{col_hls}}\n",u2mm(H.x),u2mm(H.y),u2mm(H.x),u2mm(H.y),u2mm(H.drill)/2);
}
}
printf("//"+lang[74]+"\n");
B.holes(H)
{
if(u2mm(H.drill)>=real_boh) printf("cylinder{<%f,1,%f><%f,-5,%f>%f texture{col_hls}}\n",u2mm(H.x),u2mm(H.y),u2mm(H.x),u2mm(H.y),u2mm(H.drill)/2);
}
//Ausgabe der ins Array geschriebenen Durchkontaktierungen (Echte Durchbrüche)
printf("//"+lang[73]+"\n");
for(i=0;i<%f,%f,%f>%f texture{col_hls}}\n",u2mm(via_pos_x[via_sort_i[i]])
,pcb_cuheight+0.06-ar_layerdis[via_ls[via_sort_i[i]]-1]
,u2mm(via_pos_y[via_sort_i[i]])
,u2mm(via_pos_x[via_sort_i[i]])
,-(ar_layerdis[via_le[via_sort_i[i]]-1]+0.06)
,u2mm(via_pos_y[via_sort_i[i]])
,u2mm(via_pos_d[via_sort_i[i]])/2);
}}//Ende reale Bohrungen
if(opt_dur==1)
{
if(pcb_shape==0)
{//Durchbrüche eckige Platine (z.Z. nur runde Durchbrüche)
B.circles(C)
{
if(C.layer == 20)
{
printf("cylinder{<%f,1,%f><%f,%f,%f>%f",u2mm(C.x),u2mm(C.y),u2mm(C.x),-pcb_height-0.1,u2mm(C.y),u2mm(C.radius));
printf(" texture{col_brd}}\n");
}
}
}
else
{//Durchbrüche runde Platine
B.circles(C)
{
if((pcb_round_main_p!=C.radius)&&(C.layer==20))
{
printf("cylinder{<%f,0.1,%f><%f,%f,%f>%f",u2mm(C.x),u2mm(C.y),u2mm(C.x),-pcb_height-0.1,u2mm(C.y),u2mm(C.radius));
printf(" texture{col_brd}}\n");
}
}
i=0;
B.wires(W)
{
if(W.layer == 20)
{
ar_x[i] = u2mm(W.x1);
ar_y[i] = u2mm(W.y1);
i++;
ar_x[i] = u2mm(W.x2);
ar_y[i] = u2mm(W.y2);
i++;
}
}
if(i!=0)
{
printf("prism{0.1,%f,%d\n",-pcb_height-0.1,i);
for(j=0;j",ar_x[j],ar_y[j]);
if((j%4)==0)printf("\n");
}
printf("texture{col_brd}}\n");
}
}
//Durchbrüche in packages
B.elements(E)
{
i=0;
E.package.wires(W)
{
if(W.layer == 20)
{
ar_x[i] = u2mm(W.x1);
ar_y[i] = u2mm(W.y1);
i++;
ar_x[i] = u2mm(W.x2);
ar_y[i] = u2mm(W.y2);
i++;
}
}
if(i!=0)
{
printf("prism{0.1,%f,%d\n",-pcb_height-0.1,i);
for(j=0;j",ar_x[j],ar_y[j]);
if((j%4)==0)printf("\n");
}
printf("texture{col_brd}}\n");
}
E.package.circles(C)
{
if(C.layer==20)
{
printf("cylinder{<%f,0.1,%f><%f,%f,%f>%f",u2mm(C.x),u2mm(C.y),u2mm(C.x),-pcb_height-0.1,u2mm(C.y),u2mm(C.radius));
printf(" texture{col_brd}}\n");
}
}
}
}
if((opt_boh==1)||(opt_dur==1)) printf("}//End difference(reale Bohrungen/Durchbrüche)\n");
}
printf("#end\n");
//*************************************************************************************
//* Bauteile *
//*************************************************************************************
printf("#if(pcb_parts=on)");
printf("//"+lang[79]+"\nunion{\n");
if((opt_bau==1)||(opt_man==1)){
//Einlesen der 3dpack.dat und der 3dusrpac.dat
fileread(depp, pack_file);
fileread(tempstr, usrpack_file);
//Zusammensetzen der beiden Dateien
depp = tempstr + depp;
//String für unbekannte Bauteile init.
ukpack = "";
//Anzahl der Bauteile zählen und splitten in einzelne Bauteile
pack_count = strsplit(pack_con, depp, '\n');
//Für mehrere ULP-Läufe muß hier neu initialiert werden
pov_pack = "";
B.elements(E)
{
ps_tmp = E.package.name;
for(i=0; i<0,7*%f,0>0.5 %s translate<%f,0,%f>}\t\t//unbekanntes Bauteil %s %s %s\n",layer_dis,color_ukpack,u2mm(E.x),u2mm(E.y),E.name,E.value,E.package.name);
}
//Versuch einer Bauteilerzeugung aus im Bauteil abgelegten Informationen
string stmp_genpack = create_case_from_layers_in_element(E,packgen_layers,pcb_height);
if(stmp_genpack[strlen(stmp_genpack)-2]=='1')
{
printf(stmp_genpack);
}
if(opt_man==0) continue; //keine manuelle Zuordnung
if(mpd_dlg==1000) continue; //Zuordnung abgebrochen
mpd_search[0] = E.package.name;
mpd_search[1] = E.package.name;
mpd_search[2] = E.package.name;
mpd_dlg = dlgDialog(lang[86])
{
dlgGridLayout
{
dlgCell(0,0) dlgLabel("Name: "+E.name);
dlgCell(1,0) dlgLabel("Value: "+E.value);
dlgCell(2,0) dlgLabel("Package: "+E.package.name);
dlgCell(3,0,3,2) dlgListView("Eagle-Package\tPOVRay-Macro\t"+lang[125], mpd_view, mpd_slct);
dlgCell(3,3) dlgVBoxLayout{dlgSpacing(500);};
dlgCell(4,0) dlgStringEdit(mpd_search[0]);
dlgCell(4,1) dlgStringEdit(mpd_search[1]);
dlgCell(4,2) dlgStringEdit(mpd_search[2]);
dlgCell(5,0) dlgPushButton(lang[126])
{
for(j=0;j
");
dlgCell(1,0) dlgHBoxLayout{dlgSpacing(700);};
dlgCell(0,1) dlgVBoxLayout{dlgSpacing(520);};
dlgCell(2,0) dlgPushButton("OK") dlgAccept(1);
};
};
}
};
dlgCell(7,0,7,3) dlgVBoxLayout{dlgSpacing(20);};
dlgCell(8,0) dlgPushButton("OK") dlgAccept(1);
dlgCell(8,1) dlgPushButton(lang[96]) dlgAccept(2);
dlgCell(8,2) dlgPushButton(lang[131]) dlgAccept(1000);
};
};
if((mpd_dlg==2)||(mpd_dlg==1000)) continue;
strsplit(pack_tra, mpd[mpd_slct], '\t');
string tmp=E.package.name + ":";
for(j=1;j<34;j++)
{
tmp+=pack_tra[j];
if(j!=33) tmp+=":";
}
//dlgMessageBox(tmp);
output(usrpack_file,"a")
{
printf("%s\n",tmp);
}
}//Manuelle Bauteilzuordnung
//Das hier sorgt für die Prefixbeachtung zusammen mit einem speziellen
//Eintrag in der 3dpack.dat
depp = E.name;
if(pack_tra[18]=="1"){sprintf(ps_tmp,"%c%s",depp[0],ps_tmp); i=-1; continue;}
//Sprachanpassung für Kommentare in der POVRay-Datei
if((pack_tra[33]=="")||(opt_lang==0)) tmp_comment = pack_tra[32];
else tmp_comment = pack_tra[33];
//Excludelisten
//Wenn ein Bauteil gefunden wurde wird dessen Bezeichner definiert
sprintf(pov_pack,"%s#ifndef(pack_%s) #declare global_pack_%s=yes; ",pov_pack,make_pov_str(E.name),make_pov_str(E.name));
//Bauteile ohne Makro (z.B. SMD-Lötjumper)
if(pack_tra[8] == "1")
{
//sprintf(pov_pack,"%s#end//"+lang[80]+"\t\t\t\t%s %s %s\n",pov_pack,tmp_comment,E.name,E.value);
sprintf(pov_pack,"//"+lang[80]+"\t\t\t\t%s %s %s\n",tmp_comment,E.name,E.value);
printf("%s",pov_pack);
pov_pack = "";
break; //Nächstes Element
}
sprintf(pov_pack,"%sobject {",pov_pack);
sprintf(pov_pack,"%s%s",pov_pack,pack_tra[31]);
if(pack_tra[1] == "1") sprintf(pov_pack,"%s\"%s\",",pov_pack,E.name); //Name des Gehäuse ausgeben?
if(pack_tra[2] == "1") sprintf(pov_pack,"%s\"%s\",",pov_pack,E.value); //Value des Device ausgeben?
if(pack_tra[3] == "1") sprintf(pov_pack,"%s%s,%s,",pov_pack,rval2color(E.value),color_t); //Farbringe für Widerstand?
if(pack_tra[5] == "1") //LED-Optionen
{
real led_height=0;
dlgDialog(lang[81])
{
dlgGridLayout
{
dlgCell(0,0) dlgLabel("Name:");
dlgCell(0,1) dlgLabel(E.name);
dlgCell(0,2) dlgLabel("Value:");
dlgCell(0,3) dlgLabel(E.value);
dlgCell(1,0,1,3) dlgComboBox(color_lgt,col_inf[5]);
dlgCell(2,0,2,1) dlgCheckBox(lang[82],col_inf[6]);
dlgCell(2,2,2,3) dlgSpinBox(col_inf[7],0,10);
dlgCell(3,0,3,1) dlgLabel(lang[147]);
dlgCell(3,2,3,3) dlgRealEdit(led_height,0,40);
}
dlgPushButton("+OK") dlgAccept();
};
sprintf(pov_pack,"%s%s,",pov_pack,color_lgtp[col_inf[5]]);
if(col_inf[6]==1) sprintf(pov_pack,"%s%f,",pov_pack,real(col_inf[7])/10);
else sprintf(pov_pack,"%s0,",pov_pack);
sprintf(pov_pack,"%s%f,",pov_pack,led_height);
}
if(pack_tra[7] == "1") //Höhe erfragen-Optionen
{
dlgDialog(lang[83])
{
dlgGridLayout
{
dlgCell(0,0) dlgLabel("Name:");
dlgCell(0,1) dlgLabel(E.name);
dlgCell(0,2) dlgLabel("Value:");
dlgCell(0,3) dlgLabel(E.value);
dlgCell(1,0,1,3) dlgSpinBox(height_dlg,1,20);
dlgCell(2,0,2,3) dlgLabel(lang[84]);
dlgCell(3,0,3,3) dlgLabel(lang[85]);
}
dlgPushButton("+OK") dlgAccept();
};
sprintf(pov_pack,"%s%d,",pov_pack,height_dlg);
}
if(pack_tra[9] == "1") sprintf(pov_pack,"%s\"%s\",",pov_pack,rval2rcde(E.value)); //SMD-Widerstand Widerstandscode?
if(pack_tra[19] == "1") //Jumper Dialog
{
if(jumper_dlg<3)
{
jumper_dlg = dlgDialog(lang[138])
{
dlgGridLayout
{
dlgCell(0,0) dlgLabel("Name:");
dlgCell(0,1) dlgLabel(E.name);
dlgCell(0,2) dlgLabel("Value:");
dlgCell(0,3) dlgLabel(E.value);
dlgCell(1,0,1,3) dlgPushButton("+"+lang[139]) dlgAccept(0); //ohne Jumper
dlgCell(2,0,2,3) dlgPushButton(lang[140]) dlgAccept(1); //Jumper offen
dlgCell(3,0,3,3) dlgPushButton(lang[141]) dlgAccept(2); //Jumper geschlossen
dlgCell(4,0,4,3) dlgPushButton(lang[142]) dlgAccept(3); //alle ohne
dlgCell(5,0,5,3) dlgPushButton(lang[143]) dlgAccept(4); //alle offen
dlgCell(6,0,6,3) dlgPushButton(lang[144]) dlgAccept(5); //alle geschlossen
};
};
}
if(jumper_dlg<3) sprintf(pov_pack,"%s%d,",pov_pack,jumper_dlg);
else sprintf(pov_pack,"%s%d,",pov_pack,jumper_dlg-3);
}
if(pack_tra[20] == "1") //Logo Dialog
{
int logo_selected;
if(logo_dialog<2)
{
logo_dialog = dlgDialog(lang[156])
{
dlgGridLayout
{
dlgCell(0,0) dlgLabel("Name:");
dlgCell(0,1) dlgLabel(E.name);
dlgCell(0,2) dlgLabel("Value:");
dlgCell(0,3) dlgLabel(E.value);
dlgCell(1,0,1,3) dlgListBox(logo_names,logo_selected);
dlgCell(2,0,2,3) dlgPushButton("OK") dlgAccept(0);
dlgCell(3,0,3,3) dlgPushButton(lang[157]) dlgAccept(1);
dlgCell(4,0,4,3) dlgPushButton(lang[159]) dlgAccept(2);
};
};
}
string logo_name;
if(logo_dialog==0)
{
logo_name = logo_names[logo_selected];
}
sprintf(pov_pack,"%s\"%s\",",pov_pack,logo_name);
}
sprintf(pov_pack,"%s)",pov_pack); //Klammer schließt Makro
//Korrekturverschiebung
if(E.mirror) sprintf(pack_tra[16],"-%s",pack_tra[16]);
sprintf(pov_pack,"%stranslate<%s,%s,%s> ",pov_pack,pack_tra[15],pack_tra[16],pack_tra[17]);
//Korrekturwinkel vor Positionierung ausgeben
sprintf(pov_pack,"%srotate<0,%f,0>",pov_pack,strtod(pack_tra[14]));
//Bauteil plazieren
sprintf(pov_pack,"%srotate<0,%f,0> rotate<0,0,%d> translate<%f,%f,%f>",pov_pack,-E.angle,E.mirror*180,u2mm(E.x),-(pcb_height*E.mirror),u2mm(E.y));
if(pack_tra[4] == "1") //SMD-Höhenoffset
{
if(E.mirror==0) temp = pcb_cuheight; else temp = -pcb_cuheight;
sprintf(pov_pack,"%stranslate<0,%f,0> ",pov_pack,temp);
}
socket_str="";
if(pack_tra[6] == "1") //Sockel
{
if(E.mirror==0) temp = strtod(pack_tra[11]); else temp = -1*strtod(pack_tra[11]);
if(socket_dlg<2)
{
socket_dlg = dlgDialog(lang[90])
{
dlgGridLayout{
dlgCell(0,0) dlgLabel(E.name);
dlgCell(0,1) dlgLabel(E.value);
dlgCell(0,2) dlgLabel(E.package.name);
dlgCell(1,0,1,2) dlgPushButton("+"+lang[91]) dlgAccept(0); //sockeln
dlgCell(2,0,2,2) dlgPushButton(lang[92]) dlgAccept(1); //nicht sockeln
dlgCell(3,0,3,2) dlgPushButton(lang[117]) dlgAccept(2); //alle sockeln
dlgCell(4,0,4,2) dlgPushButton(lang[118]) dlgAccept(3); //alle nicht sockeln
}};
}
if((socket_dlg==0)||(socket_dlg==2))
{
sprintf(pov_pack,"%stranslate<0,%f,0> ",pov_pack,temp/10); //Bauteil Höhenoffset
sprintf(socket_str,"#ifndef(pack_%s) object{%s)",make_pov_str(E.name),pack_tra[10]);
sprintf(socket_str,"%srotate<0,%f,0> rotate<0,0,%d> translate<%f,%f,%f>",socket_str,-E.angle,E.mirror*180,u2mm(E.x),-(pcb_height*E.mirror),u2mm(E.y));
sprintf(socket_str,"%s}#end\t\t\t\t\t//%s %s %s\n",socket_str,pack_tra[12],E.name,E.value); //Kommentar zum Sockel
}
}
sprintf(pov_pack,"%s}#end\t\t//%s %s %s %s\n",pov_pack,tmp_comment,E.name,E.value,E.package.name); //Kommentar zum Bauteil
sprintf(pov_pack,"%s%s",pov_pack,socket_str);
printf("%s",pov_pack);
output(mpd_file,"a") printf("%s",pov_pack);
pov_pack = "";
break; //nächstes Element (Suchschleife abbrechen)
}
}
}}
//Einlesen und Ausgeben der MPD-Datei
if(opt_umpd==1)
{
fileread(depp, mpd_file);
printf("%s",depp);
}
printf("}//End union\n#end\n");
//*************************************************************************************
//* Lötaugen/SMD's *
//*************************************************************************************
printf("#if(pcb_pads_smds=on)\n");
if(opt_pad==1){
printf("//"+lang[68]+"\n");
B.elements(E)
{
E.package.contacts(C)
{
if(C.pad)
{
//printf("/*%d*/",C.pad.shape[LAYER_TOP]);
printf("#ifndef(global_pack_%s) #local global_tmp=0; #else #local global_tmp=100; #end ",make_pov_str(E.name));
printf("object{TOOLS_PCB_VIA(%f,%f,1,16,%d+global_tmp,%d) ",u2mm(C.pad.diameter[LAYER_TOP]),u2mm(C.pad.drill),C.pad.shape[LAYER_TOP],C.pad.elongation);
printf("rotate<0,-%f,0>",C.pad.angle);
printf("translate<%f,0,%f> texture{col_thl}}\n",u2mm(C.pad.x),u2mm(C.pad.y));
}
if(C.smd)
{
if (C.smd.layer == 1) layer_dis = 0; else if(C.smd.layer == 16) layer_dis = -(pcb_cuheight + pcb_height + pad_dis);
printf("object{TOOLS_PCB_SMD(%f,%f,%f,%d) rotate<0,-%f,0> texture{col_pds} translate<%f,%f,%f>}\n",u2mm(C.smd.dx),u2mm(C.smd.dy),pcb_cuheight+pad_dis,C.smd.roundness,C.smd.angle,u2mm(C.smd.x),layer_dis,u2mm(C.smd.y));
}
}
}
printf("//"+lang[69]+"\n");
//Parsing der VIA's
B.signals(S)
{
S.vias(V)
{
if((opt_pcb==1)&&(V.start>1)&&(V.end<16)) continue;
//printf("/*%d*/",V.shape[LAYER_TOP]);
printf("object{TOOLS_PCB_VIA(%f,%f,%d,%d,%d,0) translate<%f,0,%f>",u2mm(V.diameter[V.start]),u2mm(V.drill),V.start,V.end,V.shape[V.start],u2mm(V.x),u2mm(V.y));
if((u2mm(V.drill))>via_silk) printf(" texture{col_thl}}\n");
else printf(" texture{col_wrs}}\n");
}
}}
printf("#end\n");
//*************************************************************************************
//* Leiterbahnen *
//*************************************************************************************
printf("#if(pcb_wires=on)\n");
printf("union{\n");
if(opt_lei==1){
printf("//"+lang[70]+"\n");
//Ausgabe der ins Array geschriebenen Wires
//verhinder das zeichnen von Leiterbahnen in reale Bohrungen
for(i=0;i=(via_pos_y[via_sort_i[i]] - via_pos_d[via_sort_i[i]]/2))&&
((wrs_pos_y1[wrs_sort_i1[j]])<=(via_pos_y[via_sort_i[i]] + via_pos_d[via_sort_i[i]]/2)))
{
layer_dis = -ar_layerdis[wrs_l[wrs_sort_i1[j]]-1];
sprintf(depp,"%s%s",depp,create_line( wrs_pos_x1[wrs_sort_i1[j]],
wrs_pos_y1[wrs_sort_i1[j]],
wrs_pos_x2[wrs_sort_i1[j]],
wrs_pos_y2[wrs_sort_i1[j]],
wrs_wdt[wrs_sort_i1[j]],
pcb_cuheight, layer_dis,1,1));
wrs_p[wrs_sort_i1[j]]=1;
l=1;
}
}
k = via_pos_x[via_sort_i[i]] - via_pos_d[via_sort_i[i]]/2;
for(j=0;((wrs_pos_x2[wrs_sort_i2[j]])=(via_pos_y[via_sort_i[i]] - via_pos_d[via_sort_i[i]]/2))&&
((wrs_pos_y2[wrs_sort_i2[j]])<=(via_pos_y[via_sort_i[i]] + via_pos_d[via_sort_i[i]]/2))))
{
layer_dis = -ar_layerdis[wrs_l[wrs_sort_i2[j]]-1];
sprintf(depp,"%s%s",depp,create_line( wrs_pos_x1[wrs_sort_i2[j]],
wrs_pos_y1[wrs_sort_i2[j]],
wrs_pos_x2[wrs_sort_i2[j]],
wrs_pos_y2[wrs_sort_i2[j]],
wrs_wdt[wrs_sort_i2[j]],
pcb_cuheight, layer_dis,1,1));
wrs_p[wrs_sort_i2[j]]=1;
l=1;
}
}
sprintf(depp,"%s}cylinder{<%f,1,%f><%f,%f,%f>%f texture{col_thl}}}\n", depp,
u2mm(via_pos_x[via_sort_i[i]]),
u2mm(via_pos_y[via_sort_i[i]]),
u2mm(via_pos_x[via_sort_i[i]]),
-pcb_height-1,
u2mm(via_pos_y[via_sort_i[i]]),
u2mm(via_pos_d[via_sort_i[i]])/2);
if(l==1) printf("%s",depp);
}
for(i=0;i}\n",u2mm(W.arc.radius),u2mm(W.arc.width),W.arc.angle1,W.arc.angle2,pcb_cuheight+bedruck_dis,u2mm(W.arc.xc),layer_dis,u2mm(W.arc.yc));
}
}
}
//Wenn Leiterbahnen ausgegeben werden wird auch gleich Text auf Layer 1 bis 16 bearbeitet.
printf("//Text\n");
B.texts(T)
{
T.wires(W)
{
//Nur echte Signale bearbeiten aber wer schreibt schon text in Innenlayer?
if(((W.layer<17)&&(layer_cnt>2)) || (W.layer==1) || (W.layer==16))
{
layer_dis = -ar_layerdis[W.layer-1];
printf("%s",create_line(W.x1, W.y1, W.x2, W.y2, W.width, pcb_cuheight, layer_dis, 1,1));
}
}
}
//Und Rect auch noch gleich
printf("//Rect\n");
printf("union{\n");
B.rectangles(R)
{
if(((R.layer<17)&&(layer_cnt>2)) || (R.layer==1) || (R.layer==16))
{
layer_dis = -ar_layerdis[R.layer-1];
if(R.layer==16) layer_dis = layer_dis - pad_dis;
printf("box{<%f,0,%f><%f,%f,%f> rotate<0,%f,0> translate<%f,%f,%f>}\n",-u2mm(R.x2-R.x1)/2,-u2mm(R.y2-R.y1)/2,u2mm(R.x2-R.x1)/2,pcb_cuheight+pad_dis,u2mm(R.y2-R.y1)/2,R.angle,u2mm(R.x2+R.x1)/2,layer_dis,u2mm(R.y2+R.y1)/2);
}
}
//Kupfer in Elements
B.elements(E)
{
//Wires
E.package.wires(W)
{
//Nur echte Signale bearbeiten (keine Airwires)
if(((W.layer<17)&&(layer_cnt>2)) || (W.layer==1) || (W.layer==16))
{
layer_dis = -ar_layerdis[W.layer-1];
if(W.layer==16) layer_dis = layer_dis - pad_dis;
printf("%s",create_line(W.x1, W.y1, W.x2, W.y2, W.width, pcb_cuheight+pad_dis, layer_dis,1,1));
}
}
//und RECTS's
E.package.rectangles(R)
{
if(((R.layer<17)&&(layer_cnt>2)) || (R.layer==1) || (R.layer==16))
{
layer_dis = -ar_layerdis[R.layer-1];
if(R.layer==16) layer_dis = layer_dis - pad_dis;
printf("box{<%f,0,%f><%f,%f,%f> rotate<0,%f,0> translate<%f,%f,%f>}\n",-u2mm(R.x2-R.x1)/2,-u2mm(R.y2-R.y1)/2,u2mm(R.x2-R.x1)/2,pcb_cuheight+pad_dis,u2mm(R.y2-R.y1)/2,-R.angle,u2mm(R.x2+R.x1)/2,layer_dis,u2mm(R.y2+R.y1)/2);
}
}
}
printf("texture{col_pds}\n");
printf("}\n");
printf("texture{col_wrs}\n");
}
printf("}\n");
printf("#end\n");
//*************************************************************************************
//* Polygone *
//*************************************************************************************
printf("#if(pcb_polygons=on)\n");
printf("union{\n");
if(opt_pol==1){
//Parsing der Polygone
printf("//"+lang[71]+"\n");
//Ausgabe der ins Array geschriebenen Polygone-Wires
for(i=0;i<%f,%f,%f>%f}\n",u2mm(C.pad.x),pcb_cuheight+boh_dis,u2mm(C.pad.y),u2mm(C.pad.x),-(pcb_cuheight+pcb_height+boh_dis),u2mm(C.pad.y),u2mm(C.pad.drill)/2);
}
E.package.holes(H)
{
if(u2mm(H.drill)<%f,%f,%f>%f }\n",u2mm(H.x),pcb_cuheight+boh_dis,u2mm(H.y),u2mm(H.x),-(pcb_height+pcb_cuheight+boh_dis),u2mm(H.y),u2mm(H.drill)/2);
}
}
}
printf("//"+lang[76]+"\n");
B.signals(S)
{
S.vias(V)
{
if((opt_pcb==1)&&(V.start>1)&&(V.end<16)) continue;
if(u2mm(V.drill)<%f,%f,%f>%f }\n",u2mm(V.x),pcb_cuheight+boh_dis-ar_layerdis[V.start-1],u2mm(V.y),u2mm(V.x),-(ar_layerdis[V.end-1]+boh_dis),u2mm(V.y),u2mm(V.drill)/2);
}
}
printf("//"+lang[77]+"\n");
B.holes(H)
{
if(u2mm(H.drill)<%f,%f,%f>%f }\n",u2mm(H.x),pcb_cuheight+boh_dis,u2mm(H.y),u2mm(H.x),-(pcb_height+pcb_cuheight+boh_dis),u2mm(H.y),u2mm(H.drill)/2);
}}
if(opt_bohf==1){
//Parsing der Bohrungen (schnell)
printf("//"+lang[75]+"\n");
B.elements(E)
{
E.package.contacts(C)
{
if(C.pad)
{
printf("cylinder{<%f,%f,%f><%f,%f,%f>%f }\n",u2mm(C.pad.x),pcb_cuheight+0.011,u2mm(C.pad.y),u2mm(C.pad.x),-(pcb_cuheight+pcb_height+0.011),u2mm(C.pad.y),u2mm(C.pad.drill)/2);
}
}
E.package.holes(H)
{
printf("cylinder{<%f,%f,%f><%f,%f,%f>%f }\n",u2mm(H.x),0.011,u2mm(H.y),u2mm(H.x),-(pcb_height+0.011),u2mm(H.y),u2mm(H.drill)/2);
}
}
printf("//"+lang[76]+"\n");
B.signals(S)
{
S.vias(V)
{
if((opt_pcb==1)&&(V.start>1)&&(V.end<16)) continue; //Burried-Vias nicht darstellen wenn Platine eingeschaltet.
printf("cylinder{<%f,%f,%f><%f,%f,%f>%f }\n",u2mm(V.x),pcb_cuheight+0.011-ar_layerdis[V.start-1],u2mm(V.y),u2mm(V.x),-(ar_layerdis[V.end-1]+0.011),u2mm(V.y),u2mm(V.drill)/2);
}
}
printf("//"+lang[77]+"\n");
B.holes(H)
{
printf("cylinder{<%f,%f,%f><%f,%f,%f>%f }\n",u2mm(H.x),0.011,u2mm(H.y),u2mm(H.x),-(pcb_height+0.011),u2mm(H.y),u2mm(H.drill)/2);
}}
printf("texture{col_hls}\n");
printf("}\n");
//*************************************************************************************
//* Bestückungsdruck *
//*************************************************************************************
printf("#if(pcb_silkscreen=on)\n");
if(opt_bsd==1){
printf("//"+lang[78]+"\nunion{\n");
B.texts(T)
{
T.wires(W)
{
if(is_num_in_str(slk_layers[3],W.layer))
{
if(W.layer%2) layer_dis = 0;
else layer_dis = -(pcb_cuheight + pcb_height + bedruck_dis);
if((u2mm(W.x1)>x_max)||(u2mm(W.x2)>x_max)||(u2mm(W.x1)y_max)||(u2mm(W.y2)>y_max)||(u2mm(W.y1)x_max)||(u2mm(W.x2)>x_max)||(u2mm(W.x1)y_max)||(u2mm(W.y2)>y_max)||(u2mm(W.y1)x_max)||(u2mm(W.x2)>x_max)||(u2mm(W.x1)y_max)||(u2mm(W.y2)>y_max)||(u2mm(W.y1)x_max)||(u2mm(W.x2)>x_max)||(u2mm(W.x1)y_max)||(u2mm(W.y2)>y_max)||(u2mm(W.y1)x_max)||(u2mm(W.x2)>x_max)||(u2mm(W.x1)y_max)||(u2mm(W.y2)>y_max)||(u2mm(W.y1)x_max)||(x1y_max)||(y1<%f,%f,%f>%f translate<0,%f,0>}\n",u2mm(C.x),u2mm(C.y),u2mm(C.x),pcb_cuheight+bedruck_dis,u2mm(C.y),u2mm(C.radius)+u2mm(C.width/2),layer_dis);
printf("cylinder{<%f,-0.1,%f><%f,%f,%f>%f translate<0,%f,0>}}\n",u2mm(C.x),u2mm(C.y),u2mm(C.x),pcb_cuheight+0.1,u2mm(C.y),max(u2mm(C.radius)-(u2mm(C.width)/2),0),layer_dis);
}
}
B.rectangles(R)
{
if(is_num_in_str(slk_layers[1],R.layer))
{
if(R.layer%2) layer_dis = 0;
else layer_dis = -(pcb_cuheight + pcb_height + bedruck_dis);
printf("box{<-%f,0,-%f><%f,%f,%f> rotate<0,-%f,0> translate<%f,%f,%f>}\n",u2mm((R.x2-R.x1)/2),u2mm((R.y2-R.y1)/2),u2mm((R.x2-R.x1)/2),pcb_cuheight+bedruck_dis,u2mm((R.y2-R.y1)/2),R.angle,u2mm((R.x2+R.x1)/2),layer_dis,u2mm((R.y2+R.y1)/2));
}
}
//BD aus Packages
B.elements(E)
{
printf("//%s silk screen\n",E.name);
E.package.polygons(P)
{
P.fillings(W)
{
if(is_num_in_str(slk_layers[0],W.layer))
{
if(W.layer%2) layer_dis = 0;
else layer_dis = -(pcb_cuheight + pcb_height + bedruck_dis);
if((u2mm(W.x1)>x_max)||(u2mm(W.x2)>x_max)||(u2mm(W.x1)y_max)||(u2mm(W.y2)>y_max)||(u2mm(W.y1)x_max)||(u2mm(W.x2)>x_max)||(u2mm(W.x1)y_max)||(u2mm(W.y2)>y_max)||(u2mm(W.y1)x_max)||(u2mm(W.x2)>x_max)||(u2mm(W.x1)y_max)||(u2mm(W.y2)>y_max)||(u2mm(W.y1)x_max)||(u2mm(W.x2)>x_max)||(u2mm(W.x1)y_max)||(u2mm(W.y2)>y_max)||(u2mm(W.y1)}\n",u2mm(W.arc.radius),u2mm(W.arc.width),W.arc.angle1,W.arc.angle2,pcb_cuheight+bedruck_dis,u2mm(W.arc.xc),layer_dis,u2mm(W.arc.yc));
}
}
}
E.package.circles(C)
{
if(is_num_in_str(slk_layers[0],C.layer))
{
x1 = u2mm(C.x);
y1 = u2mm(C.y);
if((x1>x_max)||(x1y_max)||(y1<%f,%f,%f>%f translate<0,%f,0>}\n",u2mm(C.x),u2mm(C.y),u2mm(C.x),pcb_cuheight+bedruck_dis,u2mm(C.y),u2mm(C.radius)+u2mm(C.width/2),layer_dis);
printf("cylinder{<%f,-0.1,%f><%f,%f,%f>%f translate<0,%f,0>}}\n",u2mm(C.x),u2mm(C.y),u2mm(C.x),pcb_cuheight+0.1,u2mm(C.y),max(u2mm(C.radius)-(u2mm(C.width)/2),0),layer_dis);
}
}
E.package.rectangles(R)
{
if(is_num_in_str(slk_layers[0],R.layer))
{
if(R.layer%2) layer_dis = 0;
else layer_dis = -(pcb_cuheight + pcb_height + bedruck_dis);
if((u2mm(R.x1)>x_max)||(u2mm(R.x2)>x_max)||(u2mm(R.x1)y_max)||(u2mm(R.y2)>y_max)||(u2mm(R.y1)<%f,%f,%f> rotate<0,-%f,0> translate<%f,%f,%f>}\n",u2mm((R.x2-R.x1)/2),u2mm((R.y2-R.y1)/2),u2mm((R.x2-R.x1)/2),pcb_cuheight+bedruck_dis,u2mm((R.y2-R.y1)/2),R.angle,u2mm((R.x2+R.x1)/2),layer_dis,u2mm((R.y2+R.y1)/2));
}
}
E.package.texts(T)
{
T.wires(W)
{
if(is_num_in_str(slk_layers[2],W.layer))
{
if(W.layer%2) layer_dis = 0;
else layer_dis = -(pcb_cuheight + pcb_height + bedruck_dis);
if((u2mm(W.x1)>x_max)||(u2mm(W.x2)>x_max)||(u2mm(W.x1)y_max)||(u2mm(W.y2)>y_max)||(u2mm(W.y1)x_max)||(u2mm(W.x2)>x_max)||(u2mm(W.x1)y_max)||(u2mm(W.y2)>y_max)||(u2mm(W.y1)\n");
printf("rotate\n");
printf("}//End union\n#end\n\n");
printf("#if(use_file_as_inc=off)\n");
printf("object{ %s(%f,0,%f,pcb_rotate_x,pcb_rotate_y,pcb_rotate_z)\n",macro_name,x_ver,y_ver);
printf("#if(pcb_upsidedown=on)\n");
printf("rotate pcb_rotdir*180\n");
printf("#end\n}\n");
printf("#end\n");
printf("\n\n//Parts not found in 3dpack.dat or 3dusrpac.dat are:\n%s",ukpack);
}//Schließt Boardkontext
}//Schließt Outputstatement
//Schreiben der INI-Datei wenn Animationspunkte vorhanden sind
if(anim_npoints_cam_flight_path>2)
{
string a[];
if((!fileglob(a, filesetext(out_file,".ini")) || (dlgMessageBox(lang[113] + " " + filesetext(out_file,".ini") + " " + lang[114], lang[115],lang[116]) == 0)))
{
output(filesetext(out_file,".ini"),"w")
{
printf("Initial_Frame = 1\n");
printf("Final_Frame = %d\n",anim_nframes);
printf("Initial_Clock = 0\n");
printf("Final_Clock = 0.9\n");
printf("Cyclic_Animation=off\n");
}
}
}
dlgMessageBox(lang[130]);
mpd_dlg=0;
socket_dlg=0;
//Umschließende do-Schleife
}while(maindialog==2);