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

  Settings  =  
{
        Name  =   "+PE" ,
        fname  =   "OSCp" ,
        line = 
        {
         {
            Name  =   "eq - " ,
            Color  =   RGB ( 40 ,  80 ,  190 ),
            Type  =  TYPE_LINE,
            Width  =   1 
         },
         {
            Name  =   "pos - " ,
            Color  =   RGB ( 255 ,  60 ,  50 ),
            Type  =  TYPE_LINE,
            Width  =   2 
         }
        }
}
 function   Init ()
     return   # Settings.line
 end 
 function   OnCalculate (index)
    local  fnm  =   "\ \"    ..  Settings.fname  ..   ".txt" 
    if  index  =  =   Size ()  then 
       local  callResult, result  =  pcall(dofile,  getScriptPath ()  ..  fnm)
       if   not  callResult  then 
          return 
       end 
       SetValue (index -  # eq,  1 ,  nil )
       SetValue (index -  # pos,  2 ,  nil )
       local  cnt  =   0 
       for  i  =  index -  # eq +  1 , index -  1   do 
         cnt  =  cnt  +   1 
          SetValue (i,  1 , eq[cnt])
          SetValue (i,  2 , pos[cnt])
       end 
       return  eq[ # eq], pos[ # pos]
    end 
 end 
  

  script_path =  getScriptPath ()
 function  OnInit (script_path)
 --задаём переменные 
 end 

  

  class =  "SPBFUT"  
sec =  "SRH7" 
 for  i =  1 , 10000000000000000000   do 
 qt =  getQuoteLevel2 (class, sec)
 end   

  require  "luacom" 
ami  =   luacom.CreateObject ( "Broker.Application" )
ami.Visible  =   true 
aa  =  ami:LoadDatabase( "D:\\PF\\AmiBroker\\DB\\trade" )
  

  qq  =  ami:Import( 0 ,  "c:\\valg\\rt.txt" )  

  st  =  ami.Stocks:Add( "RTSI" )  

   function   OnTransReply (reply)
        orders[reply.trans_id].tr_receive_time =  os.clock ()    
         local  latency = (orders[reply.trans_id].tr_receive_time - orders[reply.trans_id].tr_send_time) *  1000 
 end