equal
deleted
inserted
replaced
4237 exit; |
4237 exit; |
4238 end; |
4238 end; |
4239 |
4239 |
4240 if ((Gear^.Message and gmAttack) <> 0) and (hh^.Gear^.Health > 0) and (TurnTimeLeft > 0) then |
4240 if ((Gear^.Message and gmAttack) <> 0) and (hh^.Gear^.Health > 0) and (TurnTimeLeft > 0) then |
4241 begin |
4241 begin |
4242 if Length(graves) >= Gear^.Tag then Gear^.Tag:= 0; |
4242 if Length(graves) <= Gear^.Tag then Gear^.Tag:= 0; |
4243 dec(hh^.Gear^.Health); |
4243 dec(hh^.Gear^.Health); |
4244 if (hh^.Gear^.Health = 0) and (hh^.Gear^.Damage = 0) then |
4244 if (hh^.Gear^.Health = 0) and (hh^.Gear^.Damage = 0) then |
4245 hh^.Gear^.Damage:= 1; |
4245 hh^.Gear^.Damage:= 1; |
4246 RenderHealth(hh^); |
4246 RenderHealth(hh^); |
4247 inc(graves[Gear^.Tag]^.Health); |
4247 inc(graves[Gear^.Tag]^.Health); |