local  pipe  =   io.open ( "\\\\.\\PIPE\ \"   .. pipe_name,  "w+b" )
     if   not  pipe  then 
         return 
     end 
    pipe:write( 'BlaBla' )  -- записываем команду в канал 

 --Читаем 
     local  rd  =   '' 
     local  ct  =   os.time ()
     -- Для примера: Т.к. время ожидания ответа может быть не мгновенным, то ожидаем 2 секунды, читая из канала ответ. 
     while   os.time ()  -  ct  <   2   and  rd  =  =   ''   do 
        rd  =  pipe:read( '*a' )
     end 
    tele_pipe:close()  -- закрываем канал   

       local  pipe  =   io.open ( "\\\\.\\PIPE\ \"   .. pipe_name,  "w+b" )
     if   not  pipe  then 
         return 
     end 
    pipe:write( 'BlaBla' )  -- записываем команду в канал 

 --Читаем 
     local  rd  =   '' 
     local  ct  =   os.time ()
     -- Для примера: Т.к. время ожидания ответа может быть не мгновенным, то ожидаем 2 секунды, читая из канала ответ. 
     while   os.time ()  -  ct  <   2   and  rd  =  =   ''   do 
        rd  =  pipe:read( '*a' )
     end 
    tele_pipe:close()  -- закрываем канал   

    local pipe = io.open("\\\\.\\PIPE\\"..pipe_name, "w+b")
    if not pipe then
        return
    end
    pipe:write('BlaBla') -- записываем команду в канал

--Читаем
    local rd = ''
    local ct = os.time()
    -- Для примера: Т.к. время ожидания ответа может быть не мгновенным, то ожидаем 2 секунды, читая из канала ответ.
    while os.time() - ct < 2 and rd == '' do
        rd = pipe:read('*a')
    end
    tele_pipe:close() -- закрываем канал