Class AIFireTree

Unit

Declaration

type AIFireTree = class(AIThing)

Description

Hierarchy

Methods

Overview

	Constructor Create(aParent: pointer);
	procedure Damage(aAmount: integer); override;
	function Digest(const aAmount: integer): integer; override;
	procedure Fuel; override;
	procedure FullDisplay(aList: TStrings); override;
	function IsPlant: boolean; override;
	procedure LoadFromFile(var aFile: TextFile); override;
	procedure SaveToFile(var aFile: TextFile); override;

Description

Constructor Create(aParent: pointer);

procedure Damage(aAmount: integer); override;

function Digest(const aAmount: integer): integer; override;

procedure Fuel; override;

procedure FullDisplay(aList: TStrings); override;

function IsPlant: boolean; override;

procedure LoadFromFile(var aFile: TextFile); override;

procedure SaveToFile(var aFile: TextFile); override;

Properties

Overview

	property Burning: boolean;
	property Fire: single;

Description

property Burning: boolean;

property Fire: single;