type AILearningCreature = class(
AICreature
)
AICreature
> AILivingThing
> AIThing
> AIBaseObject
Constructor Create(aParent: pointer); |
|
Destructor Destroy; override; |
|
function Eat(const JawSize: integer): boolean; override; |
|
function FavoriteFood: integer; |
|
procedure FullDisplay(aList: TStrings); override; |
|
procedure GiveUp; |
|
procedure LoadFromFile(var aFile: TextFile); override; |
|
procedure LookForSomethingToEat; overload; |
|
procedure LookForSomethingToEat(aBinding: integer); overload; |
|
procedure SaveToFile(var aFile: TextFile); override; |
|
function YuckiestFood: integer; |
Constructor Create(aParent: pointer); |
Destructor Destroy; override; |
function Eat(const JawSize: integer): boolean; override; |
function FavoriteFood: integer; |
procedure FullDisplay(aList: TStrings); override; |
procedure GiveUp; |
give up on a target
procedure LoadFromFile(var aFile: TextFile); override; |
procedure LookForSomethingToEat; overload; |
look for food anywhere
procedure LookForSomethingToEat(aBinding: integer); overload; |
look for food in water, land, air, etc
procedure SaveToFile(var aFile: TextFile); override; |
function YuckiestFood: integer; |
property Memory: AIReportList; |
|
property SenseMemory: TStringList; |
|
property Senses: AIThingReferenceList; |
|
property Timer: integer; |
property Memory: AIReportList; |
property SenseMemory: TStringList; |
property Senses: AIThingReferenceList; |
property Timer: integer; |