刚组合一个大智慧选股公式
-
相关简介:刚组合一个大智慧选股公式 {1.大卫底部} AA:=MA(L,1)*0.8; DB:=MA(L,10)*0.70; CZ:=(AA-DB)/AA*100; {DRAWICON(CROSS(DB,AA),AA*0.03,7);} 底部:(CROSS(DB,AA)),COLOR148ccc; {2.海底} {量价角度----理想论坛一品茶缘编写副图指标} MA5:=EMA(C,5); MA5角度:=ATAN((MA5/REF(MA5,1)-1)*100)*180/3.1416; 海底:(MA5角度0
-
文章来源:股海网作者:股海网发布时间:2013-08-02浏览次数:
刚组合一个大智慧选股公式
{1.大卫底部}
AA:=MA(L,1)*0.8;
DB:=MA(L,10)*0.70;
CZ:=(AA-DB)/AA*100;
{DRAWICON(CROSS(DB,AA),AA*0.03,7);}
底部:(CROSS(DB,AA)),COLOR148ccc;
{2.海底}
{量价角度----理想论坛一品茶缘编写副图指标}
MA5:=EMA(C,5);
MA5角度:=ATAN((MA5/REF(MA5,1)-1)*100)*180/3.1416;
海底:(MA5角度<0-75),COLORFF8800;
{3.砸锅卖田}
趋势线:=(CLOSE-MA(CLOSE,40))/MA(CLOSE,40)*100;
砸锅卖田:=cross(-30,趋势线);
砸锅等:COUNT(砸锅卖田,10)>0,Colorgreen;
{趋势线:=(CLOSE-MA(CLOSE,40))/MA(CLOSE,40)*100;}
再卖田:((ref(趋势线,1)<ref(趋势线,2) and 趋势线<-30) and 趋势线>=ref(趋势线,1)) or (ref(cross(-30,趋势线),1) and cross(趋势线,-30)) or 趋势线=-30,Color44ff99;
{4.捞鱼}
Var1:=EMA(VOL/CAPITAL,13)*13;
捞鱼:100-100/(1+Var1)<10 and (C-CYC(13))/CYC(13)*100<-16,Colorfff444;
{5.超跌}
CS:=(CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100;
YJD:=(EMA(CS,3)-50)*2;
VAR4:=(1.1)*CLOSE;
VAR5:=(0.9)*CLOSE;
VAR6:=100*(WINNER(VAR4)-WINNER(VAR5));
S1:=2*EMA(100-VAR6,1);
S2:=EMA(S1,9);
超跌XG:YJD<-80 AND S1>S2,Colorfff9ff;
{6.RSI买点}
LC := REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
WR:=-100*(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14));
WR反向:=(0-WR)-100{,COLORYELLOW};
RSI买点:=RSI<20 AND RSI>REF(RSI,1);
WR反向买点:=WR反向>-80 AND WR反向<REF(WR反向,1);
RSI买点 AND WR反向买点;
RSI买点:RSI买点 AND WR反向买点,Colorff9999;
{7.}
A:=LLV(L,34);
XD:=SMA(ABS(L-REF(L,1)),34,1);
CD:=SMA(MAX(L-REF(L,1),0),34,2);
收盘买:=-(EMA(IF(L<=A,XD/CD,-3),9));
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;
X2:=LLV(J,2)=LLV(J,8);
B:CROSS(J,REF(J+0.01,1)) AND X2 AND J<20 AND 收盘买<0 AND 收盘买>REF(收盘买,1),COLORff6666;
B2:CROSS(J,REF(J+0.01,1)) AND X2 AND J<20,COLORMAGENTA;
DRAWTEXT(B2,0.35,'★关注'),COLOR109030;
{预警}
DRAWTEXTABS(860,20,'【--预警→自选股1! 】' );
预警:
底部 or 海底 or 砸锅等 or 再卖田 or 捞鱼 or 超跌XG or RSI买点 and (inblock('自选股1')=0),LINETHICK0 ;
if 预警 then
begin
aa1:="kingwa@save2blk"(预警,1); {如果预警满足条件,自动进入自选股板块8}
end;