用于大盘顶底的研判(通达信)

源码正文：

dxy:=(CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*100;dxe:=SMA(dxy,3,1);dxs:=Sma(dxe,3,1){XG51};
大盘:ema(100*(INDEXC-LLV(INDEXL,34))/(HHV(INDEXH,34)-LLV(INDEXL,34)),3),COLOR4FB9B9{XG51};
动向:3*dxe-2*dxs,COLOR1010FF{X_G_5.1_C_N_{};

源码正文：

TR:=EXPMema(maX(MAX(HIGH-LOW,Abs(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),N){XG51};
HD :=HIGH-REF(HIGH,1){XG51};
LD :=REF(LOW,1)-LOW{XG51};
DMP:=EXPMEMA(IF(HD>0&&HD>LD,HD,0),N){XG51};
DMM:=EXPMEMA(IF(LD>0&&LD>HD,LD,0),N){XG51};
pdi: DMP*100/TR{XG51};
mdi: DMM*100/TR{XG51};
ADX: EXPMEMA(ABS(MDI-PDI)/(MDI+PDI)*100,M){XG51};
穿破短底:16{XG51};
线上发飙:30;

预警:IF(ADX>90 AND PDI=0,30,0),COLORBLUE,LINETHICK2{XG51};
买:IF(crOSS(PDI,MDI) AND (C >1.05*REF(C,1) OR REF(C,1)>1.05*REF(C,2)) AND (V>2*REF(V,1) OR REF(V,1)>2*REF(V,2))AND MA(V,5)>MA(V,60) ,20,0),COLORWHITE,LINETHICK2{XG51};
买2:IF(CROSS(PDI,MDI) AND COUNT(预警,10)>=1,10,0),COLORLIMAGENTA,LINETHICK3;

0{XG51};
RSV9:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100{XG51};
K1:=SMA(RSV9,3,1){XG51};
DK1:=K1-REF(K1,1),COLORstICK{XG51};
出手就赢:IF(DK1>7 AND REF(DK1,1)<0 AND (DK1-REF(DK1,1))>9,50,0), STICK,COLORBLUE;DRAWICON(出手就赢>0,50 ,1){X=G^5-1=C=N={};