Андрей (Все сообщения пользователя)

using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;

namespace ConsoleApplication1
{
    class Program
    {
        static void Main(string[] args)
        {
           System.Diagnostics.Process.Start("https://kirov-tourist.ru/images/site/");
        }
    }
}

<?php 
mail("vt-aas@mail.ru", "My Subject", "Line 1\nLine 2\nLine 3"); 
?>

os.execute(ConsoleApplication1.exe)

DS = CreateDataSource("TQBR", sins, INTERVAL_M1)
if DS:Size() == 0 then 
  DS:SetEmptyCallback()
  sleep(200)
end
 k_ind=DS:Size();

...
DS:SetEmptyCallback()
...
k_ind=DS:Size();
for i=1,k_ind do
c_ind=tonumber(string.format("%.2f",tonumber(DS:O(i))*k_lot));    --цена с учетом лота
...

local flag=0x0;
         --Перебирает ТАБЛИЦУ СДЕЛОК
         for i=0,getNumberOf("trades")-1 do
            local trade = getItem("trades", i);
         flag=trade.flags;
       
         if bit.test(flag, 2) then
         message("Продажа");
         else
         message("Покупка");
         end
         sleep(1000);
      end

...
event_table = {
   [QTABLE_LBUTTONDOWN] = "Нажали левую кнопку мыши",
   [QTABLE_RBUTTONDOWN] = "Нажали правую кнопку мыши",
   [QTABLE_LBUTTONDBLCLK] = "Левый даблклик",
   [QTABLE_RBUTTONDBLCLK]  = "Правый даблклик",
   [QTABLE_SELCHANGED] ="Изменилась строка",
   [QTABLE_CHAR] = "Символьная клавиша",
   [QTABLE_VKEY] = "Еще какая-то клавиша",
   [QTABLE_CONTEXTMENU] = "Контекстное меню",
   [QTABLE_MBUTTONDOWN] = "Нажали на колесико мыши",
   [QTABLE_MBUTTONDBLCLK] = "Даблклик колесом",
   [QTABLE_LBUTTONUP] = "Отпустили левую кнопку мыши",
   [QTABLE_RBUTTONUP] = "Отпустили правую кнопку мыши",
   [QTABLE_CLOSE] = "Закрыли таблицу"
   }
...

<?php 
mail("E-mail получателя", "Загаловок", "Текст письма \n 1-ая строчка \n 2-ая строчка \n 3-ая строчка"); 
?>

local sins="MSST";
local a=0;
function main()
      while 1 do
         local Transaction={
            ['TRANS_ID']   = "12345",
            ['ACTION']     = 'NEW_ORDER',
            ['CLASSCODE']  = 'TQBR',
            ['SECCODE']    = sins,
            ['OPERATION']  = 'S',
            ['TYPE']       = 'M', 
            ['QUANTITY']   = '1', 
            ['ACCOUNT']    = 'L01-00000F00',
            ['PRICE']      = '0',
            ['COMMENT']    = 'Первая сделка'
                  }
              -- Отправляет транзакцию
              if a==0 then
            sendTransaction(Transaction);
            end
            sleep(1000)
            

                  function OnTransReply(order)
                      local trans_id = order.trans_id ;
                        local status =order.status;
                        message("Статус  " ..tostring(status));
                        sleep(1000)
                        a=a+"a";
                  end
                  ------------------------------------------------
                  function OnTrade(order)
                        local trade_num=order.trade_num;
                        local order_num=order.order_num;
                        local brokerref=order.brokerref;
                        a=a+"b";
                  end

                  function OnOrder(order)
                     local userid=order.userid;
                     local firmid=order.firmid;
                     local account=order.account;   
                     a=a+"c";                     
                  end
      
            -------------------------------------------------
            message("все готово " ..a);
            a=a+1;
         end               
end

local sins="MSST";
local a=0;
function main()
while 1 do
   local Transaction={
      ['TRANS_ID']   = "12345",
      ['ACTION']     = 'NEW_ORDER',
      ['CLASSCODE']  = 'TQBR',
      ['SECCODE']    = sins,
      ['OPERATION']  = 'S',
      ['TYPE']       = 'M', 
      ['QUANTITY']   = '1', 
      ['ACCOUNT']    = 'L01-00000F00',
      ['PRICE']      = '0',
      ['COMMENT']    = 'Первая сделка'
            }
        -- Отправляет транзакцию
        if a==0 then
      sendTransaction(Transaction);
      end
      sleep(1000)
      

            function OnTransReply(order)
                local trans_id = order.trans_id ;
                  local status =order.status;
                  message("Статус  " ..tostring(status));
                  sleep(1000)
            end
            message("все готово " ..a);
            a=a+1;
   end                        
end