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

Страницы: 1
RSS
как за AddLabel() отметку цены
 
Quik 9.3.1.11. Win10 - 64

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

Код
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.  Это обычная метка без хвоста.
Вопрос можно ли хвост приделать как у "Отметка цены".
Пока нашел такой вариант...
Кидаем на график парочку "Отметка цены" и перебором находим их.

Код
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  

Но так делать мне кажется это не комильфо ...
 
Вам ехать или шашечки на дверь?
 
Цитата
nikolz написал:
Вам ехать или шашечки на дверь?
:) А все вместе никак нельзя ?
 
Добрый день,

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

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

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

Ваше пожелание зарегистрировано.  Мы постараемся рассмотреть его и  сообщить Вам результаты анализа. Впоследствии, по результатам анализа,  будет приниматься решение о реализации пожелания в будущих версиях ПО.
Страницы: 1
Читают тему (гостей: 1)
Наверх