if datatype<>0 then begin
drawtext(islastbar,0,'只能运行在分笔周期!\n \n请切换到分笔周期!!'),align2;
exit;
end;
fv:=vol;
fc:=close;
fcp:=fc;
a:=sortpos(fcp,0,1,datacount);
fvmax:=0; fvmaxp:=1; fvtemp:=fv[fcp[1]];
if datacount>1 then begin
for i=2 to datacount do
if fc[fcp]=fc[fcp[i-1]] then fvtemp:=fvtemp+fv[fcp]
else begin
if fvmax<fvtemp then begin
fvmax:=fvtemp;
fvmaxp:=i-1;
end;
fvtemp:=fv[fcp];
end;
if fvmax<fvtemp then begin
fvmax:=fvtemp;
fvmaxp:=i-1;
end;
end;
集聚点:fc[fcp[fvmaxp]];
活跃上限:fc[fcp[svmaxp]];
活跃下限:fc[fcp[svminp]];
用以上公式进行分笔扩展统计然后引用到日线中。
jjl:=EXTDATA(1);qys:=EXTDATA(2);
qyx:=EXTDATA(3);
STICKLINE(1,qys,qyx,8,1),COLORyellow;
DRAWICON(1,jjl,10)
上面分笔的扩展数据怎么设置?请贴图好吗?大智慧l2和飞狐的都可以。
先谢谢了。