陈琛牵牛（大智慧公式）

0443

{陈琛牵牛}{大智慧版本}
{参数N:1,20,5;请根据自己需要随便调整}
买盘:=EMA(IF(C>O,V/((H-L)*2-ABS(C-O))*(H-L),IF(C<O,V/((H-L)*2-ABS(C-O))*((H-O)+(C-L)),V/2)),2)/(V/10);
卖盘:=EMA(IF(C>O,0-V/((H-L)*2-ABS(C-O))*((H-C)+(O-L)),IF(C<O,0-V/((H-L)*2-ABS(C-O))*(H-L),0-V/2)),2)/(V/10);
和盘:=SMA((SMA((买盘+卖盘),2,1)*6.8),3,1);
TR := SUM(MAX(MAX((H+C)/2-L,ABS((H+C)/2-REF((C+L)/2,1))),ABS(L-REF((C+L)/2,1))),10);
HD :=H-REF(H,1);
LD := REF(L,1)-L;
DMP:= SUM(IF(HD>0 AND HD>LD,HD,0),10);
DMM:= SUM(IF(LD>0 AND LD>HD,LD,0),10);
PDI:=DMP*100/TR;
MDI:=DMM*100/TR;
盘和:(3*SMA((SMA((买盘+卖盘),2,1)*6.8),3,1)+(PDI-MDI))/4;
IF(盘和>-8,盘和,-8),COLORF00FF0;

VAR1:=REF((L+O+(C+L)/2+(H+C)/2)/4,1);
VAR2:=SMA(ABS(L-VAR1),13,1)/SMA(MAX(L-VAR1,0),8,1);
VAR3:=MA(VAR2,13);
VAR4:=LLV(L,21);
VAR5:=EMA(IF(L<=VAR4,VAR3,0),3);
洗盘:IF(VAR5<REF(VAR5,1),VAR5,-3),COLORGREEN;
STICKLINE(VAR5<REF(VAR5,1),0,VAR5,3,-3),COLORGREEN;

Var1C:=EMA(100*((C+L)/2-LLV(L,55))/(HHV(H,55)-LLV(L,55)),13)/4;
Var1D:=EMA((C+L)/2,2)-EMA((C+L)/2,89);
Var1E:=EMA(Var1D,30);
Var1F:=2*(Var1D-Var1E)*5;
Var20:=POW(Var1F,3)*0.1+POW(Var1F,2);
庄拉线:=IF(L<H AND Var1F>0.015,Var20,0)/45;
Var26:=EMA((C+L)/2,2)-EMA((C+L)/2,120);
Var27:=EMA(Var26,89);
Var28:=2*(Var26-Var27);
Var29:=POW(Var28,3)*0.1+POW(Var28,1);
黑马线:=IF( Var28>0.1,Var29,0)*2;
量价线:=((C+L)/2-EMA((C+L)/2,21))/EMA((C+L)/2,21)*100;
庄黑线:=(量价线+3*黑马线+6*庄拉线)/10;
Var2E:=IF(FILTER(量价线>0 AND 量价线<2,3)=1,1,0);
涨幅0:=IF(FILTER(庄黑线>0 AND 庄黑线<2 AND Var2E AND Var1C<10.38,13)=1,1,0);
选股:=IF(FILTER(Var2E>0 AND Var1C<10.38 AND 庄黑线>0 AND 庄黑线<2 AND Var2E>0,8)=1,1,0);
追涨:IF(FILTER(涨幅0 OR 选股,5),5,0),COLORRED;
DRAWICON(追涨>0,选股,1);
启动:CROSS(盘和,-3)*5,COLOR00FF00;
追买:CROSS(盘和,0)*8,COLORFFFFFF;
牵牛:CROSS(盘和,N)*N,COLOR99FF00;{参数N,请根据自己需要随便调整}
N,COLOR00FFFF,POINTDOT;