{东方求败}
股价:=(H+L+C)/3;
股价运动:=股价,LINETHICK2,COLORBLUE;
运动趋势:=XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(XMA(股价,3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3),3);
良机区1:=运动趋势*0.9;
良机区2:=运动趋势*0.875;
良机区3:=运动趋势*0.85;
涨1:=O<良机区3;
求败1:IF(涨1,0.3,0),COLOR0000FF;
涨2:=L<良机区2 AND 运动趋势>REF(运动趋势,1);
求败2:IF(涨2,0.5,0),COLOR008000;
涨3:=L<良机区3 AND 运动趋势>REF(运动趋势,1);
求败3:IF(涨3,1,0),COLOR00FFFF;
{黑马启动}
VAR6:=REF(LOW,1)*0.83;
VAR7:=LOW*0.1;
VAR8:=(VAR7*VOL+VAR6*(CAPITAL-VOL))/CAPITAL;
VAR9:=EMA(VAR8,60);
VARA:=EMA(VAR6,60);
VARB:=VARA-2;
VARC:=IF(C<=VAR9,VARB,VARA);
{VARD:=MA(C,80)-MA(C,10)/17;}
启动:=FILTER(VARC-VARB=0 AND CROSS((EMA(EMA(EMA(C,2),2),2)-REF(EMA(EMA(EMA(C,2),2),2),1))/REF
(EMA(EMA(EMA(C,2),2),2),1)*100,MA((EMA(EMA(EMA(C,2),2),2)
-REF(EMA(EMA(EMA(C,2),2),2),1))/REF(EMA(EMA(EMA(C,2),2),2),1)*100,3)),4);
马启:IF(启动,1.5,0),COLORFFFFFF;
{理想实现}
VARS2:=IF(MONTH<12,1,1);
VARS3:=(2.28*CLOSE+HIGH+LOW)/4;
VARS4:=LLV(LOW,34);
VARS5:=HHV(HIGH,34);
理想:=EMA((VARS3-VARS4)/(VARS5-VARS4)*100,13)*VARS2,LINETHICK4,COLORRED;
论坛:=EMA(0.667*REF(理想,1)+0.333*理想,2),LINETHICK2,COLORFF9933;
理想实现:(CROSS(理想,论坛) AND 理想<22),LINETHICK2,COLOR0099FF;
{横盘放量选股}
横盘放量:LAST((H-L)/REF(C,1)<0.1,20,0) AND VOL>REF(VOL,1)*2 AND C>REF(C,1)*1.03
AND "DMI.PDI">"DMI.MDI" AND CROSS("DMI.ADX","DMI.ADXR")
AND"DMI.ADXR">"DMI.MDI" AND "DMI.PDI">"DMI.ADX" AND"KDJ.D">REF("KDJ.D",1);
{STICKLINE(横盘放量,0,0.5,1,0),COLOR000099;}
{笑傲江湖}
DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26); {选股设JC=10即可}
DEA:=EMA(DIFF,9);
MACD:=2*(DIFF-DEA),COLORSTICK;
A:=IF(CROSS(0,DEA),1,0);
A1:=IF(DIFF<0 AND CROSS(DIFF,DEA),1,0);
SS:=IF(A,SUM(A1,0),0);
SSB:=HHV(SS,0);
SSS:=SUM(A1,0);
笑傲江湖:IF(SSS-SSB=2 AND SSS>REF(SSS,1),1.3,0),COLORFFFF00;
{终结者}
X:=1;
LGL:=IF(EMA(C,5)/EMA(EMA(C,9),16)<=0.85 AND C/REF(C,1)>0.905 AND C/REF(C,1)<1.05 AND VOL/CAPITAL*100<5,50,0);
WR1:=-100*(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34))+100*X;
WR2:=-100*(HHV(HIGH,50)-CLOSE)/(HHV(HIGH,50)-LLV(LOW,50))+100;
WR3:=-100*(HHV(HIGH,70)-CLOSE)/(HHV(HIGH,70)-LLV(LOW,70))+100*X;
BIAS1:=((CLOSE-MA(CLOSE,34))/MA(CLOSE,34)*100+10)*5;
BIAS2:=((CLOSE-MA(CLOSE,50))/MA(CLOSE,50)*100+10)*5;
BIAS3:=((CLOSE-MA(CLOSE,70))/MA(CLOSE,70)*100+10)*5;
S1:=(WR1+WR2+WR3+BIAS1+BIAS2+BIAS3)/6*X;
S2:=EMA(S1,3);
S3:=ABS(BIAS1-BIAS3);
SX:=(S1+S3)/2;
XC1:=(-1)*(EMA(100*(1-WINNER(CLOSE)),1)-50)+50;
CCC:=XC1+SX;
ZJZ:=IF( LGL>0 AND CCC<0,200,0)*X;
LXL:=IF(SX<0 AND C=LLV(C,5) AND C/REF(C,1)>0.905 AND C/REF(C,1)<1.05 AND
VOL/CAPITAL*100<5,-50,0);
JBJ:=IF(CCC<0 AND LXL=-50,100,0)*X;
MA3:= MA(C,3);
C0:=REF(C,2)*0.865;
C1:=REF(C,13)*0.772;
BOT:=MIN(C0,C1);
HSL:=100*VOL/CAPITAL*X;
MA13:=MA(C,13)*X;
CXC:=IF((C-BOT)/C<3/100 AND SUM(HSL,5)/5<1.8,1,0);
VMC:=IF(CXC>0 AND (LXL<0 OR LGL>0),100,0);
V满仓:=VMC;
V半仓A:=IF(((ZJZ>0 AND JBJ>0 AND SUM(VOL/CAPITAL*100,5)/5<1) OR (CXC>0 AND REF(C,1)/REF(C,2)>0.902)) OR
(((ZJZ>0 AND JBJ>0 AND SUM(VOL/CAPITAL*100,5)/5<1) OR CXC>0) AND (LXL<0 OR LGL>0)) AND VMC<10 ,50,0) ;
V93:=(((ZJZ>0 AND JBJ>0 AND SUM(VOL/CAPITAL*100,5)/5<1) OR CXC>0) AND (LXL<0 OR LGL>0)) ;
V90:=((ZJZ>0 AND JBJ>0 AND SUM(VOL/CAPITAL*100,5)/5<1) OR (CXC>0 AND REF(C,1)/REF(C,2)>0.902));
V半仓:=V93 OR V90;
XMM87:=V满仓 OR V半仓;
XMM91:=VMC;
G:=MA(CLOSE,80)-MA(CLOSE,10)/3*X;
初级:=IF(XMM87>0,1.5,0),STICK,LINETHICK2;
中级:IF(XMM91>0,1,0),STICK,COLORFF0080;
高级:IF(VMC>0 AND CLOSE<G,1.5,0),STICK,LINETHICK2;
{黑马底}
DIFF1:=EMA(DCLOSE,12)-EMA(DCLOSE,26);
DEA1:=EMA(DIFF1,9),COLORFFFF00;
A01:=BARSLAST(REF(CROSS(DIFF1,DEA1),1));
底背离:=REF(CLOSE,A01+1)>CLOSE AND DIFF1>REF(DIFF1,A01+1) AND CROSS(DIFF1,DEA1);
DEA0:=EMA(DIFF1*100,9);
MACD0:=2*(DIFF1*100-DEA0);
黑马:=(MACD0>REF(MACD0,1)*2.5 AND MACD0>15);
黑马0:(底背离 AND 黑马),COLORFF8000;
