hedgewars/uChat.pas
changeset 14783 bbec6b28d072
parent 14383 4edc73fc722c
child 15272 22f2fd8a3d2c
equal deleted inserted replaced
14782:8015a6e4ca3c 14783:bbec6b28d072
   364                     SpeechHogNumber:= byte(c) - 48;
   364                     SpeechHogNumber:= byte(c) - 48;
   365                 end;
   365                 end;
   366             // default to current hedgehog (if own) or first hedgehog
   366             // default to current hedgehog (if own) or first hedgehog
   367             if SpeechHogNumber = 0 then
   367             if SpeechHogNumber = 0 then
   368                 begin
   368                 begin
   369                 if not CurrentTeam^.ExtDriven then
   369                 if (not CurrentTeam^.ExtDriven) and (not CurrentHedgehog^.Unplaced) then
   370                     SpeechHogNumber:= CurrentTeam^.CurrHedgehog + 1
   370                     SpeechHogNumber:= CurrentTeam^.CurrHedgehog + 1
   371                 else
   371                 else
   372                     SpeechHogNumber:= 1;
   372                     SpeechHogNumber:= 1;
   373                 end;
   373                 end;
   374             end;
   374             end;