Class TMovableEngine (unit uTMovableEngine)

Inherits from

TObject

Constructors


constructor Create(OutputCanvas : TCanvas);

******************************************************************************


Functions

destructor Destroy;

******************************************************************************

procedure GetClosestMovables(MyMovable : TMovable; CloseList : TList);

******************************************************************************

function GetClosestObstacle(MyMovable : TMovable) : TMovable;

******************************************************************************

procedure RunStep;

******************************************************************************

procedure SetNewCanvas(OutputCanvas : TCanvas);

******************************************************************************

Properties

Events

Variables

Application : TApplication;


bBlanking : boolean;


bDrawGraphics : boolean;


Canvas : TCanvas;


CheckChancePerFrame : integer;

75% chance of checking the neighbourhood! The rest of the time the old info is re-used.

LineLength : single;


MaxSpeed : single;

For speed testing

MaxSpeedChange : single;


MovableList : Tlist;


ObstacleList : TList;


SensorDistance : single;



Constructors


constructor Create(OutputCanvas : TCanvas);

******************************************************************************


Functions


destructor Destroy;

******************************************************************************


procedure GetClosestMovables(MyMovable : TMovable; CloseList : TList);

******************************************************************************


function GetClosestObstacle(MyMovable : TMovable) : TMovable;

******************************************************************************


procedure RunStep;

******************************************************************************


procedure SetNewCanvas(OutputCanvas : TCanvas);

******************************************************************************


Properties


Events


Variables


Application : TApplication;


bBlanking : boolean;


bDrawGraphics : boolean;


Canvas : TCanvas;


CheckChancePerFrame : integer;

75% chance of checking the neighbourhood! The rest of the time the old info is re-used. Saves on cycles!


LineLength : single;


MaxSpeed : single;

For speed testing


MaxSpeedChange : single;


MovableList : Tlist;


ObstacleList : TList;


SensorDistance : single;