方向角或将3D角度指向空间中的位置

时间:2010-10-16 14:45:57

标签: delphi vector point angle

我正在尝试将实体指向3D矢量。 (基本上设置实体角度,使其指向3D空间中的位置)。目前,我仍然坚持从矢量中获取角度。

//Vectors in the bracket are 3D, first is the entity position, second is a position in space where I want to point at.
( myEntity.Pos - posToPointAt ).Angle

我目前坚持将方向向量转换为角度。非常感谢帮助。

1 个答案:

答案 0 :(得分:2)

这不是它的工作原理,你缺少一些重要的信息:你需要弄清楚你的实体现在指向的方式,而不是使用实体位置?获取该信息可能与使用当前旋转矩阵一样简单,并将其乘以沿z轴的单位向量(或实体的“中性”方向),但这一切都取决于您的特定设置。

一旦你有两个方向向量(你当前的方向,以及到新的所需位置的方向......最后一个是标准化的“myEntity.Pos - posToPointAt”),你使用了功能如下,计算方向之间的旋转。注意我在这里使用四元数,你可能需要一个旋转矩阵。

function RotationBetweenVectors( const aV1, aV2: TVector3): TQuaternion;
const
  EPSILON = 0.000001;

var
  v1: TVector3;
  v2: TVector3;
  dot: FloatT;
  s: FloatT;
  invS: FloatT;
  c: TVector3;

begin
  v1 := aV1.normalize;
  v2 := aV2.normalize;

  dot := VectorDotProduct( v1, v2 );

  if dot >= 1 then
  begin
      // INFO: DotProduct = 1 -> vectors are the same
      result := QUATERNION_IDENTITY
  end
  else if ( dot < EPSILON - 1 ) then
  begin
      raise Exception.create( '180 degree rotation currently not supported.' );
  end
  else
  begin
      s := sqrt( 2 * ( 1 + dot ));
      invS := 1 / s;

      c := VectorCrossProduct( v1, v2 );

      result.x := c.x * invS;
      result.y := c.y * invS;
      result.z := c.z * invS;
      result.w := 0.5 * s;
      result := result.normalize;
  end;
end;