通达信九九归一走强指标公式源码

DIFF:=EMA(CLOSE,8)-EMA(CLOSE,13);
DEA:=EMA(DIFF,5);
DRAWICON(DIFF>DEA,1,1);
DRAWICON(DIFF<DEA,1,2);
DRAWTEXT(ISLASTBAR=1,1,'.macd'),COLORWHITE;
B1:=DIFF>DEA;
MacD金叉:=IF(B1,1,0),COLORWHITE;
RSV1:=(CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100;
K:=SMA(RSV1,3,1);
D:=SMA(K,3,1);
DRAWICON(K>D,2,1);
DRAWICON(K<D,2,2);
DRAWTEXT(ISLASTBAR=1,2,'.kdj'),COLORFFFFFF;
B2:=K>D;
kdJ金叉:=IF(B2,2,0),COLORWHITE;
LC:=REF(CLOSE,1);
rsi1:=(SMA(MAX(CLOSE-LC,0),5,1))/(SMA(Abs(CLOSE-LC),5,1))*100;
RSI2:=(SMA(MAX(CLOSE-LC,0),13,1))/(SMA(ABS(CLOSE-LC),13,1))*100;
DRAWICON(RSI1>RSI2,3,1);
DRAWICON(RSI1<RSI2,3,2);
DRAWTEXT(ISLASTBAR=1,3,'.RSI'),COLORFFFFFF;
B3:=RSI1>RSI2;
RSI金叉:=IF(B3,3,0),COLORWHITE;
RSV:=-(HHV(HIGH,13)-CLOSE)/(HHV(HIGH,13)-LLV(LOW,13))*100;
Lwr1:=SMA(RSV,3,1);
LWR2:=SMA(LWR1,3,1);
DRAWICON(LWR1>LWR2,4,1);
DRAWICON(LWR1<LWR2,4,2);
DRAWTEXT(ISLASTBAR=1,4,'.LWR'),COLORFFFFFF;
B4:=LWR1>LWR2;
LWR金叉:=IF(B4,4,0),COLORWHITE;
bbi:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
DRAWICON(CLOSE>BBI,5,1);
DRAWICON(CLOSE<BBI,5,2);
DRAWTEXT(ISLASTBAR=1,5,'.BBI'),COLORFFFFFF;
B5:=CLOSE>BBI;
BBI金叉:=IF(B5,5,0),COLORWHITE;
mtm:=CLOSE-REF(CLOSE,1);
mms:=100*EMA(EMA(MTM,5),3)/EMA(EMA(ABS(MTM),5),3);
MMM:=100*EMA(EMA(MTM,13),8)/EMA(EMA(ABS(MTM),13),8);
DRAWICON(MMS>MMM,6,1);
DRAWICON(MMS<MMM,6,2);
DRAWTEXT(ISLASTBAR=1,6,'.MTM'),COLORFFFFFF;
B6:=MMS>MMM;
MTM金叉:=IF(B6,6,0),COLORWHITE;
DRAWICON(MA(V,5)>MA(V,10),7,1);
DRAWICON(MA(V,5)<MA(V,10),7,2);
DRAWTEXT(ISLASTBAR=1,7,'.筹码'),COLORFFFFFF;
B7:=MA(V,5)>MA(V,10);
筹码金叉:=IF(B7,7,0),COLORWHITE;
TYP:=(HIGH+LOW+CLOSE)/3;
cci:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
DRAWICON(CCI>0,8,1);
DRAWICON(CCI<0,8,2);
DRAWTEXT(ISLASTBAR=1,8,'.CCI'),COLORFFFFFF;
B8:=CCI>0;
CCI金叉:=IF(B8,8,0),COLORWHITE;
CC:=(C+O+H+L)/4;
DRAWICON(CC>SAR(4,2,20),9,1);
DRAWICON(CC<sar(4,2,20),9,2);
DRAWTEXT(ISLASTBAR=1,9,'.SAR'),COLORFFFFFF;
B9:=CC>SAR(4,2,20);
SAR金叉:=IF(B9,9,0),COLORWHITE;
红:B1+B2+B3+B4+B5+B6+B7+B8+B9,NODRAW;
绿:9-红,NODRAW;
买:IF((B1 AND B2 AND B3 AND B4 AND B5 AND B6 AND B7 AND B8 AND B9)
AND REF(B1 AND B2 AND B3 AND B4 AND B5 AND B6 AND B7 AND B8 AND B9,1)=0,10,0),COLORYELLOW,LINETHICK2;
天数:BArslASTCOUNT(B1 AND B2 AND B3 AND B4 AND B5 AND B6 AND B7 AND B8 AND B9),NODRAW;
九:=B1 AND B2 AND B3 AND B4 AND B5 AND B6 AND B7 AND B8 AND B9;
九九归一:IF(九 AND REF(九,1)=0,9,DRAWNULL)STICK,COLORRED,LINETHICK6;