Ignore:
Timestamp:
Apr 1, 2021, 9:30:25 AM (3 years ago)
Author:
chronos
Message:
  • Fixed: Incorrect drawing of city names under units. MapOptions need to be global variable for all TIsoMap instances.
File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/LocalPlayer/IsoEngine.pas

    r331 r337  
    5757    BordersOK: PInteger;
    5858    CitiesPictures: TCitiesPictures;
     59    ShowLoc: Boolean;
     60    ShowCityNames: Boolean;
     61    ShowObjects: Boolean;
     62    ShowBorder: Boolean;
     63    ShowMyBorder: Boolean;
     64    ShowGrWall: Boolean;
     65    ShowDebug: Boolean;
     66    FoW: Boolean;
    5967    function Connection4(Loc, Mask, Value: integer): integer;
    6068    function Connection8(Loc, Mask: integer): integer;
    … …  
    7684    HGrTerrain: TGraphicSet;
    7785    HGrCities: TGraphicSet;
    78     MapOptions: TMapOptions;
    7986    pDebugMap: Integer; // -1 for off
    8087    constructor Create;
    … …  
    122129function IsJungle(y: integer): boolean;
    123130procedure Init(InitEnemyModelHandler: TInitEnemyModelEvent);
     131
     132var
     133  MapOptions: TMapOptions;
    124134
    125135
    … …  
    161171  OnInitEnemyModel: TInitEnemyModelEvent;
    162172  DebugMap: ^TTileList;
    163   FoW: Boolean;
    164   ShowLoc: Boolean;
    165   ShowCityNames: Boolean;
    166   ShowObjects: Boolean;
    167   ShowBorder: Boolean;
    168   ShowMyBorder: Boolean;
    169   ShowGrWall: Boolean;
    170   ShowDebug: Boolean;
    171173  IsoMapCache: array[TTileSize] of TIsoMapCache;
    172174
    … …  
    15501552                begin
    15511553                  Aix := 0;
    1552                   bix := 0
     1554                  bix := 0;
    15531555                end
    15541556                else
    15551557                begin
    15561558                  Aix := 0;
    1557                   bix := 1
     1559                  bix := 1;
    15581560                end
    15591561              else if bix = -1 then
    … …  
    15611563                begin
    15621564                  Aix := 1;
    1563                   bix := 1
     1565                  bix := 1;
    15641566                end
    15651567                else
    15661568                begin
    15671569                  Aix := 1;
    1568                   bix := 0
     1570                  bix := 0;
    15691571                end;
    15701572              BitBltBitmap(OceanPatch, x + dx * xxt, y + dy * yyt, xxt, yyt,
    … …  
    16031605            begin
    16041606              Aix := fDesert;
    1605               bix := fDesert
     1607              bix := fDesert;
    16061608            end
    16071609            else if Aix = -2 then
Note: See TracChangeset for help on using the changeset viewer.