unit GlobalTypes;

interface

type
  TGateModeStatus = (
    gmsIntro = 0,
    gmsGo = 1
  );

  TWorldType = (
    wtDirt = 0,
    wtSnow = 1,
    wtDestiny = 2
  );

  TAnimationType = (
    baStep = 0,
    baRun = 1,
    baAtack = 2,
    baDeath = 3,
    baDead = 4
  );

  TBotModel = (
    bmMutent = 0,
    bmBigMutent = 1
  );

  TPlanetType = (
    ptAsteroid = 0,
    ptMoon = 1,
    ptEarth = 2,
    ptGiant = 3
  );

  TPlanet = record
    &Type: TPlanetType;
    Gravity: Single;
    CanBreath: Boolean;
    AvgTemperature: Single;
    DayTime: Single;
    YearTime: Single;
    Storms: Boolean;
    BioThreat: Boolean;
    Adress: string;
    LevelNumber: Integer;
  end;

implementation

end.
