shoji - a Japanese paperwalls - a paravent

three shoji elements / a paravent
Click here for the complete scene description
for POV-Ray: ".txt" file or ".pov" file

three shoji elements / paravent - macro

The union of the outer frame and the inner grid with paperwall forms a single shoji element "Frame".

#macro Frame(Wide_X,Wide_Y,Frame_XY,Frame_Z,X_Nr,Y_Nr)
union{ 
 object{Shoji(Wide_X-2*Frame_XY,Wide_Y-2*Frame_XY,X_Nr,Y_Nr)
        translate<Frame_XY,Frame_XY,Frame_Z*3/4>}
 object{Window1(Wide_X,Wide_Y,Frame_XY,Frame_Z)  }
}
#end //------------------------------------------------

Three shoji elements are added together rotated again their previous element by angles of "angle1" and "angle2"

#macro Paravent_3( Wide_x, Wide_y, Frame_xy, Frame_z, 
                        X_n, Y_n, Angle1, Angle2) 
#local Win_D = Frame_z/2;
union{
 object{ Frame (Wide_x, Wide_y, Frame_xy, Frame_z, X_n, Y_n)}
  union{ object{ Frame (Wide_x,Wide_y,Frame_xy,Frame_z,X_n,Y_n)}
         object{ Frame (Wide_x,Wide_y,Frame_xy,Frame_z,X_n,Y_n)
                 translate<Win_D,0,0>
                 rotate<0,Angle1,0> 
                 translate<Wide_x+Win_D,0,0>}
         translate<Win_D,0,0> 
         rotate<0,Angle2,0> 
         translate<Wide_x+Win_D,0,0>
       }   
      } 
#end //--------------------------------------------------