Hi all

Can anybody help me please?

I have two things that I wish to do to my picture (my very crude code (!) is
pasted below the message)

1. I have an undulating surface and I wish to draw a sort of 'wire frame'
pattern on the top of it so that you can clearly see the contours.

2. I have drawn some crude electrodes which I also wish to undulate. Is it
possible to have the shape do this?

Many thanks

Ps. Is it also possible to do #1 for a height_field?



union {

union {

#local Nr = 0;     // start
 #local EndNr = 5; // end
 #while (Nr< EndNr)


box {<4.5,0,-0.9> < 4.4,0.01, 0.7>
 translate   x*Nr*-0.4

}


#local Nr = Nr + 1;    // next Nr
 #end // ---------------  end of loop


#local Nr = 0;     // start
 #local EndNr = 5; // end
 #while (Nr< EndNr)


box {<4.3,0,-0.7> < 4.2,0.01, 0.9>
 translate   x*Nr*-0.4
}


#local Nr = Nr + 1;    // next Nr
 #end // ---------------  end of loop


 box {<2.8, 0,-0.9> < 5,0.01, -0.8>


}




 box {<2.6, 0,0.8> < 5,0.01, 0.9>

}



#local Nr = 0;     // start
 #local EndNr = 5; // end
 #while (Nr< EndNr)


box {<-4.5,0,-0.9> < -4.4,0.01, 0.7>

 translate   x*Nr*0.4
}


#local Nr = Nr + 1;    // next Nr
 #end // ---------------  end of loop


#local Nr = 0;     // start
 #local EndNr = 5; // end
 #while (Nr< EndNr)

box {<-4.3,0,-0.7> < -4.2,0.01, 0.9>

 translate   x*Nr*0.4

}


#local Nr = Nr + 1;    // next Nr
 #end // ---------------  end of loop

 box {<-2.8, 0,-0.9> < -5,0.01, -0.8>
}
 box {<-2.6, 0,0.8> < -5,0.01, 0.9>
}

 texture { T_Silver_4C finish { ambient 0.15 diffuse 0.85 phong 0.5 reflection
0.05} } // pigment {Black}

}








union {


 box {<4.7, 0, -1.1> <5, 0.01, -0.5>}
 box {<4.7, 0, 0.5> <5, 0.01, 1.1>}
box {<-4.7, 0, -1.1> <-5, 0.01, -0.5>}
  box {<-4.7, 0, 0.5> <-5, 0.01, 1.1>}
 texture { T_Silver_4C finish { ambient 0.15 diffuse 0.85 phong 0.5 reflection
0.05} }
}

translate y*-0.25
}


difference {


union {


#local Nr = 0;     // start
 #local EndNr = 9; // end
 #while (Nr< EndNr)



torus {
    4+Nr, 0.25              // major and minor radius

  }





#local Nr = Nr + 1;    // next Nr
 #end // ---------------  end of loop


   scale y*1.0
    translate <8,-0,0>

    }



     box {<5, -1, -5> <20, 5,5>  }



 box {<-20, -5, -40> <-5, 5, 15> }

 box {<-20, -5, -40> <50, 10, -2>}

 box {<-20, -5, 2> <60, 5, 15>}

 box {<-5,-1.5,-2> <5,0,2>}



pigment {Col_Glass_General}


difference {


box {<-5.1,-1.9,-2.1> <5.1,0,2.1>


pigment {Col_Glass_General}

}



 //------------bottom ripples---------------------


union {


#local Nr = 0;     // start
 #local EndNr = 9; // end
 #while (Nr< EndNr)


torus {
    4.5+Nr, 0.25              // major and minor radius

  }



#local Nr = Nr + 1;    // next Nr
 #end // ---------------  end of loop







    scale y*1.0
    translate <8,-0,0>

    }

     box {<5, -20, -5> <20, 5,5>  }

 box {<-20, -5, -40> <-5, 5, 15> }

 box {<-20, -5, -40> <50, 10, -2>}

 box {<-20, -5, 2> <60, 5, 15>}
pigment {Col_Glass_General}
 }

Post a reply to this message