Странности при расчёте RSI

function OnInit ()
    class_code="TQBR" 
    interval=INTERVAL_M5 --интервал
    how_many_candles=50
    ticker_list="GAZP,SBER,VTBR"
    ds={}
    num_candles={}
    line_count_table={}    
    container={}
    is_run = true
    dofile ("C:\\Program Files\\Lua\\5.1\\lua\\2.lua") --читаем индикатор RSI из INDICATORS.ZIP
end

function OnStop(s)
    is_run = false
    return 100
end

function mycallbackforallstocks(class,sec,index) 
    num_candles[sec]=ds[sec]:Size() 
    if index==num_candles[sec] then        
        for i=0, how_many_candles do
            local close_price=ds[sec]:C(num_candles[sec]-i)
            local open_price=ds[sec]:O(num_candles[sec]-i)
            local high_price=ds[sec]:H(num_candles[sec]-i)
            local low_price=ds[sec]:L(num_candles[sec]-i)
            local typical_price=(close_price+open_price+high_price+low_price)/4
            table.insert(container[sec],i,typical_price)
        end            
    end

end

function DataSource(class,sec,interval)
   ds[sec] = CreateDataSource(class_code,sec,interval)
   ds[sec]:SetUpdateCallback(function(...) mycallbackforallstocks(class_code,sec,...) end)
   return ds[sec]
end

function main()
    for sec in string.gmatch(ticker_list,"%a+") do        
        container[sec]={}
        DataSource(class_code,sec,interval)        
    end        

    while is_run do
        for sec in string.gmatch(ticker_list,"%a+") do                    
            sleep (10000)
            for second_sec in string.gmatch(ticker_list,"%a+") do    
                sintez_table={}
                sintez_name=sec..second_sec..""            
                for x=0,how_many_candles  do

                    if sec==second_sec then    
                        local temp_t=container[sec]
                        sintez_table[x]=temp_t[x]

                    else
                        local temp_t=container[sec]
                        local temp_tt=container[second_sec]
                        sintez_table[x]=temp_t[x]/temp_tt[x]
                    end
                end
                func = RSI()
                local rsi_count={}    
                    for lll=1,#sintez_table  do
                        rsi_count[lll]=func(lll, {Period=15, VType="Any"}, sintez_table)
                    end 

            end
        end    
    end --is_run
end --main

                 func = RSI()
                 local rsi_count={}    
                 message (""..#sintez_table[sintez_name],1)
                      for yyy=1,#sintez_table[sintez_name] do
                          rsi_count[yyy]=func(yyy, {Period=15, VType="Any"}, sintez_table[sintez_name])
                      end 

{1=123;2=122.53;3=122.61;4=122.7;5=122.65;6=122.6;7=122.51;8=122.63;9=122.63;10=122.67;11=122.65;12=122.6;13=122.81;14=122.97;15=122.85;16=123.08;17=123.13; и так далее.