三维空间某点到平面距离的公式

0xAA55

C语言表达：

1. fabs(A*x+B*y+C*z+D)/sqrt(A*A+B*B+C*C)

复制代码

VB语言表达：

1. Abs(A*x+B*y+C*z+D)/Sqr(A*A+B*B+C*C)

复制代码

汇编表达：假定A、B、C、D、x、y、z都指向double双精度浮点数类型的变量

1. fld     dword[Ａ]   ;载入A
   
2. fmul    qword[ｘ]   ;乘以x
   
3. fld     qword[Ｂ]   ;载入B
   
4. fmul    qword[ｙ]   ;乘以y
   
5. fadd                ;得到A*x+B*y
   
6. fld     qword[Ｃ]   ;载入C
   
7. fmul    qword[ｚ]   ;乘以z
   
8. fadd                ;得到A*x+B*y+C*z
   
9. fadd    qword[Ｄ]   ;得到A*x+B*y+C*z+D
   
10. fabs                ;取绝对值得到fabs(A*x+B*y+C*z+D)
    
11. fld     qword[Ａ]   ;载入A
    
12. fmul    st0         ;乘以A
    
13. fld     qword[Ｂ]   ;载入B
    
14. fmul    st0         ;乘以B
    
15. fadd                ;得到A*A+B*B
    
16. fld     qword[Ｃ]   ;载入C
    
17. fmul    st0         ;乘以C
    
18. fadd                ;得到A*A+B*B+C*C
    
19. fsqrt               ;开平方根得到sqrt(A*A+B*B+C*C)
    
20. fdiv                ;最终得到fabs(A*x+B*y+C*z+D)/sqrt(A*A+B*B+C*C)的计算结果。
    
21. ;fst    qword[Result];存储运算的结果到内存

复制代码