77 inc(SkippedTurns);

    77 inc(SkippedTurns);

    78 isTurnSkipped:= true

    78 isTurnSkipped:= true

    79 end;

    79 end;

    80 

    80 

    81 procedure TurnReaction;

    81 procedure TurnReaction;

    84 begin

    83 begin

    85 inc(FinishedTurnsTotal);

    84 inc(FinishedTurnsTotal);

    86 if FinishedTurnsTotal = 0 then exit;

    85 if FinishedTurnsTotal = 0 then exit;

    87 

    86 

    88 inc(CurrentHedgehog^.stats.FinishedTurns);

    87 inc(CurrentHedgehog^.stats.FinishedTurns);