/********************************************************************************************************************************************
//  Macros for Fuse Package PTF15
//  Designed by Pazour Zbynek <pazi(at)seznam.cz>
//  Rev. 1.0   -2.2.2011
********************************************************************************************************************************************/

#macro SPC_FUSE_PTF15_GRND()

union
{
 difference
 {
  Round_Box_Union(<0,0,0>,<22,5.5,9>0.2)
  box{<0,0,0><7,4,7>translate<7,1.51,1>}
  cylinder{<0,-0.1,0>,<0,3,0>1.6 translate<11,0,4.5>} 
  pigment {color red 0.83 green 0.74 blue 0.54}
  
 }

union
{
 difference
 {
  cylinder{<0,0,0><6,0,0>3} 
  cylinder{<-0.1,0,0><6.1,0,0>2.6}
  box{<-0.1,0,0><6.1,7,3.6>translate<0,-3.1,-1.8>}
  texture{col_silver} 
 } 
 box{<0,0,0>,<6,2,0.4>rotate<0,0,0>texture{col_silver}translate<0,-4,-2.2>}
 box{<0,0,0>,<6,2,0.4>rotate<0,0,0>texture{col_silver}translate<0,-4,1.8>}
translate<0,9.4,4.5>
}


union
{
 difference
 {
  cylinder{<0,0,0><6,0,0>3} 
  cylinder{<-0.1,0,0><6.1,0,0>2.6}
  box{<-0.1,0,0><6.1,7,3.6>translate<0,-3.1,-1.8>}
  texture{col_silver} 
 } 
 box{<0,0,0>,<6,2,0.4>rotate<0,0,0>texture{col_silver}translate<0,-4,-2.2>}
 box{<0,0,0>,<6,2,0.4>rotate<0,0,0>texture{col_silver}translate<0,-4,1.8>}
translate<16,9.4,4.5>
}

union
 {
 box{<0,0,0>,<1.2,-5,0.9>texture{col_silver}}
 box{<0,0,0>,<5,5.5,0.9>texture{col_silver}translate<-1.9,0,0>}
 rotate<0,90,0>
 translate<-0.4,0,5.1>
 }

union
 {
 box{<0,0,0>,<1.2,-5,0.9>texture{col_silver}}
 box{<0,0,0>,<5,5.5,0.9>texture{col_silver}translate<-1.9,0,0>}
 rotate<0,90,0>
 translate<22,0,5.1>
 }

union
{
cylinder{<0.1,0,0><19.9,0,0>0.2 texture{col_silver}}
cylinder{<0.1,0,0><19.9,0,0>2.49 texture{Glass}}
cylinder{<0,0,0><5,0,0>2.5 texture{col_silver}} 
cylinder{<0,0,0><5,0,0>2.5 texture{col_silver}translate<15,0,0>}
translate<1,9.5,4.5>
}
translate<-11.2,0,-4.5>
}
#end

#macro SPC_FUSE_PTF15()
object{SPC_FUSE_PTF15_GRND()}
#end