技术指标公式源码 黄金柱

流通:CAPITAL/1000000,LINETHICK0;  

内外比:DYNAINFO(51),COLORYELLOW,NODRAW;  

五日量比:V/(REF(MA(V,5),1)/240*FROMO),COLORYELLOW,NODRAW; 

换手:VOL/CAPITAL*100,POINTDOT COLORMAGENTA;

５换:SUM(100*V/CAPITAL,5),LINETHICK0;  

10换:SUM(100*V/CAPITAL,10),LINETHICK0;  

20换:SUM(100*V/CAPITAL,20),LINETHICK0;

VVOL:IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMO,DRAWNULL),NODRAW;

STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,VVOL,0,-1,-1),COLOR00C0C0;

VOLUME:VOL,VOLSTICK;

MAVOL1:MA(VOLUME,5),COLORWHITE;  

MAVOL2:MA(VOLUME,35)COLORYELLOW;  

MAVOL3:MA(VOLUME,135);WAN:=VOL>REF(V,1)*1.9;

WAN1:=VOL<REF(LLV(VOL,13),1);WAN2:=VOL<REF(LLV(VOL,55),1);

STICKLINE(WAN,0,V,1,0),COLORYELLOW;

STICKLINE(WAN1,0,V,1,0),COLORGREEN;

STICKLINE(WAN2,0,V,1,0),COLORMAGENTA;TJ1:=COUNT(V>REF(V,1)*1.9,4)=1;

TJ2:=COUNT(V<REF(V,1) AND L>MIN(L,4) AND L>REF(L,1),3)=3 ;

TJ3:=TJ1 AND TJ2;STICKLINE(TJ3,0,V,1,0),COLORRED;

QJJ:=VOL/((H-L)*2-ABS(C-O))*10;

XVL:=(IF(C>O,QJJ*(H-L),IF(C<O,QJJ*(H-O+C-L),VOL/2))+IF(C>O,0-QJJ*(H-C+O-L),IF(C<O,0-QJJ*(H-L),0-VOL/2)));

HSL:=(XVL/20)/1.15;

攻:=((HSL*0.55+(REF(HSL,1)*0.33))+(REF(HSL,2)*0.22));

LLJX:=EMA(攻,3);0,POINTDOT,COLORWHITE;

B1:SUM(LLJX,1),COLORCYAN;B2:SUM(LLJX,2),COLORCYAN;

B3:SUM(LLJX,3),COLORCYAN;B4:SUM(LLJX,4),COLORCYAN;

B5:SUM(LLJX,5),COLORCYAN;B6:SUM(LLJX,6),COLORCYAN;

B7:SUM(LLJX,7),COLORCYAN;B8:SUM(LLJX,8),COLORCYAN;

B9:SUM(LLJX,9),COLORCYAN;B10:SUM(LLJX,10),COLORCYAN;

A1:IF(B1>REF(B1,1),B1,DRAWNULL),COLORMAGENTA;

A2:IF(B2>REF(B2,1),B2,DRAWNULL),COLORRED;

A3:IF(B3>REF(B3,1),B3,DRAWNULL),COLORRED;

A4:IF(B4>REF(B4,1),B4,DRAWNULL),COLORRED;

A5:IF(B5>REF(B5,1),B5,DRAWNULL),COLORRED;

A6:IF(B6>REF(B6,1),B6,DRAWNULL),COLORRED;

A7:IF(B7>REF(B7,1),B7,DRAWNULL),COLORRED;

A8:IF(B8>REF(B8,1),B8,DRAWNULL),COLORRED;

A9:IF(B9>REF(B9,1),B9,DRAWNULL),COLORRED;

A10:IF(B10>REF(B10,1),B10,DRAWNULL),COLORRED,LINETHICK3;

LLU1:=IF(B1>REF(B1,1),1,0);LLU2:=IF(B2>REF(B2,1),1,0);

LLU3:=IF(B3>REF(B3,1),1,0);LLU4:=IF(B4>REF(B4,1),1,0);

LLU5:=IF(B5>REF(B5,1),1,0);LLU6:=IF(B6>REF(B6,1),1,0);

LLU7:=IF(B7>REF(B7,1),1,0);LLU8:=IF(B8>REF(B8,1),1,0);

LLU9:=IF(B9>REF(B9,1),1,0);LLU10:=IF(B10>REF(B10,1),1,0);

DD:=LLU1+LLU2+LLU3+LLU4+LLU5+LLU6+LLU7+LLU8+LLU9+LLU10;

VAX2:=EMA(C,7);VAR3:=EMA(C,14);VAR4:=EMA(C,25);

VAR5:=2*(VAX2-VAR4);VAR6:=2*(VAX2-VAR3);VAR7:2*(VAR6+VAR5);

DRAWICON(CROSS(VAR7,0),10000,13),COLORYELLOW;

LC:=REF(C,1);

RSI5:=((SMA(MAX((C - LC),0),5,1) / SMA(ABS((C - LC)),5,1)) * 100);

TR1:=SUM(MAX(MAX((H - LOW),ABS((H - REF(C,1)))),ABS((LOW - REF(C,1)))),10);

HX:=(H - REF(H,1));LX:=(REF(LOW,1) - LOW);

DMP:=SUM(IF(((HX > 0) AND (HX > LX)),HX,0),10);

DMM:=SUM(IF(((LX > 0) AND (LX > HX)),LX,0),10);

PDI:=((DMP * 100) / TR1);MDI:=((DMM * 100) / TR1);

ADX:=MA(((ABS((MDI - PDI)) / (MDI + PDI)) * 100),5);

AV:=(RSI5 + ADX);DXR:=(((ADX + REF(ADX,5)) / 2) + RSI5);

WR10:=((100 * (HHV(H,10) - C)) / (HHV(H,10) - LLV(LOW,10)));

NEWVOL:=(RSI5 - WR10);ZZ:=(AV + NEWVOL);

DRAWICON(CROSS(ZZ,0),8000,9),COLORFF00FF;

技术指标公式编写，内容仅做科普。