大智慧布林极限选股指标公式源码

大智慧布林极限选股指标公式源码

源码正文：

input:n(34),k(3){XG51};
Var1:=ma(CLOSE,20){XG51};
布林极限:=100*(CLOSE-Var1)/stD(CLOSE,20){XG51};
布林K值:=ema(布林极限,10){XG51};
Var2:=EMA(布林极限,5){XG51};
Var3:=EMA(布林K值,5){XG51};
Var4:=EMA(HHV(HIGH,500),21){XG51};
Var5:=EMA(HHV(HIGH,250),21){XG51};
Var6:=EMA(HHV(HIGH,90),21){XG51};
Var7:=EMA(LLV(LOW,500),21){XG51};
Var8:=EMA(LLV(LOW,250),21){XG51};
Var9:=EMA(LLV(LOW,90),21){XG51};
VarA:=EMA((Var7*0.96+Var8*0.96+Var9*0.96+Var4*0.558+Var5*0.558+Var6*0.558)/6,21){XG51};
VarB:=EMA((Var7*1.25+Var8*1.23+Var9*1.2+Var4*0.55+Var5*0.55+Var6*0.65)/6,21){XG51};
VarC:=EMA((Var7*1.3+Var8*1.3+Var9*1.3+Var4*0.68+Var5*0.68+Var6*0.68)/6,21){XG51};
DRAWTEXTAbs(5,5,'选股无忧网 www.xg51.cn'),linethick1,COLOR00EEff{XG51};
VarD:=EMA((VarA*3+VarB*2+VarC)/6*1.738,21){XG51};
VarE:=REF(LOW,1){XG51};
VarF:=SMA(ABS(LOW-VarE),3,1)/SMA(MAX(LOW-VarE,0),3,1)*100{XG51};
Var10:=IF(CLOSE*1.35<=VarD,VarF*10,VarF/10){XG51};
Var11:=EMA(Var10,3){XG51};
Var12:=LLV(LOW,30){XG51};
Var13:=HHV(Var11,30){XG51};
Var14:=IF(LOW<=Var12,(Var11+Var13*2)/2,0){XG51};
Var15:=EMA(Var14,3)/500-100{XG51};
Var16:=0.2*Var15{XG51};
Var17:=1.2*Var15{XG51};
Var18:=(2*CLOSE+HIGH+LOW)/4{XG51};
Var19:=LLV(LOW,34){XG51};
Var1A:=HHV(HIGH,34){XG51};
Var1B:=(Var18-LLV(LOW,7))/(HHV(HIGH,7)-LLV(LOW,7))*100{XG51};
Var1C:=EMA(Var1B,3){XG51};
Var1D:=EMA(Var1C,3){XG51};
Var1E:=EMA((Var18-Var19)/(Var1A-Var19)*100,9){XG51};
Var1F:=EMA(0.667*REF(Var1E,1)+0.333*Var1E,3){XG51};
Var20:=LLV(HIGH,240){XG51};
Var21:=100*(CLOSE-Var20)/Var20{XG51};
Var22:=HHV(HIGH,240){XG51};
Var23:=100*(Var22-CLOSE)/CLOSE{XG51};
Var24:=REF(HHV(CLOSE,60),1){XG51};
Var25:=REF(LLV(CLOSE,60),1){XG51};
Var26:=100*(CLOSE-Var25)/(Var24-Var25){XG51};
SD1:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100{XG51};
个股A:=MA(SD1,K){XG51};
SD2:=("1a0002$CLOSE"-LLV("1a0002$LOW",N))/(HHV("1a0002$HIGH",N)-LLV("1a0002$LOW",N))*100{XG51};
大盘A:=MA(SD2,K){XG51};
差值:=个股A-大盘A{XG51};
IF(差值>=0,差值*2,0), COLORWHITE,STICK,LINETHICK3{XG51};
IF(差值<0,差值*2, 0), COLOR556600,STICK,LINETHICK3{XG51};
DRAWTEXT(DISPSTATUS=2 AND VAR3>0,-150,'强'),COLORFF00FF,ALIGN2{XG51};
DRAWTEXT(DISPSTATUS=2 AND VAR3<0,-150,'弱'),COLOR00FFFF,ALIGN2{XG51};
PARTLINE(0,差值>=0,RGB(130,0,30),差值<0,RGB(0,80,70)),LINETHICK5{XG51};
STICKLINE(布林极限>=布林K值,布林极限,布林K值,6,0),colormagenta{XG51};
STICKLINE(布林极限<布林K值,布林K值,布林极限,8,0),COLOR006600{XG51};
STICKLINE(布林极限<布林K值,布林K值,布林极限,4,0),COLOR009900{XG51};
STICKLINE(布林极限<布林K值,布林K值,布林极限,1,0),COLOR00EE00{XG51};
STICKLINE(Var2>=Var3,Var2,Var3,6,0),colormagenta{XG51};
STICKLINE(Var2<Var3,Var3,Var2,8,0),COLOR006600{XG51};
STICKLINE(Var2<Var3,Var3,Var2,4,0),COLOR009900{XG51};
STICKLINE(Var2<Var3,Var3,Var2,1,0),COLOR00EE00{XG51};
STICKLINE(crOSS(布林极限,布林K值),布林极限,布林K值,6,0),colormagenta{XG51};
STICKLINE(布林极限>=170,布林极限,布林K值,7,0),COLOR0033cc{XG51};
STICKLINE(布林极限>=170,布林极限,布林K值,4,0),COLOR0066ff{XG51};
STICKLINE(布林极限>=170,布林极限,布林K值,1,0),COLOR00ffff{X^G*5.1^C^N^{};