is_run = true
TimeOut = 500

function ErrorFunction()
    -- имитируем код генерирующий ошибку
    s=a
end

function main()
local CallSuccess
    while is_run do
        -- Безопасно вызываем функцию которая может выдать ошибку
        [список возможных результатов] CallSuccess = pcall(ErrorFunction[, другие возможные аргументы])
        if CallSuccess then
            -- Вызов успешен, анализируем результаты (если предусмотрено)
        else
            -- Здесь какая-то работа над ошибками
        end
        sleep(TimeOut)
    end
end

  pcall ( function () foo("privet)  end )

local f = function(...) 
    if #{...} == 0 then
        error("no args!")
    else
       return ...
    end
end

print("pcall(f) with args")
local res,return1,return2 = pcall( f, "arg1", "arg2" )
if res then
    print(return1,return2)
else
    print("ERROR: ",return1)
end
-- pcall(f) with args
-- arg1 arg2

print("pcall(f) with no args. Catch exception")
local res,return1,return2 = pcall( f )
if res then
    print(return1,return2)
else
    print("ERROR: ",return1)
end
-- pcall(f) with no args. Catch exception
-- ERROR: D:\PATH\TO\source.lua":3: no args!

   function   main ()
    while  is_run  do 
   pcall(foo( "privet" ))
   mm(t) --печать в виде message таблицы из файла. 
    sleep ( 1000 )
    end 
 end 

 function   foo (slovo)
   a = slovo
   dofile ( "C:\\1.lua" ) --здесь сидит таблица t 
 end   

pcall (function() foo("privet) end)

function main()
   while is_run do
   pcall(foo("privet"))
   mm(t)--печать в виде message таблицы из файла.
   sleep(1000)
   end
end

function foo(slovo)
   a=slovo
   dofile ("C:\\1.lua")--здесь сидит таблица t
end

function main()
   while is_run do
   pcall(foo)
   mm(t)--печать в виде message таблицы из файла.
   sleep(1000)
   end
end

function foo()
   dofile ("C:\\1.lua")--здесь сидит таблица t
end

t={
a=100
b=200
}