通达信筹码换手未加密选股指标公式源码

源码正文：

M:=5{XG51};
HSL:HSL*CAPITAL,LINETHICK2 COLORFF00FF {XG51};
maHSL:MA(HSL,M),LINETHICK1 COLORBLUE{XG51};
VUR0:=(2*OPEN+HIGH+LOW+3*CLOSE)/7{XG51};
VUR1:=IF(CAPITAL,CAPITAL,-1)*VUR0{XG51};
VUR2:=SMA(AMOUNT,10,1)/1000;
VUR3:=MA(CLOSE*3,5);
VUR4:=VUR2*(CLOSE*3)/VUR3*1/10;
VUR5:=VUR2*(OPEN*3)/VUR3*1/10;
VUR6:=VUR2*(HIGH*3)/VUR3*1/10;
VUR7:=VUR2*(LOW*3)/VUR3*1/10;
VUR8:=(2*VUR5+VUR6+VUR7+3*VUR4)/7{XG51};
VUR9:=dma(ema(VUR4,2),SUM(vol,1)*VUR8){XG51};
VUR10:=EMA(VUR9,2){XG51};
VURA:=VUR9>VUR10{XG51};
VURB:=EMA(VUR1-VUR9,1){XG51};
VURC:=REF(VURB,1){XG51};
VURD:=VURB>VURC{XG51};
VURE:=(VURB-VURC)*15{XG51};
VURF:=(VUR9-VUR10)*30000{XG51};
VURG:=(VURC-VURB)*(-1){XG51};
VURH:=IF(VURB>VURC,VURE/500,0){XG51};
VURN:=IF(VURB<VURC,VURE/500,0){XG51};
VURT:=IF(VURA AND VURD,VURF/2000000,0){XG51};
VURL:=IF(VURA AND VURB<VURC,VURE/1000,0){XG51};
0,COLOR8A8A8A{XG51};
买进量_手:VURH,COLOR1010FF,POINTDOT{XG51};
卖出量_手:VURN,COLOR80FF00,POINTDOT{XG51};
买进_强烈:VURT,COLOR10E6FF,POINTDOT{XG51};
打压_减筹:VURL,COLORFF00FF,POINTDOT{XG51};
stICKLINE(VURB>VURC,0,VURE,6.8,1),COLOR1010FF{XG51};
STICKLINE(VURB<VURC,0,VURE,6.8,0),COLOR80FF00{XG51};
STICKLINE(VURA AND VURD AND CLOSE>OPEN,0,VURF*0.5,6.8,0),COLOR10E6FF{XG51};
STICKLINE(VURA AND VURB<VURC,0,VURE,6.8,0),COLORFF00FF;
HS:=FLOOR(SUM(V/CAPITAL,0)){XG51};
完全换手:STICKLINE(HS>REF(HS,1),0,VURE,6,0) COLORFF0000{X_G_5_1_C_N_{};

源码正文：

Var1:=(CLOSE-LLV(LOW,100))/(HHV(HIGH,100)-LLV(LOW,100))*200{XG51};
Var2:=SMA(Var1,3,1){XG51};
Var3:=Sma(Var2,3,1){XG51};
Var4:=3*Var2-2*Var3{XG51};
Var5:=LLV(LOW,5){XG51};
Var6:=HHV(HIGH,5){XG51};
Var7:=ema((CLOSE-Var5)/(Var6-Var5)*100,4)*2{XG51};
Var8:=EMA(0.667*REF(Var7,1)+0.333*Var7,2){XG51};
Var9:=3*Var7-2*Var8{XG51};
VarA:=POW(MA(CLOSE,5),2)+MA(CLOSE,5){XG51};
VarB:=POW(MA(LOW,5),2)+MA(LOW,5){XG51};
VarC:=POW(MA(HIGH,5),2)+MA(HIGH,5){XG51};
VarD:=(VarA-LLV(VarB,64))/(HHV(VarC,64)-LLV(VarB,64))*150+65-10{XG51};
VarE:=SMA(VarD,3,1)*1.5-100{XG51};
VarF:=SMA(VarE,3,1){XG51};
Var10:=3*VarE-2*VarF{XG51};
Var11:=(HIGH+LOW+CLOSE*2)/4{XG51};
Var12:=EMA(Var11,13){XG51};
Var13:=stD(Var11,13){XG51};
Var14:=(Var11-Var12)*100/Var13{XG51};
Var15:=EMA(Var14,5){XG51};
Var16:=EMA(Var15,13){XG51};
Var17:=EMA(Var15,13)+200-100{XG51};
Var18:=EMA(Var17,10){XG51};
Var19:=3*Var17-2*Var18{XG51};
Var1A:=Var2+Var7+VarE+Var17{XG51};
Var1B:=Var3+Var8+VarF+Var18{XG51};
Var1C:=Var4+Var9+Var10+Var19{XG51};
Var1D:=(HIGH+LOW+CLOSE)/3{XG51};
Var1E:=AMOUNT/vol/100{XG51};
Var1F:=SUM(AMOUNT,5)/SUM(VOL,5)/100{XG51};
Var20:=(Var1D-MA(Var1D,34))/(0.015*AVEDEV(Var1D,34)){XG51};
Var21:=dma(AMOUNT/VOL/100,VOL/CAPITAL){XG51};
Var22:=(HIGH+LOW+CLOSE+Var1D)/4{XG51};
Var23:=EMA(Var22,24){XG51};
Var24:=STD(Var22,24){XG51};
Var25:=(Var22-Var23)/Var24*100{XG51};
Var26:=(Var1D-MA(Var1D,24))/(0.015*AVEDEV(Var1D,24)){XG51};
Var27:=EMA(Var25,5){XG51};
Var28:=(Var1E-MA(Var1E,21))/(0.015*AVEDEV(Var1E,21)){XG51};
Var29:=(Var1F-MA(Var1F,90))/(0.015*AVEDEV(Var1F,90)){XG51};
Var2A:=((Var29+Var28+Var27+Var26+Var20)/5+165)/4{XG51};
Var2B:=(EMA(EMA(EMA(Var2A,15),10),5)-25)*2+Var21{XG51};
Var2C:=(Var1A+Var1B+Var1C*30)/32/5-15{XG51};
Var2D:=EMA(Var2C,13){XG51};
Var2E:=(Var2A+Var2C)/2/1.1{XG51};
0, POINTDOT{XG51};
50, POINTDOT{XG51};
105, POINTDOT{XG51};
短线: Var2E{XG51};
中线: (Var2B+Var2D)/2{XG51};
Var2F:=EMA(EMA(EMA(CLOSE,13),13),13){XG51};
Var30:=((Var2F-REF(Var2F,1))/REF(Var2F,1)*100+0.45)*50{XG51};
Var31:=MA(Var30,21){XG51};
Var32:=((HHV(HIGH,15)-CLOSE)/(HHV(HIGH,15)-LLV(LOW,15))*(-1)+0.96)*106{XG51};
Var33:=((HHV(HIGH,100)-CLOSE)/(HHV(HIGH,100)-LLV(LOW,100))*(-1)+0.96)*106{XG51};
Var34:=(HIGH+LOW+CLOSE)/3{XG51};
Var35:=((Var34-MA(Var34,14))/(0.015*AVEDEV(Var34,14))+200)/4{XG51};
Var36:=(HIGH+LOW+CLOSE*2)/4{XG51};
Var37:=EMA(Var36,13){XG51};
Var38:=STD(Var36,13){XG51};
Var39:=(Var36-Var37)*100/Var38{XG51};
Var3A:=EMA(Var39,5){XG51};
Var3B:=EMA(Var3A,13){XG51};
Var3C:=(EMA(Var3A,13)+100)/2-5{XG51};
Var3D:=EMA(Var3C,10){XG51};
Var3E:=EMA(VOL/CAPITAL,21)*13{XG51};
Var3F:=(92-100/(1+Var3E))*2.38{XG51};
Var40:=REF(CLOSE,1){XG51};
Var41:=WINNER(CLOSE)*100{XG51};
Var42:=WINNER(REF(CLOSE,1))*100{XG51};
Var43:=REF(INDEXC,1){XG51};
Var44:=(CLOSE-Var40)/Var40{XG51};
Var45:=(INDEXC-Var43)/Var43{XG51};
Var46:=Var44-Var45{XG51};
Var47:=SMA(MAX(CLOSE-Var40,0),4,1)/SMA(Abs(CLOSE-Var40),4,1)*100{XG51};
Var48:=SMA(MAX(CLOSE-Var40,0),8,1)/SMA(ABS(CLOSE-Var40),8,1)*100{XG51};
Var49:=SMA(MAX(CLOSE-Var40,0),12,1)/SMA(ABS(CLOSE-Var40),12,1)*100{XG51};
Var4A:=SMA(MAX(CLOSE-Var40,0)*(1+VOL/CAPITAL),12,1)/SMA(ABS(CLOSE-Var40)*(1+VOL/CAPITAL),12,1)*100{XG51};
Var4B:=SMA(MAX(Var41-Var42,0),12,1)/SMA(ABS(Var41-Var42),12,1)*100{XG51};
Var4C:=SMA(MAX(Var46,0),12,1)/SMA(ABS(Var46),12,1)*100{XG51};
Var4D:=(Var47+Var48+Var49)/3{XG51};
Var4E:=(Var4A+Var4B+Var4C+Var4D)/4{XG51};
Var4F:=(Var4E-31)*2.3{XG51};
Var50:=(EMA(EMA(EMA(EMA(Var4F,4),3),2),1)-10)*1.43{XG51};
Var51:=(HIGH+LOW+CLOSE*2)/4{XG51};
Var52:=EMA(Var51,13){XG51};
Var53:=STD(Var51,13){XG51};
Var54:=(Var51-Var52)*100/Var53{XG51};
Var55:=EMA(Var54,5){XG51};
Var56:=EMA(Var55,13){XG51};
Var57:=(EMA(Var56,13)+100)/2-5{XG51};
Var58:=EMA(Var57,10){XG51};
Var59:=3*Var57-2*Var58{XG51};
Var5A:=(CLOSE-LLV(LOW,90))/(HHV(HIGH,90)-LLV(LOW,90))*100{XG51};
Var5B:=SMA(Var5A,7,1){XG51};
Var5C:=SMA(Var5B,10,1){XG51};
Var5D:=3*Var5B-2*Var5C{XG51};
Var5E:=POW(MA(CLOSE,5),2)+MA(CLOSE,5){XG51};
Var5F:=POW(MA(LOW,5),2)+MA(LOW,5){XG51};
Var60:=POW(MA(HIGH,5),2)+MA(HIGH,5){XG51};
Var61:=(Var5E-LLV(Var5F,100))/(HHV(Var60,100)-LLV(Var5F,100))*100-15{XG51};
Var62:=SMA(Var61,21,1)*1.5{XG51};
Var63:=SMA(Var62,3,1){XG51};
Var64:=3*Var62-2*Var63{XG51};
Var65:=POW(MA(CLOSE,5),2)+MA(CLOSE,5){XG51};
Var66:=POW(MA(LOW,5),2)+MA(LOW,5){XG51};
Var67:=POW(MA(HIGH,5),2)+MA(HIGH,5){XG51};
Var68:=(Var65-LLV(Var66,64))/(HHV(Var67,64)-LLV(Var66,64))*100{XG51};
Var69:=SMA(Var68,2,1){XG51};
Var6A:=SMA(Var69,2,1){XG51};
Var6B:=3*Var69-2*Var6A{XG51};
Var6C:=EMA(VOL/CAPITAL,21)*100{XG51};
Var6D:=(100/(1+Var6C)*(-1)+92)*1.57{XG51};
Var6E:=DMA(AMOUNT/VOL/100,VOL/CAPITAL){XG51};
Var6F:=(HIGH+LOW+CLOSE)/3{XG51};
Var70:=((Var6F-MA(Var6F,5))/(0.015*AVEDEV(Var6F,5))+Var6E+140)/4{XG51};
Var71:=EMA(EMA(EMA(CLOSE,100),100),100){XG51};
Var72:=((Var71-REF(Var71,1))/REF(Var71,1)*100+0.28)*179{XG51};
Var73:=EMA(Var72,20){XG51};
Var74:=(Var5D+Var64)/2{XG51};
Var75:=(Var69+Var6A+Var6B+Var57+Var5B+Var62+Var6D+Var58+Var5C+Var63+Var59+Var5D+Var64+Var70+EMA(Var35,5)*5)/20{XG51};
Var76:=(Var57+Var5B+Var62+Var6D+Var74+Var72+Var73)/7{XG51};
Var77:=(Var58+Var5C+Var63+Var6D+Var74+Var72+Var73)/7{XG51};
Var78:=(Var76+Var77)/2*1.22{XG51};
Var79:=(EMA((Var74+Var78+EMA(Var75,5))/3,89)-12)*1.72{XG51};
长线: (Var78+Var79)/2{X_G_5.1_C_N_{};