大智慧十九无敌未加密选股指标公式源码

大智慧十九无敌未加密选股指标公式源码

源码正文：

i:=ma(BArslAst(HIGH=HHV(HIGH,16))*IF(CLOSE<OPEN,vol,1),3){XG51};
r:=MA(BARSLAST(LOW=LLV(LOW,18))*IF(CLOSE>OPEN,VOL,1),4){XG51};
短线逃顶:=IF(i,0,1){XG51};
DRAWICON(短线逃顶,98,8){XG51};
Var1jo:=IF(DATE<1090830 AND DATE>900101,1,0){XG51};
Var2jo:=LLV(LOW,10){XG51};
Var3jo:=HHV(HIGH,25){XG51};
警戒线:= 2.8*Var1jo{XG51};
减仓线:= 3.2*Var1jo{XG51};
动力线:=ema((CLOSE-Var2jo)/(Var3jo-Var2jo)*4,4)*Var1jo{XG51};
DRAWICON(crOSS(动力线,警戒线),99,5){XG51};
Vaz4:=(CLOSE-LLV(CLOSE,126))/(HHV(CLOSE,126)-LLV(CLOSE,126))*100{XG51};
Vaz24:=Vaz4=0{XG51};
STICKLINE(Vaz24>0,-3,-9,1,2),colorred,linethick3 {XG51};
Vaz25:=Vaz4=100{XG51};
STICKLINE(Vaz25>0,101,105,1,2),colorgreen,linethick2{XG51};

