А можно по такому способу?
begin
if FromClient and (pck[1]=#$23) and (ConnectName=name) then
for i:=1 to 50 do
buf:=pck;
SendToServerEx(name);
end;
end.
Так думаю будет лучше ибо в нашем случае чем быстрее будут посылатся пакеты тем лучше
Имя я укажу.
Кстати А можно сделать так чтобы пакеты посылались очень быстро до получения пакета на клиент "Моб умер"?