type AIFlock = class(
AILivingGroup
)
AILivingGroup
> AIThing
> AIBaseObject
procedure CalculateCenters; |
|
Constructor Create(aParent: pointer); |
|
Destructor Destroy; override; |
|
procedure Fuel; override; |
|
procedure FullDisplay(aList: TStrings); override; |
procedure CalculateCenters; |
direction flock is flying
Constructor Create(aParent: pointer); |
Destructor Destroy; override; |
procedure Fuel; override; |
procedure FullDisplay(aList: TStrings); override; |
property FlightPattern: integer; |
|
property FlockAngle: single; |
|
property FlockCenter: TAffineVector; |
|
property FlockVelocity: TAffineVector; |
property FlightPattern: integer; |
property FlockAngle: single; |
property FlockCenter: TAffineVector; |
property FlockVelocity: TAffineVector; |