equal
deleted
inserted
replaced
5428 // now really resurrect the hogs with the hp saved in the graves |
5428 // now really resurrect the hogs with the hp saved in the graves |
5429 for i:= 0 to graves.size - 1 do |
5429 for i:= 0 to graves.size - 1 do |
5430 if graves.ar^[i]^.Health > 0 then |
5430 if graves.ar^[i]^.Health > 0 then |
5431 begin |
5431 begin |
5432 resgear := AddGear(hwRound(graves.ar^[i]^.X), hwRound(graves.ar^[i]^.Y), gtHedgehog, gstWait, _0, _0, 0); |
5432 resgear := AddGear(hwRound(graves.ar^[i]^.X), hwRound(graves.ar^[i]^.Y), gtHedgehog, gstWait, _0, _0, 0); |
|
5433 resgear^.uid:= graves.ar^[i]^.Pos; |
5433 resgear^.Hedgehog := graves.ar^[i]^.Hedgehog; |
5434 resgear^.Hedgehog := graves.ar^[i]^.Hedgehog; |
5434 resgear^.Health := graves.ar^[i]^.Health; |
5435 resgear^.Health := graves.ar^[i]^.Health; |
5435 PHedgehog(graves.ar^[i]^.Hedgehog)^.Gear := resgear; |
5436 PHedgehog(graves.ar^[i]^.Hedgehog)^.Gear := resgear; |
5436 graves.ar^[i]^.Message:= graves.ar^[i]^.Message or gmDestroy; |
5437 graves.ar^[i]^.Message:= graves.ar^[i]^.Message or gmDestroy; |
5437 graves.ar^[i]^.Active:= true; |
5438 graves.ar^[i]^.Active:= true; |