在分k线图表中，求当日最高点到当前的k线根数的代码，满同时满足以下条件：
1.如果当前是最高点，则以当根k之前的当日最高点为准
2.如果之前有多根k线形成了当日的最高点（这几根k的最高价都为当日的最高点，是相等的），则以最先出现的k线为准
VARIABLE:maxH:=0,mark:=0;//mark标记最高点位置，maxH记录最高值
if TODAYBAR=1 then begin //当日第一个K初始化
maxH:=h;
mark:=0;
end
if h>maxH then
begin
maxH:=h;
mark:=1;
end
else if then mark:=0;
len:=BARSLAST(mark=1);//获取最高价距离现在位置
result:if(TODAYBAR=1 or BARPOS=1,0,len);
在连续H递增的时候，1 不好处理。
原本hhvbars 可以直接获取最高价位置，但是这个函数返回的是最近的最高价位置。