通达信K线回顾主图未加密选股指标公式源码

通达信K线回顾主图未加密选股指标公式源码

源码正文：

N:=2{XG51};
OK:=ema(O,60){XG51};
CG:=Ema(C,60){XG51};
PDU:=IF(OK>REF(OK,1) AND CG>REF(CG,1),1,0){XG51};
Z1:=MA(C,13){XG51};
ZX:=REF(Z1,13/2+1){XG51};
LIFE:=(EMA(C,60)+EMA(C,90))/2{XG51};
VAR1:=(2*C+H+L)/4{XG51};
SNOOK:=EMA(VAR1,99)*0.91{XG51};
A1:=(C-REF(C,1))/REF(C,1)*100{XG51};
MA5:=BArslAst(A1>3){XG51};
MA20:=IF(MA5>0,1,0){XG51};
STICKLINE(C>ZX AND C>=LIFE,O,C,3,0),COLOR0000FF{XG51};
STICKLINE(C>ZX AND C<=SNOOK,O,C,3,0),COLOR00FF00{XG51};
STICKLINE(C>ZX AND C>SNOOK AND C<LIFE,O,C,3,0),COLORFF0000{XG51};
STICKLINE(C>ZX AND MA20=0,O,C,3,0),COLOR00FFFF{XG51};
STICKLINE(C>ZX,O,C,1,0),COLORFFFFFF{XG51};
DRAWICON(crOSS(C,ZX),L*0.99,1){XG51};
DRAWICON(CROSS(ZX,C),H*1.01,5){XG51};
BY20:=MA(C,5){XG51};
招财猫:=MA(C,20),LINETHICK2,COLOR00FFFF{XG51};
鼠变异:=IF(BY20>招财猫,招财猫,BY20),LINETHICK2,COLOR808080{XG51};
选股:=CROSS(C,ZX) AND C>ZX AND MA20=0 ,LINETHICK0{XG51};
RB:=BARSCOUNT(C)=ISLASTBAR{XG51};
RD:=BARSLAST(RB){XG51};
K2:=HHV(H,50){XG51};
K1:=LLV(L,50){XG51};
T1:=C>ZX AND C>=LIFE{XG51};
T2:=C>ZX AND C>SNOOK AND C<LIFE{XG51};
T3:=C>ZX AND C<=SNOOK{XG51};
T4:=C<=ZX{XG51};
T5:=鼠变异>REF(鼠变异,1) AND 鼠变异!=招财猫 {XG51};
T6:=鼠变异>REF(鼠变异,1) AND 鼠变异=招财猫 AND PDU!=1{XG51};
T7:=鼠变异>REF(鼠变异,1) AND 鼠变异=招财猫 AND PDU=1{XG51};
T8:=C>ZX AND MA20=0 {XG51};
EEE:=T1+T2+T3+T4+T5+T6+T7+T8 {XG51};
E:=(K2-K1)/(EEE+8) {XG51};
DRAWTEXT(C>0 AND T1>0 AND ISLASTBAR,K2-E,'出洞了逮住它！'),COLOR0000FF{XG51};
DRAWTEXT(C>0 AND T2>0 AND ISLASTBAR,K2-E,'鼠玩猫守着它！，'),COLORFF7700{XG51};
DRAWTEXT(C>0 AND T3>0 AND ISLASTBAR,K2-E,'露尾巴动作快！，'),COLOR00FF00{XG51};
DRAWTEXT(C>0 AND T4>0 AND ISLASTBAR,K2-E,'没有了打个盹！，'),COLOR808080{XG51};
DRAWTEXT(C>0 AND T5>0 AND ISLASTBAR,K2-E*2,'发现鼠迹！'),COLOR00FF00{XG51};
DRAWTEXT(C>0 AND T6>0 AND ISLASTBAR,K2-E*2,'瞬间鼠影！'),COLORFF66FF{XG51};
DRAWTEXT(C>0 AND T7>0 AND ISLASTBAR,K2-E*2,'恶鼠难遁！'),COLOR0000FF{XG51};
开:REF(OPEN,N-1)NODRAW{XG51};
收:REF(CLOSE,N-1)NODRAW,COLORBLUE{XG51};
高:REF(HIGH,N-1)NODRAW,COLORRED{XG51};
低:REF(LOW,N-1)NODRAW,COLORBLUE{XG51};
DRAWKLINE(高,开,低,收){X~G-5-1~C~N~{};

通达信KDJ+MACD金叉共振风险区未加密选股指标公式源码

源码正文：

dif:(ema(CLOSE,12)-Ema(CLOSE,26))*100{XG51};
DEA:EMA(DIF,9){XG51};
macd:(DIF-DEA)*2,COLORstICK{XG51};
DRAWICON(crOSS(DIF,DEA),DEA,1){XG51};
DRAWICON(CROSS(DEA,DIF),DEA,2){XG51};
IF(DIF<DEA,DIF,DRAWNULL),COLORCYAN{XG51};
DD:=C=HHV(C,180){XG51};
EE:=DEA< REF(DEA,1) AND REF(DEA< REF(DEA,1),1)=1{XG51};
CC:=C> REF(C,1) AND REF(C> REF(C,1),1)=1{XG51};
顶背离:=(DD AND EE AND DEA< HHV(DEA,180))*DEA{XG51};
A2:=BArslAST(REF(CROSS(DEA,DIF),1)){XG51};

DRAWLINE(A2=0,DEA,顶背离,DEA,0),COLORWHITE,LINETHICK2{XG51};
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100{XG51};
K:SMA(RSV,9,3),COLORBLUE{XG51};
D:SMA(K,9,3),COLORRED{XG51};
J:3*K-2*D,COLORLIMAGENTA{XG51};
IF(J<D,J,DRAWNULL),COLORFFEE44{XG51};
0,COLORWHITE,LINETHICK2;20,COLORMAGENTA{XG51};
80,COLORYELLOW;100,COLORCYAN,LINETHICK2{XG51};
DRAWTEXT(ISLASTBAR,0,'高安全区'),COLORWHITE{XG51};
DRAWTEXT(ISLASTBAR,20,'安 全 区'),COLORMAGENTA{XG51};
DRAWTEXT(ISLASTBAR,80,'风 险 区'),COLORYELLOW{XG51};
DRAWTEXT(ISLASTBAR,100,'高风险区'),COLORCYAN{XG51};
A1:=BARSLAST(REF(CROSS(DIF,DEA),1)){XG51};
B1:=REF(C,A1+1)>C AND REF(DIF,A1+1)<DIF AND CROSS(DIF,DEA){XG51};
A22:=BARSLAST(REF(CROSS("kdj.K"(9,3,3),"kdJ.D"(9,3,3)),1)){XG51};
B2:=REF(C,A22+1)>C AND REF("KDJ.K"(9,3,3),A22+1)<"KDJ.K"(9,3,3) AND CROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3)){XG51};
A3:=BARSLAST(REF(CROSS("rsi.RSI1"(6,12,24),"RSI.RSI2"(6,12,24)),1)){XG51};
B3:=REF(C,A3+1)>C AND REF("RSI.RSI1"(6,12,24),A3+1)<"RSI.RSI1"(6,12,24) AND CROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24)){XG51};
DRAWTEXT(B1,DEA-0.20,'▲MacD底背'),COLORRED{XG51};
DRAWTEXT(B2,D-0.20,'●KDJ底背'),COLORFF00FF{XG51};
A:=CROSS(DIF,DEA) AND CROSS(K,D) AND CROSS(J,D){XG51};
DRAWICON(A,LOW*0.98,1){XG51};
B4:CROSS(DIF,DEA) AND CROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3)){XG51};
DRAWTEXT(B4,L-0.20,'★金叉共振'),COLOR0099FF{XG51};
DRAWICON(CROSS(K,D),D,1){XG51};
DRAWICON(CROSS(D,K),D,2){XG51};
BA:=DEA>REF(DEA,1){XG51};
BB:=SUM(BA,5)>=4{XG51};
BC:=C<O{XG51};
BD:=SUM(BC,5)>=2{XG51};
BXG:FILTER(BB AND BD AND J>REF(J,1) AND REF(J,1)<REF(J,2),3){XG51};
STICKLINE(BXG,HHV(J,60),HHV(J,60)-20,1,0),COLORWHITE{XG51};
SS:=EMA(C,11){XG51};
LL:=(EMA(C,1)+EMA(C,2)+EMA(C,3)+EMA(C,5))/4{XG51};

AA:=(C-LLV(C,10))/(HHV(C,10)-LLV(C,10)){XG51};
(CROSS(AA,0.05)-1){X~G_5_1~C~N~{};