通达信波动原理20源码

以下是通达信波动原理20源码

DRAWGBK(CLOSE>0,RGB(41,36,33),RGB(0,0,0),0,302,0);
 HJ_1:=(2*CLOSE+HIGH+LOW+OPEN)/5;
 HJ_2:=LLV(LOW,34);
 HJ_3:=HHV(HIGH,34);
 SK:EMA((HJ_1-HJ_2)/(HJ_3-HJ_2)*100,13);
 SD:EMA(SK,13);
 IF(SK>REF(SK,1),SK,DRAWNULL),COLORRED,LINETHICK2;
上证:"999999$CLOSE",NODRAW,COLORWHITE;
中小:"399005$CLOSE",NODRAW,COLORWHITE;
创业:"399006$CLOSE",NODRAW,COLORWHITE;
现价:CLOSE,NODRAW,COLORWHITE;
涨家数:INDEXADV,NODRAW,COLORRED;
跌家数:INDEXDEC,NODRAW,COLORGREEN;
正量能:涨家数/(涨家数+跌家数)*100,NODRAW,COLORMAGENTA;
负量能:跌家数/(涨家数+跌家数)*100,NODRAW,COLORYELLOW;
 HJ_4:=KDJ.K#MONTH;
 HJ_5:=KDJ.D#MONTH;
 HJ_6:=KDJ.K#WEEK;
 HJ_7:=KDJ.D#WEEK;
 HJ_8:=KD.K;
 HJ_9:=KD.D;
 HJ_10:=HJ_8>HJ_9;
 HJ_11:=HJ_6>HJ_7;
 HJ_12:=HJ_4>HJ_5;
 HJ_13:=CROSS(HJ_8,HJ_9);
 HJ_14:=CROSS(HJ_6,HJ_7);
 HJ_15:=CROSS(HJ_4,HJ_5);
 HJ_16:=HJ_11 AND HJ_10;
 HJ_17:=HJ_10 AND HJ_12;
 HJ_18:=HJ_11 AND HJ_12;
 STICKLINE(HJ_16,1,20,1,1),COLORWHITE;
 STICKLINE(HJ_17,30,35,1,1),COLORYELLOW;
 STICKLINE(HJ_18,45,50,1,1),COLORRED;
 DIFF:EMA(CLOSE,12)-EMA(CLOSE,26),NODRAW,COLORWHITE;
 DEAA:EMA(DIFF,9),NODRAW,COLORWHITE;
 MACD形态:DIFF>DEAA AND DIFF>=0,NODRAW,COLORWHITE;
 HJ_19:=2-1;
 HJ_20:=IF(CROSS(DEAA,0),1,0);
 HJ_21:=IF(DIFF<0 AND CROSS(DIFF,DEAA),2,0);
 HJ_22:=IF(HJ_20,SUM(HJ_21,0),0);
 HJ_23:=HHV(HJ_22,0);
 HJ_24:=SUM(HJ_21,0);
 HJ_25:=IF(HJ_24-HJ_23>HJ_19 AND HJ_24>REF(HJ_24,1),1,0);
 HJ_26:=14;
 HJ_27:=CCI(HJ_26);
 STICKLINE(HJ_27>80 AND HJ_10,80,82,1,1),COLORBROWN;
 HJ_28:=CLOSE>OPEN;
 HJ_29:=HJ_28 AND CLOSE>MA(CLOSE,20) AND CLOSE>MA(CLOSE,40) AND CLOSE>MA(CLOSE,60);
 HJ_30:=HJ_29 AND OPEN<MA(CLOSE,40) AND OPEN<MA(CLOSE,60);
 HJ_31:=HJ_30 AND CLOSE-OPEN>0.0618*CLOSE;
 HJ_32:=LONGCROSS(CCI#MONTH,(-100),5);
 HJ_33:=LONGCROSS(CCI#MONTH,0,5);
 HJ_34:=CROSS(KDJ.J#WEEK,20);
 HJ_35:=CROSS(KDJ.J#MONTH,20);
 HJ_36:=HJ_35 AND HIGH>REF(CLOSE,1) AND NOT(CLOSE>=REF(CLOSE,1)*1.097 AND CLOSE=OPEN AND HIGH=LOW);
 STICKLINE(HJ_36,0,30,8,0),COLORRED;
 STICKLINE(HJ_36,30,40,8,0),COLORRED;
 STICKLINE(HJ_36,40,50,2,0),COLORYELLOW;
 STICKLINE(HJ_36,50,80,1,0),COLORWHITE;
 DRAWICON(HJ_36,50,28);
抄底信号2:HJ_34 AND HIGH>REF(CLOSE,1) AND NOT(CLOSE>=REF(CLOSE,1)*1.097 AND CLOSE=OPEN AND HIGH=LOW);
 STICKLINE(抄底信号2,0,30,8,0),COLORRED;
 STICKLINE(抄底信号2,30,40,8,0),COLORRED;
 STICKLINE(抄底信号2,40,50,2,0),COLORYELLOW;
 STICKLINE(抄底信号2,50,80,1,0),COLORWHITE;
 DRAWICON(抄底信号2,50,29);

{-----------------------------------}