以前见过哪位朋友写过，在１００％主图上有根竖绿线，黄线标识天数

论坛上有的，搜索一下看看。

{主图-配合光标移动-调整 N 参数，就是日期为计算起点}
input:n(1030102,700101,1341231);//设置日期调整范围
n1:=BARSLAST(if(date=n,DATACOUNT-barpos,0)<>0);//计算起始开始的数据周期
hsl:=100*VOL/CAPITAL,LINETHICK0;
f:=MOD(SUM(hsl,n1),100),LINETHICK0;//数据统计从输入日期开始
tj:=f<REF(f,1);
VERTLINE(tj),POINTDOT,colorff8800;
fd:=REF(BARSLAST(tj),1)+1;
DRAWNUMBER(tj,CLOSE,fd,0),ALIGN5;
周期天数:fd,LINETHICK0;
换手累积:f,LINETHICK0;
周期均价:SUM(AMOUNT,fd)/SUM(VOL,fd)/100;
bf1:=0;
for i:=SYSPARAM(1) to DATACOUNT do begin
  IF bf1>=100 then BREAK else bf1:=bf1+hsl[i];
end;
btj:=BARPOS=i,LINETHICK0;
VERTLINE(btj),LINEDOT,COLORYELLOW;
DRAWTEXT(btj,HIGH,'完成100%换手\n共 '+NUMTOSTR((i-SYSPARAM(1)),0)+' 天'),ALIGN4,COLORRED;

斜阳OK！

但我想要改成从上市第一天开始算！请清风斜阳再帮忙！！
有朋友帮忙找了一个加密的，可是还是不行！
结果与上一样！

谢谢原来这指标是清风斜阳老师的！

请帮忙！谢谢

svol:=INTPART(SUM(VOL,0)/CAPITAL);
x:=svol>REF(svol,1);
zq:=sumbars(x or barpos=1,1);
DRAWNUMBER(x,1,ref(zq,1),0);
VERTLINE(x);

我想在这段码上改可以吗？因为主图和可以移动看真的方便．谢谢

{主图-配合光标移动-调整 N 参数，就是日期为计算起点}
input:n(1030102,700101,1341231);//设置日期调整范围
n1:=BARSLAST(if(date=n,DATACOUNT-barpos,0)<>0);//计算起始开始的数据周期
hsl:=100*VOL/CAPITAL,LINETHICK0;
f:=MOD(SUM(hsl,n1),100),LINETHICK0;//数据统计从输入日期开始
tj:=f<REF(f,1);
VERTLINE(tj),POINTDOT,colorff8800;
fd:=REF(BARSLAST(tj),1)+1;
DRAWNUMBER(tj,CLOSE,fd,0),ALIGN5;
周期天数:fd,LINETHICK0;
换手累积:f,LINETHICK0;
周期均价:SUM(AMOUNT,fd)/SUM(VOL,fd)/100;
bf1:=0;
for i:=SYSPARAM(1) to DATACOUNT do begin
  IF bf1>=100 then BREAK else bf1:=bf1+hsl[i];
end;
btj:=BARPOS=i,LINETHICK0;
VERTLINE(btj),LINEDOT,COLORYELLOW;
DRAWTEXT(btj,HIGH,'完成100%换手\n共 '+NUMTOSTR((i-SYSPARAM(1)),0)+' 天'),ALIGN4,COLORRED;

din!!!

亲教骑兵兄，如何描述DIFF与DEA相等的时间延续N天？

hsl:=100*VOL/CAPITAL,LINETHICK0;
bf1:=0;
for i:=SYSPARAM(1) to DATACOUNT do begin
  IF bf1>=100 then BREAK else bf1:=bf1+hsl[i];
end;
btj:=BARPOS=i,LINETHICK0;
VERTLINE(btj),LINEDOT,COLORYELLOW;
DRAWTEXT(btj,HIGH,'完成100%换手\n共 '+NUMTOSTR((i-SYSPARAM(1)),0)+' 天'),ALIGN4,COLORRED;
zq:=sumbars(v,CAPITAL);
tt:=SYSPARAM(1)-zq[SYSPARAM(1)]+1;
VERTLINE(tt=barpos);
DRAWTEXT(tt=barpos,HIGH,'完成100%换手\n共 '+NUMTOSTR(zq[SYSPARAM(1)],0)+' 天'),ALIGN4,COLORRED;

引用:

Originally posted by luojin at 2005-4-12 10:50 PM:
亲教骑兵兄，如何描述DIFF与DEA相等的时间延续N天？

all(diff=dea,n);

引用:

Originally posted by 股市骑兵00 at 2005-4-13 04:15 PM:
hsl:=100*VOL/CAPITAL,LINETHICK0;
bf1:=0;
for i:=SYSPARAM(1) to DATACOUNT do begin
  IF bf1>=100 then BREAK else bf1:=bf1+hsl;
end;
btj:=BARPOS=i,LINETHICK0;
VERTLINE(btj),LINEDOT,COLORY ...

谢谢！！

斜阳的公式改1句话：
input:n(1030102,700101,1341231);//设置日期调整范围
改成：
n:=ref(date,barpos-1);

引用:

Originally posted by 风吹雨打 at 2005-4-12 12:37 AM:
以前见过哪位朋友写过，在１００％主图上有根竖绿线，黄线标识天数

这是我以前在飞狐社区帮一狐友编写的飞狐立一线，用vbs写的。可能现在写不用这么复杂了。参数1为换手 参数2为起点。供你参考。

天：显示光标点所在区域的天数。是你要求的。

本贴由 dalong 于 2005-4-13 20:19 最后编辑

非常感激您的不厌其烦的帮忙！！

就是要这样的效果了．以前有个贴也是这样的，改成了现在这样，但由于我升级４．０所有的公式不见了，没有备份．．．

所以重新找了一遍！现在得到热心朋友的帮忙好了，
指标的用处是看盘方便而已！我没有成功率很高的答谢！
惟有真诚的：谢谢！！

引用:

Originally posted by dalong at 2005-4-13 08:08 PM:

这是我以前在飞狐社区帮一狐友编写的飞狐立一线，用vbs写的。可能现在写不用这么复杂了。参数1为换手 参数2为起点。供你参考。

谢谢dalong兄！

引用:

Originally posted by 风吹雨打 at 2005-4-13 08:12 PM:
非常感激您的不厌其烦的帮忙！！

就是要这样的效果了．以前有个贴也是这样的，改成了现在这样，但由于我升级４．０所有的公式不见了，没有备份．．．

所以重新找了一遍！现在得到热心朋友的帮忙好了，
指标 ...

不客气，公式满意就好。

谢谢骑兵加分！

谢谢dalong 老师！

谢谢pengyou加分!

引用:

Originally posted by 股市骑兵00 at 2005-4-13 08:01 PM:
斜阳的公式改1句话：
input:n(1030102,700101,1341231);//设置日期调整范围
改成：
n:=ref(date,barpos-1);