Class AIOrbiter

Unit

Declaration

type AIOrbiter = class(AISatellite)

Description

Hierarchy

Methods

Overview

	procedure Explode; virtual; abstract;
	procedure Fuel; override;
	procedure FullDisplay(aList: TStrings); override;
	procedure LoadFromFile(var aFile: TextFile); override;
	procedure OnCollide(aCollider: AIThing); override;
	procedure Perform(aActivity: integer); override;
	procedure SaveToFile(var aFile: TextFile); override;

Description

procedure Explode; virtual; abstract;

procedure Fuel; override;

procedure FullDisplay(aList: TStrings); override;

procedure LoadFromFile(var aFile: TextFile); override;

procedure OnCollide(aCollider: AIThing); override;

when collide, explode into smaller, falling pieces

procedure Perform(aActivity: integer); override;

procedure SaveToFile(var aFile: TextFile); override;

Properties

Overview

	property Radius: integer;
	property Rate: single;

Description

property Radius: integer;

property Rate: single;

qualitative rate of effect