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

   function   OnInit ( "/home/bart/.wine/drive_c/Quik_6.17.3/ROBO2/" )  

  start  =   "/home/bart/.wine/drive_c/Quik_6.17.3/ROBO2/" 
 function   OnInit (start)  

  Settings = {
Name =  "Indicator B" ,
line = {{
Name =  "Indicator B" ,
Color =  0x0000ff ,
Type =  1 ,
Width =  1 
}}}

 function   Init ()
    return   # Settings.line
 end 

 function   OnCalculate ()
    return   68 
 end 
  

  Settings = {
Name =  "Indicator A" ,
ID =  "ID" ,
line = {{
Name =  "Indicator A" ,
Color =  0xff0000 ,
Type =  1 ,
Width =  1 
}}}

 function   Init ()
    return   # Settings.line
 end 

 local  t = {}
 local  n =  0 
 local  l =  0 
 local  value =  0 

 function   OnCalculate (index)
    if  index =  =  1   then   return   end              --проверяем если первая свечка, расcчёт не ведется 
    if   getNumCandles (Settings.ID) =  =  0   then           --Settings.ID содержит название идентификатора, которое задаёт пользователь 
       return                    --проверяем если индикатор "Б" не содержит свечек, рассчёт не ведется 
    else 
      t,n,l =  getCandlesByIndex (Settings.ID, 0 ,index -  1 , 1 )
       if  t[ 0 ].doesExist =  =  1   then           --проверяем если свечки нет, рассчет не ведется 
          if  t[ 0 ].close~ =  1e10   then        --проверяем если новое значение свечки не получено, рассчет не ведется 
             if  t[ 0 ].close~ = value  then  value = t[ 0 ].close  end 
            t[ 0 ].close =  1e10 
             return  value
          end 
       end 
    end 
 end 
  

   local  t = {}
 local  n =  0 
 local  l =  0 
 local  value =  0 

 function   OnCalculate (index)
    if  index =  =  1   then   return   end              --проверяем если первая свечка, расcчёт не ведется 
    if   getNumCandles (Settings.ID) =  =  0   then           --Settings.ID содержит название идентификатора, которое задаёт пользователь 
       return                    --проверяем если индикатор "Б" не содержит свечек, рассчёт не ведется 
    else 
      t,n,l =  getCandlesByIndex (Settings.ID, 0 ,index -  1 , 1 )
       if  t[ 0 ].doesExist =  =  1   then           --проверяем если свечки нет, рассчет не ведется 
          if  t[ 0 ].close~ =  1e10   then        --проверяем если новое значение свечки не получено, рассчет не ведется 
             if  t[ 0 ].close~ = value  then  value = t[ 0 ].close  end 
            t[ 0 ].close =  1e10 
             return  value
          end 
       end 
    end 
 end 
  

  Settings  = 
{
   Name  =   "XXX_Ind" ,
   line  = 
   {
      {
         Name  =   "XXX" ,
         Color  =   RGB ( 166 ,  202 ,  240 ),
         Type  =  TYPE_LINE,
         Width  =   1 
      },
      {
         Name  =   "XXXZero" ,
         Color  =   RGB ( 255 ,  255 ,  0 ),
         Type  =  TYPE_DASH,
         Width  =   1 
      }
   }
}
 -------------------------------------------------------------------------------- 
 function   Init ()
    return   2 
 end 
 -------------------------------------------------------------------------------- 
 function   OnCalculate (index)
    return   1 ,  0 
 end