统计粉笔成交。http://cfzz.blog.sohu.com

[ 本帖最后由 陆军中尉 于 2007-9-13 16:51 编辑 ]

??????/

短线有用

谢谢分享

统计分笔成交的最密集价位。

源码：

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]];
手数:fvmax;
占比:fvmax/dynainfo(8)*100;

谢谢分享

引用:

原帖由 lyycjb 于 2007-9-13 15:41 发表
统计分笔成交的最密集价位。

源码：

if datatype0 then begin
  drawtext(islastbar,0,'只能运行在分笔周期！\n \n请切换到分笔周期！！'),align2;
  exit;
end;
fv:=vol;
fc:=close;
fcp:=fc;
a: ...

不对啊。

看看

呵呵，这个贴子发了几次都不对，只好直接来说了：
fv[fcp]，要在fcp后再加个［i］，改成小写的哦.

[ 本帖最后由 zlydwq 于 2007-9-13 18:02 编辑 ]

谢谢分享,好指标

能说一下用法吗

谢谢提供！！！！

有没有大智慧的啊?

谢谢提供

谢谢分享

非常感谢
学习了

直接到博客看去。

谢谢分享

谢谢陆军中尉！
请教如何反应到日线中？请提示。

谢谢提供!!!

引用:

原帖由 xzp 于 2007-9-13 19:58 发表
谢谢陆军中尉！
请教如何反应到日线中？请提示。

源码建公式，K线里引用。

谢谢.............

引用:

原帖由 coffeesmel 于 2007-9-13 18:33 发表
能说一下用法吗

正在整理，近期将在博客推出。短线5%-10%成功率100%。登录我的主页。

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[i]]=fc[fcp[i-1]] then fvtemp:=fvtemp+fv[fcp[i]]
    else begin
      if fvmax<fvtemp then begin
        fvmax:=fvtemp;
        fvmaxp:=i-1;
      end;
      fvtemp:=fv[fcp[i]];
    end;
  if fvmax<fvtemp then begin
    fvmax:=fvtemp;
    fvmaxp:=i-1;
  end;
end;
价格:fc[fcp[fvmaxp]];
手数:fvmax;
占比:fvmax/dynainfo(8)*100;

最后一句通不过？？

谁给做个大智慧新一代的？？

引用:

原帖由 kx169 于 2007-9-13 21:35 发表
if datatype0 then begin
  drawtext(islastbar,0,'只能运行在分笔周期！\n \n请切换到分笔周期！！'),align2;
  exit;
end;
fv:=vol;
fc:=close;
fcp:=fc;
a:=sortpos(fcp,0,1,datacount);
fvmax:=0;  ...

不要想简单复制。哈哈。

点击我的主页。

谢谢楼主分享。期待用法。加分支持。

加分支持。

期待用法。