{开心抄月殳系统}
开心易友:=(CLOSE-MA(CLOSE,20))/MA(CLOSE,20)*100;
研制:=IF(开心易友>0,开心易友,0);
STICKLINE(开心易友>0,开心易友,0,5,0),colorred;
STICKLINE(开心易友>0 and c<ref(c,1),开心易友,0,5,0),ColorFF2626;
VARQS3:=EMA(CLOSE,2)-EMA(CLOSE,150);
VARQS4:=EMA(VARQS3,100);
VARQS5:=2*(VARQS3-VARQS4);
VARQS6:=POW(VARQS5,3)*0.1+POW(VARQS5,1);
黑马:=(IF(VARQS5>0.1,VARQS6,0))*3;
黑牛:=(CLOSE-MA(CLOSE,25))/MA(CLOSE,25)*100;
VARQS7:=MA(黑牛,17)+MA(黑牛,17)-REF(MA(黑牛,17),1);
VARQS8:=IF(MA(黑牛,17)<VARQS7,VARQS7,MA(黑牛,17));
行情转:=VARQS8-(EMA(黑牛,17)-VARQS8)*0.98;
Q:=cross(黑牛,行情转) and  黑牛>ref(黑牛,1) and 行情转<ref(行情转,5);
DRAWTEXT(Q,黑牛,'●'),colorf00ff0;
不参与:stickline(开心易友<0,开心易友,0,5,0),colorgreen;
绿色不参与:0,colorgreen;紫阳快牛B:0,colorf00ff0;
紫红紧跟上:0,colorred;升浪超强机:0,coloryellow;
{以下设置三线粘合}
ma1:=ema(c,10);
ma2:=ema(c,20);
ma3:=ema(c,30);
a1:=abs(ma1-ma2)+abs(ma2-ma3);
a2:=a1/c<1/100 and ma1>ref(ma1,1) and ma2>ref(ma2,1);
stickline(a2,0,4,3,0),coloryellow;
{以下设置一阳穿4线}
EMA7:=EMA(CLOSE,7);
EMA14:=EMA(CLOSE,14);
EMA25:=EMA(CLOSE,25);
EMA55:=EMA(CLOSE,55);
a12:=abs(ema7-ema14)+abs(ema14-ema25)+abs(ema25-ema55);
a22:=a1/c<1/100 and ema7>ref(ema7,1) and ema14>ref(ema14,1) and ema25>ref(ema25,1);
极强:CROSS(C,EMA7) AND CROSS(C,EMA14) AND CROSS(C,EMA25) AND CROSS(C,EMA25) AND CROSS(C,EMA55)
AND EMA7>REF(EMA7,1) AND EMA14>REF(EMA14,1) AND EMA25>REF(EMA25,1) AND EMA55>REF(EMA55,1),colorwhite;
stickline(极强,-20,0,2,0),colorwhite;
{以下设置经典选股}
VAR11:=MA(CLOSE,10)-EMA(CLOSE,10)*100;
VAR12:=MA(VAR11,5);
VAR13:=3*(VAR12-VAR11);
拉升:CROSS(VAR13,20),colorred;
drawtext(拉升,-4,'▲'),colorred;
{超强信号}
超强信号:=h/MA(h,5)*(1+5/100);
超强▲:cross(超强信号,1.15),coloryellow;
R:=if(超强信号>=1.15,-20,0),stick,linethick3,coloryellow;
drawtext(R,-4,'▲'),coloryellow;
drawtext(R,-8,'▲'),coloryellow;
drawtext(R,-12,'▲'),coloryellow;
{CD抄底xg}
MA32:=EMA(C,3);
LC1 := REF(CLOSE,1);
RSI4a:=SMA(MAX(CLOSE-LC1,0),4,1)/SMA(ABS(CLOSE-LC1),4,1)*100,linethick1,
COLORff99ff;
TYP:=(HIGH+LOW+CLOSE)/3;
CCI:=(TYP-MA(TYP,500))/(0.015*AVEDEV(TYP,500));
RSV:=(CLOSE-LLV(LOW,500))/(HHV(HIGH,500)-LLV(LOW,500))*100;
MTM:=CLOSE-REF(CLOSE,500);
VV:=(CCI<-100) AND (RSV<20) AND (MTM<0) AND (RSI4a<15);
转折●:Q,colorf00ff0;粘合:0,coloryellow;
底:if(VV,20,0),stick,colorgreen;
长rsva:=(CLOSE-LLV(LOW,89))/(HHV(HIGH,89)-LLV(LOW,89))*100;
长k89a:=SMA(长rsva,3,1);
长d89a:=SMA(长k89a,3,1);
中rsv27a:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100;
中k27a:=SMA(中rsv27a,3,1);
顶:=if(cross(长d89a,50) and 中k27a>ref(中k27a,1) and 中k27a>70,90,0),color00ff00;
drawtext(顶,0,'◆'),color00ff00;
不穿零大牛:0,colorred;
{抄底逃顶}
VAR222:=LLV(LOW,10);
VAR322:=HHV(HIGH,25);
{阶段卖出:=35}
动力线:=(EMA((CLOSE-VAR222)/(VAR322-VAR222)*4,4))*10;
清仓卖出:=CROSS(35,动力线);
STICKLINE(动力线>REF(动力线,1) ,动力线 ,REF(动力线,1),3 ,1),COLOryellow;
STICKLINE(动力线<=REF(动力线,1) ,动力线 ,REF(动力线,1),3 ,1),COLOR00FF00;
stickline(清仓卖出,38,39,10,0),color00ff00;
drawtext(清仓卖出,47,'▼'),color00ff00;
g:=20;m12:=4;m22:=2;q1:=30;
VAR232:=(CLOSE-LLV(LOW,g))/(HHV(HIGH,g)-LLV(LOW,g))*100;
VAR332:=SMA(VAR232,M12,1);
VAR432:=SMA(VAR332,M22,1);
机构减仓:=(VAR432>82 AND VAR332>89)*20,COLORf00ff0;
临界顶:=(VAR432>85 AND VAR332>95)*20,COLORGREEN;
drawtext(机构减仓,60,'▼'),colorf00ff0;
drawtext(临界顶,60,'▼'),colorgreen;