diff --git a/CATEngine.pas b/CATEngine.pas
index 3903a54..3bedc2a 100644
--- a/CATEngine.pas
+++ b/CATEngine.pas
@@ -408,7 +408,6 @@ type
     function ZZUX(const s: string): string;
     function ZZUY(const s: string): string;
     function ZZVA(const s: string): string;
-    function ZZVB(const s: string): string;
     function ZZVG(const s: string): string;
     function ZZVN: string;
     function ZZVS(const s: string): string;
@@ -1583,7 +1582,7 @@ begin
   else if ext = 'UX' then ans := ZZUX(s)
   else if ext = 'UY' then ans := ZZUY(s)
   else if ext = 'VA' then ans := ZZVA(s)
-  else if ext = 'VB' then ans := ZZVB(s)
+  else if ext = 'VB' then ans := '' // STUB: усиление приёма в VAC — VAC нет
   else if ext = 'VC' then ans := '' // STUB: усиление передачи в VAC — VAC нет
   else if ext = 'VD' then ans := '' // STUB: частота дискретизации VAC — VAC нет
   else if ext = 'VE' then ans := '' // STUB: кнопка VOX — VOX нет
@@ -1956,7 +1955,10 @@ begin
   end;
   if Length(s) <> 36 then Exit(CAT_ERROR);
   if not TryStrToInt(Copy(s, 1, 3), nb) then Exit(CAT_ERROR);
-  if (nb < 0) or (nb > High(G)) then Exit(CAT_ERROR);
+  // Сетка эквалайзера бывает только трёх- или десятиполосной: движок
+  // (PushTXEQProfile) и редактор в настройках знают ровно эти два случая,
+  // любое другое число полос уехало бы в сохранённый TX-профиль мусором.
+  if (nb <> 3) and (nb <> 10) then Exit(CAT_ERROR);
   FillChar(G, SizeOf(G), 0);
   for i := 0 to nb do
   begin
@@ -2590,16 +2592,6 @@ begin
   Result := OnOff(s, nil, nil);
 end;
 
-function TCATEngine.ZZVB(const s: string): string;
-// ZZVB: усиление приёма в VAC — STUB: виртуального аудиокабеля нет.
-begin
-  if Length(s) = 0 then begin
-    if Assigned(FCtx.GetVfoA) and Assigned(FCtx.SetVfoB) then
-      FCtx.SetVfoB(FCtx.GetVfoA);
-    Result := '';
-  end else Result := CAT_ERROR;
-end;
-
 function TCATEngine.ZZVG(const s: string): string;
 // ZZVG: усиление VOX — STUB: VOX'а нет.
 // (Громкость — это ZZAG; раньше ZZVG был ошибочно заалиашен на неё.)
diff --git a/CATTcp.pas b/CATTcp.pas
index 0f2a2cc..1faef61 100644
--- a/CATTcp.pas
+++ b/CATTcp.pas
@@ -21,7 +21,7 @@ interface
 
 uses
   Classes, SysUtils,
-  WebUtils,   // SockClose, SockShutdown, SOCK_INVALID
+  WebUtils,   // SockClose, SockShutdown, SockSend, SOCK_INVALID
   {$IFDEF MSWINDOWS}
     Windows, WinSock2,
   {$ELSE}
@@ -164,6 +164,9 @@ procedure TCATTcpClientThread.SendStr(const S: string);
 // TCP не обязан отдавать весь буфер за один send: длинный ответ (IF, ZZEB,
 // список режимов) мог уехать обрезанным — и молча, потому что усечение здесь
 // не ошибка. Дописываем остаток, пока он есть.
+// Пишем через WebUtils.SockSend, а не голым fpSend: он ставит MSG_NOSIGNAL.
+// Без него запись в закрытый клиентом сокет — SIGPIPE, а тот по умолчанию
+// убивает весь процесс; с ним send просто вернёт -1, и клиент выбрасывается.
 var
   buf:  AnsiString;
   sent, n: Integer;
@@ -174,12 +177,7 @@ begin
   sent := 0;
   while sent < Length(buf) do
   begin
-    {$IFDEF MSWINDOWS}
-    n := send(FSocket, buf[sent + 1], Length(buf) - sent, 0);
-    if n = SOCKET_ERROR then n := -1;
-    {$ELSE}
-    n := fpSend(FSocket, @buf[sent + 1], Length(buf) - sent, 0);
-    {$ENDIF}
+    n := SockSend(FSocket, @buf[sent + 1], Length(buf) - sent, 0);
     if n <= 0 then
     begin
       FMarkDelete := True;