NEED: switch server script

[Szewczuq]

Hi! I need script which when i write: !join then the script move me to another server. E.Q. from my INF server to my CTF server. I found this script: http://forums.soldat.pl/index.php?topic=22826.0 but its not working.

[Furai]

Outdated script core.

[Szewczuq]

I know, but can anybody remake this script?

[xmRipper]

I don't test it yet but it should work.

Code: (pascal) [Select]

procedure OnPlayerSpeak(ID: Byte; Text: string);
begin
// ask the person who type !join to join 127.0.0.1:23074, with a message for him
if (Text = '!join') then ForwardClient(IDtoIP(ID), GetPlayerStat(ID, 'port'), '127.0.0.1', 23074, 'Join this server instead!');
end;