Look for WPF-pro

[Суслиk]

Нужен человек который сможет состряпать маленький скрипт на ВПФ, примерно такой:

if = клиент отправил пакет такой-то - отправить N-е кол-во раз пакет такой-то + такой-то. Или хотя б вторую часть :pandal:

[Leo_ня]

Как-то так. Пробуй.

var
pack1,pack2 : string;

procedure OnCreate; //При инициализации скрипта
begin //Установить значения
pack1:=HStr('FFFF000000FFFF'); //первого
pack2:=HStr('0000FFFFFF0000'); //и второго пакета
end;

begin
if (not _gFromServ) and (gInt(_gBuff,0,2)=$2020) then begin //Если пакет отправлен серверу
// и ID пакета (первые два байта с начала) равны 0x2020,
gSys.SendS(pack1); //то отправить серверу первый пакет,
gSys.SendS(pack2); //отправить второй пакет
end;
end

[Суслиk]

Как-то так. Пробуй.

var
pack1,pack2 : string;

procedure OnCreate; //При инициализации скрипта
begin //Установить значения
pack1:=HStr('FFFF000000FFFF'); //первого
pack2:=HStr('0000FFFFFF0000'); //и второго пакета
end;

begin
if (not _gFromServ) and (gInt(_gBuff,0,2)=$2020) then begin //Если пакет отправлен серверу
// и ID пакета (первые два байта с начала) равны 0x2020,
gSys.SendS(pack1); //то отправить серверу первый пакет,
gSys.SendS(pack2); //отправить второй пакет
end;
end


I will try

if (not _gFromServ) and (gInt(_gBuff,0,2)=$2020) then begin //Если пакет отправлен серверу
// и ID пакета (первые два байта с начала) равны 0x2020,
можно тут поподробнее?