以下是通达信五行量化源码(无源码的请下载附件导入)
HJ_1:=EMA(100*(CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21)),13)/4;
HJ_2:=3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1);
HJ_3:=(HJ_2-LLV(HJ_2,21))/(HHV(HJ_2,21)-LLV(HJ_2,21))*4*25;
HJ_4:=CROSS(HJ_3,18);
HJ_5:=MA(CLOSE,20);
HJ_6:=CLOSE>MA(CLOSE,5);
HJ_7:=MA(CLOSE,5)>MA(CLOSE,10);
HJ_8:=CLOSE>MA(CLOSE,10);
HJ_9:=MA(CLOSE,5)>MA(CLOSE,20);
HJ_10:=CLOSE>MA(CLOSE,20);
HJ_11:=REF(HJ_5,1);
HJ_12:=HJ_5>HJ_11;
HJ_13:=IF(HJ_6,10,0-10)+IF(HJ_7,10,0-10)+IF(HJ_8,10,0-10)+IF(HJ_9,10,0-10)+IF(HJ_10,10,0-10)+IF(HJ_12,10,0-10);{www.88gs.com}
HJ_14:=CLOSE>MA(LOW,20)*1.1;
HJ_15:=EMA(100*(1-WINNER(1.1*CLOSE)),1)=0;
HJ_16:=VOL*(CLOSE-OPEN)/(CLOSE+OPEN);
HJ_17:=EMA(VOL*(CLOSE-OPEN)/(CLOSE+OPEN),38);
HJ_18:=EMA(HJ_17,8);
HJ_19:=MA(HJ_18,3);
HJ_20:=MA(HJ_18,10);
HJ_21:=HJ_19>HJ_20 AND HJ_20>0;
HJ_22:=(MA(CLOSE,1)+MA(CLOSE,3)+MA(CLOSE,5)+MA(CLOSE,7)+MA(CLOSE,9))/5;
HJ_23:=(MA(CLOSE,2)+MA(CLOSE,4)+MA(CLOSE,6)+MA(CLOSE,8)+MA(CLOSE,10))/5;
HJ_24:=EMA(HJ_22,3);
HJ_25:=EMA(HJ_23,10);
HJ_26:=EMA(AMOUNT,1)/EMA(VOL,1)/100;
HJ_27:=DMA(HJ_24,HJ_26);
HJ_28:=DMA(HJ_25,HJ_26);
HJ_29:=MAX(2*(HJ_27-HJ_28),0)*100;
HJ_30:=HJ_29>0 AND HJ_29>REF(HJ_29,1);
STICKLINE(CLOSE,0,1,4,1),COLORGRAY;
STICKLINE(CLOSE,0,0.8,4,1),COLORGRAY;
STICKLINE(CLOSE,0,0.6,4,1),COLORGRAY;
STICKLINE(CLOSE,0,0.4,4,1),COLORGRAY;
STICKLINE(CLOSE,0,0.2,4,1),COLORGRAY;
HJ_31:=HJ_14>0 AND HJ_30>0 AND HJ_21>0 AND HJ_13=60 AND HJ_1>10;
DRAWICON(HJ_14>0,1,41);
DRAWICON(HJ_30>0,0.7,30);
DRAWICON(HJ_4>0,0.7,28);
DRAWICON(HJ_21>0,0.5,40);
DRAWICON(HJ_13=60,0.3,1);
DRAWICON(HJ_1>10,0.1,38);
{-----------------------------------}
857166175.jpg
|