Changeset 37

Timestamp:

Mar 8, 2014, 12:13:27 AM (11 years ago)

Author:

chronos

Message:

• Fixed: Player inner move and computer attack power computation.

File:

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

trunk/UGame.pas

@@ -485 +485 @@
           // Use only necessary power
           AttackPower := Power - TotalAttackPower + 1;
-          if Cells[I].Power < AttackPower then
-            AttackPower := Cells[I].Power;
+          if Cells[I].GetAvialPower < AttackPower then
+            AttackPower := Cells[I].GetAvialPower;
           Game.SetMove(Cells[I], Game.Map.Cells[Y, X], AttackPower);
           TotalAttackPower := TotalAttackPower + AttackPower;
@@ -607 +607 @@
       if CellTo.Player = Player then begin
         // Inner move
+        CellTo.Power := CellTo.Power + CountOnce;
       end else begin
         AttackerPower := CountOnce;