|
以下是通达信潜龙抄底副图源码（无源码的请下载附件导入）
HJ_1:=EXPMA(CLOSE,N1);
HJ_2:=EXPMA(CLOSE,N2);
HJ_3:=EXPMA(CLOSE,N3);
HJ_4:=BARSLAST(CROSS(HJ_1,HJ_2));
HJ_5:=BARSLAST(CROSS(HJ_1,HJ_3));
HJ_6:=BARSLAST(CROSS(HJ_2,HJ_3));
HJ_7:=CROSS(HJ_2,HJ_3);
HJ_8:=HJ_4>=HJ_5 AND HJ_5>=HJ_6;
HJ_9:=COUNT(CROSS(HJ_2,HJ_1) OR CROSS(HJ_3,HJ_2) OR CROSS(HJ_3,HJ_1),HJ_4)=0;
HJ_10:=REF(HJ_1<HJ_3 AND HJ_2<HJ_3,HJ_4+1);
HJ_11:=HJ_7 AND HJ_8 AND HJ_9 AND HJ_10;
HJ_12:=55;
HJ_13:=34;
HJ_14:=REF(CLOSE,1);
HJ_15:=SMA(MAX(CLOSE-HJ_14,0),3,1)/SMA(ABS(CLOSE-HJ_14),3,1)*100;
HJ_16:=EMA(CLOSE,3);
HJ_17:=EMA(CLOSE,21);
DRAWTEXT(CROSS(85,HJ_15),75,16),COLORGREEN;
HJ_18:=IF(YEAR>=2038 AND MONTH>=1,0,1);
HJ_19:=REF(LOW,1)*HJ_18;
HJ_20:=SMA(ABS(LOW-HJ_19),3,1)/SMA(MAX(LOW-HJ_19,0),3,1)*100*HJ_18;
HJ_21:=EMA(IF(CLOSE*1.3,HJ_20*10,HJ_20/10),3)*HJ_18;
HJ_22:=LLV(LOW,30)*HJ_18;
HJ_23:=HHV(HJ_21,30)*HJ_18;
HJ_24:=IF(MA(CLOSE,58),1,0)*HJ_18;
HJ_25:=EMA(IF(LOW<=HJ_22,(HJ_21+HJ_23*2)/2,0),3)/618*HJ_24*HJ_18;
潜龙:IF(HJ_25>100,100,HJ_25)*HJ_18,COLORRED;
庄家吸筹:STICKLINE(潜龙>(-150),0,潜龙,8,1),COLORMAGENTA;
HJ_26:=100*(HHV(HIGH,HJ_12)-CLOSE)/(HHV(HIGH,HJ_12)-LLV(LOW,HJ_12));
HJ_27:=(CLOSE-LLV(LOW,HJ_13))/(HHV(HIGH,HJ_13)-LLV(LOW,HJ_13))*100;
HJ_28:=SMA(HJ_27,3,1);
HJ_29:=SMA(HJ_28,3,1);
HJ_30:=3*HJ_28-2*HJ_29;
HJ_31:=EMA(HJ_30,6);
分界线:30,DOTLINE,COLORYELLOW;
DRAWICON(CROSS(潜龙,15),潜龙,9);
{-----------------------------------}
63466217.jpg
|
