852 

   852 

   853     if ((delay2 mod cInactDelay) = 0) and (CurrentHedgehog <> nil) and (CurrentHedgehog^.Gear <> nil) then 

   853     if ((delay2 mod cInactDelay) = 0) and (CurrentHedgehog <> nil) and (CurrentHedgehog^.Gear <> nil) then 

   854         CurrentHedgehog^.Gear^.State:= CurrentHedgehog^.Gear^.State and not gstAttacked;

   854         CurrentHedgehog^.Gear^.State:= CurrentHedgehog^.Gear^.State and not gstAttacked;

   855     if delay2 = 0 then

   855     if delay2 = 0 then

   856         begin

   856         begin

   857         CheckNoDamage;

   858         CheckNoDamage;

   858         CheckForWin

   859         CheckForWin

   859         end

   860         end

   860     end;

   861     end;

   861 

   862