Changeset 10 for trunk/GameServer.pas

Timestamp:

Jan 7, 2017, 2:33:20 PM (7 years ago)

Author:

chronos

Message:

• Modified: Created CevoComponents ackage for installable custom components.
• Fixed: Compile time range check error.
• Added: Heaptrace check and fixed some memory leaks.
• Fixed: MaskD function.

File:

• trunk/GameServer.pas (modified) (2 diffs)

trunk/GameServer.pas

@@ -1544 +1544 @@
   MaskD(ObserveLevel, MapSize, not Cardinal(3 shl (2 * pTurn)));
   if Mode > moLoading_Fast then
-    MaskD(RW[pTurn].Map^, MapSize, not Cardinal(fUnit or fHiddenUnit or
+    MaskD(RW[pTurn].Map^, MapSize, Cardinal(not Cardinal(fUnit or fHiddenUnit or
       fStealthUnit or fObserved or fSpiedOut or fOwned or fOwnZoCUnit or
-      fInEnemyZoC));
+      fInEnemyZoC)));
   RW[pTurn].nEnemyUn := 0;
 
@@ -1995 +1995 @@
       MaskD(ObserveLevel, MapSize, not Cardinal(3 shl (2 * pTurn)));
       if Mode > moLoading_Fast then
-        MaskD(RW[pTurn].Map^, MapSize, not Cardinal(fUnit or fHiddenUnit or
+        MaskD(RW[pTurn].Map^, MapSize, Cardinal(not Cardinal(fUnit or fHiddenUnit or
           fStealthUnit or fObserved or fSpiedOut or fOwned or fOwnZoCUnit or
-          fInEnemyZoC));
+          fInEnemyZoC)));
       RW[pTurn].nEnemyUn := 0;
       DiscoverViewAreas(pTurn);