equal
deleted
inserted
replaced
444 procedure ResurrectHedgehog(gear: PGear); |
444 procedure ResurrectHedgehog(gear: PGear); |
445 var tempTeam : PTeam; |
445 var tempTeam : PTeam; |
446 sparkles: PVisualGear; |
446 sparkles: PVisualGear; |
447 gX, gY: LongInt; |
447 gX, gY: LongInt; |
448 begin |
448 begin |
|
449 if (Gear^.LastDamage <> nil) then |
|
450 uStats.HedgehogDamaged(Gear, Gear^.LastDamage, 0, true) |
|
451 else |
|
452 uStats.HedgehogDamaged(Gear, CurrentHedgehog, 0, true); |
449 AttackBar:= 0; |
453 AttackBar:= 0; |
450 gear^.dX := _0; |
454 gear^.dX := _0; |
451 gear^.dY := _0; |
455 gear^.dY := _0; |
452 gear^.Damage := 0; |
456 gear^.Damage := 0; |
453 gear^.Health := gear^.Hedgehog^.InitialHealth; |
457 gear^.Health := gear^.Hedgehog^.InitialHealth; |