DEA := EMA(DIFF,9);
MACD:=2*(DIFF-DEA),COLORSTICK;
STICKLINE(L>REF(H,1) ,REF(H,1),L,4,-1),COLORDF00DF;
STICKLINE(H<REF(L,1) ,REF(L,1),H,4,-1),COLORDFDF00;
MA18:=MA(CLOSE,18);
MTM:=C-REF(C,1);
DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6);
买:=LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2));
DRAWTEXT(FILTER(买=1,5),LOW*0.97,'★大机构进场'),COLORRED;
卖一:=HHV(DX,2)=HHV(DX,7) AND COUNT(DX>50,2) AND CROSS(MA(DX,2),DX);
DRAWTEXT(FILTER(卖一=1,1),HIGH*1.01,'★精准卖'),COLORGREEN;
CURRBARSCOUNT:=DATACOUNT-BARPOS+1;
CY:=BARSLAST(CURRBARSCOUNT=100);
DD:=REFX1(IF(ISLASTBAR=1,LLV(L,CY),0),10000);
AA:=LAST(MACD>=REF(MACD,1),3,1);
BB:=MACD<REF(MACD,1);
CC:=LAST(MACD<=REF(MACD,1),3,1);
DD1:=MACD>REF(MACD,1);
SS:=CC AND DD1 AND MACD<0;
XX:=AA AND BB AND MACD>0;
A:=(3*C+H+L+O)/6;
XJ:=(A+0.618*REF(A,1)+0.382*REF(A,2)+0.236*REF(A,3)+0.146*REF(A,4))/2.382;
YCZXH:=(MA(HHV(A,2),5)+MA(HHV(A,2),13)+MA(HHV(A,2),21)+MA(HHV(A,2),32))/4;
YCZXL:=(MA(LLV(A,2),5)+MA(LLV(A,2),13)+MA(LLV(A,2),21)+MA(LLV(A,2),32))/4;
SMH:=EMA(YCZXH,21);
SML:=EMA(YCZXL,21);
SMJ:=(SML+SMH)/2;
PJ:=(10*A+9*REF(A,1)+8*REF(A,2)+7*REF(A,3)+6*REF(A,4)+5*REF(A,5)+4*REF(A,6)+3*REF(A,7)+2*REF(A,8)+REF(A,9))/55;
A1:=EMA(PJ,3),COLOR00400D;
A2:=EMA(PJ,5),COLOR00400D;
A3:=EMA(PJ,7),COLOR00400D;
A4:=EMA(PJ,9),COLOR00400D;
A5:=EMA(PJ,11),COLOR00400D;
A6:=EMA(PJ,1),COLOR00400D;
LX:=REF(XJ,1);
ZD:=(SMA(MAX(XJ-LX,0),5,1)/SMA(ABS(XJ-LX),5,1))*100;
KX1:=(CLOSE>=OPEN) AND ZD>=50;
KX2:=(CLOSE<OPEN) AND ZD>=50;
KX3:=(CLOSE>=OPEN) AND ZD<50;
KX4:=(CLOSE<OPEN) AND ZD<50;
FILLRGN(SMH,RGB(20,220,20),SMH,RGB(0,0,0));
FILLRGN(SML,RGB(20,220,20),SML,RGB(0,0,0));
FILLRGN(SMJ,RGB(20,220,20),SMJ,RGB(0,0,0));
FILLRGN(A6,RGB(250,250,20),A6,RGB(0,0,0));
FILLRGN(A5,RGB(250,250,20),A5,RGB(0,0,0));
FILLRGN(A4,RGB(250,250,20),A4,RGB(0,0,0));
FILLRGN(A3,RGB(250,250,20),A3,RGB(0,0,0));
FILLRGN(A2,RGB(250,250,20),A2,RGB(0,0,0));
FILLRGN(A1,RGB(250,250,20),A1,RGB(0,0,0));
FILLRGN(IF(A6<REF(A6,1),A6,NULL),RGB(20,200,200),IF(A6<REF(A6,1),A6,NULL),RGB(0,0,0));
FILLRGN(IF(A5<REF(A5,1),A5,NULL),RGB(20,200,200),IF(A5<REF(A5,1),A5,NULL),RGB(0,0,0));
FILLRGN(IF(A4<REF(A4,1),A4,NULL),RGB(20,200,200),IF(A4<REF(A4,1),A4,NULL),RGB(0,0,0));
FILLRGN(IF(A3<REF(A3,1),A3,NULL),RGB(20,200,200),IF(A3<REF(A3,1),A3,NULL),RGB(0,0,0));
FILLRGN(IF(A2<REF(A2,1),A2,NULL),RGB(20,200,200),IF(A2<REF(A2,1),A2,NULL),RGB(0,0,0));
FILLRGN(IF(A1<REF(A1,1),A1,NULL),RGB(20,200,200),IF(A1<REF(A1,1),A1,NULL),RGB(0,0,0));
FILLRGN(IF(CURRBARSCOUNT<=100,DD+MACD*1.5,NULL),RGB(230,12,12),DD,RGB(10,30,230));
FILLRGN(IF(CURRBARSCOUNT<=100,DD+MACD*1.5,NULL),RGB(230,30,12),DD,RGB(10,200,30));
IF(CURRBARSCOUNT<100,DD+MACD*1.5,NULL),COLORYELLOW;
DRAWICON(SS,L,1);
DRAWICON(XX,H,2);
