/* in Datei 3dfunc41.ulp ergänzen */

//Gibt einen formatierten String zurück der eine Drahtbrücke zeichnen kann
//erwartet Angaben in units
// t   = Cu-Dicke
// dis = Leiterplattendicke
string create_bridge(int ix1, int iy1, int ix2, int iy2, int iwid, real t, real dis, int c_x1, int c_x2, real pcb_height)
{
	string out,tmp;

	real x1 = u2mm(ix1);
	real x2 = u2mm(ix2);
	real y1 = u2mm(iy1);
	real y2 = u2mm(iy2);
	real width = u2mm(iwid);

	real angel,length; 
	real sgn =dis < 0 ? -1 : +1;
        real xk,yk;
        real hb = 0.4*sgn;



	if(c_x1==1) sprintf(out,"cylinder{<0,0,0><0,%f,0>%f translate<%f,%f,%f>}\n",t,width/2,x1,dis,y1);
	if(c_x2==1) sprintf(tmp,"cylinder{<0,0,0><0,%f,0>%f translate<%f,%f,%f>}\n",t,width/2,x2,dis,y2);

	out=out+tmp;

	if(x1<x2)
	{
		angel = (360/6.2836)*atan((y1-y2)/(x2-x1));
		length = sqrt((y1-y2)*(y1-y2)+(x1-x2)*(x1-x2));
		xk = x1;
		yk = y1;
	}
	else if(x2<x1)
	{
		angel = (360/6.2836)*atan((y2-y1)/(x1-x2));
		length = sqrt((y1-y2)*(y1-y2)+(x1-x2)*(x1-x2));
		xk = x2;
		yk = y2;
	}
	else if(x1==x2)
	{
		if(y1<y2) angel = 90; else angel = -90;
		length = abs(y1-y2); 
		xk = x2;
		yk = y2;
	}
	
        sprintf(tmp,"#local w = sphere_sweep {b_spline 8,  <0,%f,0>,0.25  <0,%f,0>,0.25  <0,0,0>,0.25  <0,%f,0>,0.25  <1,%f,0>,0.25  <%f,%f,0>,0.25  <%f,%f,0>,0.25 <%f,%f,0>,0.25 }  \n",  -3.0*sgn, -2.9*sgn, hb*3, hb, length/4,hb, length*2/3-0.1,hb, length*2/3,hb);
	out=out+tmp;
	sprintf(tmp,"union { object {w} object{w rotate<0,180,0> translate<%f,0,0> } rotate<0,%f,0> translate<%f,%f,%f> texture{col_bgs} } \n", length, angel,xk,dis,yk);
	out=out+tmp;
	sprintf(tmp,"cylinder { <1.5,0,0><%f-1.5,0,0>0.45 rotate<0,%f,0> translate<%f,%f,%f> M_ISOLIATION(rand(global_seed))}\n", length, angel,xk,hb+dis,yk);

	return out+tmp;
}     

/* in Datei 3d50.ulp einfügen */

unter dem Text...
    //*************************************************************************************
    //*                            Leiterbahnen                                           *
    //*************************************************************************************
... kommt irgendwann mal ...
        for(i=0;i<wrs_cnt;i++)
        {
            if(!wrs_p[wrs_sort_i2[i]])
            {

/* hier neu gegen alt */

            }
        }
       B.signals(S)
       {
... usw.
Den Inhalt der Klammer durch ...

                layer_dis = -(ar_layerdis[wrs_l[wrs_sort_i2[i]]-1]);
                          
                if ( ((opt_pad_top==1) && (layer_dis == 0)) || ((opt_pad_bottom==1) && (layer_dis < 0)) )
                {            
                  if (layer_dis == 0)
                    layer_dis = -pad_dis;
                    else
                       layer_dis = -(pcb_cuheight + pcb_height);
                  printf("%s",create_line(    wrs_pos_x1[wrs_sort_i2[i]],
                                                    wrs_pos_y1[wrs_sort_i2[i]],
                                                    wrs_pos_x2[wrs_sort_i2[i]],
                                                    wrs_pos_y2[wrs_sort_i2[i]],
                                                    wrs_wdt[wrs_sort_i2[i]],
                                                    pcb_cuheight+pad_dis, layer_dis, 1,1,"",0));
                }
                else
                {
                  printf("%s",create_bridge(  wrs_pos_x1[wrs_sort_i2[i]],
                                                    wrs_pos_y1[wrs_sort_i2[i]],
                                                    wrs_pos_x2[wrs_sort_i2[i]],
                                                    wrs_pos_y2[wrs_sort_i2[i]],
                                                    wrs_wdt[wrs_sort_i2[i]],
                                                    pcb_cuheight+pad_dis, layer_dis, 1,1, pcb_height));
                }

... ersetzen

/* Am besten in die e3d_tex.inc einfügen */

//----------------------------------------------------------------------
//Drahtisolation
#macro M_ISOLIATION(zz)
    material{
        #local C_isol = Green;
        #if (zz < 0.75)
            #local C_isol = Red;
        #end
        #if (zz < 0.5)
            #local C_isol = Blue;
        #end
        #if (zz < 0.25)
            #local C_isol = Yellow;
        #end
        texture {pigment {gradient <0,1,0> turbulence 1.0 scale <0.1,0.1,0.1>
            pigment_map{
                [ 0.1 C_isol transmit 0.8 filter 0.0]
                [ 0.8 C_isol transmit 0.8 filter 0.0]
                [ 0.9 C_isol transmit 0.1 filter 0.0]}}
            finish {F_Dull}}
        interior {fade_power 2 fade_distance 1.0}
            }      
#end
//----------------------------------------------------------------------