Egor Zaytsev (Все сообщения пользователя)

  struct test
{
   test() { ::MessageBoxA(NULL,  "ctor" , NULL,  0 ); }
   ~test() { ::MessageBoxA(NULL,  "dtor" , NULL,  0 ); }
};

static void generr(lua_State  *  s, const char  *  txt)
{
   lua_pushstring(s, txt);
   lua_error(s);
}

static int qmain(lua_State  *  s)
{
   try
   {
      test tst;
      ::generr(s,  "error msg" );
   }
   catch( .. .)
   {
      ::MessageBoxA(NULL,  "Exception caught" , NULL,  0 );
      throw;
   }
    return   0 ;
}
  

   function   OnAllTrade (tick)
 end 
 
mainRun  =   false 
 
 function   OnStop (flag) 
    message ( "OnStop" )
   mainRun  =   false 
    return   3000 ;
 end 
 
 function   main ()
   mainRun  =   true 
    message ( "main run..." )
   
    while  mainRun  do 
       local  ticksNum  =   getNumberOf ( "all_trades" )
       local  tick  =   getItem ( "all_trades" , ticksNum -  1 )
       sleep ( 1 )
    end 
 
    message ( "main exit" )
 end 
  

   function   OnCandle (index)
 end 

 function   OnStop ()
   is_run  =   false 
 end 

 function   main ()
   collectgarbage ( "setpause" , 50 )
   collectgarbage ( "setstepmul" , 300 )
   class =  "SPBFUT" 
   name =  "SiM0" 
   ds_chan =  CreateDataSource (class, name, INTERVAL_M1)
   ds_chan: SetUpdateCallback (OnCandle)
   is_run =  true 
    while  is_run  do 
       local  t  =   "" 
       local  a  =  tostring( getInfoParam ( "SERVERTIME" ))
       for  s  in  a:gmatch( '%d+' )  do 
         t = t .. s
       end 
       --sleep(15) 
    end  
   ds_chan: Close ()
 end