[通达信指标]共振系列3 趋势共振VMACD EMV DPO DMA CHO ASI

LC:=REF(CLOSE,1);

AA:=ABS(HIGH-LC);

BB:=ABS(LOW-LC);

CC:=ABS(HIGH- REF(LOW,1));

DD:=ABS(LC-REF(OPEN,1));

R:=IF(AA> BB AND AA>CC,AA+ BB/2+ DD/4,IF(BB>CC AND BB> AA,BB+ AA/2+DD/4,CC+ DD/4));

X:=(CLOSE-LC +(CLOSE-OPEN)/2+LC- REF(OPEN,1));

SI:=8*X/R*MAX(AA,BB);

ASI:=SUM(SI,0);

MASI:=MA(ASI,6); 

MID:=SUM(VOL*(2*CLOSE-HIGH-LOW)/(HIGH+LOW),0);

CHO:=MA(MID,10)-MA(MID,20);

MACHO:=MA(CHO,6);

DIF:=MA(CLOSE,10)-MA(CLOSE,50);

DIFMA:=MA(DIF,10);

DPO:=CLOSE-REF(MA(CLOSE,20),20/2+1);

MADPO:=MA(DPO,6);

VOLUME:=MA(VOL,14)/VOL;

MID1:=100*(HIGH+LOW-REF(HIGH+LOW,1))/(HIGH+LOW);

EMV:=MA(MID1*VOLUME*(HIGH-LOW)/MA(HIGH-LOW,14),14);

MAEMV:=MA(EMV,19);

DIF1:=EMA(VOL,12)-EMA(VOL,26);

DEA1:=EMA(DIF1,9);

Q1:=ASI;

Q2:=MASI;

W1:=CHO;

W2:=MACHO;

E1:=DIF;

E2:=DIFMA;

R1:=DPO;

R2:=MADPO;

T1:=EMV;

T2:=MAEMV;

Y1:=DIF1;

Y2:=DEA1;

A1:=Q1>Q2;

B1:=Q1<Q2;

A2:=W1>W2;

B2:=W1<W2;

A3:=E1>E2;

B3:=E1<E2;

A4:=R1>R2;

B4:=R1<R2;

A5:=T1>T2;

B5:=T1<T2;

A6:=Y1>Y2;

B6:=Y1<Y2;

DRAWTEXT(ISLASTBAR=1,0.5,’    .ASI’),COLORFFFFFF;

DRAWTEXT(ISLASTBAR=1,1.5,’    .CHO’),COLORFFFFFF;

DRAWTEXT(ISLASTBAR=1,2.5,’    .DMA’),COLORFFFFFF;

DRAWTEXT(ISLASTBAR=1,3.5,’    .DPO’),COLORFFFFFF;

DRAWTEXT(ISLASTBAR=1,4.5,’    .EMV’),COLORFFFFFF;

DRAWTEXT(ISLASTBAR=1,5.5,’    .VMACD’),COLORFFFFFF;

7,COLOR000000;

0,COLOR000000;

DRAWICON(A6,6,1);

DRAWICON(B6,6,2);

DRAWICON(A5,5,1);

DRAWICON(B5,5,2);

DRAWICON(A4,4,1);

DRAWICON(B4,4,2);

DRAWICON(A3,3,1);

DRAWICON(B3,3,2);

DRAWICON(A2,2,1);

DRAWICON(B2,2,2);

DRAWICON(A1,1,1);

DRAWICON(B1,1,2);

STICKLINE(A6,5.5,6,2,0),COLORMAGENTA;

STICKLINE(B6,5.5,6,2,1),COLORLIGRAY;

STICKLINE(A5,4.5,5,2,0),COLORYELLOW;

STICKLINE(B5,4.5,5,2,1),COLORLIGRAY;

STICKLINE(A4,3.5,4,2,0),COLORRED;

STICKLINE(B4,3.5,4,2,1),COLORLIGRAY;

STICKLINE(A3,2.5,3,2,0),COLORGREEN;

STICKLINE(B3,2.5,3,2,1),COLORLIGRAY;

STICKLINE(A2,1.5,2,2,0),COLORBLUE;

STICKLINE(B2,1.5,2,2,1),COLORLIGRAY;

STICKLINE(A1,0.5,1,2,0),COLORCYAN;

STICKLINE(B1,0.5,1,2,1),COLORLIGRAY;