hedgewars/HHHandlers.inc
changeset 2045 b0588498bc3a
parent 2042 905c554d62e6
child 2056 ed8c83f1e4b0
equal deleted inserted replaced
2044:8548f5be2d72 2045:b0588498bc3a
   196 
   196 
   197         if not (SpeechText = '') then
   197         if not (SpeechText = '') then
   198             begin
   198             begin
   199             tmpGear:= AddVisualGear(0, 0, vgtSpeechBubble);
   199             tmpGear:= AddVisualGear(0, 0, vgtSpeechBubble);
   200             tmpGear^.Text:= SpeechText;
   200             tmpGear^.Text:= SpeechText;
   201             tmpGear^.Hedgehog:= CurrentHedgehog;
   201             tmpGear^.Hedgehog:= Gear^.Hedgehog;
   202             tmpGear^.FrameTicks:= SpeechType;
   202             tmpGear^.FrameTicks:= SpeechType;
   203             SpeechText:= ''
   203             SpeechText:= ''
   204             end;
   204             end;
   205 
   205 
   206         Power:= 0;
   206         Power:= 0;