Subversion Repositories AndroidProjects

unit app_entity_trail_element;

interface

uses sux_constant, sux_object, app_constant, app_entity_main,
     app_game_player;

type
  SAETElement=class
    pos,pos1,pos2:SXVertex2D;
    density:SXFloat;
    normalvector:SXVertex2D;

    constructor Create(pos,lastpos:SXVertex2D);
    destructor Destroy; override;
  end;

implementation

uses main;


// --- SAETElement


constructor SAETElement.Create(pos,lastpos:SXVertex2D);
var vector,normalvector:SXVertex2D;
begin
  inherited Create;

  self.pos:=pos;
  self.density:=1;

  vector:=sx.math.getPointVector(lastpos,pos);
  vector:=sx.math.setVectorLength(vector,4);
  normalvector.x:=vector.y;
  normalvector.y:=-vector.x;
  pos1:=sx.math.addVertices(pos,normalvector);
  pos2:=sx.math.subtractVertices(pos,normalvector);
end;


destructor SAETElement.Destroy;
begin
  inherited;
end;


end.