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