********************************  PLAYER OUT ***************************************************

  try
    aAllBad:=not uos_CreatePlayer(aPlayerIndex);
  except
    on e:exception do
    begin
      //
      WriteToLog('errors','ERROR uos_CreatePlayer: '+e.Message);
      aAllBad:=true;
    end;
  end;
  //
  if not aAllBad then
  begin
    //
    try
      FInputIndexTr:=uos_AddFromEndlessMuted(aPlayerIndex, cChannels, cFramesCount);
    except
      on e:exception do
      begin
        //
        WriteToLog('errors','Ошибка при выполнении uos_AddFromEndlessMuted: '+e.Message);
        aAllBad:=true;
      end;
    end;
    //
    WriteToLog('log','uos_AddFromEndlessMuted() = '+inttostr(FInputIndexTr));
    //
    if (FInputIndexTr<>-1) then
    begin
      //
      try
        FDSPIndexTr:=uos_InputAddDSP(aPlayerIndex, FInputIndexTr, nil,
                     AfterTransmit, nil,nil);
      except
        on e:exception do
        begin
          //
          WriteToLog('errors','ERROR uos_InputAddDSP: '+e.Message);
          aAllBad:=true;
        end;
      end;
      //
      WriteToLog('log','uos_InputAddDSP() = '+inttostr(FDSPIndexTr));
      //
      if (FDSPIndexTr<>-1) then
      begin
        try
          uos_InputSetDSP(aPlayerIndex, FInputIndexTr, FDSPIndexTr, True);
        except
          on e:exception do
          begin
            //
            WriteToLog('errors','ERROR uos_InputSetDSP: '+e.Message);
            aAllBad:=true;
          end;
        end;
      end;
    end;
    //
    try
      FOutputIndexTr:=uos_AddIntoDevOut(aPlayerIndex, -1{aDeviceNum}, -1, cSampleRate,
        cChannels, cSampleFormat, cFramesCount, cChunkCount);
    except
      on e:exception do
      begin
        //
        WriteToLog('log','ERROR uos_AddIntoDevOut(): '+e.message);
        aAllBad:=true;
      end;
    end;
    //
    WriteToLog('log','uos_AddIntoDevOut = '+inttostr(FOutputIndexTr));
    //
    if FOutputIndexTr<>-1 then
    begin
      try
        uos_OutputAddDSPVolume(aPlayerIndex, FOutputIndexTr, 0, 0);
      except
        on e:exception do
        begin
          //
          WriteToLog('log','ERROR uos_OutputAddDSPVolume(): '+e.message);
          aAllBad:=true;
        end;
      end;
    end;



  ***********************************  PLAYER IN **********************************************
  //
  try
    aAllBad:=not uos_CreatePlayer(aPlayerIndex);
  except
    on e:exception do
    begin
      WriteToLog('errors','ERROR uos_CreatePlayer: '+e.message);
      aAllBad:=true;
    end;
  end;
  //
  if not aAllBad then
  begin
    try
      FInputIndexRs := uos_AddFromDevIn(aPlayerIndex, -1 {aDeviceNum},-1, cSampleRate,
        cChannels, cSampleFormat, cFramesCount, cChunkCount);
    except
      on e:exception do
      begin
        WriteToLog('errors','ERROR uos_AddFromDevIn: '+e.message);
        aAllBad:=true;
      end;
    end;
    //
    WriteToLog('log','uos_AddFromDevIn() = '+inttostr(FInputIndexRs));
    //
    if FInputIndexRs<>-1 then
    begin
      try
        uos_LoopProcIn(aPlayerIndex, FInputIndexRs, @InLoopMemRs);
      except
        on e:exception do
        begin
          WriteToLog('errors','ERROR uos_LoopProcIn: '+e.message);
          aAllBad:=true;
        end;
      end;
    end; 

***************************************  LOAD LIB UOS *********************************

function TVUPS.InitUOS: boolean;
var FPA_File: string;
begin
  result:=false;
  //
  try
    uos_loadlib('system',nil,nil,nil,nil,nil);
  except
    on e:exception do
    begin
      WriteToLog('errors','ERROR load "system": '+ e.message);
      Exit;
    end;
  end;
  //
  FPA_File :=FWorkPath +  'lib/Linux/64bit/LibPortaudio-64.so';
  //
  WriteToLog('log','File lib: '+FPA_File);
  //
  try
    FRes := uos_LoadLib(PChar(FPA_File), nil, nil, nil, nil, nil);
  except
    on e:exception do
    begin
      WriteToLog('errors','ERROR load '+FPA_File+': '+ e.message);
      FRes:=-1;
    end;
  end;
  //
  if FRes<>0 then
  begin
    WriteToLog('log','Error load lib');
    Exit;
  end else
  begin
    WriteToLog('log','Lib is Load!');
  end;
  //
  result:=true;
end;