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

通达信九九归一走强副图指标 源码 贴图

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;