Let_it_go (Автор тем)

ticker_list="SVAV,TGKO,TRCN,UWGN,VSMO"
for sec in string.gmatch(ticker_list,"%a+") do   
---
end

f_ticker_list="GMZ7,GZZ7,HYZ7,EuZ7,LKZ7,MMZ7,MXZ7,RNZ7,SiZ7,SPZ7,SRZ7,VBZ7"
for sec in string.gmatch(f_ticker_list,"%w+") do
---
end

   --Стандартное отклонение
      func1 = SD()
      gorlovina[sec]=nil
      for ddd=num_candles,num_candles-gorlovina_bars,-1 do
         local dev=func1(ddd, {Period=x[sec], VType="Typical"}, ds[sec])
         dev_k[sec]=dev/line_10[sec]   
         if dev_k[sec]<gorlovina_thresh[sec] then
            gorlovina[sec]=true
            break      
         end
      end

function ms (value)
   if type(value)~="table" then
      message (""..(value or "nil"),1)
      
   else
      for k,v in pairs(value) do
         message (k.." "..v,1)
      end
   end   
end

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

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

04/23/17 02:57:33,777 lll=1 --RSI нил с 1 по 14 итерацию!
04/23/17 02:57:33,778 lll=2
04/23/17 02:57:33,778 lll=3
04/23/17 02:57:33,778 lll=4
04/23/17 02:57:33,779 lll=5
04/23/17 02:57:33,779 lll=6
04/23/17 02:57:33,779 lll=7
04/23/17 02:57:33,780 lll=8
04/23/17 02:57:33,780 lll=9
04/23/17 02:57:33,781 lll=10
04/23/17 02:57:33,781 lll=11
04/23/17 02:57:33,781 lll=12
04/23/17 02:57:33,782 lll=13
04/23/17 02:57:33,782 lll=14
04/23/17 02:57:33,782 lll=15
04/23/17 02:57:33,783 80.053908355794
04/23/17 02:57:33,783 lll=16
04/23/17 02:57:33,783 81.074168797953
04/23/17 02:57:33,784 lll=17
04/23/17 02:57:33,784 77.668883444172
04/23/17 02:57:33,784 lll=18

rsi_tf=INTERVAL_M5
mov_tf=INTERVAL_M1

function main()
for key,sec in pairs(fut_list) do
    DataSource(class,sec,rsi_tf)    
    DataSource(class,sec,mov_tf)    
    
end
end

function mycallbackforallstocks(class,sec,index)         

end

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

function sendLimit(class,security,direction,price,volume,account,client_code,comment,execution_condition,expire_date,market_maker)
    if string_find(FUT_OPT_CLASSES,class)~=nil then
        return sendLimitFO(class,security,direction,price,volume,account,comment,execution_condition,expire_date,market_maker)
    else
        return sendLimitSpot(class,security,direction,price,volume,account,client_code,comment,market_maker)
    end
end

function sendLimitSpot(class,security,direction,price,volume,account,client_code,comment,market_maker)
    -- отправка лимитированной заявки
    -- все параметры кроме кода клиента и коментария должны быть не нил
    -- ВАЖНО! цена должна быть стрингом с количеством знаков после точки для данной бумаги
    -- если код клиента нил - подлставляем счет
    -- market_maker - признак заявки маркет-мейкера. true\false
    -- Данная функция возвращает 2 параметра
    --     1. ID присвоенный транзакции либо nil если транзакция отвергнута на уровне сервера Квик
    --     2. Ответное сообщение сервера Квик либо строку с параметрами транзакции
    if (class==nil or security==nil or direction==nil or price==nil or volume==nil or account==nil) then
        return nil,"QL.sendLimitSpot(): Can`t send order. Nil parameters."
    end

    local trans_id=random_max()        
    local transaction={
        ["TRANS_ID"]=tostring(trans_id),
        ["ACTION"]="NEW_ORDER",
        ["CLASSCODE"]=class,
        ["SECCODE"]=security,
        ["OPERATION"]=direction,

        ["QUANTITY"]=string_format("%d",tostring(volume)),
        ["PRICE"]=toPrice(security,price,class),
        ["ACCOUNT"]=tostring(account)
    }
    if client_code==nil then
        transaction.client_code=tostring(account)
    else
        transaction.client_code=tostring(client_code)
    end
    if comment~=nil then
        transaction.client_code=string_sub(transaction.client_code..'/'..tostring(comment),0,20)
    else
        transaction.client_code=string_sub(transaction.client_code..'/QL',0,20)
    end
    if market_maker~=nil and market_maker then
        transaction['MARKET_MAKER_ORDER']='YES'
    end
    local res=sendTransaction(transaction)
    if res~="" then
        return nil, "QL.sendLimitSpot():"..res
    else
        return trans_id, "QL.sendLimitSpot(): Limit order sended sucesfully. Class="..class.." Sec="..security.." Dir="..direction.." Price="..price.." Vol="..volume.." Acc="..account.." Trans_id="..trans_id
    end
end