散户之家 » 公式分享 » 机构K线


2007-12-12 07:25 回头太难
机构K线

Var2:=(CLOSE-REF(CLOSE, 1))/REF(CLOSE, 1)*100;
Var3:=(INDEXC-REF(INDEXC, 1))/REF(INDEXC, 1)*100;
Var4:=Var2-Var3;
Var5:=(OPEN-REF(CLOSE, 1))/REF(CLOSE, 1)*100;
Var6:=(INDEXO-REF(INDEXC, 1))/REF(INDEXC, 1)*100;
Var7:=Var5-Var6;
STICKLINE(Var4>=0, SUM(REF(Var4, 1), 0)+100+Var7, SUM(Var4, 0)+100, 6, 0), COLORRED;
STICKLINE(Var4<0, SUM(REF(Var4, 1), 0)+100+Var7, SUM(Var4, 0)+100, 6, 0), COLOR00FF00;
j1:ema(SUM(REF(Var4, 1), 0)+100+Var7,1),colorwhite;
j5:ema(SUM(REF(Var4, 1), 0)+100+Var7,5),colorwhite;
j10:ema(SUM(REF(Var4, 1), 0)+100+Var7,10),colorff00ff;
j20:ema(SUM(REF(Var4, 1), 0)+100+Var7,20),coloryellow;
j30:ema(SUM(REF(Var4, 1), 0)+100+Var7,30),colorffff33;
GDSJ:=HHVBARS(j1,N);
REF(j1,GDSJ),COLOR00FF00,POINTDOT;
突破:CROSS(j1,REF(REF(j1,GDSJ),1)) AND REF(GDSJ>=5,1),POINTDOT,LINETHICK0;
STICKLINE(突破,j1*0.99,j1,5,0),COLOR00FF00;
DRAWTEXT(突破,j1*0.99,'突破'),COLOR00FFFF;

页: [1]
查看完整版本: 机构K线


Powered by Discuz! Archiver 5.5.0  © 2001-2006 Comsenz Inc.