常用指标三合一，共振把握高，主图和副图显示两种。

{共振多空判势}

SJ:=1;

DIFF:=(EMA(CLOSE,12) - EMA(CLOSE,26))*4.1;

DEA:=EMA(DIFF,9); 

MA601:=MA(C,60);

DKB:MA601+DIFF,COLORWHITE,LINETHICK1;

DKA:MA601+DEA,COLORYELLOW,LINETHICK1;

IF(DKB>=DKA,DKB,DKA),COLOR408080; 

IF(DKB<DKA,DKB,DKA),COLORFFFF00; 

DRAWBAND(DKB,RGB(140,72,197),DKA,RGB(50,100,10));

VAR2:=EMA(CLOSE,128)*SJ;

VAR3:=(CLOSE*SJ-VAR2*SJ)*2/(128+1)+VAR2;

生命线:VAR3*SJ,LINETHICK2,COLOR0000FF;

XCLOSE2:=EMA((OPEN+HIGH+LOW+CLOSE)/4,3);

IF((生命线>=XCLOSE2),生命线,DRAWNULL),LINETHICK2,COLOR00FF00;

IF((生命线<XCLOSE2),生命线,DRAWNULL),LINETHICK2,COLOR0000FF;

MA3:=MA(C,170);

HH1:=IF(H<REF(H,1)&&REF(H,1)<REF(H,2),REF(H,2),0);

LL1:=IF(L>REF(L,1)&&REF(L,1)>REF(L,2),REF(L,2),0);

HH2:=VALUEWHEN(HH1>0,HH1);

LL2:=VALUEWHEN(LL1>0,LL1);

HH:=HHV(HIGH,1)/10*SJ+HHV(HIGH,2)/10+HHV(HIGH,2)/10+HHV(HIGH,4)/10+HHV(HIGH,4)/10+HHV(HIGH,8)/10+HHV(HIGH,8)/10+HHV(HIGH,13)/10+HHV(HIGH,40)/10+HHV(HIGH,20)/10;

LL:=LLV(LOW,1)/10*SJ+LLV(LOW,2)/10+LLV(LOW,2)/10+LLV(LOW,4)/10+LLV(LOW,4)/10+LLV(LOW,8)/10+LLV(LOW,8)/10+LLV(LOW,13)/10+LLV(LOW,40)/10+LLV(LOW,20)/10;

H1:=IF(HH<REF(HH,1)&&LL<REF(LL,1)&&REF(OPEN,1)>CLOSE&&OPEN>CLOSE&&(HHV(OPEN,0)-CLOSE)>0,REF(HH,2),0);

L1:=IF(LL>REF(LL,1)&&HH>REF(HH,1)&&REF(OPEN,1)<CLOSE&&OPEN<CLOSE&&(CLOSE-LLV(OPEN,0))>0,REF(LL,2),0);

X:=DATE;

X0:=H1,LINETHICK2;

X00:=L1;

XXX0:=O,LINETHICK2;

XXX00:=C;

XXX000:=H;

XXX0000:=L;

H2:=VALUEWHEN(X0>0,X0),LINETHICK2;

L2:=VALUEWHEN(X00>0,X00),LINETHICK2;

K1:=IF(CLOSE>H2,-3,IF(CLOSE<L2,1,0));

K2:=VALUEWHEN(K1<>0,K1);

G:=IF(K2=1,H2,L2);

G1:=VALUEWHEN(ISLASTBAR,G);

DRAWNUMBER(L>0,G1,G1),COLORCYAN;

DRAWNUMBER(LL>0,G1,G1),COLORWHITE;

X000:=K2,LINETHICK2;

TMP:=K2,LINETHICK2;

W1:=X000,LINETHICK2;

X0000:=OPEN-CLOSE,LINETHICK2;

W2:=X0000,LINETHICK2;

HT:=IF(OPEN>CLOSE,OPEN,CLOSE),LINETHICK2;

LT:=IF(OPEN<CLOSE,OPEN,CLOSE),LINETHICK2;

STICKLINE(W1=1,XXX000,HT,0,0),COLORCYAN;

STICKLINE(W1=1,XXX0000,LT,0,0),COLORCYAN;

STICKLINE(W1=-3,XXX000,HT,0,0),COLORRED;

STICKLINE(W1=-3,XXX0000,LT,0,0),COLORRED;

STICKLINE(W1>0,XXX0,XXX00,3,1),COLORCYAN;

STICKLINE(W1<=0,XXX0,XXX00,3,1),COLORRED;

STICKLINE(W2>0&&W1<=0,XXX0,XXX00,3,0),COLORRED;