Changeset 202 for trunk/Packages


Ignore:
Timestamp:
May 17, 2018, 5:41:47 PM (7 years ago)
Author:
chronos
Message:
  • Modified: AI player related code moved to UClientAI unit. It is now extension of TClient class to simulate regular human client.
  • Modified: More work on client-server architecture.
File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/Packages/CoolStreaming/UVarBlockSerializer.pas

    r185 r202  
    191191  // Get bit length
    192192  Length := SizeOf(QWord) * BitAlignment;
    193   while (((Value shr Length) and 1) = 0) and (Length > 0) do
     193  while ((Value and (QWord(1) shl (Length - 1))) = 0) and (Length > 0) do
    194194    Dec(Length);
    195195  Inc(Length);
Note: See TracChangeset for help on using the changeset viewer.