equal
deleted
inserted
replaced
5088 if graves.size <= Gear^.Tag then Gear^.Tag:= 0; |
5088 if graves.size <= Gear^.Tag then Gear^.Tag:= 0; |
5089 dec(hh^.Gear^.Health); |
5089 dec(hh^.Gear^.Health); |
5090 if (hh^.Gear^.Health = 0) and (hh^.Gear^.Damage = 0) then |
5090 if (hh^.Gear^.Health = 0) and (hh^.Gear^.Damage = 0) then |
5091 hh^.Gear^.Damage:= 1; |
5091 hh^.Gear^.Damage:= 1; |
5092 RenderHealth(hh^); |
5092 RenderHealth(hh^); |
|
5093 RecountTeamHealth(hh^.Team); |
5093 inc(graves.ar^[Gear^.Tag]^.Health); |
5094 inc(graves.ar^[Gear^.Tag]^.Health); |
5094 inc(Gear^.Tag) |
5095 inc(Gear^.Tag) |
5095 {-for i:= 0 to High(graves) do begin |
5096 {-for i:= 0 to High(graves) do begin |
5096 if hh^.Gear^.Health > 0 then begin |
5097 if hh^.Gear^.Health > 0 then begin |
5097 dec(hh^.Gear^.Health); |
5098 dec(hh^.Gear^.Health); |
5108 resgear := AddGear(hwRound(graves.ar^[i]^.X), hwRound(graves.ar^[i]^.Y), gtHedgehog, gstWait, _0, _0, 0); |
5109 resgear := AddGear(hwRound(graves.ar^[i]^.X), hwRound(graves.ar^[i]^.Y), gtHedgehog, gstWait, _0, _0, 0); |
5109 resgear^.Hedgehog := graves.ar^[i]^.Hedgehog; |
5110 resgear^.Hedgehog := graves.ar^[i]^.Hedgehog; |
5110 resgear^.Health := graves.ar^[i]^.Health; |
5111 resgear^.Health := graves.ar^[i]^.Health; |
5111 PHedgehog(graves.ar^[i]^.Hedgehog)^.Gear := resgear; |
5112 PHedgehog(graves.ar^[i]^.Hedgehog)^.Gear := resgear; |
5112 graves.ar^[i]^.Message:= graves.ar^[i]^.Message or gmDestroy; |
5113 graves.ar^[i]^.Message:= graves.ar^[i]^.Message or gmDestroy; |
|
5114 graves.ar^[i]^.Active:= true; |
5113 RenderHealth(resgear^.Hedgehog^); |
5115 RenderHealth(resgear^.Hedgehog^); |
5114 RecountTeamHealth(resgear^.Hedgehog^.Team); |
5116 RecountTeamHealth(resgear^.Hedgehog^.Team); |
5115 resgear^.Hedgehog^.Effects[heResurrected]:= 1; |
5117 resgear^.Hedgehog^.Effects[heResurrected]:= 1; |
5116 // only make hat-less hedgehogs look like zombies, preserve existing hats |
5118 // only make hat-less hedgehogs look like zombies, preserve existing hats |
5117 |
5119 |