hedgewars/uGearsHandlersMess.pas
changeset 12815 92218a06c9ff
parent 12806 895ef1c8f5ff
child 12820 4c1c468725ff
equal deleted inserted replaced
12814:b4e20bb485f9 12815:92218a06c9ff
  3892 
  3892 
  3893             TurnTimeLeft:= 14 * 125;
  3893             TurnTimeLeft:= 14 * 125;
  3894             end;
  3894             end;
  3895 
  3895 
  3896         if HHGear <> nil then
  3896         if HHGear <> nil then
       
  3897             begin
  3897             HHGear^.Message := 0;
  3898             HHGear^.Message := 0;
  3898         ParseCommand('/taunt ' + #1, true)
  3899             PlayTaunt(1)
       
  3900             end
  3899         end
  3901         end
  3900 end;
  3902 end;
  3901 
  3903 
  3902 procedure doStepRCPlane(Gear: PGear);
  3904 procedure doStepRCPlane(Gear: PGear);
  3903 var
  3905 var