hedgewars/uChat.pas
changeset 14378 4edc73fc722c
parent 14366 2ab312c47dc3
child 14778 bbec6b28d072
equal deleted inserted replaced
14377:b251aa50c0d3 14378:4edc73fc722c
   587         AddChatString(#3 + shortstring(trcmd[sidCmdShrug]));
   587         AddChatString(#3 + shortstring(trcmd[sidCmdShrug]));
   588         AddChatString(#3 + shortstring(trcmd[sidCmdWave]));
   588         AddChatString(#3 + shortstring(trcmd[sidCmdWave]));
   589         exit
   589         exit
   590         end;
   590         end;
   591 
   591 
       
   592     if (copy(s, 2, 9) = 'help room') then
       
   593         begin
       
   594         if (gameType = gmtNet) then
       
   595             SendConsoleCommand('/help')
       
   596         else
       
   597             AddChatString(#0 + shortstring(trcmd[sidCmdHelpRoomFail]));
       
   598         exit;
       
   599         end;
       
   600 
   592     if (copy(s, 2, 4) = 'help') then
   601     if (copy(s, 2, 4) = 'help') then
   593         begin
   602         begin
   594         AddChatString(#3 + shortstring(trcmd[sidCmdHeaderBasic]));
   603         AddChatString(#3 + shortstring(trcmd[sidCmdHeaderBasic]));
   595         if gameType = gmtNet then
   604         if gameType = gmtNet then
   596             AddChatString(#3 + shortstring(trcmd[sidCmdPauseNet]))
   605             AddChatString(#3 + shortstring(trcmd[sidCmdPauseNet]))
   606         AddChatString(#3 + shortstring(trcmd[sidCmdMe]));
   615         AddChatString(#3 + shortstring(trcmd[sidCmdMe]));
   607         AddChatString(#3 + shortstring(trcmd[sidCmdTogglechat]));
   616         AddChatString(#3 + shortstring(trcmd[sidCmdTogglechat]));
   608         AddChatString(#3 + shortstring(trcmd[sidCmdHistory]));
   617         AddChatString(#3 + shortstring(trcmd[sidCmdHistory]));
   609         AddChatString(#3 + shortstring(trcmd[sidCmdHelp]));
   618         AddChatString(#3 + shortstring(trcmd[sidCmdHelp]));
   610         AddChatString(#3 + shortstring(trcmd[sidCmdHelpTaunts]));
   619         AddChatString(#3 + shortstring(trcmd[sidCmdHelpTaunts]));
       
   620         if gameType = gmtNet then
       
   621             AddChatString(#3 + shortstring(trcmd[sidCmdHelpRoom]));
   611         exit
   622         exit
   612         end;
   623         end;
   613 
   624 
   614     // hedghog animations/taunts and engine commands
   625     // hedghog animations/taunts and engine commands
   615     if (not CurrentTeam^.ExtDriven) and (CurrentTeam^.Hedgehogs[0].BotLevel = 0) then
   626     if (not CurrentTeam^.ExtDriven) and (CurrentTeam^.Hedgehogs[0].BotLevel = 0) then