道氏理论炒股公式.doc

道氏理论炒股公式之技术指标
CHDXT
CHDXT指标程序(大智慧),其中参数P 缺省 255 最小 102 最大 255 。
{第一部分主力控盘}
A1:=EMA(EMA(CLOSE,P),5);
A2:=100*WINNER(CLOSE);
A3:=(A1-REF(A1,1))*400/REF(A1,1);
{散户行为}
STICKLINE( A3>REF(A3,1) AND A3<0, A3,0,8,1),REEN;
STICKLINE( A3<REF(A3,1) AND A3<0, A3,0,8,0),REEN;
{主力开始控盘}
STICKLINE(A3>REF(A3,1) AND A3>0 ,A3,0,8,0),COLORRED;
{{主力高度控盘}
STICKLINE(A2>50 AND COST(85)<CLOSE AND A3>0,A3,0,8,0),COLORFF00FF;
{黄柱信号}
STICKLINE(A3<REF(A3,1) AND A3>0,A3,0,8,0),COLORYELLOW;
{第二部分趋势信号}
{动能}
V1:=IF(CLOSE>REF(CLOSE,1),VOL,0);
V2:=IF(CLOSE<REF(CLOSE,1),-VOL,0);
V3:=V1+V2;
V4:=SUM(V3,P);
WPH0:=EMA(V4,5);
WPH1:=EMA(V4,17);
WPH2:=EMA(V4,102);
WPH3:=EMA(V4,255);
{道氏线}
CHD1:=EMA(CLOSE,17);
CHD2:=EMA(CLOSE,102);
CHD3:=EMA(CLOSE,255);
{开始}
{大趋势}
IF( A3>0 AND REF(CHD1,1)<REF(CHD3,1) AND CHD1>CHD3
AND CHD1>CHD2 AND WPH1>REF(WPH1,1) AND P=255,5,0),COLORRED;
DRAWTEXT( A3>0 AND REF(CHD1,1)<REF(CHD3,1) AND CHD1>CHD3
AND CHD1>CHD2 AND WPH1>REF(WPH1,1) AND P=255,3,'开始'),COLORRED;
{中趋势}
IF( A3>0 AND REF(CHD1,1)<REF(CHD2,1) AND CHD1>CHD2
AND CHD2<CHD3 AND WPH1>REF(WPH1,1)
AND P=102,5,0),COLORRED;
DRAWTEXT( A3>0 AND REF(CHD1,1)<REF(CHD2,1) AND CHD1>CHD2
AND CHD2<CHD3 AND WPH1>REF(WPH1,1)
AND P=102,3,'开始'),COLORRED;
{结束}
{中级趋势结束}
A00:=(REF(CHD1,1)>REF(CHD2,1) AND CHD1<CHD2 AND P=102 );
IF(FILTER(A00 ,1),0,5),COLORYELLOW;
DRAWTEXT(A00,5,'结束'),COLORYELLOW;
{大趋势结束}
A11:=(REF(CHD1,1)>REF(CHD3,1) AND CHD1<CHD3 AND P=255);
IF(FILTER(A11 ,1),0,5),COLORYELLOW;
DRAWTEXT(A11,5,'结束'),COLORYELLOW;
{第四部分警报信号}
{动能不足报警}
A22:=(A3>0 AND REF(WPH1,1)>REF(WPH2,1) AND WPH1<WPH2 );
IF(FILTER(A22 ,1),0,5),COLORYELLOW;
DRAWTEXT(A22,4,'能减!'),COLORYELLOW;
A33:=(A3>0 AND REF(WPH1,1)>REF(WPH3,1) AND WPH1<WPH3 );
IF(FILTER(A33 ,1),0,5),COLORYELLOW;
DRAWTEXT(A33,3,'能减!!'),COLORYELLOW;
{趋势信号交易程序}
C1:=ZIG(3,15);
C2:=ZIG(3,35);
C3:=ZIG(3,70);
C33:=ZIG(3,85);
C4:=ZIG(3,150);
{追随大趋势}
{大趋势开始}
{建仓:跌幅>70%}
C5:=( REF(C1,2)>REF(C1,1) AND REF(C2,2)>REF(C2,1)
AND REF(C3,