時刻を指定した時計の描画マクロ

 時分秒を指定した時計を描画するマクロです。
 //**********************************************************************************
  #macro Clock_time(Hms)
  #local Hour=Hms.x; #local Min=Hms.y; #local Sec=Hms.z;
  union {
   object { Clockface texture { T_gold } }
   object { Gear_seg texture { T_gold } }
   object { Sec_hand pigment { P_sec } rotate 30*(Sec-15)/5*y }
   object { Minute_hand pigment { P_min } rotate (30*(Min-15)/5+6*Sec/60)*y }
   object { Hour_hand pigment { P_hour } rotate (30*(Hour-3)+(30*Min/5)/12)*y }
  }
  #end
 //**********************************************************************************