hedgewars/HHHandlers.inc
changeset 5820 c9fe3b376a84
parent 5818 d071162d550d
child 5829 3ec95dc2b249
equal deleted inserted replaced
5818:d071162d550d 5820:c9fe3b376a84
  1056                     if Hedgehogs[i].GearHidden <> nil then
  1056                     if Hedgehogs[i].GearHidden <> nil then
  1057                         begin
  1057                         begin
  1058                         RestoreHog(@Hedgehogs[i]);
  1058                         RestoreHog(@Hedgehogs[i]);
  1059                         if Hedgehogs[i].Gear <> nil then 
  1059                         if Hedgehogs[i].Gear <> nil then 
  1060                             begin
  1060                             begin
  1061                             Gear^.State:= Gear^.State or gstHHGone;
  1061                             Hedgehogs[i].Gear^.State:= Gear^.State or gstHHGone;
  1062                             Gear^.doStep:= @doStepHedgehogGone
  1062                             Hedgehogs[i].Gear^.doStep:= @doStepHedgehogGone
  1063                             end
  1063                             end
  1064                         end;
  1064                         end;
  1065 
  1065 
  1066             // Gone message
  1066             // Gone message
  1067             AddCaption(Format(GetEventString(eidGone), Gear^.Hedgehog^.Name), cWhiteColor, capgrpMessage);
  1067             AddCaption(Format(GetEventString(eidGone), Gear^.Hedgehog^.Name), cWhiteColor, capgrpMessage);