计算机图形学 第9章 消除隐藏线和隐藏面.pptVIP

东华理工学院 计算机图形学 x = Array(0, 80, 80, 0, 0, 80, 80, 0) y = Array(0, 0, 80, 80, 0, 0, 80, 80) z = Array(0, 0, 0, 0, 80, 80, 80, 80) line_p=Array(0, 1, 2, 3, 0, 7, 6, 5, 4, 7, 1, 5, 6, 2, 1, 0, 3, 7, 4, 0, 6, 7, 3, 2, 6, 4, 5, 1, 0, 4) face_s = Array(0, 5, 10, 15, 20, 25) face_e = Array(4, 9, 14, 19, 24, 29) For i = 0 To 7 xx(i)=x(i) * Cos(ry) + z(i) * Sin(ry) yy(i)= x(i)*Sin(ry)*Sin(rx)+y(i)*Cos(rx)-z(i)*Cos(ry)*Sin(rx) zz(i)= -x(i)*Sin(ry)*Cos(rx)+y(i)*Sin(rx)+z(i)*Cos(ry)*Cos(rx) Next ‘各顶点旋转变换 For i = 0 To 5 face_zmax(i) = 0 For j = face_s(i) To face_e(i) - 1