hedgewars/uChat.pas
changeset 4121 22b1acc0e461
parent 3969 5f4ef3db0a65
child 4357 a1fcfc341a52
equal deleted inserted replaced
4119:0d3e701491fb 4121:22b1acc0e461
   243     ParseCommand(s, true);
   243     ParseCommand(s, true);
   244     exit
   244     exit
   245     end;
   245     end;
   246 if (s[1] = '/') and (copy(s, 1, 4) <> '/me ') then
   246 if (s[1] = '/') and (copy(s, 1, 4) <> '/me ') then
   247     begin
   247     begin
   248     if CurrentTeam^.ExtDriven then exit;
   248     if CurrentTeam^.ExtDriven or (CurrentTeam^.Hedgehogs[0].BotLevel <> 0) then
       
   249         exit;
   249 
   250 
   250     for i:= Low(TWave) to High(TWave) do
   251     for i:= Low(TWave) to High(TWave) do
   251         if (s = Wavez[i].cmd) then
   252         if (s = Wavez[i].cmd) then
   252             begin
   253             begin
   253             ParseCommand('/taunt ' + char(i), true);
   254             ParseCommand('/taunt ' + char(i), true);