equal
deleted
inserted
replaced
1547 begin |
1547 begin |
1548 gear^.Health := 100; |
1548 gear^.Health := 100; |
1549 gear^.dX := _0; |
1549 gear^.dX := _0; |
1550 gear^.dY := _0; |
1550 gear^.dY := _0; |
1551 gear^.State := gstWait; |
1551 gear^.State := gstWait; |
1552 inc(CurrentHedgehog^.Team^.stats.AIKills); |
1552 with CurrentHedgehog^ do begin |
|
1553 inc(Team^.stats.AIKills); |
|
1554 if Team^.AIKillsTex <> nil then FreeTexture(Team^.AIKillsTex); |
|
1555 Team^.AIKillsTex := RenderStringTex(inttostr(Team^.stats.AIKills), Team^.Clan^.Color, fnt16); |
|
1556 end; |
1553 FindPlace(gear, false, 0, LAND_WIDTH); |
1557 FindPlace(gear, false, 0, LAND_WIDTH); |
1554 RenderHealth(PHedgehog(gear^.Hedgehog)^); |
1558 RenderHealth(PHedgehog(gear^.Hedgehog)^); |
1555 RecountTeamHealth(PHedgehog(gear^.Hedgehog)^.Team); |
1559 RecountTeamHealth(PHedgehog(gear^.Hedgehog)^.Team); |
1556 ScriptCall('onResurrect', gear^.uid); |
1560 ScriptCall('onResurrect', gear^.uid); |
1557 end; |
1561 end; |