睡猫:if(c<MA(EMA(CLOSE,34)*0.82,5) and close/DMA(AMOUNT/VOL/100,VOL/CAPITAL)<0.64,30,0),linethick2,COLORffff00{XG51};
南极:((((MA(CLOSE,5))-CLOSE)/CLOSE>3/100) AND (((MA(CLOSE,10))-(MA(CLOSE,5)))/(MA(CLOSE,5))>0.03) AND (LLV(CLOSE,30)=LLV(CLOSE,120)))*40,linethick2,colorF00FF0{XG51};
Var9a:=SUM(IF(CLOSE>REF(CLOSE,1),VOL,IF(CLOSE<REF(CLOSE,1),0-VOL,0)),0){XG51};
Var9b:=SUMBARS(VOL,CAPITAL){XG51};
Var9c:=IF(CLOSE>LLV(CLOSE,Var9b),1,-1){XG51};
Var9d:=IF(Var9a>LLV(Var9a,Var9b),1,-1){XG51};
Var9e:=Var9c*Var9d{XG51};
var9f:=IF(Var9e=-1,1,0){XG51};
yjfh:(var9f AND CLOSE=LLV(CLOSE,120))*48,linethick1,stick,colorred{XG51};
买入: IF(CROSS((4*SMA((CLOSE-LLV(LOW,25))/(HHV(HIGH,25)-LLV(LOW,25))*100,5,1)-
3*SMA(SMA((CLOSE-LLV(LOW,25))/(HHV(HIGH,25)-LLV(LOW,25))*100,5,1),3,1)),(8)),58,0),stick,color0099ff,linethick6{XG51};
drawtext(买入,45,'我买'),color66ffcc{XG51};
Var1A:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100{XG51};
Var1B:=SMA((SMA(Var1A,4,1)-50)*2,3,1){XG51};
Var1C:=(INDEXC-LLV(INDEXL,14))/(HHV(INDEXH,14)-LLV(INDEXL,14))*100{XG51};
Var1D:=SMA(Var1C,4,1){XG51};
Var1E:=SMA(Var1D,3,1){XG51};
Var1F:=(HHV(HIGH,30)-CLOSE)/CLOSE*100{XG51};
VarE:=REF(LOW,1)*0.9{XG51};
VarF:=LOW*0.9{XG51};
Var10:=(VarF*VOL+VarE*(CAPITAL-VOL))/CAPITAL{XG51};
Var11:=EMA(Var10,30){XG51};
Var12:=CLOSE-REF(CLOSE,1){XG51};
Var13:=MAX(Var12,0){XG51};
Var14:=Abs(Var12){XG51};
Var15:=SMA(Var13,7,1)/SMA(Var14,7,1)*100{XG51};
Var16:=SMA(Var13,13,1)/SMA(Var14,13,1)*100{XG51};
Var17:=BARSCOUNT(CLOSE){XG51};
Var18:=SMA(MAX(Var12,0),6,1)/SMA(ABS(Var12),6,1)*100{XG51};
Var19:=(-200)*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60))+100{XG51};
Var20:=Var18<=25 AND Var19<-95 AND Var1F>20 AND Var1B<-30 AND Var1E<30 AND Var11-CLOSE>=-0.25 AND Var15<22 AND Var16<28 AND Var17>50{XG51};
DRAWTEXTABS(5,5,'选股无忧网 www.xg51.cn'),linethick1,COLOR00EEff{XG51};
STICKLINE(Var20,0,95,5,0),LINETHICK2,COLORWHITE{XG51};
DRAWTEXT(CROSS(Var20,0.5) AND COUNT(Var20=1,10)=1,60,'发射导弹 '),LINETHICK7 , COLORwhite{XG51};
Vat3:=REF(CLOSE,1){XG51};
Vat4:=SMA(MAX(CLOSE-Vat3,0),6,1)/SMA(ABS(CLOSE-Vat3),6,1)*100{XG51};
我卖:(CROSS(80,Vat4))*82,stick,LINETHICK6,color9900CC {XG51};
drawtext(我卖,80,'我卖'),colorred{XG51};
快逃: IF(CROSS((3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1)),90),60,0),stick,linethick4,colorgreen{XG51};
drawtext(快逃,50,'快逃'),colorwhite{XG51};
Varo2:=(CLOSE-LLV(LOW,26))/(HHV(HIGH,26)-LLV(LOW,26))*100{XG51};
Varo3:=SMA(SMA(Varo2,3,1),3,1){XG51};
Varo4:=EMA(Varo3,5){XG51};
Varo5:=LLV(LOW,26){XG51};
Varo6:=HHV(HIGH,34){XG51};
Varo7:=EMA((CLOSE-Varo5)/(Varo6-Varo5)*4,4)*25{XG51};
STICKLINE(CROSS(Varo4,10) AND Varo4>10,25,0,8,0),coloryellow{XG51};
建仓区: IF((Varo7<10),80,100),linethick2 ,color00ccff{XG51};
派发区: IF((Varo7>90),20,0),linethick2 ,color6699ff{XG51};
Vay3:=(CLOSE-MA(CLOSE,30))/STD(CLOSE,15)*100{XG51};
VayA:=MA(CLOSE,60)-MA(CLOSE,5)/3.2{XG51};
成功率:IF(CROSS(((CLOSE-MA(CLOSE,30))/STD(CLOSE,15)*100),(EMA(Vay3,18))) AND CLOSE<VayA,50,0),STICK,COLORF0F000{XG51};
STICKLINE(CROSS(((CLOSE-MA(CLOSE,30))/STD(CLOSE,15)*100),(EMA(Vay3,18))) AND CLOSE<VayA,high+75,0,8,0),COLORF0F000{XG51};
DRAWICON(CROSS(((CLOSE-MA(CLOSE,30))/STD(CLOSE,15)*100),(EMA(Vay3,18))) AND CLOSE<VayA,high+82,1){XG51};
DRAWTEXT(CROSS(((CLOSE-MA(CLOSE,30))/STD(CLOSE,15)*100),(EMA(Vay3,18))) AND CLOSE<VayA,high+60,'成功80-95%'),coloryellow{XG51};
天马行空线:=ma(cost(85),5){XG51};
训马线:=ma(cost(15),5){XG51};
黑马线:=ma(cost(50),5){XG51};
天马踏地线:=ma(cost(1),7){XG51};
牵马绳:=ema(close,3){XG51};
DRAWICON(cross(牵马绳,天马踏地线) ,-5, 6){XG51};
DRAWICON(count(cross(天马行空线,牵马绳),20)=2 and 天马行空线/天马踏地线>1.6 ,95 , 10){X-G?5.1-C-N-{};

大智慧预测未来股价未加密选股指标公式源码

源码正文：

N:=27{XG51};
BUYPRICE:="SHOWINV@BUYPRICE"(1){XG51};
SALEPRICE:="SHOWINV@SALEPRICE"(1){XG51};
IF BUYPRICE> 0 THEN BP:=BUYPRICE{XG51};
ppp:=0.015{XG51};
成本:=BP*1.006{XG51};
卖价:成本*(1+ppp),linethick0{XG51};
开盘价:open,linethick0{XG51};
开盘价1:=REF(open,1){XG51};
最高价:high,linethick0{XG51};
最高价1:=REF(high,1){XG51};
最低价:low,linethick0{XG51};
最低价1:=REF(low,1){XG51};
最低价2:=REF(low,2){XG51};
收盘价:CLOSE,linethick0{XG51};
收盘价1:=REF(CLOSE,1);

A1:=REF(开盘价,1){XG51};
A2:=Abs((REF(收盘价,1)-A1)/A1){XG51};
A3:=ABS((REF(最高价,1)-A1)/A1){XG51};
A4:=ABS((REF(最低价,1)-A1)/A1){XG51};
B1:=ABS((A2+A3+A4)/3){XG51};
B2:开盘价*B1,linethick0{XG51};
涨跌比:B2/开盘价*100,linethick0{XG51};
AA:=最高价1{XG51};
BB:=最低价1{XG51};
CC:=开盘价1{XG51};
DD:=收盘价1{XG51};
EE:=(AA+BB+CC+2*DD)/5{XG51};
AAA:=EE+(AA-BB){XG51};
BBB:=2*EE-BB{XG51};
CCC:=2*EE-AA{XG51};
DDD:=EE-(AA-BB){XG51};
上升突破价:=AAA{XG51};
上升阻力价:=BBB{XG51};
下跌支撑价:=CCC{XG51};
下跌反转价:=DDD{XG51};
EEE:=(EE+上升突破价+上升阻力价+下跌支撑价+下跌反转价)/5{XG51};
FFF:=(EEE+开盘价)/2{XG51};
预测低一:=开盘价-B2{XG51};
预测低一1:=REF(预测低一,1){XG51};
预测低一2:=REF(预测低一,2){XG51};
预测低二:=(预测低一+FFF)/2{XG51};
预测低二1:=REF(预测低二,1){XG51};
预测低二2:=REF(预测低二,2){XG51};
差额一:=预测低一-low{XG51};
差额二:=预测低二-low{XG51};
差比一:=(差额一/low)*100{XG51};
差比二:=(差额二/low)*100{XG51};
预测高一:=开盘价+B2{XG51};
预测高二:=ma(REF(HIGH,1)/REF(CLOSE,2),N)*REF(CLOSE,1){XG51};
预测高二1:=ref(预测高二,1){XG51};
预测高二2:=ref(预测高二,2){XG51};
YPP一:=0.985{XG51};
YPP二:=0.989{XG51};
熊价一:=预测高一*YPP一{XG51};
熊价一1:=REF(熊价一,1){XG51};
熊价二:=预测高二*YPP二{XG51};
熊价二1:=REF(熊价二,1){XG51};
平均价一:=(预测高一+预测高二)/2{XG51};
平均价二:=(熊价一+熊价二)/2{XG51};
check1:(high-预测低二1)/预测低二1*100,linethick0{XG51};
low1:=ref(low,1){XG51};
check2:(high-low1)/low1*100,linethick0{XG51};
DRAWTEXTREL(10,60,' 【今日低买操作数据】 【昨低买今卖操作数据】纯利设定：'+NUMTOstRN(ref(ppp*100,0),2)+'% 【依据预测价 计算卖出价】' ),coloryellow,linethick1{XG51};
DRAWTEXTREL(10,200,' 【今日低买】 预测价 目前差价 目前差比'),Color8000FF,linethick1{XG51};
DRAWTEXTREL(10,350,' 预测低一： '+NUMTOSTRN(ref(预测低一,0),2)+'元 '+ NUMTOSTRN(ref(差额一,0),2)+'元 '+ NUMTOSTRN(ref(差比一,0),2)+'%'),colorffffff,linethick1{XG51};
DRAWTEXTREL(10,600,' 预测低二： '+NUMTOSTRN(ref(预测低二,0),2)+'元 '+ NUMTOSTRN(ref(差额二,0),2)+'元 '+ NUMTOSTRN(ref(差比二,0),2)+'%'),colorffffff,linethick1{XG51};
DRAWTEXTREL(320,500,' 今最低价：'+NUMTOSTRN(ref(最低价,0),2)+'元 最高价：'+NUMTOSTRN(ref(最高价,0),2)+'元'),coloryellow,linethick1{XG51};
DRAWTEXTREL(320,745,' 昨最低价：'+NUMTOSTRN(ref(最低价1,0),2)+'元 最高价：'+NUMTOSTRN(ref(最高价1,0),2)+'元'),COLORD3A9FF,linethick1{XG51};
DRAWTEXTREL(320,615,' 开盘价：'+NUMTOSTRN(ref(开盘价,0),2)+'元 收盘价：'+NUMTOSTRN(ref(收盘价,0),2)+'元'),coloryellow,linethick1{XG51};
DRAWTEXTREL(320,860,' 开盘价：'+NUMTOSTRN(ref(开盘价1,0),2)+'元 收盘价：'+NUMTOSTRN(ref(收盘价1,0),2)+'元'),COLORD3A9FF,linethick1{XG51};
DRAWTEXTREL(320,200,' 【买入价】 税后成本 卖出价 到位'),Colorffff80,linethick1{XG51};
DRAWTEXTREL(320,350,' '+NUMTOSTR(BP)+'元 '+NUMTOSTR(成本)+'元 '+NUMTOSTR(卖价)+'元'),COLORffffff,linethick1{XG51};
DRAWTEXTREL(660,200,' 【预测数据】 强势 到位 弱势 到位'),Color8000FF,linethick1{XG51};
DRAWTEXTREL(660,350,' 预测高一： '+NUMTOSTRN(ref(预测高一,0),2)+'元 '+ NUMTOSTRN(ref(熊价一,0),2)+'元'),colorffffff,linethick1{XG51};
DRAWTEXTREL(660,500,' 预测高二： '+NUMTOSTRN(ref(预测高二,0),2)+'元 '+ NUMTOSTRN(ref(熊价二,0),2)+'元'),colorffffff,linethick1{XG51};
DRAWTEXTREL(660,650,' 平均价 ： '+NUMTOSTRN(ref(平均价一,0),2)+'元 '+ NUMTOSTRN(ref(平均价二,0),2)+'元'),colorffffff,linethick1{XG51};
BBP1:=high>BP or high=BP{XG51};
BBP2:=high<BP{XG51};
IF BARSTATUS=2 AND BBP1 THEN BEGIN
DRAWTEXTREL(320,350,' ★'),COLORWHITE,linethick1{XG51};
END
ELSE
IF BARSTATUS=2 AND BBP2 THEN BEGIN
DRAWTEXTREL(320,350,' ●'),COLORgreen,linethick1{XG51};
END
ssssu1:=预测低一>low or 预测低一=low{XG51};
ssssu2:=预测低一<low{XG51};
IF BARSTATUS=2 AND ssssu1 THEN BEGIN
DRAWTEXTREL(10,480,' 到 位: ★'),COLORWHITE,linethick1{XG51};
END
ELSE
IF BARSTATUS=2 AND ssssu2 THEN BEGIN
DRAWTEXTREL(10,480,' 到 位: ●'),COLORgreen,linethick1{XG51};
END
ssssu3:=预测低二>low or 预测低二=low{XG51};
ssssu4:=预测低二<low{XG51};
IF BARSTATUS=2 AND ssssu3 THEN BEGIN
DRAWTEXTREL(10,730,' 到 位: ★'),COLORWHITE,linethick1{XG51};
END
ELSE
IF BARSTATUS=2 AND ssssu4 THEN BEGIN
DRAWTEXTREL(10,730,' 到 位: ●'),COLORgreen,linethick1{XG51};
END
LSSssu1:=预测低一1>最低价1 or 预测低一1=最低价1{XG51};
lssssu2:=预测低一1<最低价1{XG51};
IF BARSTATUS=2 AND lssssu1 THEN BEGIN
DRAWTEXTREL(10,480,' 昨 ★ '+NUMTOSTRN(ref(预测低一1,0),2)+'元'),COLORWHITE,linethick1{XG51};
END
ELSE
IF BARSTATUS=2 AND lssssu2 THEN BEGIN
DRAWTEXTREL(10,480,' 昨 ● '+NUMTOSTRN(ref(预测低一1,0),2)+'元'),COLORgreen,linethick1{XG51};
DRAWTEXTABS(5,5,'选股无忧网 www.xg51.cn'),linethick1,COLOR00EEff{XG51};
END
lssssu3:=预测低二1>最低价1 or 预测低二=最低价1{XG51};
lssssu4:=预测低二1<最低价1{XG51};
IF BARSTATUS=2 AND lssssu3 THEN BEGIN
DRAWTEXTREL(10,730,' 昨 ★ '+NUMTOSTRN(ref(预测低二1,0),2)+'元'),COLORWHITE,linethick1{XG51};
END
ELSE
IF BARSTATUS=2 AND lssssu4 THEN BEGIN
DRAWTEXTREL(10,730,' 昨 ● '+NUMTOSTRN(ref(预测低二1,0),2)+'元'),COLORgreen,linethick1{XG51};
END
su1:=最低价>最低价1{XG51};
su2:=最低价=最低价1{XG51};
su3:=最低价<最低价1{XG51};
IF BARSTATUS=2 AND su1 THEN BEGIN
DRAWTEXTREL(470,500,'★'),COLORWHITE,linethick1{XG51};
END
ELSE
IF BARSTATUS=2 AND su2 THEN BEGIN
DRAWTEXTREL(470,500,'★'),COLORffffff,linethick1{XG51};
END
ELSE
IF BARSTATUS=2 AND su3 THEN BEGIN
DRAWTEXTREL(470,500,'●'),COLORgreen,linethick1{XG51};
END
su4:=最高价>最高价1{XG51};
su5:=最高价=最高价1{XG51};
su6:=最高价<最高价1{XG51};
IF BARSTATUS=2 AND su4 THEN BEGIN
DRAWTEXTREL(620,500,'★'),COLORWHITE,linethick1{XG51};
END
ELSE
IF BARSTATUS=2 AND su5 THEN BEGIN
DRAWTEXTREL(620,500,'★'),COLORffffff,linethick1{XG51};
END
ELSE
IF BARSTATUS=2 AND su6 THEN BEGIN
DRAWTEXTREL(620,500,'●'),COLORgreen,linethick1{XG51};
END
su7:=开盘价>开盘价1{XG51};
su8:=开盘价=开盘价1{XG51};
su9:=开盘价<开盘价1{XG51};
IF BARSTATUS=2 AND su7 THEN BEGIN
DRAWTEXTREL(470,615,'★'),COLORWHITE,linethick1{XG51};
END
ELSE
IF BARSTATUS=2 AND su8 THEN BEGIN
DRAWTEXTREL(470,615,'★'),COLORffffff,linethick1{XG51};
END
ELSE
IF BARSTATUS=2 AND su9 THEN BEGIN
DRAWTEXTREL(470,615,'●'),COLORgreen,linethick1{XG51};
END
suu1:=收盘价>收盘价1{XG51};
suu2:=收盘价=收盘价1{XG51};
suu3:=收盘价<收盘价1{XG51};
IF BARSTATUS=2 AND suu1 THEN BEGIN
DRAWTEXTREL(620,615,'★'),COLORWHITE,linethick1{XG51};
END
ELSE
IF BARSTATUS=2 AND suu2 THEN BEGIN
DRAWTEXTREL(620,615,'★'),COLORffffff,linethick1{XG51};
END
ELSE
IF BARSTATUS=2 AND suu3 THEN BEGIN
DRAWTEXTREL(620,615,'●'),COLORgreen,linethick1{XG51};
END
ssuu1:=预测高一<high or 预测高一=high{XG51};
ssuu2:=预测高一>high{XG51};
IF BARSTATUS=2 AND ssuu1 THEN BEGIN
DRAWTEXTREL(660,350,' ★'),COLORWHITE,linethick1{XG51};
END
ELSE
IF BARSTATUS=2 AND ssuu2 THEN BEGIN
DRAWTEXTREL(660,350,' ●'),COLORgreen,linethick1{XG51};
END
ssuu3:=预测高二<high or 预测高二=high{XG51};
ssuu4:=预测高二>high{XG51};
IF BARSTATUS=2 AND ssuu3 THEN BEGIN
DRAWTEXTREL(660,500,' ★'),COLORWHITE,linethick1{XG51};
END
ELSE
IF BARSTATUS=2 AND ssuu4 THEN BEGIN
DRAWTEXTREL(660,500,' ●'),COLORgreen,linethick1{XG51};
END
ssuu5:=平均价一<high or 平均价一=high{XG51};
ssuu6:=平均价一>high{XG51};
IF BARSTATUS=2 AND ssuu5 THEN BEGIN
DRAWTEXTREL(660,650,' ★'),COLORWHITE,linethick1{XG51};
END
ELSE
IF BARSTATUS=2 AND ssuu6 THEN BEGIN
DRAWTEXTREL(660,650,' ●'),COLORgreen,linethick1{XG51};
END
ssu1:=熊价一<high or 熊价一=high{XG51};
ssu2:=熊价一>high{XG51};
IF BARSTATUS=2 AND ssu1 THEN BEGIN
DRAWTEXTREL(660,350,' ★ '),COLORWHITE,linethick1{XG51};
END
ELSE
IF BARSTATUS=2 AND ssu2 THEN BEGIN
DRAWTEXTREL(660,350,' ●'),COLORgreen,linethick1{XG51};
END
ssu3:=熊价二<high or 熊价二=high{XG51};
ssu4:=熊价二>high{XG51};
IF BARSTATUS=2 AND ssu3 THEN BEGIN
DRAWTEXTREL(660,500,' ★'),COLORWHITE,linethick1{XG51};
END
ELSE
IF BARSTATUS=2 AND ssu4 THEN BEGIN
DRAWTEXTREL(660,500,' ●'),COLORgreen,linethick1{XG51};
END
ssu5:=平均价二<high or 平均价二=high{XG51};
ssu6:=平均价二>high{XG51};
IF BARSTATUS=2 AND ssu5 THEN BEGIN
DRAWTEXTREL(660,650,' ★'),COLORWHITE,linethick1{XG51};
END
ELSE
IF BARSTATUS=2 AND ssu6 THEN BEGIN
DRAWTEXTREL(660,650,' ●'),COLORgreen,linethick1{XG51};
END
chec1:=预测低二1*1.006*(1+ppp)<high or 预测低二1*1.006*(1+ppp)=high{XG51};
chec2:=预测低二1*1.006*(1+ppp)>high{XG51};
IF BARSTATUS=2 AND chec1 THEN BEGIN
DRAWTEXTREL(660,780,' 测 试: 昨预测低二 ★ '),COLORWHITE,linethick1{XG51};
END
ELSE
IF BARSTATUS=2 AND chec2 THEN BEGIN
DRAWTEXTREL(660,780,' 测 试: 昨预测低二 ●'),COLORgreen,linethick1{XG51};
END
chec3:=high>最低价1*1.006*(1+ppp) or high=最低价1*1.006*(1+ppp){XG51};
chec4:=high<最低价1*1.006*(1+ppp){XG51};
IF BARSTATUS=2 AND chec3 THEN BEGIN
DRAWTEXTREL(660,780,' 昨最低价 ★ '),COLORWHITE,linethick1{XG51};
END
ELSE
IF BARSTATUS=2 AND chec4 THEN BEGIN
DRAWTEXTREL(660,780,' 昨最低价 ●'),COLORgreen,linethick1{XG51};
END
卖一:=预测低二1*1.006*(1+ppp){XG51};
卖二:=最低价1*1.006*(1+ppp){XG51};
DRAWTEXTREL(660,880,' 卖出价: '+NUMTOSTRN(ref(卖一,0),2)+'元 '+ NUMTOSTRN(ref(卖二,0),2)+'元'),colorffffff,linethick1{X!G*5^1!C!N!{};