equal
deleted
inserted
replaced
846 else if ((GameFlags and gfInfAttack) <> 0) then |
846 else if ((GameFlags and gfInfAttack) <> 0) then |
847 begin |
847 begin |
848 if delay2 = 0 then |
848 if delay2 = 0 then |
849 delay2:= cInactDelay * 4 |
849 delay2:= cInactDelay * 4 |
850 else |
850 else |
|
851 begin |
851 dec(delay2); |
852 dec(delay2); |
852 |
853 |
853 if ((delay2 mod cInactDelay) = 0) and (CurrentHedgehog <> nil) and (CurrentHedgehog^.Gear <> nil) then |
854 if ((delay2 mod cInactDelay) = 0) and (CurrentHedgehog <> nil) and (CurrentHedgehog^.Gear <> nil) then |
854 CurrentHedgehog^.Gear^.State:= CurrentHedgehog^.Gear^.State and not gstAttacked; |
855 CurrentHedgehog^.Gear^.State:= CurrentHedgehog^.Gear^.State and not gstAttacked; |
855 if delay2 = 0 then |
856 if delay2 = 0 then |
856 begin |
857 begin |
857 SweepDirty; |
858 SweepDirty; |
858 CheckNoDamage; |
859 CheckNoDamage; |
859 CheckForWin |
860 CheckForWin |
|
861 end |
860 end |
862 end |
861 end; |
863 end; |
862 |
864 |
863 if TurnTimeLeft > 0 then |
865 if TurnTimeLeft > 0 then |
864 if CurrentHedgehog^.Gear <> nil then |
866 if CurrentHedgehog^.Gear <> nil then |