大智慧新发动机指标公式,大智慧新不求人指标公式
admin888
|大智慧新发动机指标公式,大智慧新不求人指标公式
大智慧新发动机指标公式
{背景颜色设定}{DRAWGBKLAST(CLOSE>0,STRIP(RGB(55,75,55),RGB(10,10,20),0));}
DRAWRECTREL(0,10,200,1000,rgb(0,0,255)),layer0;
{能量线 {测能量动力,很像KDJ公式的J值}{原神猴探月公式 将原神猴线改名能量线}CS:=(CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100;
YJD:=(EMA(CS,3)-50)*2;
能量线:YJD,LINETHICK0;
中线:0,LINETHICK2,COLORYELLOW,LAYER1;
DRAWICON(cross(YJD,中线),0,7),ALIGN1;
{原庄家克星的抄底逃顶公式 将山水线改名抛留线,去掉倒影线}能量线1:=能量线>=0;
能量线2:=能量线<=0;
Var1:=(2*CLOSE+HIGH+LOW)/4;
Var2:=LLV(LOW,5);
Var3:=HHV(HIGH,4);
Var5:=(Var1-LLV(LOW,4))/(HHV(HIGH,4)-LLV(LOW,4))*100;
Var6:=SMA(Var5,2,1);
sK:EMA((Var1-Var2)/(Var3-Var2)*100,4),LINETHICK0,precis2;
sD:EMA(0.667*REF(sK,1)+0.333*sK,2),LINETHICK0,precis2;
sJ:2*sK-1*sD,LINETHICK0,precis2;
sKD差:sK-sD,colorred,LINETHICK0,precis2;
抛留线: SMA(Var6,2,1),COLOR889999,linethick0;
PARTLINE(抛留线,抛留线>REF(抛留线,1),RGB(255,0,0),抛留线
金叉if(CROSS(sK,sD),抛留线,0),colorffffff,LINETHICK2,layer1;{
买入点}{金叉:if(CROSS(sK,sD),30,0),COLORWHITE,POINTDOT,LINETHICK0;
STICKLINE(金叉,30,40,6,0),COLORffffff;
drawtext(金叉,35,'金叉'),ALIGN1,color6600FF,layer0;}
VERTLINE(CROSS(金叉,0.1),2),COLORffffff,layer7;
金叉天数:barslast(cross(sK,sD)),linethick0;
{计算几日前金叉}{能量线用柱表示}{绿色 0线上 表示下跌}STICKLINE(YJD0,0,YJD,8,0 ),COLOr008800;
STICKLINE(YJD0,0,YJD,7,0 ),COLOR009900;
STICKLINE(YJD0,0,YJD,6,0 ),COLOR00aa00;
STICKLINE(YJD0,0,YJD,5,0 ),COLOR00bb00;
STICKLINE(YJD0,0,YJD,4,0 ),COLOR00cc00;
STICKLINE(YJD0,0,YJD,3,0 ),COLOR00dd00;
STICKLINE(YJD0,0,YJD,2,0 ),COLOR00ee00;
STICKLINE(YJD0,0,YJD,1,0 ),COLOR00ff00;
{红色 0线上 表示上涨}STICKLINE(YJD>=ref(YJD,1)and YJD>0,0,YJD,8,0 ),COLOR000088;
STICKLINE(YJD>=ref(YJD,1)and YJD>0,0,YJD,7,0 ),COLOR000099;
STICKLINE(YJD>=ref(YJD,1)and YJD>0,0,YJD,6,0 ),COLOR0000aa;
STICKLINE(YJD>=ref(YJD,1)and YJD>0,0,YJD,5,0 ),COLOR0000bb;
STICKLINE(YJD>=ref(YJD,1)and YJD>0,0,YJD,4,0 ),COLOR0000cc;
STICKLINE(YJD>=ref(YJD,1)and YJD>0,0,YJD,3,0 ),COLOR0000dd;
STICKLINE(YJD>=ref(YJD,1)and YJD>0,0,YJD,2,0 ),COLOR0000ee;
STICKLINE(YJD>=ref(YJD,1)and YJD>0,0,YJD,1,0 ),COLOR0000ff;
{黄色 0线下 表示上涨}STICKLINE(YJD>ref(YJD,1)and YJD<0,0,YJD,8,0 ),COLOR338fdd;
STICKLINE(YJD>ref(YJD,1)and YJD<0,0,YJD,7,0 ),COLOR339fdd;
STICKLINE(YJD>ref(YJD,1)and YJD<0,0,YJD,6,0 ),COLOR33afdd;
STICKLINE(YJD>ref(YJD,1)and YJD<0,0,YJD,5,0 ),COLOR33bfdd;
STICKLINE(YJD>ref(YJD,1)and YJD<0,0,YJD,4,0 ),COLOR33cfdd;
STICKLINE(YJD>ref(YJD,1)and YJD<0,0,YJD,3,0 ),COLOR33dfdd;
STICKLINE(YJD>ref(YJD,1)and YJD<0,0,YJD,2,0 ),COLOR33efdd;
STICKLINE(YJD>ref(YJD,1)and YJD<0,0,YJD,1,0 ),COLOR33ffdd;
{蓝色 0线下 表示下跌}STICKLINE(YJD<=ref(YJD,1)and YJD<0,0,YJD,8,0 ),COLORFF4400;
STICKLINE(YJD<=ref(YJD,1)and YJD<0,0,YJD,7,0 ),COLORFF6600;
STICKLINE(YJD<=ref(YJD,1)and YJD<0,0,YJD,6,0 ),COLORFF7700;
STICKLINE(YJD<=ref(YJD,1)and YJD<0,0,YJD,5,0 ),COLORFF8800;
STICKLINE(YJD<=ref(YJD,1)and YJD<0,0,YJD,4,0 ),COLORFF9900;
STICKLINE(YJD<=ref(YJD,1)and YJD<0,0,YJD,3,0 ),COLORFFaa00;
STICKLINE(YJD<=ref(YJD,1)and YJD<0,0,YJD,2,0 ),COLORFFbb00;
STICKLINE(YJD<=ref(YJD,1)and YJD<0,0,YJD,1,0 ),COLORFFcc00;
{当日及时行情}DRAWTEXTREL(5,30,'■' ),COLORffffff,linethick1,layer0;
DRAWTEXTREL(5,50,' 金 叉:'+NUMTOSTRN(金叉,2)),COLORffffff,linethick1,layer0;
DRAWTEXTREL(5,190,'今 '),COLORgreen,linethick1,layer0;
DRAWTEXTREL(5,350,'日 能量线:'+NUMTOSTRN(YJD,2)),COLORffffff,linethick1,layer0;
DRAWTEXTREL(5,510,'行 '),COLORgreen,linethick1,layer0;
DRAWTEXTREL(5,670,'情 抛留线:'+NUMTOSTRN(抛留线,2)),COLORffffff,linethick1,layer0;
DRAWTEXTREL(5,830,'■ '),COLORgreen,linethick1,layer0;
JC0:=金叉 < 35 and 金叉 >0 and YJD > ref(yjd,1) and 抛留线 > ref(抛留线,1);
JC1:=金叉 < 35 and 金叉 >0 and (YJD < ref(yjd,1) OR 抛留线 < ref(抛留线,1));
JC2:=金叉 <= 55 and 金叉 > 35 and YJD > ref(yjd,1) and 抛留线 > ref(抛留线,1);
JC3:=金叉 <=55 and 金叉 > 35 and (YJD < ref(yjd,1) or 抛留线 < ref(抛留线,1));
JC4:=金叉 > 55;
IF BARSTATUS=2 AND JC0 THEN BEGINDRAWTEXTREL(25,190,' ● 低位好 能量抛留见红 买'),colorred,layer0;
ENDELSEIF BARSTATUS=2 AND JC1 THEN BEGINDRAWTEXTREL(25,190,' ● 低位好 能量或抛留回跌 可考虑买'),colorred,layer0;
ENDELSEIF BARSTATUS=2 AND JC2 THEN BEGIN
DRAWTEXTREL(25,190,' ● 中位可 能量抛留见红 买'),colorred,layer0;
ENDELSEIF BARSTATUS=2 AND JC3 THEN BEGIN
DRAWTEXTREL(25,190,' ● 中位可 能量线见绿 观望'),coloryellow,layer0;
ENDELSEIF BARSTATUS=2 AND JC4 THEN BEGIN
DRAWTEXTREL(25,190,' ● 高位可能有暴利也是陷阱!!'),coloryellow,layer0;
END;
DRAWTEXTABS(5,5,'),linethick1,COLOR00EEff;
NJC1:=金叉 = 0 AND 金叉天数 <=1 and YJD > ref(yjd,1) and 抛留线 > ref(抛留线,1) and YJD <30;
NJC2:=金叉 = 0 AND 金叉天数 <=1 and YJD > ref(yjd,1) and 抛留线 > ref(抛留线,1) and YJD <60 and YJD >30;
NJC3:=金叉 = 0 AND 金叉天数 <=1 and YJD > ref(yjd,1) and 抛留线 > ref(抛留线,1) and YJD >60 ;
NJC4:=金叉 = 0 AND 金叉天数 <=1 and (YJD < ref(yjd,1) or 抛留线 < ref(抛留线,1)) ;
NJC5:=金叉 = 0 AND 金叉天数 =2 ;
NJC6:=金叉 = 0 AND 金叉天数 >2 and YJD > ref(yjd,1) and 抛留线 > ref(抛留线,1);
NJC7:=金叉 = 0 AND 金叉天数 >2 and (YJD < ref(yjd,1) or 抛留线 < ref(抛留线,1)) ;
NJC8:=金叉 = 0 AND 金叉天数 >2 and YJD < ref(yjd,1) and 抛留线 < ref(抛留线,1) ;
IF BARSTATUS=2 AND NJC1 THEN BEGINDRAWTEXTREL(25,30,' ● '+NUMTOSTRN(金叉天数,0)+'天前金叉'),colorred,layer0;
DRAWTEXTREL(25,190,' ● 低位可进场'),colorred,layer0;
ENDELSEIF BARSTATUS=2 AND NJC2 THEN BEGINDRAWTEXTREL(25,30,' ● '+NUMTOSTRN(金叉天数,0)+'天前金叉'),colorred,layer0;
DRAWTEXTREL(25,190,' ● 中位可进场'),colorred,layer0;
ENDELSEIF BARSTATUS=2 AND NJC3 THEN BEGINDRAWTEXTREL(25,30,' ● '+NUMTOSTRN(金叉天数,0)+'天前金叉'),coloryellow,layer0;
DRAWTEXTREL(25,190,' ● 高位小心 牛现 还是?'),coloryellow,layer0;
ENDELSEIF BARSTATUS=2 AND NJC4 THEN BEGIN
DRAWTEXTREL(25,30,' ● '+NUMTOSTRN(金叉天数,0)+'天前金叉'),coloryellow,layer0;
DRAWTEXTREL(25,190,' ● 陷阱 还是?'),coloryellow,layer0;
ENDELSEIF BARSTATUS=2 AND NJC5 THEN BEGINDRAWTEXTREL(25,30,' ● '+NUMTOSTRN(金叉天数,0)+'天前金叉'),coloryellow,layer0;
DRAWTEXTREL(25,190,' ● 今日没买 下次再来!'),coloryellow,layer0;
ENDELSEIF BARSTATUS=2 AND NJC6 THEN BEGIN
DRAWTEXTREL(25,30,' ● '+NUMTOSTRN(金叉天数,0)+'天前金叉'),colorYELLOW,layer0;
DRAWTEXTREL(25,190,' ● 陷阱 还是?'),colorYELLOW,layer0;
ENDELSEIF BARSTATUS=2 AND NJC7 THEN BEGINDRAWTEXTREL(25,30,' ● '+NUMTOSTRN(金叉天数,0)+'天前金叉'),colorgreen,layer0;
DRAWTEXTREL(25,190,' ● 喝茶去吧!'),colorgreen,layer0;
ENDELSEIF BARSTATUS=2 AND NJC8 THEN BEGINDRAWTEXTREL(25,190,' ● 喝咖啡去了!'),colorgreen,layer0;
END;
NL0:=YJD > ref(yjd,1) and YJD >0 and YJD <70;
NL1:=YJD < ref(yjd,1) and YJD >0 and YJD <70;
NL2:=YJD > ref(yjd,1) and YJD <0 ;
NL3:=YJD < ref(yjd,1) and YJD <0 ;
NL4:=YJD >0 and YJD > ref(yjd,1) and YJD >70 ;
NL5:=YJD >0 and YJD < ref(yjd,1) and YJD >70 ;
IF BARSTATUS=2 AND NL0 THEN BEGIN
DRAWTEXTREL(25,350,' ● 进入买区'),colorred,layer0;
DRAWTEXTREL(25,510,' ● 见红 势好'),colorred,layer0;
ENDELSEIF BARSTATUS=2 AND NL1 THEN BEGINDRAWTEXTREL(25,350,' ● 进入买区'),colorgreen,layer0;
DRAWTEXTREL(25,510,' ● 见绿 下车'),colorgreen,layer0;
ENDELSEIF BARSTATUS=2 AND NL2 THEN BEGIN
DRAWTEXTREL(25,350,' ● 不在买区'),colorgreen,layer0;
DRAWTEXTREL(25,510,' ●趋势上升'),colorred,layer0;
ENDELSEIF BARSTATUS=2 AND NL3 THEN BEGINDRAWTEXTREL(25,350,' ● 不在买区'),colorgreen,layer0;
DRAWTEXTREL(25,510,' ● 喝茶吧!'),colorgreen,layer0;
ENDELSEIF BARSTATUS=2 AND NL4 THEN BEGIN
DRAWTEXTREL(25,350,' ● 在买区'),colorgreen,layer0;
DRAWTEXTREL(25,510,' ● 超过70小心!'),coloryellow,layer0;
ENDELSEIF BARSTATUS=2 AND NL5 THEN BEGIN
DRAWTEXTREL(25,350,' ● 在买区'),colorgreen,layer0;
DRAWTEXTREL(25,510,' ● 70下跌快逃!'),colorgreen,layer0;
END;
PL1:=抛留线 > ref(抛留线,1);
PL2:=抛留线 < ref(抛留线,1);
IF BARSTATUS=2 AND PL1 THEN BEGIN
DRAWTEXTREL(25,670,' ● 见红 势好'),colorred,layer0;
ENDELSEIF BARSTATUS=2 AND PL2 THEN BEGIN
DRAWTEXTREL(25,670,' ● 见绿 走人'),colorgreen,layer0;
END;
PL3:=抛留线 > 65 and 抛留线 <70;
PL4:=抛留线 > 70;
IF BARSTATUS=2 AND PL3 THEN BEGIN
DRAWTEXTREL(25,830,' ● 超过65小心!'),coloryellow,layer0;
ENDELSEIF BARSTATUS=2 AND PL4 THEN BEGINDRAWTEXTREL(25,830,' ● 超过70走人!'),colorgreen,layer0;
END;
顶线:80,COLORred,dotline,layer7;
强势:65,COLORffffff,dotline,precis2,layer7;
均线:-65,COLORred,dotline,precis2,layer7;
底线:-80,COLORgreen,dotline,layer7;
大智慧新不求人指标公式
{背景}DRAWRECTREL(0,10,200,1000,rgb(0,0,255)),layer0;
{DRAWGBKLAST(CLOSE>0,STRIP(RGB(55,75,55),RGB(10,10,20),0));}
{公式程式}DRAWTEXTREL(230,20,'● 应用在底部选股●'),COLORyellow,linethick2;
VAR1:=(EMA(C,12)-EMA(C,26))*100+50;
VAR2:=EMA(VAR1,9);
VAR3:=((HHV(H,21)-C)/(HHV(H,21)-LLV(L,21)))*100-10;
VAR4:=((C-LLV(L,21))/(HHV(H,21)-LLV(L,21)))*100;
VAR5:=SMA(VAR4,13,8);
VAR6:=SMA(VAR3,21,8);
VAR7:=MA(C,80)-MA(C,10)/7;
VAR8:=EMA(C,5);
VAR9:=MA((LLV(C,9))*1.1,14);
VAR10:=2*VAR9-VAR8-C*0.1;
VAR11:=IF(((VAR8-VAR10)*5>0),(POW((VAR8-VAR10)*5,2))/10,(-1*(POW((VAR8-VAR10)*(5),2)))/(10));
VAR12:=IF((VAR11>0),VAR11-0,12);
VAR13:=SMA(MAX(C-REF(C,2),0),7,1)/SMA(ABS(C-REF(C,2)),7,1)*100;
VAR14:=(HHV(C,10)-C)/HHV(C,10)>0.05;
DRAWTEXTABS(5,5,''),linethick1,COLOR00EEff;
趋势:CEILING(SMA(VAR5,13,8)),LINETHICK2,COLOR0000FF;
看底:IF((趋势-VAR6<(-65)),1,6),COLOR00FF00;
顶峰:IF((趋势-VAR6>85),95,100),COLORF0F000;
黄金区:IF(VAR13<15,15,0),COLORF0F000,linethick0;
DRAWICON(IF(VAR13<15,15,0),13,12),COLORYELLOW;
DRAWTEXT((趋势-VAR6<(-65)),5,'底'),COLORffffff;
DRAWTEXT((趋势-VAR6>85),90,'顶'),COLORgreen;
DRAWTEXT(if(VAR13<15,15,0),20,'黄金区'),COLORyellow;
操盘线: MA(3*SMA((C-LLV(L,27))/(HHV(H,27)-LLV(L,27))*100,5,1)-2*SMA(SMA((C-LLV(L,27))/(HHV(H,27)-LLV(L,27))*100,5,1),3,1),5),LINETHICK2,COLORBLUE;
DRAWICON(cross(趋势,操盘线),趋势,7),COLORyellow,ALIGN1;
STICKLINE(FILTER(趋势75 OR CROSS(趋势,操盘线)AND 趋势60,5),100,60,8,1),COLORFFFF00;
{STICKLINE(FILTER(CROSS(趋势,VAR12)AND 趋势REF(C,1) OR 趋势>REF(趋势,1)AND 趋势<35 AND C>REF(C,1),5),5,50,9,2),COLOR00FF00;}
VAR15:FILTER(CROSS(趋势,VAR12)AND 趋势REF(C,1) OR 趋势>REF(趋势,1)AND 趋势<35 AND VAR14 AND C>REF(C,1),5);
STICKLINE(VAR15,50,0,4,0),COLOR00ff00;
DRAWTEXT(看底<6 AND VAR15,50,'●全仓'),colorred;
选股:看底<6 AND VAR15;
{当日及时行情}DRAWTEXTREL(5,70,'今 趋势线:'+NUMTOSTRN(趋势,0)),COLORffffff,linethick1,layer0;
DRAWTEXTREL(5,250,'日 黄金区:'+NUMTOSTRN(黄金区,0)),COLORYELLOW,linethick1,layer0;
DRAWTEXTREL(5,430,'行 看 底:'+NUMTOSTRN(看底,0)),COLORFFFFFF,linethick1,layer0;
DRAWTEXTREL(5,610,'情 VAR 15:'+NUMTOSTRN(VAR15,0)),COLORffffff,linethick1,layer0;
DRAWTEXTREL(5,790,'表 选 股:'+NUMTOSTRN(选股,0)),COLORyellow,linethick1,layer0;
QS0:=趋势>操盘线 AND 顶峰=100;
QS1:=趋势<操盘线;
QS2:=趋势>操盘线 AND 顶峰=95;
IF BARSTATUS=2 AND QS0 THEN BEGIN
DRAWTEXTREL(25,70,' ● 趋势上 有钱!'),colorred,layer0;
ENDELSEIF BARSTATUS=2 AND QS1 THEN BEGIN
DRAWTEXTREL(25,70,' ● 趋势下 快走!'),colorgreen,layer0;
ENDELSEIF BARSTATUS=2 AND QS2 THEN BEGIN
DRAWTEXTREL(25,70,' ● 见顶 小心!'),colorgreen,layer0;
ENDHJQ0:=黄金区=15;
HJQ1:=黄金区=0 AND 选股=0;
HJQ2:=黄金区=0 AND 选股=1;
IF BARSTATUS=2 AND HJQ0 THEN BEGIN
DRAWTEXTREL(25,250,' ● 佳 看底'),colorred,layer0;
ENDELSEIF BARSTATUS=2 AND HJQ1 THEN BEGIN
DRAWTEXTREL(25,250,' ● 打80分?'),colorgreen,layer0;
ENDELSEIF BARSTATUS=2 AND HJQ2 THEN BEGIN
DRAWTEXTREL(25,250,' ● 机会来了!'),colorred,layer0;
ENDKD1:=看底<6;
KD2:=看底=6 AND 选股=0;
KD3:=看底=6 AND 选股=1;
IF BARSTATUS=2 AND KD1 THEN BEGINDRAWTEXTREL(25,430,' ● 见底了'),colorred,layer0;
ENDELSEIF BARSTATUS=2 AND KD2 THEN BEGIN
DRAWTEXTREL(25,430,' ● 斗地主了!'),colorgreen,layer0;
ENDELSEIF BARSTATUS=2 AND KD3 THEN BEGIN
DRAWTEXTREL(25,430,' ● 机会来了!'),colorred,layer0;
ENDVA1:VAR15=1;
VA2:VAR15=0 AND 选股=0;
VA3:VAR15=0 AND 选股=1;
IF BARSTATUS=2 AND VA1 THEN BEGINDRAWTEXTREL(25,610,' ● 佳 可买进'),colorred,layer0;
ENDELSEIF BARSTATUS=2 AND VA2 THEN BEGIN
DRAWTEXTREL(25,610,' ● 打麻将了'),colorgreen,layer0;
ENDELSEIF BARSTATUS=2 AND VA3 THEN BEGIN
DRAWTEXTREL(25,610,' ● 机会来了!'),colorred,layer0;
ENDxgg0:=选股=1;
xgg1:=选股=0;
IF BARSTATUS=2 AND xgg0 THEN BEGINDRAWTEXTREL(25,790,' ● 见底势强买入'),colorred,layer0;
ENDELSEIF BARSTATUS=2 AND xgg1 THEN BEGIN
DRAWTEXTREL(25,790,' ● 逛街去了'),colorgreen,layer0;
END;
牛市通网是一个牛股推荐网与低风险投资知识网,可以在线联系客服领取牛股。牛市通网从权威的投资专家、金融分析师等投资信息中挑选优质的文章进行发布。牛市通网主要为投资者提供股票知识、股票观点、股票分析和明智金融投资讨论等信息。