begin for需要计算光亮度的每一象素edo begin 确定通过视点V和象素e的光线R; ray-tracing(R,I,1); 置e的光亮度为 end end; procedure ray-tracing(R,I,A); /*R为当前跟踪光线，为当前跟踪光线的光亮度 A为对总光亮度的贡献系数*/ begin ifA<k/G then I=0begin for 需要计算光亮度的每一象素e do begin 确定通过视点V和象素e的光线R； ray-tracing(R,I,1); 置e的光亮度为I end end; procedure ray-tracing(R,I,A); /*R为当前跟踪光线，I为当前跟踪光线的光亮度 ，A为I对总光亮度的贡献系数*/ begin ifA<k/G then I=0