574                 if speech <> nil then

   574                 if speech <> nil then

   575                     begin

   575                     begin

   576                     speech^.Text:= SpeechText;

   576                     speech^.Text:= SpeechText;

   577                     speech^.Hedgehog:= Gear^.Hedgehog;

   577                     speech^.Hedgehog:= Gear^.Hedgehog;

   578                     speech^.FrameTicks:= SpeechType;

   578                     speech^.FrameTicks:= SpeechType;

   579                     end;

   580                     end;

   580                 SpeechText:= ''

   581                 SpeechText:= ''

   581                 end;

   582                 end;

   582 

   583 

   583             Power:= 0;

   584             Power:= 0;