指标公式第649篇：通达信筹码多空共振指标

ZYG8:=600*(EMA(C,3)-EMA(L,30))/EMA(L,30);
ZYG9:=EMA(ZYG8,7);
ZYGA:=(WINNER(120*C/100)-WINNER(100*C/100))*100;
ZYGB:=(-100)*(WINNER(120*C/100)-WINNER(100*C/100))+5;
底买入1:IF(ZYGA+ZYGB< 7 AND CROSS(ZYG8,ZYG9) AND ZYG9< -18 AND ZYG9< ZYGB,60,50);
ZYGC:=(2*C+H+L)/4;
ZYGD:=LLV(L,34);
ZYGE:=HHV(H,34);
ZYGF:=LLV(L,21);
ZYG10:=HHV(H,21);
ZYG11:=EMA((ZYGC-ZYGF)/(ZYG10-ZYGD)*100,5);
ZYG12:=EMA((ZYGC-ZYGD)/(ZYGE-ZYGD)*100,8);
X:=ZYG11,COLORWHITE;
顶区:ZYG12;DRAWTEXT_FIX(C>O,0.5,0.5,0,'留下联系方式，稍后添加您'),COLORF000FF;
STICKLINE(ZYG11-ZYG12+20>=20 ,ZYG11-ZYG12+20 ,20 ,5 ,0 ),COLORF000FF;
ZYG13:=EMA(ZYG12,5);
STICKLINE(ZYG12>0 AND (ZYG12-ZYG13)>=0 ,80 ,78 ,6 ,0 ),COLORRED;
STICKLINE(ZYG12>0 AND (ZYG12-ZYG13)< 0 ,80 ,78 ,6 ,1 ),COLORGREEN;
STICKLINE(ZYG12>0 AND (ZYG12-ZYG13)>=0 ,20 ,18 ,6 ,0 ),COLORRED;
STICKLINE(ZYG12>0 AND (ZYG12-ZYG13)< 0 ,20 ,18 ,6 ,1 ),COLORGREEN;
STICKLINE(ZYG12>ZYG13 , ZYG12,ZYG13,15 ,0 ),COLORYELLOW;
DRAWICON(CROSS(X,50),50*1.002,23);
共振:=BARSLASTCOUNT((ZYG12>0 AND (ZYG12-ZYG13)>=0) AND ZYG12>ZYG13)=1;
DRAWICON(共振,20*1.002,9);
DRAWICON(共振,80*1.002,26);
DRAWICON(X>80,80*1.002,6);

ZYG8:=600*(EMA(C,3)-EMA(L,30))/EMA(L,30);
ZYG9:=EMA(ZYG8,7);
ZYGA:=(WINNER(120*C/100)-WINNER(100*C/100))*100;
ZYGB:=(-100)*(WINNER(120*C/100)-WINNER(100*C/100))+5;
ZYGC:=(2*C+H+L)/4;
ZYGD:=LLV(L,34);
ZYGE:=HHV(H,34);
ZYGF:=LLV(L,21);
ZYG10:=HHV(H,21);
ZYG11:=EMA((ZYGC-ZYGF)/(ZYG10-ZYGD)*100,5);
ZYG12:=EMA((ZYGC-ZYGD)/(ZYGE-ZYGD)*100,8);
ZYG13:=EMA(ZYG12,5);
QXS:=NOT(CODELIKE('4'));
QKC:=NOT(CODELIKE('688'));
QST:=IF(NAMELIKE('S'),0,1);
QXX:=IF(NAMELIKE('*'),0,1);
QBJ:=NOT(CODELIKE('8'));
DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIF,9);
MACD:=(DIF-DEA)*2;
ZYG:=MACD>0;
ABD:=QXS AND QST AND QKC AND QXX AND QBJ;
共振:=BARSLASTCOUNT((ZYG12>0 AND (ZYG12-ZYG13)>=0) AND ZYG12>ZYG13)=1 AND ABD;
共振 AND ZYG AND C>O;

ZYG10:=HHV(H,21);
ZYGC:=(2*C+H+L)/4;
ZYGD:=LLV(L,34);
ZYGE:=HHV(H,34);
ZYGF:=LLV(L,21);
ZYG11:=EMA((ZYGC-ZYGF)/(ZYG10-ZYGD)*100,5);
X:=ZYG11,COLORWHITE;
QXS:=NOT(CODELIKE('4'));
QKC:=NOT(CODELIKE('688'));
QST:=IF(NAMELIKE('S'),0,1);
QXX:=IF(NAMELIKE('*'),0,1);
QBJ:=NOT(CODELIKE('8'));
DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIF,9);
MACD:=(DIF-DEA)*2;
ZYG:=MACD>0;
ABD:=QXS AND QST AND QKC AND QXX AND QBJ;
CROSS(X,50) AND ZYG AND ABD AND C>O;