


Settings={
Name="GVOL",
period=200,
maxline=20,
width=4,
count=50,
xshift=0,
vlm=1,
line={}
}
--[[
описание свойств:
xshift - сдвиг по горизонтали
count - количество черточек по вертикали
period- сколько баров берутся в подсчет
maxline - количество баров для максимальной черточки
width - толщина черточки
vlm - 1-c учетом оъема 0-просто распределение без объема,
--]]
function Init()
n=Settings.count
vol={}
for j = 1, n do
vol[j]=0
Settings.line[j] = {Color=RGB(192,192,192),Type=TYPE_LINE,Width=Settings.width}
--for i=Size()-Settings.xshift-Settings.maxline, Size()-Settings.xshift do
for i=1, Size() do
SetValue(i, j, nil)
end
end
return Settings.count
end
function OnCalculate(index)
if (index < Size()-Settings.xshift)or(index > Size()-Settings.xshift) then
return nil
else
n=Settings.count
maxv=0
maxc=0
minc=9999
for i=Size()-Settings.xshift-Settings.period, Size()-Settings.xshift do
if C(i) ~= nil then
if maxc < C(i) then
maxc = C(i)
end
if minc > C(i) then
minc = C(i)
end
end
end
delta = (maxc - minc)/n
for i=Size()-Settings.xshift-Settings.period, Size()-Settings.xshift do
for j = 1, n do
if C(i) ~= nil then
if (C(i) > minc + (j-1)*delta) and (C(i) <= minc + j*delta) then
if Settings.vlm == 1 then
if V(i) ~= nil then
vol[j]=vol[j]+V(i)
end
else
vol[j]=vol[j]+1
end
end
end
end
end
for j = 1, n do
vol[j] = math.floor(vol[j]+0.5)
if maxv < vol[j] then
maxv = vol[j]
end
end
k = 0
for i=Size()-Settings.xshift-Settings.maxline+1, Size()-Settings.xshift do
k = k + 1
for j = 1, n do
if vol[j] >= (Settings.maxline - k)*maxv/Settings.maxline then
SetValue(i, j, minc + j*delta)
else
SetValue(i, j, nil)
end
end
end
end
end

Каких изменений в программе мы ждем при выходе версии с новым номером? Смена номера — это не какой-то там проходной вариант после двух точек, где все изменения заключаются в добавлении новых багов. От смены номера логично ждать чего-то важного, кардинального, чего-то «прям ух!».
Например, я ждал что Квик станет быстрее, выше, сильнее и тетрис.
Народ недоумевает, подвоха не ждет, а ждет новых плюшек, мне уже несколько человек вопросы задавали, поэтому выложу здесь коротенько изменения в новой версии.
1. Переход на 64-х разрядную архитектуру. Прекращение поддержки ОС Windows XP, экспорта в Omega TS и MetaStock. Прекращение работы 32-разрядных DLL и скриптов LUA, которые их использовали. Если вы пользовались ODBC-экспортом, скорее всего, его придется перенастроить. Экспорт в Wealth-Lab Developer версии 4.0 в новой версии не поддерживается.
2. Добавлены/удалены некоторые параметры в таблицах и сами таблицы.
3. Изменен алгоритм подстановки цены в форме ввода заявок на срочке для обеспечения корректного переноса заявки на следующий день.