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

  Settings  =  {
   Name  =   "*SMA Example" , 
   Period  =   9 , 
   line  =  {{Name  =   "SMA" ,Type  =  TYPE_LINE, Color  =   RGB ( 255 ,  0 ,  0 )}}
}

 local  Index_tbl  =  {}
 local  SUM_TMP = {}

 function   Init () 
    return   # Settings.line
 end 

 function   OnCalculate (I)
    if  I  =  =   1   then 
      SUM_TMP  =  {}
      Index_tbl  =  {}
    end 
    if  CandleExist(I)  then 
       if  (Index_tbl[ # Index_tbl]~ = I)  then  Index_tbl[ # Index_tbl +  1 ] = I  end 
    else   return   nil   end 
   I  =   # Index_tbl
   SUM_TMP[I] = (SUM_TMP[I -  1 ]  or   0 ) + C(Index_tbl[I])
    if  I  >  =  Settings.Period  then 
       return  (SUM_TMP[I] - (SUM_TMP[I - Settings.Period]  or   0 ))/Settings.Period
    end 
    return   nil 
 end   

           if  getSTime() >  100000   and  getSTime() <  184003   then 

         local  LASTDEPTHT_T  =   getParamEx (class,  sec, «LAST»)
         local  LASTDEPTHT = tonumber(toPrice(sec, LASTDEPTHT_T.param_value))

        tbl: SetValue (line_count_table[sec],'LAST',  string.format (LASTDEPTHT))

         end 

         local  Delta  =  LASTDEPTHT  

  Price  =  tonumber( getParamEx ( 'FUTSPREAD' ,  'RIM7RIU7' ,  'last' ).param_value)
 message (tostring(Price))
 --> 0   

   function   GetPrice (ind)
    if  ind ~ =   0   then 
       if  CandleExist(ind)  =  =   false   then 
          return  GetPrice(ind -  1 );
       else 
          return  С(ind)
       end 
    else 
       return   0 
    end 
 end 
  

  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