大盘顶底(通达信)

源码正文：

difF:=ema(CLOSE,12)-Ema(CLOSE,27){XG51};
DEA:=EMA(DIFF,9){XG51};
macd:=(2)*(DIFF-DEA){XG51};
A1:=BArslAst(REF(crOSS(DIFF,DEA),1)){XG51};
接近大盘底:=(REF(CLOSE,A1+1)>CLOSE) AND (DIFF>REF(DIFF,A1+1)) AND CROSS(DIFF,DEA){XG51};
STICKLINE(接近大盘底,0,0.1,10,0),COLOR0000FF{XG51};
DRAWTEXT(接近大盘底,0.01,'接近大盘底'),COLORRED{XG51};
A2:=BARSLAST(REF(CROSS(DEA,DIFF),1)){XG51};
大盘顶:=(REF(CLOSE,A2+1)<CLOSE) AND (REF(DIFF,A2+1)>DIFF) AND CROSS(DEA,DIFF){XG51};
STICKLINE(大盘顶,0,0.1,10,0),COLOR00FF00{XG51};
DRAWTEXT(大盘顶,0.01,'大盘顶'),COLORBLUE{X.G.5_1.C.N.{};

源码正文：

N1:=7;N2:=27{XG51};
stICKLINE(C>0,40,60,10,0),COLORBROWN{XG51};
RSV:=(CLOSE-LLV(LOW,N1))/(HHV(HIGH,N1)-LLV(LOW,N1))*100{XG51};
短K:SMA(RSV,3,1),COLORF580F5,LINETHICK0{XG51};
短D:Sma(短K,3,1),COLORCCDD33,LINETHICK0{XG51};
RSV1:=(CLOSE-LLV(LOW,N2))/(HHV(HIGH,N2)-LLV(LOW,N2))*100{XG51};
中K:SMA(RSV1,5,1),COLORWHITE,LINETHICK0{XG51};
中D:SMA(中K,10,1),COLOR33AA33,LINETHICK0{XG51};
底线:10,COLORRED{XG51};
顶线:90,,COLORRED{XG51};
STICKLINE(短K>短D,短K,短D,3,1),COLORF580F5{XG51};
STICKLINE(短K<=短D,短K,短D,3,1),COLORCCDD33{XG51};
STICKLINE(中K>中D,中K,中D,2,0),COLOR0000EF{XG51};
STICKLINE(中K<=中D,中K,中D,2,0),COLOR33AA33{XG51};
中J:=3*中K-2*中D,COLORFF00FF{XG51};
超跌:IF(中J<0,10,0),COLORLIBLUE{XG51};
BDDD:=LLV(中J,2)=LLV(中J,8){XG51};
重启:IF(crOSS(中J,REF(中J+0.01,1)) AND BDDD AND 中J<20,10,-10),COLORLICYAN{XG51};
加码:IF(CROSS(中J,REF(中J+0.01,1)) AND BDDD AND BETWEEN(中J,20,60),1,0),COLORWHITE,NODRAW{XG51};
BDGD:=HHV(中J,2)=HHV(中J,8) AND 中J>80{XG51};
小心:IF(CROSS(REF(中J-0.01,1),中J) AND REF(BDGD,1),90,120),COLORBLUE{XG51};
DRAWICON(加码,中J,1);

RSV1A:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100{XG51};
K1:=SMA(RSV1,5,1){XG51};
D1:=SMA(K1,5,1){XG51};
J1:=3*K1-2*D1{XG51};
AA1:=ema(J1,5){XG51};
AA2:=REF(AA1,1){XG51};
DRAWBAND(AA1,RGB(255,255,0),AA2,RGB(0,255,0)){XG51};
RSV2:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100{XG51};
K2:=SMA(RSV2,3,1){XG51};
D2:=SMA(K2,3,1){XG51};
J2:=3*K2-2*D2{XG51};
BB1:=EMA(J2,5){XG51};
BB2:=REF(BB1,1){XG51};
DRAWBAND(BB1,RGB(255,0,0),BB2,RGB(0,0,255)){XG51};
DD:=AA1>AA2 AND BB1>BB2{XG51};
注意买入:DD AND NOT(REF(DD,1)) AND (AA1<50 OR BB1<50) ,LINETHICK0{XG51};
DRAWICON(注意买入,-5,1){XG51};
注意卖出:REF(DD,1)=1 AND NOT(DD),LINETHICK0{XG51};
DRAWICON(注意卖出,105,2){X=G^5-1=C=N={};