Difference between revisions of "TActivePlayer.OnDamage"
m |
m (→Example) |
||
Line 10: | Line 10: | ||
Example ignores all damage dealt, players become invincible. | Example ignores all damage dealt, players become invincible. | ||
<syntaxhighlight lang="pascal"> | <syntaxhighlight lang="pascal"> | ||
− | function OnDamageZero(Shooter, Victim: TActivePlayer; Damage: Integer; | + | function OnDamageZero(Shooter, Victim: TActivePlayer; Damage: Integer; BulletID: Byte): Integer |
begin | begin | ||
Result := 0; | Result := 0; |
Revision as of 13:27, 9 August 2013
property OnDamage Access mode: RW Event handler type: TOnDamageEvent Event handler declaration: function (Shooter, Victim: TActivePlayer; Damage: Integer; BulletID: Byte): Integer
Description
Event property called when a player is hurt, whether from a killing poly, bullet or command.
Example
Example ignores all damage dealt, players become invincible.
function OnDamageZero(Shooter, Victim: TActivePlayer; Damage: Integer; BulletID: Byte): Integer
begin
Result := 0;
end;
var
i: Byte;
begin
for i:=1 to 32 do
Players[i].OnDamage := @OnDamageZero;
end.