通达信与庄共舞主图源码

 与庄共舞主图

使用方法：暗条越长压力越大,暗条越短做多越好

举一反三，股价在暗条的上方那么暗条越长，支撑力度越大。

参数自己填写吧

DA:=IF(CURRBARSCOUNT>DA1,0,DA1);
LO:=REFDATE(LLV(L,DA),DATE);
GZ:=EXP(LN(HI/LO)/10); 
LH2:=SUM(IF(C1>=(HI/POW(GZ,2)) AND C1<(HI/GZ),V,0),DA);
LH4:=SUM(IF(C1>=(HI/POW(GZ,4)) AND C1<(HI/POW(GZ,3)),V,0),DA);
LH6:=SUM(IF(C1>=(HI/POW(GZ,6)) AND C1<(HI/POW(GZ,5)),V,0),DA);
LH8:=SUM(IF(C1>=(HI/POW(GZ,8)) AND C1<(HI/POW(GZ,7)),V,0),DA);
LH10:=SUM(IF(C1>=LO AND C1<LO*GZ,V,0),DA);
L2:=REFDATE(HHV(LH2,DA),DATE),LINETHICK0;
L4:=REFDATE(HHV(LH4,DA),DATE);
L6:=REFDATE(HHV(LH6,DA),DATE);
L8:=REFDATE(HHV(LH8,DA),DATE);
L10:=REFDATE(HHV(LH10,DA),DATE);
STICKLINE(CEILING(DA*L1/SS)*3>=CURRBARSCOUNT,HI*99/100,HI/GZ,9,0)COLOR3C3C3A,LINETHICK3;
STICKLINE(CEILING(DA*L3/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,2)*99/100,HI/POW(GZ,3),9,0)COLOR3C3C3A,LINETHICK3;
STICKLINE(CEILING(DA*L5/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,4)*99/100,HI/POW(GZ,5),9,0)COLOR3C3C3A,LINETHICK3;
STICKLINE(CEILING(DA*L7/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,6)*99/100,HI/POW(GZ,7),9,0)COLOR3C3C3A,LINETHICK3;
STICKLINE(CEILING(DA*L9/SS)*3>=CURRBARSCOUNT,LO*POW(GZ,1),LO*POW(GZ,2)*99/100,9,0)COLOR3C3C3A,LINETHICK3;
DRAWTEXT(CURRBARSCOUNT=98,LOW*0.88,'暗条越长压力越大,暗条越短做多越好 '),COLORYELLOW;
DRAWTEXT_FIX(1,0.07,0,0,HYBLOCK)COLOR00FFFF;
DRAWTEXT_FIX(1,0.21,0,0,DYBLOCK)COLOR00FFFF;

 
S:=EMA(SLOPE(C,21)*20+C,42),POINTDOT,COLOR000000;
STICKLINE(B>=S,LOW,HIGH,0,0),COLORRED;
STICKLINE(B>=S,CLOSE,OPEN,3,0),COLOR0000CC;
STICKLINE(B>=S,CLOSE,OPEN,1,0),COLOR0000FF;
STICKLINE(B<S,CLOSE,OPEN,2,0),COLORDDDD00;
STICKLINE(B<S,CLOSE,OPEN,4.5,0),COLORAAAA00;
{STICKLINE(CROSS(B,S) OR CROSS(S,B),OPEN,CLOSE,3.5,0),COLORYELLOW;}
GAO:=HHV(H,0)-LLV(L,0);
ZDX1:=XJ+(SMA(MAX(XJ-REF(XJ,1),0),5,1)/SMA(ABS(XJ-REF(XJ,1)),5,1)
ZDX2:=XJ+(SMA(MAX(XJ-REF(XJ,1),0),5,1)/SMA(ABS(XJ-REF(XJ,1)),5,1)*100-50);
多空线:=EMA(((SLOPE(CLOSE,22) * 20) + CLOSE),55),COLORYELLOW,DOTLINE;

 
MA2:MA(CLOSE,N2);
MA4:MA(CLOSE,N4),LINETHICK2;
 

上一篇：通达信金石探庄，底部顶部都明确信号源码副图    下一篇：通达信强势妖股选股指标公式源码副图