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

Вы уверены, что это waiting_ordernum_todel[i][2] номер строки?
Я бы проверил, что получается в stop_orders_now.

И я бы проверил #waiting_ordernum_todel  

while #waiting_ordernum_todel > 0 do
--
--
--
message("#waiting_ordernum_todel ="..tostring(#waiting_ordernum_todel));
sleep(1000);
end;

Нумерация свечки начинается слева. Их загрузится 2-3тыс.
Для получения текущей надо

Можно взять любой другой объектно-ориентированный язык. Создать форму, в которой можно вносить любые начальные значения, в том числе и в виде выпадающего списка. Сохранить и передать все в qlua  через файл.txt.  

Мне кажется,  проще, построить график цены. К нему построить индикатор (пусть RSI). И через getCandlesByIndex получить то, что Вам нужно.  
 

Олег,
Скорее всего у Вас отсутствует кусок, отвечающий за контроль исполнения стопа. После необходимо убедиться, что заявка выставлена и исполнена. И только потом все остальное, что у Вас написано в коде.
Этот контроль можно организовать по-разному. (таблица заявок, таблица сделок, соответствующие им функции обратного вызова, флаги ...).
Сколько людей столько и будет алгоритмов. Лучше разобраться и написать самому.Поможет, если проскальзывание будет достаточным для исполнения всех контрактов сразу. Если будет остаток, возникнет та же проблема, но в меньшем объеме. Т.е. опять возвращаемся к блоку скрипта, который контролирует исполнения сделки, о котором я писал выше.

Если человеку нужно найти заявку один раз в день, зачем ему напрягать процесор через коллбэк?
Даже, если ему нужна эта информация в течении дня, но по закрытию свечи, все равно лучше сделать без коллбэка.

Если ему все же удобней сделать через OnQuote, то в предложенной выше функции я бы оставил только флаг на срабатывание, а
весь расчет перенес бы в main.

В зависимости от конкретной задачи, возможно, удобней будет использовать Subscribe_Level_II_Quotes.

У меня это работает.  Возможно, ошибка в параметрах.

Выводить можно так

message(StopPointBuy.yvalue);

Попробуй так

Sorry


p = 14.593333333333;
price = tostring(p);
pointplace = string.find(price,". "); --нашли поз. точки (если разделитель - точка)
   if pointplace then
       price = string.sub(price,1,pointplace + 2); -- для двух знаков
  end;

Попробуй так

price = 14.593333333333
pointplace = string.find(price,". "); --нашли поз. точки (если разделитель - точка)
   if pointplace then
       price = string.sub(price,1,pointplace + 2); -- для двух знаков
   end;

..
..
t1 = ds:T(index).day;
t2 = ds:T(index).hour;
t3 = ds:T(index).min;
..

В полный код даже не смотрел.
Сделай так
math.randomseed(os.clock());
 parametr1 = math.random(2,5);
  parametr2 = math.random(2,5);
   parametr3 = math.random(2,5);
   ...
   .....
    parametr... = math.random(2,5);

parametr1 - это то, что ты получаешь.
Если выведешь остальные результаты, то увидишь, что разброс начинается со второго. И чем дальше, тем сильнее.
Я пользуюсь, начиная с третьего.  

0 - средняя
1 - bbandtop
2 - bbandbot

Интересно, зачем   dofile ("C:\\1.lua")  вынесли в отдельную функцию. Это связано с локализацией возможной ошибки или совсем другая причина? Я бы оставил в  main  до бесконечного цикла.
pcall(foo)- собственно, какую ошибку пытаетесь поймать? Подключился ли файл  ("C:\\1.lua")? К содержанию  таблицы не имеет отношение.
На сколько я понял Ваш файл - это файл с данными и в нем не происходит никаких операций.  Зачем его подключать через  dofile?
Мне интересен способ обработки ошибки, которая может возникнуть в самом файле, подключенном через dofile или легче это сделать, например, подключившись через require?
 

tag может быть идентификатором как графика, так и индикатора.
В любом месте графика правой кнопкой мыши - редактировать.
Далее, в открывшемся окне, левой кнопкой мыши по нужному Вам индикатору или
графику(price).
Справа-Дополнительно-Идентификатор(снизу).

Последний AND - лишний.
if SaveRest == 1 and SaveRest == 1 then  
   selT = {};
   timT = {};
end;

Судя по вопросу, человека интересовали собственные сделки. Соответственно, смотрим таблицу сделок и функцию
getItem("trade",i).class_code

Есть еще class_code. По нему можно различить рынки.

Suntor,
Пока набивал ответ, Вы меня опередили.
Флаг Ваш.

if b == c or math.abs(b- c) == 0.123456789 then
  print(bla)
end

Да.
Открыта ли сама таблица? Что пишет?

Удачи

Если в скобках ложь. "and"  вернет ложь.   "or" будет сравнивать ложь и  stop_order вернет stop_order .
Если в скобках истина . "and"  вернет min_stop_order .   "or" будет сравнивать min_stop_order  и  stop_order. Вернет min_stop_order (т.к.min_stop_order - истина).

Нет. т.к. в скобках может быть как истина так и ложь.

В первой строке "or" вернет min_stop_order , если это истина.
Во второй сначала вычисляется "and", и только потом "результат and" or stop_order. Т.е. первую строку нельзя сравнивать с куском второй.

Полезные идиомы Lua с использованием and и or.
Знак не перепутан. Ищем мин. из двух чисел.

Полезные идиомы Lua с использованием and и or.
Знак не перепутан. Ищем мин. из двух чисел.  

Есть вариант, что дело не в кол-бэках, а в получении средней цены. Возможно, Вам нужна не средняя, а средне-взвешенная цена. Из цитаты это не понятно.

Чтобы отмести в сторону все ощущения, нужно хотя бы разок сохранить в файл все, что у Вас проходит после фильтра. И тогда будет точно ясно, грешить на кол-бэк или нет.

после чая увидел пару ошибок (i-локальная в цикле)
исправляю на

iterations=20;
k=0;
finish=100;
flag=true;
while flag do
start=k;
step=(finish-start)/iterations;
 for i=start,finish,step do
  if i==finish then
   flag=false;
  end;
           --делаем расчёт.
  if profit>0 then
   k=i-1; --возвращаемся на step назад
   iterations=100; --(шаг становится более мелким)
   break;
  end;
 end;
end

iterations=20
k=0
finish=100

for j=1,1000000 do
     start=k
     step=(finish-start)/iterations
         for i=start,finish,step do
         --делаем расчёт.
            if profit>0 then
               k=i-1 --возвращаемся на step назад
               iterations=100 --(шаг становится более мелким)
               break
            end
         end
   if i==finish then break
end
Не проверял. Но, возможно, как направление мысли.

Но самое главное ограничение - мы не в lua, а в Qlua

Теперь понятно. Вы делали sleep() в основном потоке .Я Вас не правильно понял. Сори.
А в описании это есть. Использование Луа в Рабочем месте... Взаимодействие потоков и т.д.  

Слишком мало информации, что бы что то посоветовать. Если у Вас sleep(1000) в том кусочке , что Вы представили и все виснет, то есть большая вероятность, что ошибка совсем в другом месте. Чему равен sleep  в while-цикле в main() или других функциях и есть ли он вообще? Есть ли условия выхода из цикла и насколько они работоспособны. И еще 100 вопросов ни о чем, пока не увидим тело скрипта.  

Надеюсь, внутри "операции" есть условие при котором t=false. До или после него поставьте месседжер и сделайте входящие, при которых точно  t=false. Возможно, sleep ни при чем.
На время отладки сделайте sleep  в 1-5 секунд, что бы не перезагружаться, а просто останавливать скрипт.
Для большего необходимо больше информации.

Для goto есть ограничения, связанные с видимостью метки.
-нельзя выпрыгнуть из функции
-нельзя впрыгнуть в блок
-нельзя впрыгнуть в область видимости локальной переменной.
Возможно, один из вариантов Ваш.

filename = "\\MyData2.txt";
Myfile = io.open(getScriptPath()..filename,"r+");
   -- Если файл не существует
   if Myfile == nil then
 message("Нету таких");
 OnStop();
   end;

Не много не понятен термин "закрыть заявку".
Можно закрыть позицию или сделку. Т.е. заявка удовлетворена - перешла в сделку(см. таблица сделок). Что б ее закрыть необходимо совершить противоположную сделку. Т.е. подать заявку не только противоположного направления, но и, возможно, изменить цену.
Если Вы имеете ввиду снять заявку, которая еще не удовлетворена(см. таблица заявок), необходимо ACTION    = "KILL_ORDER" и указать номер заявки ORDER_KEY
Я делаю через таблицу заявок. По номеру заявки через getItem(). Далее по флагу (активна/не активна).
Кто-то делает через таблицу сделок.

Так никто и не ответил?
ПАСХА.
Проверил сейчас у себя. Все подгружается кроме тиковых графиков.
Но у меня вчера не был открыт график (и заказа через ds не было) с таким интервалом. Возможно, у тебя причина в том же.

OnAllTrade
Функция обратного вызова вызывается терминалом QUIK при получении обезличенной сделки. С CreateDataSource не связана.
В CreateDataSource получают инфо, связанную со свечками O,H,L,C,Size,T + param.  В OnAllTrade получают инфо, связанную со сделками. Часть параметров пересекаются. Поэтому каждый использует кому как удобно.

Один раз ошибся и то же поставил интервал тики. Была та же история. Но быстро нашел свою ошибку, исправил и все вошло в свое русло. Зачем тебе тики, поставь М1.   ds:C(Size) все равно меняется с каждой сделкой. (Хотя допускаю наличие идеи, основанной именно на тиках).

Можно сделать так.
Перед формированием номера транзакции (trans_id) проверять его с существующими номерами в таблице заявок через getItem().
При совпадении изменять.  

Если есть доступ к скрипту.
где-то в самом начале до main() поставить
trans_id      = os.time();

перед выставлением заявки
function MyOpenPosition() -- Выставляет заявку на открытие позиции
     trans_id = trans_id + 1; -- Получает ID для следующей транзакции
     -- Заполняет структуру для отправки транзакции
     local Transaction={
     ACCOUNT   = ACCOUNT_CODE,         -- Код счета
      ------------------------
       -----------------------
     TRANS_ID  = tostring(trans_id)      -- ID транзакции
      };
      local Res = sendTransaction(Transaction); -- Отправляет транзакцию
end;
-- Функция вызывается терминалом, когда приходит новая информация таблицы заявок
function OnOrder(order)
  -- Если пришла информация по нашей транзакции
   if order.trans_id == trans_id then --именно наша заявка
       order_num = order.order_num; --номер заявки
       flag_OnOder = true;  --флаг именно наша заявка
   end;
end;

Я тебе предложил не так.
Твой вариант должен быть такой.

Myfile = io.open("Test.txt","r+");
Myfile:seek("set",0);  
i = 0;
 for line in Myfile:lines() do
     i = i + 1;
     if i == 3 then  
------действия
-------
break;
     end;  
 end;

Может я не понял вопроса, но я делаю так.

Myfile:seek("set",0);   "set"-начало файла   "end"-конец "cur"-текущая позиция offset-смещение с начала строки в символах(0-крайнее      левое положение)

 i = 0;
 for line in Myfile:lines() do
     i = i + 1;
     if i == 20 then --находим нужную строку по порядку от начала
     ------действия
    -------
         break;
     end;
 end;

Sergey Gorokhov, Да, действительно.
Спасибо.

Попытался написать совсем простой скрипт
IsRun = true;
function main()
    while IsRun do
    message("ok",2);
    sleep(1000);
    end;
end;
function OnStop()
    IsRun = false;
end;
Добавляю скрипт в сервисе quik. Запускаю. Красный квадрат меняется на зеленый треугольник. Ошибок не выдает. Но ничего не происходит.
qlua.dll есть.
message() ставил в разные места скрипта.
Подскажите, в чем может быть дело.
Спасибо.

При попытке обновить, пишет, что версия программы на сервере не изменилась.

Здравствуйте.
При создании оповещения ставлю галочку на "Оповещение активно до снятия". Для меня это важно.
При срабатывании, оповещение может подать 1-2 звуковых сигнала и виснет. Снять оповещение не дает. Активировать другое окно не дает. Хотя, окно котировок работает, возможно медленнее. Короче, совершить сделку нет возможности. Приходиться закрывать квик через диспетчер задач. Если снять галочку на "Оповещение активно до снятия", срабатывает один раз и все работает. Версия 7.6.1.1
Тех. параметры компа выше требуемых.

Спасибо.