2239 

  2239 

  2240 if  (Gear^.Health = 0)

  2240 if  (Gear^.Health = 0)

  2241     or (HHGear^.Damage <> 0)

  2241     or (HHGear^.Damage <> 0)

  2242 	or CheckGearDrowning(HHGear)

  2242 	or CheckGearDrowning(HHGear)

  2243     or (TurnTimeLeft = 0) 

  2243     or (TurnTimeLeft = 0) 

  2244 	or ((Gear^.Message and gm_Attack) <> 0) then

  2245 	or ((Gear^.Message and gm_Attack) <> 0) then

  2245 	begin

  2246 	begin

  2246 	with HHGear^ do

  2247 	with HHGear^ do

  2247 		begin

  2248 		begin

  2248 		Message:= 0;

  2249 		Message:= 0;