cf=io.open(file_path,"a+")
  cf:write(value)

 cf=io.open(file_path,"a")
  cf:write(value ..'\n')

path="C:\\sintetika.lua"
function write_end(file_path,value)
        cf=io.open(file_path,"a+")
        cf:write(value)
        cf:flush()
        cf:close()
end

function main ()
chart1="1"
price1 = getNumCandles (chart1)
chart2="2"
price2 = getNumCandles (chart2)
    for i=100,1,-1 do
        local price_tab1=getCandlesByIndex(chart1,0,price1-i,1)
        local high1=price_tab1[0].high
        local low1=price_tab1[0].low    
        local last1=price_tab1[0].close
        local typical1=(high1+low1+last1)/3
        
        local price_tab2=getCandlesByIndex(chart2,0,price2-i,1)
        local high2=price_tab2[0].high
        local low2=price_tab2[0].low    
        local last2=price_tab2[0].close
        local typical2=(high2+low2+last2)/3        
        local typical_synt=typical1/typical2
        message (typical_synt.."",1)
        write_end (path, typical_synt.." ")
    end
end