Units
Class Hierarchy
Classes, Interfaces, Objects and Records
Types
Variables
Constants
Functions and Procedures
Identifiers
function chooseColor (index: integer): RGBColor;
function Rainbow: longint;
function Randint (Max: Integer): Integer;
function Odd (i: INTEGER): boolean;
function RandSwell (Indgene: Swelltype): SwellType;
procedure EraseInnerRect (box: rect);
procedure FrameOuterRect (box: rect);
procedure FrameInnerRect (box: rect);
function RandLimbType: LimbType;
function RandLimbFill: LimbFillType;
procedure Reproduce (parent: person; var child: person);
function Sgn (x: INTEGER): INTEGER;
procedure Slide (LiveRect, DestRect: Rect);
procedure SetUpBoxes (drawing: BOOLEAN);
procedure PicLine (var ThisPic: Pic; x, y, xnew, ynew: Integer; color: integer);
procedure ZeroPic (var ThisPic: Pic; Here: Point);
procedure DrawPic (ThisPic: Pic; Place: Point; var Biomorph: person);
function CheckAbort: BOOLEAN;
function ThisColor (j: INTEGER): INTEGER;
function LongintColour (IntColour: Integer): LongInt;
function IntColour (LongintColour: Longint): Integer;
function ChangedColour (oldColour, Amount: integer): integer;
procedure Message (s: str255);
procedure Develop (var biomorph: person; Here: point);
procedure Delayvelop (var Biomorph: Person; Here: Point);
procedure DrawAllBoxes;
procedure Evolve (MLoc: point);
procedure GeneBoxTemplate;
procedure ShowGeneBox (j: INTEGER; biomorph: person);
procedure ShowChangedGene (an1, an2: person);
procedure MakeGeneBox (biomorph: person);
procedure DoBreed;
procedure BasicTree (var genotype: person);
procedure RandomForeColour (var theBiomorph: person);
procedure RandomBackColour (var theBiomorph: person);
procedure DeliverSaltation (var theBiomorph: Person);
procedure DoSaltation;
procedure DoPaste;
procedure SendToClipBoard;
procedure Suzy;
procedure myDoEvent (loc: point);
procedure myUpdate (theWindow: WindowPtr);
procedure myOpen (theWindow: WindowPtr);
procedure myApplLoop;
oldSpecial: integer;
dullRgn: rgnHandle;
midRgn: rgnHandle;
Palettes,
delivers the number of colours available with the present hardware;