時分秒を指定した時計を描画するマクロです。
//**********************************************************************************
#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
//**********************************************************************************