大智慧新不求人未加密选股指标公式源码

大智慧新不求人未加密选股指标公式源码

源码正文：

DRAwrECTREL(0,10,200,1000,rgb(0,0,255)),layer0{XG51};

DRAWTEXTREL(230,20,'● 应用在底部选股 ●'),COLORyellow,linethick2{XG51};
VAR1:=(ema(C,12)-Ema(C,26))*100+50{XG51};
VAR2:=EMA(VAR1,9){XG51};
VAR3:=((HHV(H,21)-C)/(HHV(H,21)-LLV(L,21)))*100-10{XG51};
VAR4:=((C-LLV(L,21))/(HHV(H,21)-LLV(L,21)))*100{XG51};
VAR5:=SMA(VAR4,13,8){XG51};
VAR6:=SMA(VAR3,21,8){XG51};
VAR7:=MA(C,80)-MA(C,10)/7{XG51};
VAR8:=EMA(C,5){XG51};
VAR9:=MA((LLV(C,9))*1.1,14){XG51};
VAR10:=2*VAR9-VAR8-C*0.1{XG51};
VAR11:=IF(((VAR8-VAR10)*5>0),(POW((VAR8-VAR10)*5,2))/10,(-1*(POW((VAR8-VAR10)*(5),2)))/(10)){XG51};
VAR12:=IF((VAR11>0),VAR11-0,12){XG51};
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{XG51};
DRAWTEXTABS(5,5,'选股无忧网 www.xg51.cn'),linethick1,COLOR00EEff{XG51};
趋势:CEILING(SMA(VAR5,13,8)),LINETHICK2,COLOR0000FF{XG51};
看底:IF((趋势-VAR6<(-65)),1,6),COLOR00FF00{XG51};
顶峰:IF((趋势-VAR6>85),95,100),COLORF0F000{XG51};
黄金区:IF(VAR13<15,15,0),COLORF0F000,linethick0{XG51};
DRAWICON(IF(VAR13<15,15,0),13,12),COLORBLUE{XG51};
DRAWTEXT((趋势-VAR6<(-65)),5,'底'),COLORffffff{XG51};
DRAWTEXT((趋势-VAR6>85),90,'顶'),COLORgreen{XG51};
DRAWTEXT(if(VAR13<15,15,0),20,'黄金区'),COLORyellow{XG51};
操盘线: 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,COLORYELLOW{XG51};
DRAWICON(cross(趋势,操盘线),趋势,7),COLORyellow,ALIGN1{XG51};
STICKLINE(FILTER(趋势<REF(趋势,1)AND 趋势>75 OR CROSS(趋势,操盘线)AND 趋势<REF(趋势,1)AND 操盘线>60,5),100,60,8,1),COLORFFFF00{XG51};
VAR15:FILTER(CROSS(趋势,VAR12)AND 趋势<REF(趋势,2)AND C>REF(C,1) OR 趋势>REF(趋势,1)AND 趋势<35 AND VAR14 AND C>REF(C,1),5){XG51};
STICKLINE(VAR15,50,0,4,0),COLOR00ff00{XG51};
DRAWTEXT(看底<6 AND VAR15,50,'●全仓'),colorred{XG51};
选股:看底<6 AND VAR15{XG51};
DRAWTEXTREL(5,70,'今 趋势线：'+NUMTOSTRN(趋势,0)),COLORffffff,linethick1,layer0{XG51};
DRAWTEXTREL(5,250,'日 黄金区：'+NUMTOSTRN(黄金区,0)),COLORBLUE,linethick1,layer0{XG51};
DRAWTEXTREL(5,430,'行 看 底：'+NUMTOSTRN(看底,0)),COLORFFFFFF,linethick1,layer0{XG51};
DRAWTEXTREL(5,610,'情 VAR 15：'+NUMTOSTRN(VAR15,0)),COLORffffff,linethick1,layer0{XG51};
DRAWTEXTREL(5,790,'表 选 股：'+NUMTOSTRN(选股,0)),COLORyellow,linethick1,layer0{XG51};
QS0:=趋势>操盘线 AND 顶峰=100{XG51};
QS1:=趋势<操盘线{XG51};
QS2:=趋势>操盘线 AND 顶峰=95{XG51};
IF BARSTATUS=2 AND QS0 THEN BEGIN
DRAWTEXTREL(25,70,' ● 趋势上 有钱！'),colorred,layer0{XG51};
END
ELSE
IF BARSTATUS=2 AND QS1 THEN BEGIN
DRAWTEXTREL(25,70,' ● 趋势下 快走！'),colorgreen,layer0{XG51};
END
ELSE
IF BARSTATUS=2 AND QS2 THEN BEGIN
DRAWTEXTREL(25,70,' ● 见顶 小心！'),colorgreen,layer0{XG51};
END
HJQ0:=黄金区=15{XG51};
HJQ1:=黄金区=0 AND 选股=0{XG51};
HJQ2:=黄金区=0 AND 选股=1{XG51};
IF BARSTATUS=2 AND HJQ0 THEN BEGIN
DRAWTEXTREL(25,250,' ● 佳 看底'),colorred,layer0{XG51};
END
ELSE
IF BARSTATUS=2 AND HJQ1 THEN BEGIN
DRAWTEXTREL(25,250,' ● 打80分？'),colorgreen,layer0{XG51};
END
ELSE
IF BARSTATUS=2 AND HJQ2 THEN BEGIN
DRAWTEXTREL(25,250,' ● 机会来了！'),colorred,layer0{XG51};
END
kd1:=看底<6{XG51};
KD2:=看底=6 AND 选股=0{XG51};
KD3:=看底=6 AND 选股=1{XG51};
IF BARSTATUS=2 AND KD1 THEN BEGIN
DRAWTEXTREL(25,430,' ● 见底了'),colorred,layer0{XG51};
END
ELSE
IF BARSTATUS=2 AND KD2 THEN BEGIN
DRAWTEXTREL(25,430,' ● 斗地主了！'),colorgreen,layer0{XG51};
END
ELSE
IF BARSTATUS=2 AND KD3 THEN BEGIN
DRAWTEXTREL(25,430,' ● 机会来了！'),colorred,layer0{XG51};
END
VA1:VAR15=1{XG51};
VA2:VAR15=0 AND 选股=0{XG51};
VA3:VAR15=0 AND 选股=1{XG51};
IF BARSTATUS=2 AND VA1 THEN BEGIN
DRAWTEXTREL(25,610,' ● 佳 可买进'),colorred,layer0{XG51};
END
ELSE
IF BARSTATUS=2 AND VA2 THEN BEGIN
DRAWTEXTREL(25,610,' ● 打麻将了'),colorgreen,layer0{XG51};
END
ELSE
IF BARSTATUS=2 AND VA3 THEN BEGIN
DRAWTEXTREL(25,610,' ● 机会来了！'),colorred,layer0{XG51};
END
xgg0:=选股=1{XG51};
xgg1:=选股=0{XG51};
IF BARSTATUS=2 AND xgg0 THEN BEGIN
DRAWTEXTREL(25,790,' ● 见底势强 买入'),colorred,layer0{XG51};
END
ELSE
IF BARSTATUS=2 AND xgg1 THEN BEGIN
DRAWTEXTREL(25,790,' ● 逛街去了'),colorgreen,layer0{XG51};
END{X!G~5~1!C!N!{};

大智慧分时成交量未加密选股指标公式源码

源码正文：

vol,VOLstICK,PRECIS0{XG51};
mm:=0{XG51};
IF PFFIN(4251,0)>0 Then begin
mm:=PFFIN(4251,0){XG51};
end{XG51};
流通盘:=CAPITAL-mm/100{XG51};
dbhs:if(capital<2000000,v/capital*100,v/流通盘*100),linethick0{XG51};
标准量:if(count(v>流通盘/1000,0)>0,流通盘/1000,0),colorff00ff,PRECIS0{XG51};
STICKLINE(C<REF(C,1),0,VOL,5,0),COLORgreen{XG51};
STICKLINE(C>REF(C,1),0,VOL,5,0),COLOR4040FF;
STICKLINE(C=REF(C,1),0,VOL,5,0),COLORwhite;
总量:SUM(V,0),linethick0,PRECIS0,colorcyan{XG51};
最大量:HHV(v,0),POINTDOT,COLORwhite,PRECIS0{XG51};
最大换手:HHV(dbhs,240),DOTLINE,COLORwhite,PRECIS2,linethick0{XG51};
STICKLINE(C<REF(C,1) and v>ref(最大量,1) and time>94200,0,VOL,5,0),COLOR3d,colorgreen,LINETHICK2{XG51};
STICKLINE(C>REF(C,1) and v>ref(最大量,1) and time>94200,0,VOL,5,0),COLORred,COLOR3d,LINETHICK2{XG51};
STICKLINE(C=REF(C,1) and v>ref(最大量,1) and time>94200,0,VOL,5,0),COLORwhite,LINETHICK2{XG51};
STICKLINE(v>ref(最大量,1)*1.5 and c>ref(c,1) and dbhs>0.15 and time>94500,0,VOL,5,0),COLORyellow,COLOR3d,LINETHICK2{XG51};
STICKLINE(C>REF(C,1) and dbhs>0.22 and time<94200,0,VOL,5,0),COLOR66ffff,color3d,LINETHICK2{XG51};
lxtp:=((v>ref(v,1) and dbhs>=0.1 and ref(v,1)>ref(最大量,2)) or (v>ref(最大量,1) and dbhs>=0.08 and ref(v,2)>ref(最大量,3))) and c>ref(c,1){XG51};
lxtp1:=((v>ref(v,1)*0.9 and dbhs>=0.1 and ref(v,1)>ref(最大量,2)) or (v>ref(最大量,1)*0.9 and dbhs>=0.1 and ref(v,2)>ref(最大量,3))) and c>ref(c,1){XG51};
DRAWTEXT(lxtp1,v*0.98,'★'),ALIGN1,VALIGN1,COLORdd22b8,LINETHICK3{XG51};
DRAWTEXT(lxtp,v*0.98,'★'),ALIGN1,VALIGN1,COLORWHITE,LINETHICK3{XG51};
比例:=v/ma(v,10)*100{XG51};
DRAWTEXTREL(2,130,'均量比:'),COLORBLUE{XG51};
DRAWTEXTREL(60,130,NUMTOSTRN(比例,2)+'%' ),COLORBLUE{XG51};
DRAwrECTREL(125,150,375,225,RGB(30,30,30)),COLORBLUE{XG51};
DRAWRECTREL(125,150,125+比例*2.52,225,RGB(155,50,50)),COLORBLUE;
bl:=sum(v,0)/"引用.v1#day"*100{XG51};
DRAWTEXTREL(2,300,'昨日比:'),COLORBLUE{XG51};
DRAWTEXTREL(60,300,NUMTOSTRN(bl,2)+'%' ),COLORBLUE{XG51};
DRAWRECTREL(125,300,375,375,RGB(30,30,30)),COLORBLUE{XG51};
DRAWRECTREL(125,300,125+bl*2.52,375,RGB(155,50,50)),COLORBLUE{X!G~5-1!C!N!{};