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

function Init() return #Settings.line  end

local P,i1=0,999;  local SMA,SUM=0,0

function jget(Y,i)
local m=i;  while(m>1 and Y(m)==0) do m=m-1; end;  return m;
 end

 --расчет скользящей средней на закрытой свече
 --- расчет выполняется один раз в момент открытия новой свечи
function OnCalculate(i)
   if i~=i1 then
      if i1>i then
         SUM=C(i); i1=0; SMA=0; P=Settings.Period;
      else
         x=C(jget(C,i1)); SUM=SUM+x;
         if P>=i1 then    SMA=SUM/i1;
         else
            SUM=SUM-C(jget(C,i1-P)); SMA=SUM/P;
         end
      end
   i1=i;
   end
    return SMA;
end

  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   

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

local SUM,i_,SMA,m=0,0,0,0;
function Init() return #Settings.line  end

function OnCalculate(I)
   if I == 1 then SUM=0; i_=0; SMA=C(I);m=0; end
   if I~=i_ then
      if m>Settings.Period then  m=Settings.Period;
         if C(i_-m) then SUM-C(i_-m) end
      end
      if C(I) then SUM_TMP=SUM +C(I); m=m+1; SMA=SUM/m; end
   end
      i_o=I;
   end
   return SMA;
end