{}
N:=5;
M:=13;
V1:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20);
V2:=(1-7/100)*(DMA(CLOSE,V1));
V3:=(1+7/100)*(DMA(CLOSE,V1));
V5:=MA((LOW+HIGH+CLOSE)/3,5);
支撑:REFDATE(V2,DATE),POINTDOT,LINETHICK3,COLORCC66FF;
阻力:REFDATE(V3,DATE),POINTDOT,LINETHICK3,COLORGREEN;
MA1:=MEMA(CLOSE,5);
MA2:=ATAN((MA1/REF(MA1,1)-1)*100)*180/3.1416;
MA3:=IF(MA2 0,MA2,MA2);
MA5:=MA(CLOSE,N);
MA13:=MA(CLOSE,M);
VAR1:=CLOSE=HHV(C,4) AND (REF(C,1) =REF(C,2) OR REF(C,1) =REF(C,3)) OR REF(C,1)=HHV(C,4) AND CLOSE =REF(C,2) OR REF(C,2)=HHV(C,4) AND REF(C,3)=LLV(C,4) AND C =REF(C,1) OR REF(C,3)=HHV(C,4) AND C =REF(C,1) AND C =REF(C,2);
VAR2:=CLOSE=HHV(C,4) AND REF(C,1)=LLV(C,4);
VAR3:=CLOSE=LLV(C,4) AND (REF(C,1) REF(C,2) OR REF(C,1) REF(C,3)) OR REF(C,1)=LLV(C,4) AND C REF(C,2) OR REF(C,2)=LLV(C,4) AND REF(C,1)=HHV(C,4) AND C REF(C,1) OR REF(C,3)=LLV(C,4) AND C REF(C,1) AND C REF(C,2);
VAR4:=REF(C,1)=LLV(C,4) AND C =REF(C,2) OR REF(C,2)=LLV(C,4) AND REF(C,1) =REF(C,3) AND REF(C,2) REF(C,4) AND C =REF(C,1);
VAR5:=REF(C,1)=HHV(C,4) AND C REF(C,2) OR (REF(C,2)=HHV(C,4) AND REF(C,1) REF(C,3) OR REF(C,3)=HHV(C,4) AND REF(C,1) REF(C,2)) AND REF(C,2) =REF(C,4) AND C REF(C,1);
VAR6:=V5 REF(V5,1) AND REF(V5,1) REF(V5,2);
VAR7:=LOW HHV(V5,13) AND HIGH HHV(V5,13) AND CLOSE REF(C,1) AND CLOSE OPEN;
VAR8:=VAR7 AND COUNT(VAR6,2);
VAR9:=100*EMA(EMA(C-REF(C,1),6),6)/EMA(EMA(ABS(C-REF(C,1)),6),6);
VAR10:=EMA(MA(C,13),13);
VAR11:=FILTER((LLV(VAR9,2)=LLV(VAR9,7) AND COUNT(VAR9 0,2) AND CROSS(VAR9,MA(VAR9,2)))=1,5);
VAR12:=FILTER((HHV(VAR9,2)=HHV(VAR9,7) AND COUNT(VAR9 50,2) AND CROSS(MA(VAR9,2),VAR9))=1,1);
VAR13:=SMA(EMA((C-REF(C,1))/REF(C,1),5)*100,3,1)*10;
VAR14:=FILTER(((CROSS(VAR13,0) OR CROSS(C,VAR10)) AND VAR11)=1,3);
VAR15:=MA(C,18) =REF(MA(C,18),3) AND CROSS(C,MA(C,18));
VAR16:=VAR8 AND NOT(REF(VAR8,1));
强攻:IF(MA3 REF(MA3,1) AND MA3 =0,MA13,DRAWNULL),COLORYELLOW,LINETHICK2;
回调:IF(MA3 REF(MA3,1) AND MA3 0,MA13,DRAWNULL),COLORGREEN,LINETHICK2;
{KDJ}
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
金叉:=CROSS(J,D);
死叉:=CROSS(D,J);
买1:=(VAR14 OR VAR15) AND VAR11;
买2:=(VAR14 OR VAR15) AND VAR4;
买3:=(VAR14 OR VAR15) AND VAR2;
买4:=(VAR2 AND VAR11) OR (VAR4 AND VAR11);
买5:=(金叉 AND VAR4) OR (金叉 AND VAR2) OR (金叉 AND VAR11);
{涨停}
STICKLINE(CLOSE REF(CLOSE,1)*1.0985 AND CLOSE=HIGH,CLOSE,OPEN,4,-1),COLOR00FFFF;
{跌停}
STICKLINE(CLOSE REF(CLOSE,1)*0.9015 AND CLOSE=LOW,CLOSE,OPEN,4,-1),COLORGREEN;
{蓝}
STICKLINE(OPEN =CLOSE,CLOSE,OPEN,3,0),COLORFF7700;
STICKLINE(OPEN =CLOSE,CLOSE,OPEN,2.2,0),COLORFF9900;
STICKLINE(OPEN =CLOSE,CLOSE,OPEN,1.5,0),COLORFFBB00;
STICKLINE(OPEN =CLOSE,CLOSE,OPEN,0.5,0),COLORCYAN;
{红}
STICKLINE(CLOSE OPEN,CLOSE,OPEN,3,0),COLOR000099;
STICKLINE(CLOSE OPEN,CLOSE,OPEN,2.2,0),COLOR0000CC;
STICKLINE(CLOSE OPEN,CLOSE,OPEN,1.5,0),COLOR0000FF;
STICKLINE(CLOSE OPEN,CLOSE,OPEN,0.5,0),COLORCC66FF;
{绿}
STICKLINE(VAR3,OPEN,(OPEN+CLOSE)/2,3,0),COLOR009900;
STICKLINE(VAR3,OPEN,(OPEN+CLOSE)/2,2.2,0),COLOR00BB00;
STICKLINE(VAR3,OPEN,(OPEN+CLOSE)/2,1.5,0),COLOR00DD00;
STICKLINE(VAR3,OPEN,(OPEN+CLOSE)/2,0.5,0),COLOR00FF00;
{灰}
STICKLINE(VAR4,OPEN,(OPEN+CLOSE)/2,3,0),COLOR999999;
STICKLINE(VAR4,OPEN,(OPEN+CLOSE)/2,2.2,0),COLORBBBBBB;
STICKLINE(VAR4,OPEN,(OPEN+CLOSE)/2,1.5,0),COLORDDDDDD;
STICKLINE(VAR4,OPEN,(OPEN+CLOSE)/2,0.5,0),COLORFFFFFF;
STICKLINE(金叉,OPEN,CLOSE,0.5,0),COLORYELLOW;
STICKLINE(死叉,OPEN,CLOSE,0.5,0),COLOR000099;
DRAWICON(VAR16,LOW-0.02,7);
DRAWICON(买1 OR 买2 OR 买3 OR 买4 OR 买5,LOW-0.01,1);
DRAWICON(死叉 OR VAR12 OR CROSS(40,VAR9),HIGH+0.01,2);
{}
AA05:=MA(C,5);
AA10:=MA(C,10);
AA20:=MA(C,20);
AA30:=MA(C,30);
五日乖离率:=(C-AA05)/AA05*100;
BB05:=ATAN((AA05/REF(AA05,1)-1)*100)*180/3.1416;
速度5:=SMA(EMA((AA05-REF(AA05,1))/REF(AA05,1),3)*100,3,1);
加速度5:=EMA((速度5-REF(速度5,1)),3),LINETHICK0;
BB10:=ATAN((AA10/REF(AA10,1)-1)*100)*180/3.1416;
三拾日乖离率:=(C-AA30)/AA30*100,LINETHICK0;
VARZ1:=(AA20-AA30) REF((AA20-AA30),1) AND AA20 REF(AA20,1) AND AA30 REF(AA30,1);
VARZ2:=(AA30-AA20) REF((AA30-AA20),1) AND AA20 REF(AA20,1) AND AA30 REF(AA30,1);
BB30:=ATAN((AA30/REF(AA30,1)-1)*100)*180/3.1416;
强势狙击:=FILTER(BB30 30 AND BB10 45 AND CROSS(BB05,60),10);
加仓:=FILTER(COUNT(CROSS(BB05,30),5) =1 AND AA05 REF(AA05,1) AND 三拾日乖离率 REF(三拾日乖离率,1) AND AA10 REF(AA10,1)
AND 加速度5 REF(加速度5,1) AND 速度5 REF(速度5,1) ,10) ;
清仓:=FILTER(COUNT(CROSS(30,BB05),5) =1 AND (C AA30 OR O AA30) AND AA05 REF(AA05,1) AND 三拾日乖离率 REF(三拾日乖离率,1) AND AA10 REF(AA10,1),10);
DRAWTEXT(加仓 ,LOW*0.98,' 加仓'),COLORRED;
JC:=CROSS(0,五日乖离率) AND 三拾日乖离率 REF(三拾日乖离率,1) AND AA10 REF(AA10,1) ;
减仓:=FILTER(JC,10);
MR:=COUNT(CROSS(五日乖离率,0),3) =1 AND 三拾日乖离率 REF(三拾日乖离率,1) AND AA05 REF(AA05,1) AND (C/REF(C,1)-1)*100 5 AND REF(C,1) AA30;
买入:=FILTER(MR,10);
DRAWTEXT(减仓,HIGH*1.02,' 减仓'),COLORCYAN;
DRAWTEXT(买入,LOW*0.98,' 买入'),COLORYELLOW;
DRAWTEXT(清仓 ,HIGH*1.02,' 清仓'),COLORGREEN;
DRAWTEXT(强势狙击,LOW*0.98,' 强势狙击'),COLORYELLOW;
{}
重心:(2*C+H+L)/4,COLOR00FFFF,LINETHICK0;
SJ:=WMA((重心-LLV(L,5))/(HHV(H,5)-LLV(L,5))*100,2);
ZJ:=WMA(0.618*REF(SJ,1)+0.382*SJ,2);
DRAWTEXT(CROSS(SJ,ZJ) AND SJ 30,L-0.1,' 低吸'),COLOR00FF00;
DRAWTEXT(CROSS(ZJ,SJ) AND SJ 70,H+0.1,' 高抛'),COLOR0077FF;
{预测明天}
XXS:=MA(LOW,5)*(1-5/100);
XXS1:=MA(HIGH,5)*(1+5/100);
均线:=C,COLORGREEN;
AAAA:=CLOSE/REF(CLOSE,3) =0.85 AND CROSS(C,XXS) AND C REF(C,1),LINETHICK0 ;
DRAWTEXT(AAAA,L*0.95,'下影买'),COLORRED;
BBAA:=CROSS(XXS1,C);
DRAWTEXT(CROSS(XXS1,C),H,'开盘逃'),COLORWHITE;
DDDD:=CROSS(C,XXS1);
DRAWTEXT(DDDD,H,'明日走'),COLORYELLOW;
{}
M5:=MA(C,5);
MB1:=EMA(WINNER(C)*100,5);
MB2:=EMA(MB1,2);
MB3:=EMA(MB2,2);
MB4:=EMA(MB3,2);
VART2:=MB1;
VART3:=DRAWLINE(VART2 =HHV(VART2,5)=1,VART2,VART2 =LLV(VART2,5)=1,VART2,0);
顶G:=IF(VART2=VART3,VART2,DRAWNULL);
XDG:=REF(VART2,1)=REF(VART3,1) AND VART2 REF(VART2,1);
买入条件:=TFILTER(XDG,顶G,1);
卖出条件:=TFILTER(顶G,XDG,0);
买入价:=IF(买入条件,C,DRAWNULL);
卖出价:=IF(卖出条件,C,DRAWNULL);
DRAWICON(买入条件,L,1);
DRAWICON(卖出条件,H*1.02,2);
{绝买主图}
QK:=(C+H+L)/3;
QD:=MA(QK,4);
AA:QD,COLORWHITE,LINETHICK2;
AB:HHV(QD,13),COLORRED,LINETHICK2;
AC:LLV(QD,8),COLORYELLOW,LINETHICK2;