Список проголосовавших за комментарий "Вот взял кусок, адаптируйте <br/> — экспорт позиции и денег на фортс и валютном рынках <br/> function ExportMoney()<br/> — Если не соединено то выходим<br/> if isConnected() == 0 then return; end<br/> — PapersForts (позиции ФОРТС)<br/> local portfolio = «S|»<br/> local count1 = getNumberOf(«futures_client_holding»)<br/> for i = 0, (count1 — 1) do<br/> local r = getItem(«futures_client_holding», i)<br/> portfolio = portfolio… r.sec_code… ","… r.totalnet… "|"<br/> end<br/> — собираем Позиции по валютному рынку<br/> — количество строк валюты<br/> local count2 = getNumberOf(«depo_limits»)<br/> — проходимся по строкам<br/> for i = 0, (count2 — 1) do<br/> — строка позиции<br/> local r = getItem(«depo_limits», i)<br/> portfolio = portfolio… r.sec_code… ","… r.currentbal… "|"<br/> end<br/> — Добавим E на конце<br/> portfolio = portfolio… «E»<br/> — Если текст для portfolio изменился и запись прошла<br/> if g_LastPortfolioText ~= portfolio and WriteText(«d:\\G\\»… g_folder… "\\Portfolio\\"… GetTime()… ".txt", portfolio) then<br/> — Запоминаем текст<br/> g_LastPortfolioText = portfolio<br/> — Добавим в лог<br/> Log(«запись portfolio»)<br/> end<br/> — собираем деньги на фортс<br/> local money = «S|»<br/> — собираем все деньги<br/> local myMoney = ""<br/> — количество строк в лимитах фьючерсов<br/> local count2 = getNumberOf(«futures_client_limits»)<br/> — проходим по строкам<br/> for i = 0, (count2 — 1) do<br/> — получаем строку<br/> local r = getItem(«futures_client_limits», i)<br/> myMoney = myMoney… r.firmid… " " ..r.trdaccid .. " "… r.cbplimit… " "… r.cbplplanned… "\n"<br/> if (r.cbplimit ~= 0) then<br/> money = money… r.cbplimit… "|"… r.cbplplanned… "|"<br/> end<br/> end<br/> — количество строк в лимитах денег<br/> count2 = getNumberOf(«money_limits»)<br/> — проходим по строкам<br/> for i = 0, (count2 — 1) do<br/> — получаем строку<br/> local r = getItem(«money_limits», i)<br/> myMoney = myMoney… r.firmid… " "… r.currcode… " "… r.openbal… " "… r.openlimit… " "… r.currentbal… " "… r.currentlimit… "\n"<br/> end<br/> — количество строк в Денежные позиции<br/> count2 = getNumberOf(«account_positions»)<br/> — проходим по строкам<br/> for i = 0, (count2 — 1) do<br/> — получаем строку<br/> local r = getItem(«account_positions», i)<br/> myMoney = myMoney… r.firmid… " "… r.currcode… " "… r.openbal… " "… r.currentpos… "\n"<br/> end<br/> — Добавим E на конце<br/> money = money… «E»<br/> — Если текст для money изменился и запись прошла<br/> if g_LastMoneyText ~= money and WriteText(«d:\\G\\»… g_folder… "\\Money\\"… GetTime()… ".txt", money) then<br/> — Запоминаем текст<br/> g_LastMoneyText = money<br/> — Добавим в лог<br/> Log(«запись money»)<br/> end<br/> — Если текст для myMoney изменился и запись прошла<br/> if g_LastMyMoneyText ~= myMoney and WriteText(«d:\\G\\Logs\\»… g_folder… "\\MyMoney.log", myMoney) then<br/> — Запоминаем текст<br/> g_LastMyMoneyText = myMoney<br/> — Добавим в лог<br/> Log(«запись myMoney»)<br/> end<br/> — конец функции экспорта позиции и денег<br/> end"