Иван (Автор тем)

local tradelist = {};
      for i = 0,getNumberOf("trades") - 1 do
      
         tradelist[i] = "" ..
                     getItem("trades",i).datetime.day.."."..getItem("trades",i).datetime.month.."."..getItem("trades",i).datetime.year..";"..
                     getItem("trades",i).datetime.hour..":"..getItem("trades",i).datetime.min..":"..getItem("trades",i).datetime.sec..";"..
                     tonumber(string.format("%0.17g", getItem("trades",i).trade_num))..";"..
                     tonumber(getItem("trades",i).order_num)..";"..
                     tonumber(getItem("trades",i).trans_id)..";"..
                     getItem("trades",i).sec_code..";"..
                     getItem("trades",i).brokerref..";"..
                     getItem("trades",i).price..";"..
                     getItem("trades",i).qty..";";
         

 
-- Функция создает таблицу
function CreateTable()
   
   -- Получает доступный id для создания
   t_id = AllocTable(); 
   
   -- Создаем колонки
   AddColumn(t_id, 0, "", true, QTABLE_STRING_TYPE, 5);
   AddColumn(t_id, 1, "", true, QTABLE_STRING_TYPE, 20);
   AddColumn(t_id, 2, "", true, QTABLE_STRING_TYPE, 5);
   AddColumn(t_id, 3, "", true, QTABLE_STRING_TYPE, 5);

   t = CreateWindow(t_id);-- Создает таблицу
   SetWindowCaption(t_id, "Enter trade 0.1"); -- Устанавливает заголовок   
   SetWindowPos(t_id, 100, 100, 252, 532); -- Задает положение и размеры окна таблицы
   
   -- Дальше пошли строки и колонки...
end;

IsRun = true; -- Флаг поддержания работы скрипта

function OnInit()

   -- настройки
   
end;             
 
function main()
   -- Цикл будет выполнятся, пока IsRun == true
   while IsRun do
      if IsWindowClosed(t_id) then --закрываем скрипт, когда окно закрыто
         OnStop();
      end;
      sleep(2000);
   end;
end;

Settings =
{   ["Name"]         = "NAMEINDICATOR",
   line =
   {   {   Name      = "NAMEINDICATOR",
         Color      = 0xff0000,
         Type      = TYPE_HISTOGRAM,
         Width      = 2
      },
   }
};

function Init()
   return #Settings.line;
end;

-- QUIK Получить: текущее кол-во открытх позиций
function _QuikGetTotalnetByIndex(code)
   for i = 0,getNumberOf("futures_client_holding") - 1 do
      if getItem("futures_client_holding",i).sec_code == code then
         return getItem("futures_client_holding",i).totalnet;
      end;
   end;
   return 0;
end;

os.execute('powershell -c (New-Object Media.SoundPlayer "c:\\windows\\media\\tada.wav").PlaySync();')

LogWrite("report", comment, {Trade=100, Code=Si, Q="-"..10, Price=10000, Pips=1});

function LogWrite(name, log_type, log_array)

   local content = "";
   local i = 1;
   for key, value in pairs(log_array) do
      content = content.."\t"..value..";";
      content = string.gsub(content,"([.]+)",",");
      i = i + 1;
   end;
   message(tostring(content));
   
end;