--- a/hedgewars/uChat.pas Sun May 24 14:03:59 2009 +0000
+++ b/hedgewars/uChat.pas Sun May 24 15:01:10 2009 +0000
@@ -135,37 +135,56 @@
// "Make hedgehog say something"
if (s[1] = '"') and (s[Length(s)] = '"') then
begin
- ParseCommand('/hogsay '+#1+copy(s, 2, Length(s)-2), true);
+ if CurrentTeam^.ExtDriven then
+ ParseCommand('/say ' + copy(s, 2, Length(s)-2), true)
+ else
+ ParseCommand('/hogsay '#1 + copy(s, 2, Length(s)-2), true);
exit
end;
// 'Make hedgehog think something'
if (s[1] = '''') and (s[Length(s)] = '''') then
begin
- ParseCommand('/hogsay '+#2+copy(s, 2, Length(s)-2), true);
+ if CurrentTeam^.ExtDriven then
+ ParseCommand('/say ' + copy(s, 2, Length(s)-2), true)
+ else
+ ParseCommand('/hogsay '#2 + copy(s, 2, Length(s)-2), true);
exit
end;
// -Make hedgehog yell something-
if (s[1] = '-') and (s[Length(s)] = '-') then
begin
- ParseCommand('/hogsay '+#3+copy(s, 2, Length(s)-2), true);
+ if CurrentTeam^.ExtDriven then
+ ParseCommand('/say ' + copy(s, 2, Length(s)-2), true)
+ else
+ ParseCommand('/hogsay '#3 + copy(s, 2, Length(s)-2), true);
exit
end;
// These 3 are same as above, only are to make the hedgehog say it on next attack
if (s[1] = '/') and (copy(s, 1, 5) = '/hsa ') then
begin
- ParseCommand('/hogsay '+#4+copy(s, 6, Length(s)-5), true);
+ if CurrentTeam^.ExtDriven then
+ ParseCommand('/say ' + copy(s, 2, Length(s)-2), true)
+ else
+ ParseCommand('/hogsay '#4 + copy(s, 2, Length(s)-2), true);
exit
end;
if (s[1] = '/') and (copy(s, 1, 5) = '/hta ') then
begin
- ParseCommand('/hogsay '+#5+copy(s, 6, Length(s)-5), true);
+ if CurrentTeam^.ExtDriven then
+ ParseCommand('/say ' + copy(s, 2, Length(s)-2), true)
+ else
+ ParseCommand('/hogsay '#5 + copy(s, 2, Length(s)-2), true);
exit
end;
if (s[1] = '/') and (copy(s, 1, 5) = '/hya ') then
begin
- ParseCommand('/hogsay '+#6+copy(s, 6, Length(s)-5), true);
+ if CurrentTeam^.ExtDriven then
+ ParseCommand('/say ' + copy(s, 2, Length(s)-2), true)
+ else
+ ParseCommand('/hogsay '#6 + copy(s, 2, Length(s)-2), true);
exit
end;
+
if (s[1] = '/') and (copy(s, 1, 4) <> '/me ') then
begin
if CurrentTeam^.ExtDriven then exit;