Форум QUIK [тема: как за AddLabel() отметку цены]

как за AddLabel() отметку цены

Thu, 23 Dec 2021 07:06:11 +0300

как за AddLabel() отметку цены в форуме Программирование на языке Lua.

====quote====
Игорь М написал:

====quote====
Daniil Pozdnyakov написал:
Добрый день,

К сожалению, на данный момент функции добавления "Отметки цены" при помощи QLUA нет. Можем зарегистрировать пожелание на добавление данного функционала, регистрируем ?
=============
Да, зарегистрируйте, пожалуйста.
=============
Здравствуйте!

Ваше пожелание зарегистрировано. Мы постараемся рассмотреть его и сообщить Вам результаты анализа. Впоследствии, по результатам анализа, будет приниматься решение о реализации пожелания в будущих версиях ПО.
23.12.2021 07:06:11, Daniil Pozdnyakov.

как за AddLabel() отметку цены

Wed, 22 Dec 2021 14:16:02 +0300

как за AddLabel() отметку цены в форуме Программирование на языке Lua.

====quote====
Daniil Pozdnyakov написал:
Добрый день,

К сожалению, на данный момент функции добавления "Отметки цены" при помощи QLUA нет. Можем зарегистрировать пожелание на добавление данного функционала, регистрируем ?
=============
Да, зарегистрируйте, пожалуйста.
22.12.2021 14:16:02, Игорь М.

как за AddLabel() отметку цены

Wed, 22 Dec 2021 08:49:06 +0300

как за AddLabel() отметку цены в форуме Программирование на языке Lua.
Добрый день,

К сожалению, на данный момент функции добавления "Отметки цены" при помощи QLUA нет. Можем зарегистрировать пожелание на добавление данного функционала, регистрируем ?
22.12.2021 08:49:06, Daniil Pozdnyakov.

как за AddLabel() отметку цены

Mon, 20 Dec 2021 18:55:50 +0300

как за AddLabel() отметку цены в форуме Программирование на языке Lua.

====quote====
nikolz написал:
Вам ехать или шашечки на дверь?
=============
:) А все вместе никак нельзя ?
20.12.2021 18:55:50, dimka.

как за AddLabel() отметку цены

Mon, 20 Dec 2021 18:52:04 +0300

как за AddLabel() отметку цены в форуме Программирование на языке Lua.
Вам ехать или шашечки на дверь?
20.12.2021 18:52:04, nikolz.

как за AddLabel() отметку цены

Mon, 20 Dec 2021 18:12:25 +0300

как за AddLabel() отметку цены в форуме Программирование на языке Lua.
Quik 9.3.1.11. Win10 - 64

Хочется на график вывести красоту типа "Отметка цены"(хвост понравился) и подвигать ее через SetLabelParams() - 1.jpg[FILE ID=8671] берем график Si тег графика = "jbd"

====code====

Setup = {
class = "SPBFUT",
sec = "SiH2"
}


local tostring__ = tostring
function tostring(x)
return tostring__(math.tointeger(x) or x)
end

function metka(pos, price)
   local h,m,t = string.match(getInfoParam("SERVERTIME"),"(%d%d)%p(%d%d)%p(%d%d)")
   local time_pos = h..m..t
   local d,m,y = string.match(getInfoParam("TRADEDATE"),"(%d%d)%p(%d%d)%p(%d%d%d%d)")
   local date_pos = y..m..d

   label_params = {
      TEXT = tostring(price),
      IMAGE_PATH = "",
      ALIGNMENT = "LEFT",
      YVALUE = price,
      DATE = date_pos,
      TIME = time_pos,
      R = 80,
      G = 80,
      B = 180,
      TRANSPARENCY = 0,
      TRANSPARENT_BACKGROUND = 1,
      FONT_FACE_NAME = "Arial",
      FONT_HEIGHT = 10,
      HINT = tostring(pos)
   }
   return label_params
end

function main()
   local curp = getParamEx2(Setup.class, Setup.sec, "LAST").param_value+0
   up_label_id = AddLabel("jbd", metka("UP", curp+100))
   dwn_label_id = AddLabel("jbd", metka("DWN", curp-100))
   SetLabelParams("jbd", up_label_id, metka("UP", curp+100))
   SetLabelParams("jbd", dwn_label_id, metka("DWN", curp-100))
end

=============
получаем 2.jpg.[FILE ID=8672] Это обычная метка без хвоста.
Вопрос можно ли хвост приделать как у "Отметка цены".
Пока нашел такой вариант...
Кидаем на график парочку "Отметка цены" и перебором находим их.

====code====

Setup = {
class = "SPBFUT",
sec = "SiH2"
}


local tostring__ = tostring
function tostring(x)
return tostring__(math.tointeger(x) or x)
end

function metka(pos, price)
   local h,m,t = string.match(getInfoParam("SERVERTIME"),"(%d%d)%p(%d%d)%p(%d%d)")
   local time_pos = h..m..t
   local d,m,y = string.match(getInfoParam("TRADEDATE"),"(%d%d)%p(%d%d)%p(%d%d%d%d)")
   local date_pos = y..m..d

   label_params = {
      TEXT = tostring(price),
      IMAGE_PATH = "",
      ALIGNMENT = "LEFT",
      YVALUE = price,
      DATE = date_pos,
      TIME = time_pos,
      R = 80,
      G = 80,
      B = 180,
      TRANSPARENCY = 0,
      TRANSPARENT_BACKGROUND = 1,
      FONT_FACE_NAME = "Arial",
      FONT_HEIGHT = 10,
      HINT = tostring(pos)
   }
   return label_params
end

function search_metka(idmetka, inum)
   local q = GetLabelParams(idmetka, inum)
   if q ~= nil then
      return inum
   end
      return -1
end

function main()
   local curp = getParamEx2(Setup.class, Setup.sec, "LAST").param_value+0
   up_label_id = -1
   dwn_label_id = -1
   local q = 0
   for i = 0, 100, 1 do
      q = search_metka("jbd", i)
      if q ~= -1 then
         if up_label_id < 0 then
            up_label_id = q
         elseif dwn_label_id < 0 then
            dwn_label_id = q
            break
         end
      end
   end
   SetLabelParams("jbd", up_label_id, metka("UP", curp+100))
   SetLabelParams("jbd", dwn_label_id, metka("DWN", curp-100))
end

============= Получаем 3.jpg [FILE ID=8670]

Но так делать мне кажется это не комильфо ...

20.12.2021 18:12:25, dimka.