查看完整版本: 请专家编写个公式。

请专家编写个公式。

[size=5][b]请问能不能在个股的分时上加上象大盘分时那样的红绿柱？[/b][/size][size=6][b]谢谢[/b][/size]

[quote]原帖由 [i]wykbchh[/i] 于 2007-12-5 13:36 发表 [url=http://bbs.fjfox.com/redirect.php?goto=findpost&pid=374396&ptid=42478][img]http://bbs.fjfox.com/images/common/back.gif[/img][/url]
请问能不能在个股的分时上加上象大盘分时那样的红绿柱？谢谢 [/quote]

试试这个：
[attach]26327[/attach]

a:=BUYVOL-SELLVOL,colorSTICK;
t:=TIME0-if(hour>11,5400,0);
s:=sumbars(t-ref(t,1),300);
y:=sum(a,s),colorSTICK,linethick0;
kh:=hhv(h,0);
kL:=LLv(L,0);
yh:=hhv(Y,0);
yL:=LLv(y,0);
b:=(kh-kL)/(yh-yL)/4;
f:=(kh+kL-(yh+yL)*b)/2;
p:=datacount;f[p],COLORGRAY;
STICKLINE(1,f[p],f[p]+y*(y<0)*b[p],0.1,0)COLORGREEN;
ys:STICKLINE(1,f[p],f[p]+y*(y>0)*b[p],0.1,0)COLORMAGENTA;
c,COLORWHITE;
sma(c,13,1),linethick1,COLORRED;
amount/v/100,POINTDOT,linethick3,COLORCYAN;
sum(amount,0)/sum(v,0)/100,linethick2,COLORYELLOW;
STICKLINE(ISLASTBAR,DYNAINFO(3),DYNAINFO(3),100,0)COLORBLUE;
i:=NUMTOSTR(DYNAINFO(3),2);
DRAWTEXT(ISLASTBAR,DYNAINFO(3)*1.001,'前\n收\n盘\n'+i);

谢谢,能不能只把红绿柱和那跟红线提出来?别的不要.

[[i] 本帖最后由 wykbchh 于 2007-12-5 16:55 编辑 [/i]]

[quote]原帖由 [i]wykbchh[/i] 于 2007-12-5 16:46 发表 [url=http://bbs.fjfox.com/redirect.php?goto=findpost&pid=374422&ptid=42478][img]http://bbs.fjfox.com/images/common/back.gif[/img][/url]
谢谢,能不能只把红绿柱和那跟红线提出来?别的不要. [/quote]

原码呢?