Игорь Б (Все сообщения пользователя)

class_code = 'TQBR',
sec_code = 'BELU',
param_name = 'LAST',

function main()
   a = {};--массив
   a[1] = 1;
   a[2] = 3;
   a[3] = 5;
   a[4] = 7;
   a[5] = 9;   
   length = #a;--размер/длина массива
   message("a[1]="..tostring(a[1])..
      "\na[2]="..tostring(a[2])..
      "\na[3]="..tostring(a[3])..
      "\na[4]="..tostring(a[4])..
      "\na[5]="..tostring(a[5])..
      "\na[6]="..tostring(a[6])..
      "\nlength="..tostring(length));
      
end;

for i = 1, #queue do 
   queue_[tonumber(queue[i].price)] = tonumber(queue[i].quantity)  -- table index is nil
end

    f = io.open(file,"+a");
   i = 0;
   while(f == nil) do
       i = i + 1;
      if i == 2000 then
         message("Не могу открыть для записи файл "..file);
            sleep(5000);
            error("");
      end;            
            f = io.open(file,"+a");
       sleep(1);
   end;

["ORDER_KEY"] = tostring(keyNumber)

z4 = tonumber(z.bid[z1].price)

if z.bid[i].quantity ~= nil then

 while stopped == false do

         Quotes_1 = getQuoteLevel2("TQTF", "FXRL");
             if Quotes_1 then
                ----
             end;
 
      sleep(1000)
 end

if portfolio==0 then

end;
if portfolio==1 then

end;

local timeWfinish = os.time() + 5;
while portfolio==0 do
    portfolio = getFuturesHolding("SPBFUT", "SPBFUT***","LKU0",0).totalnet;
        if os.time() > timeWfinish then
          message("Вышло время ожидания portfolio");
          error("");
        end; 
    sleep(100);
end;

local c1 = getParamEx2(CLASS_CODE, SEC_CODE, "TRADINGSTATUS");
               if (c1.result == "1") then
                  if c1.param_image ~= "открыта" then
                     message("Сессия "..c1.param_image);
                     flag_Session = false;
                  end;
               end;

if string.len(Tl.hour) == 1 then Tl.hour = "0"..Tl.hour; end;
            if string.len(Tl.min) == 1 then Tl.min = "0"..Tl.min; end;
               if string.len(Tl.sec) == 1 then Tl.sec = "0"..Tl.sec; end;

If string.len(alltrade.datetime.min)=2 then

Myfilefile = "\\MyData.txt";
   i = 0;
   while i == 0 do
      Myfile = io.open(getScriptPath()..Myfilefile,"r+");
-- Если файл занят      
      if Myfile == nil then 
         sleep(100);
      else
         i = 1;
      end;
   end;

    IsRun = true;
 tag = "macd26";
 
 function main()
  while IsRun do
   nl = getLinesCount(tag); --кол-во линий в индикаторе
   nc = getNumCandles(tag); --кол-во получаемых свечек, начина¤ с 0-ой
    first_candle = nc - 3; --получаем три последнюю
    count = 3; --заказываем три последнюю
     t, n, l = getCandlesByIndex (tag, 0, first_candle, count); --получаем таблицу с инфо по MACD
--     t, n, l = getCandlesByIndex (tag, 1, first_candle, count); --получаем таблицу с инфо по signal line     
...
...
...
  sleep(100);  
  end;
 end;
 function OnStop()
        IsRun = false;
    end; 

function OnConnected(fl)
 flag_Connected = true;
 message("OnConnected");
end;
function OnCleanUp()
 flag_CleanUp = true;
 message("OnCleanUp");
end;