Автоматизация QUIK - Сигнал начала нового таймфрейма

Тут уже проскочило пару постов на тему автоматизации. За что авторам спасибо.
У меня же вопрос и задача такая (к знатокам LUA).

Есть скрипт взят отсюда (https://quik2dde.ru/viewtopic.php?id=79)

-- подключить библиотеку w32
local w32 = require("w32")

-- функция проигрывания файла
-- вызов: PaySoundFile("имя файла")
function PaySoundFile(file_name)
  w32.mciSendString("CLOSE QUIK_MP3") 
  w32.mciSendString("OPEN \"" .. file_name .. "\" TYPE MpegVideo ALIAS QUIK_MP3")
  w32.mciSendString("PLAY QUIK_MP3")
end

Необходимо добавить в скрипт, чтобы звуковой файл проигрывался с заданным интервалом всю торговую сессию? (каждые 15,60,240минут)
Буду благодарен и не только я, если «добавите в рецепт свои пряности». Главное чтобы заработало.
Спасибо.

quik LUA автоматизация

Виталий

Киев

358

с 26 октября 2015

17 Комментариев

Karim
18 октября 2016, 12:24
s = getInfoParam («SERVERTIME»)
if tonumber(string.sub(s,4,5)) == 0 then
PaySoundFile(file_name)
end

Будет запускаться каждый час. По аналогии напишите остальные.
0
- Виталий
  18 октября 2016, 12:52
  Karim, Karim, Спасибо за ответ. Можно хотя бы минимальную инструкцию? для аналогии:).
  0
- Виталий
  18 октября 2016, 12:54
  Karim, S — присваиваем время сервера. ДА?
  Paysound — играем файл. В пути используем двойной слэш (C:\\QUIK OSL\\Звуки\\Bell.mp3 — так?)
  А вот tonumber :). Помощь плиз
  
  0
  - Karim
    18 октября 2016, 13:19
    Виталий, Ну почитайте хотя бы мануал по QLua, или погуглите. Там все есть. tonumber() — преобразовать строку в число
    0
Чёрный кот
18 октября 2016, 12:43
Нового бара, а не таймфрейма)
0
- Виталий
  18 октября 2016, 12:52
  Чёрный кот, какая разница? Главное быть понятым, о чём речь.
  Бар -это бар.
  Таймфрейм-это временной интревал.
  0
Сергей Гаврилов
18 октября 2016, 14:02
Ответьте на тупой вопрос: а как эта функция определит, что час уже прошел и надо вызываться?
0
- Karim
  18 октября 2016, 17:16
  Сергей Гаврилов, У начала каждого часа минуты равны 0.
  0
  - Сергей Гаврилов
    18 октября 2016, 17:23
    Karim, вопрос не в этом… Функцию нужно вызвать… Что-то я таймера или какого другого периодического события в коде не наблюдаю..
    
    0
    - Karim
      18 октября 2016, 19:32
      Сергей Гаврилов, Ну я уж не стал весь код приводить. Вопрос был, что добавить в скрипт, а не как его написать.
      
      function main()
      IsRun = true
      while IsRun do
      s = getInfoParam («SERVERTIME»)
      if tonumber(string.sub(s,4,5)) == 0 then
      PaySoundFile(file_name)
      end
      sleep(1000)
      end
      end
      0
      - Виталий
        20 октября 2016, 11:05
        Karim, Домучал таки и заработало, только при sleep 1000 он выдаёт сигнал всю первую минуту. Поставил 60000. Может есть другой способ сделать срабатывание один раз? — это первый вопрос.
        А второй- как сделать сигнал на каждые 15 минут, я точно не знаю :(.
        Я не програмист вообще! Для меня эти цифры как иероглифы, в которых я пытаюсь разобраться...
        Спасибо зараннее, если поможешь.
        0
Karim
20 октября 2016, 11:39
function main()
IsRun = true
begin = true
while IsRun do
s = getInfoParam («SERVERTIME»)
if tonumber(string.sub(s,4,5)) == 0 and begin then
PaySoundFile(file_name)
begin = false
end
if tonumber(string.sub(s,4,5)) == 1 then
begin = true
end
sleep(1000)
end
end

Как то так. Проверять нет времени.
Если не программист, то есть два варианта. Либо стать им и написать самому, либо нанять.
0
- Виталий
  25 октября 2016, 14:58
  Karim, Спасибо за код, я его и так, я его и сяк, но не работает совсем через 15 минут :(.
  0
  - Karim
    25 октября 2016, 16:52
    Попробуй так:
    
    if tonumber(string.sub(s,4,5))%15 == 0 and begin then
    PaySoundFile(file_name)
    begin = false
    end
    0
s_mike@rambler.ru
21 октября 2016, 15:39
Вот готовая цацка : http://www.bot4sale.ru/download-categories/2012-06-13-15-10-36/item/indikator-vremeni-do-okonchaniya-svechi.html
0