X-Git-Url: http://deadsoftware.ru/gitweb?p=d2df-sdl.git;a=blobdiff_plain;f=src%2Fgame%2Fg_player.pas;h=9d79504ac4e87136ffd6a0ab95f1bbc406444c9b;hp=6ffbe28dfc882c3fff794a6f788895c414ce5985;hb=70c6ae06da3e766e0303dca258b0b3f6e56a2dea;hpb=0968d19494ddf24230a822c02acbe3a3334bc3ad

diff --git a/src/game/g_player.pas b/src/game/g_player.pas
index 6ffbe28..9d79504 100644
--- a/src/game/g_player.pas
+++ b/src/game/g_player.pas
@@ -243,6 +243,7 @@ type
     procedure   SetFlag(Flag: Byte);
     function    DropFlag(): Boolean;
     procedure   AllRulez(Health: Boolean);
+    procedure   RestoreHealthArmor();
     procedure   FragCombo();
     procedure   GiveItem(ItemType: Byte);
     procedure   Damage(value: Word; SpawnerUID: Word; vx, vy: Integer; t: Byte); virtual;
@@ -5464,6 +5465,12 @@ begin
   FRulez := FRulez+[R_KEY_RED, R_KEY_GREEN, R_KEY_BLUE];
 end;
 
+procedure TPlayer.RestoreHealthArmor();
+begin
+  FHealth := PLAYER_HP_LIMIT;
+  FArmor := PLAYER_AP_LIMIT;
+end;
+
 procedure TPlayer.FragCombo();
 var
   Param: Integer;