Prevent default action from happening

[Maff^]

In an effort to update my Ingame ZitroStats -script/snippet I've come across some questions I couldn't find an answer to.
I've not been scripting for soldat for some months now, and have almost no Pascal experience, so I hope these questions aren't to obvious

Question 1: Is it possible to prevent a default event action from happening?
For example, if someone says '!hello' all players see this in there 'log' and above the player. Can I cancel this default action by placing some code in the OnPlayerSpeak procedure?

Question 2: How (if possible) can I send text to the game as if a particular player said this.
For example, can I let a player say 'Look at me, I'm a statswhore' ?

_{Sorry for my terrible English
lol @ the forum censoring 'bad' words}

[DorkeyDear]

Question 1: Is it possible to prevent a default event action from happening?
For example, if someone says '!hello' all players see this in there 'log' and above the player. Can I cancel this default action by placing some code in the OnPlayerSpeak procedure?

Not for OnPlayerSpeak. Under OnCommand and OnPlayerCommand, you can set the result to false (allow the command to do its thing) or true (command does no default effect) although for OnPlayerSpeak, there is no result thing so I don't believe you can stop that from happening.

Question 2: How (if possible) can I send text to the game as if a particular player said this.
For example, can I let a player say 'Look at me, I'm a stats*****' ?

Only for bots can u force to say message with the BotChat procedure. You can't force a human to say anything. You can make it semi-appear like they are speaking, except there would be a ' [.*] ' (w/out the ".") in front of it, when you use WriteConsole.

[Maff^]

Thank you for the reply! Too bad I can't make it work as I would like to, but it's not really important so it's not that bad

Could these be feature requests?

[DorkeyDear]

Could these be feature requests?

I believe the result part thing for OnPlayerSpeak has already been asked but sense its ran under a different thingy (i really have no idea), it can't be done.

Outside the topic: An admin will yell at you for your sig being too long on the 1 line
"Brokenliquid.net DM Serv (soldat://130.89.164.52:23073/) now playing: DesertWind (0/32)" = 88 characters
70 characters is the max
I know... its annoying. I've already been yelled at i believe 2 times

[Maff^]

I believe the result part thing for OnPlayerSpeak has already been asked but sense its ran under a different thingy (i really have no idea), it can't be done.

That's too bad :/

Outside the topic: An admin will yell at you for your sig being too long on the 1 line
"Brokenliquid.net DM Serv (soldat://130.89.164.52:23073/) now playing: DesertWind (0/32)" = 88 characters
70 characters is the max
I know... its annoying. I've already been yelled at i believe 2 times

Than they should be really mad about the first line, as it's a wopping 123 bytes long . Anyway, thx for the tip, I've fixed that now.
_{I rather see a couple long lines than a bunch of short lines! 640x480 is so 1985... I love my 1600x1200}

[urraka]

There is a /mute command to mute a player. I haven't tried it and i actually don't think it would work, but maybe if you call that command inside OnPlayerSpeak it works.

[Maff^]

Sounds really clever, I should give it a try!

EDIT: I'll try it later, stupid  26376347? is not a valid integer error

Date Posted: June 05, 2007, 12:30:06 AMUsing /mute isn't going to work , I just found out that /mute is a clientside command. So you can't use that.
But is there an other way to mute an user on the server? (Could be very usefull for other scripts, I guess)

[chrisgbk]

/gmute mutes a player server side, so no one can hear them scream.

[DorkeyDear]

When somebody speaks, their Text is replaced with '(Muted)'

Code: [Select]

procedure OnJoinGame(ID, Team: byte);
begin
  Command('/gmute ' + InttoStr(ID));
end;

procedure OnPlayerSpeak(ID: byte; Text: string);
begin
  Case GetPlayerStat(ID,'Team') of
    0: WriteConsole(0,Text,$FF000000);
    1: WriteConsole(0,Text,$FFFF0000);
    2: WriteConsole(0,Text,$FF0000FF);
    3: WriteConsole(0,Text,$FF00FF00);
    4: WriteConsole(0,Text,$FFFFFF00);
    5: WriteConsole(0,Text,$FFFFFFFF);
  end;
end; Ruins many people's fun right there.

Plus theres that annoying message  that says your muted every time you talk.

[Maff^]

Thanks for the replies, but I'll just have to let it go and make the script in an other way. It's not crucial for the script, it only requires some cosmetic changes.

Thanks anyway, and I hope someday these features are implanted.