Class TAlien (unit Alien)

Inherits from

TVisibleObject

****** * * Module: Alien * Author: Joe Kessler * IntegrationWare - A New Generation of Extraordinary PC Solutions * www.integrationware.com * * Purpose: * * This module defines the look and behavior of the Alien. The Alien * appears toward the end of the levels, shooting randomly at asteroids * and at Bart. * ******

Constructors


constructor Create(listObjects: TList; iCollisionID: Integer; fFireProb: Real);

TRUe if the alien has been visible to the user.


Functions

procedure FireMissle;

Missle cannon control.

procedure Move;

Customer movement behavior.

procedure SetInitialPosition;

Declare the shape of alien.

Properties

Events

Variables

m_bBeenOnScreen : Boolean;

General direction of the alien onscreen.

m_fFireProb : Real;


m_fGeneralDirection : Real;

Frequency at which the alien will fire.


Constructors


constructor Create(listObjects: TList; iCollisionID: Integer; fFireProb: Real);

TRUe if the alien has been visible to the user.


Functions


procedure FireMissle;

Missle cannon control.

Remember if the alien has come onto the screen yet.


procedure Move;

Customer movement behavior.

Start on either the left or right side of the screen. Give the alien an initial direction that will take him onto the screen.


procedure SetInitialPosition;

Declare the shape of alien.


Properties


Events


Variables


m_bBeenOnScreen : Boolean;

General direction of the alien onscreen.


m_fFireProb : Real;


m_fGeneralDirection : Real;

Frequency at which the alien will fire.