通达信全周期共振指标公式

DIF60:=EMA(CLOSE,12/4)-EMA(CLOSE,26/4);
DEA60:=EMA(DIF60,9/2);
STICKLINE(DIF60>=DEA60,42,46,2,0),COLORFF6600;
STICKLINE(DIF60<DEA60,42,46,3,1),COLORGRAY;
DRAWTEXT(CURRBARSCOUNT=10,44,'60分钟MACD'),COLORWHITE;
DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIF,9);
STICKLINE(DIF>=DEA,36,40,2,0),COLOR0088FF;
STICKLINE(DIF<DEA,36,40,3,1),COLORGRAY;
DRAWTEXT(CURRBARSCOUNT=10,38,'MACD日线'),COLOR00FFFF;
周MD:=MACD.DIF#WEEK;
周MA:=MACD.DEA#WEEK;
STICKLINE(周MD>=周MA,30,34,2,0),COLORFF00FF;
STICKLINE(周MD<周MA,30,34,3,1),COLORGRAY;
DRAWTEXT(CURRBARSCOUNT=10,32,'MACD周线'),COLOR00FFFF;
月MD:=MACD.DIF#MONTH;
月MA:=MACD.DEA#MONTH;
STICKLINE(月MD>=月MA,24,28,2,0),COLOR00CC00;
STICKLINE(月MD<月MA,24,28,3,1),COLORGRAY;
DRAWTEXT(CURRBARSCOUNT=10,26,'月MACD'),COLORWHITE;
RSV60:=(CLOSE-LLV(LOW,36))/(HHV(HIGH,36)-LLV(LOW,36));
K60:=SMA(RSV60,3,1);
D60:=SMA(K60,3,1);
STICKLINE(K60>=D60,18,22,2,0),COLOR00FFFF;
STICKLINE(K60<D60,18,22,3,1),COLORGRAY;
DRAWTEXT(CURRBARSCOUNT=10,20,'60分钟KDJ'),COLORFF00FF;
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9));
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
STICKLINE(K>=D,12,16,2,0),COLORFFFF00;
STICKLINE(K<D,12,16,3,1),COLORGRAY;
DRAWTEXT(CURRBARSCOUNT=10,14,'KDJ日线'),COLORFFFFFF;
周K:="KDJ.K#WEEK";
周D:="KDJ.D#WEEK";
STICKLINE(周K>=周D,6,10,2,0),COLOR4D4DFF;
STICKLINE(周K<周D,6,10,3,1),COLORGRAY;
DRAWTEXT(CURRBARSCOUNT=10,8,'KDJ周线'),COLORWHITE;
月K:="KDJ.K#MONTH";
月D:="KDJ.D#MONTH";
STICKLINE(月K>=月D,0,4,2,0),COLORFF00FF;
STICKLINE(月K<月D,0,4,3,1),COLORGRAY;
DRAWTEXT(CURRBARSCOUNT=10,2,'KDJ月线'),COLORWHITE;
XG1:=DIF60>=DEA60;
XG2:=DIF>=DEA;
XG3:=周MD>=周MA;
XG4:=月MD>=月MA;
XG5:=K60>=D60;
XG6:=K>=D;
XG7:=周K>=周D;
XG8:=月K>=月D;
XG9:=XG1 AND XG2 AND XG3 AND XG4 AND XG5 AND XG6 AND XG7 AND XG8;
XGE:=XG1+XG2+XG3+XG4+XG5+XG6+XG7+XG8;
STICKLINE(1,48,52,3,1),COLORGRAY;
DRAWNUMBER(1,52,XGE),COLORLIGRAY;
DRAWNUMBER(XGE=8,52,XGE),COLORRED;
共振:=REF(XG9,1)<>1 AND XG9=1,NODRAW;
STICKLINE(共振,0,46,3,0),COLORRED;
STICKLINE(共振,0,46,2,0),COLORFF0000;
DRAWTEXT(共振,48,'★全周期共振'),COLORRED;