通达信机构动态未加密选股指标公式源码

源码正文：

V1:=(C*2+H+L)/4*10{XG51};
V2:=ema(V1,13)-Ema(V1,34){XG51};
V3:=EMA(V2,5){XG51};
V4:=2*(V2-V3)*5.5{XG51};
庄秘撤: IF(V4<=0,V4,0),COLOR00FF00,LINETHICK2{XG51};
庄秘进: IF(V4>=0,V4,0),COLORFF00FF,LINETHICK2{XG51};
V5:=(HHV(INDEXH,8)-INDEXC)/(HHV(INDEXH,8)-LLV(INDEXL,8))*8{XG51};
V6:=EMA(3*V5-2*SMA(V5,18,1),5){XG51};
V7:=(INDEXC-LLV(INDEXL,8))/(HHV(INDEXH,8)-LLV(INDEXL,8))*10{XG51};
V8:=(INDEXC*2+INDEXH+INDEXL)/4{XG51};
V9:=EMA(V8,13)-EMA(V8,34){XG51};
VA:=EMA(V9,3){XG51};
VB:=(V9-VA)/2{XG51};
大筹金进场: IF(VB>=0,VB,0),COLORBLUE,LINETHICK2{XG51};
大筹金撤走: IF(VB<=0,VB,0),COLORYELLOW,LINETHICK2{XG51};
AA:=WINNER(CLOSE+CLOSE*15/100)*100{XG51};
BB:=WINNER(CLOSE+CLOSE*0/100)*100{XG51};
CC:=AA-BB{XG51};
DD:=(WINNER(CLOSE-CLOSE*0.1/100)-WINNER(CLOSE-CLOSE*15/100))*100{XG51};
EE:=CC<3 AND DD<0.5 AND OPEN!=LOW{XG51};
A1:=DYnaINFO(6){XG51};
A2:=IF(LOW>A1,0,IF(HIGH<A1,1,(A1-LOW+0.01)/(HIGH-LOW+0.01))){XG51};
A3:=vol/WINNER(LOW){XG51};
A4:=REF(HHV(CLOSE,120),1){XG51};
A5:=REF(LLV(CLOSE,120),1){XG51};
A6:=100*(CLOSE-A5)/(A4-A5){XG51};
A7:=A2>0 OR A2=1{XG51};
A8:=A7 AND A3/REF(A3,3)>=3 AND A6<80{XG51};
A9:=REF(A8,1) OR REF(A8,2) OR REF(A8,3) OR REF(A8,4){XG51};
A10:=A8 AND A9{XG51};
A11:=IF(FILTER(A8,3),5,0){XG51};
A12:=IF(FILTER(A10,3) OR EE,10,0){XG51};
筹码进场日:IF(A11,8,0),LINETHICK0{XG51};
stICKLINE(A12,0,15,5,0),COLORFF00FF{XG51};
筹码加仓日:IF(A12,88,0),LINETHICK0{XG51};
STICKLINE(A12,0,15,5,0),COLORFF00FF{XG51};
STICKLINE(A11,0,5,5,0),COLORFF7700{XG51};
STICKLINE(A11,0,5,4.5,0),COLORFF8800{XG51};
STICKLINE(A11,0,5,4,0),COLORFF9900{XG51};
STICKLINE(A11,0,5,3.5,0),COLORFFAA00{XG51};
STICKLINE(A11,0,5,3,0),COLORFFBB00{XG51};
STICKLINE(A11,0,5,2.5,0),COLORFFCC00{XG51};
STICKLINE(A11,0,5,2,0),COLORFFDD00{XG51};
STICKLINE(A11,0,5,1,0),COLORFFEE00{XG51};
STICKLINE(A12,0,15,4.5,0),COLOR102099{XG51};
STICKLINE(A12,0,15,4,0),COLOR1020AA{XG51};
STICKLINE(A12,0,15,3.5,0),COLOR1020BB{XG51};
STICKLINE(A12,0,15,3,0),COLOR1020CC{XG51};
STICKLINE(A12,0,15,2.5,0),COLOR1020DD{XG51};
STICKLINE(A12,0,15,2,0),COLOR1020EE{XG51};
STICKLINE(A12,0,15,1,0),COLOR1020FF{XG51};
DRAWTEXT(A11,8,'筹码进场'){XG51};
DRAWTEXT(A12,17,'筹码加仓'){XG51};
VAR1:=REF(LOW,1){XG51};
VAR2:=SMA(Abs(LOW-VAR1),13,1)/SMA(MAX(LOW-VAR1,0),13,1)*4{XG51};
VAR3:=EMA(VAR2,13){XG51};
VAR4:=LLV(LOW,34){XG51};
VAR5:=EMA(IF(LOW<=VAR4,VAR3,0),3){XG51};
主力进场:IF(VAR5>REF(VAR5,1),VAR5,0),COLORWHITE,LINETHICK2{XG51};
STICKLINE(VAR5>REF(VAR5,1),0,VAR5,7,0 ),COLORWHITE{XG51};
洗盘:IF(VAR5<REF(VAR5,1),VAR5,0),COLORCYAN,LINETHICK2{XG51};
STICKLINE(VAR5<REF(VAR5,1),0,VAR5,2,1),COLORCYAN{XG51};
VAR6:=100-3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA((CLOSE-
LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1){XG51};
VAR7:=100-3*SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA((OPEN-LLV
(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1){XG51};
VAR8:=VAR6<REF(VAR7,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1){XG51};
DRAWTEXT(VAR8 AND COUNT(VAR8,30)=1,40,'★有筹码进场'){X-G_5*1-C-N-{};

源码正文：

VAR1:=10;VAR2:=11;VAR3:=12;VAR4:=13{XG51};
VAR5:=14;VAR6:=15;VAR7:=16;VAR8:=17{XG51};
VAR9:=18;VARA:=19;VARB:=20{XG51};
VARC:=SMA(((CLOSE-LLV(LOW,VAR1))/(HHV(HIGH,VAR1)-LLV(LOW,VAR1)))*(100),4,1){XG51};
VARD:=Sma(((CLOSE-LLV(LOW,VAR2))/(HHV(HIGH,VAR2)-LLV(LOW,VAR2)))*(100),4,1){XG51};
VARE:=SMA(((CLOSE-LLV(LOW,VAR3))/(HHV(HIGH,VAR3)-LLV(LOW,VAR3)))*(100),4,1){XG51};
VARF:=SMA(((CLOSE-LLV(LOW,VAR4))/(HHV(HIGH,VAR4)-LLV(LOW,VAR4)))*(100),4,1){XG51};
VAR10:=SMA(((CLOSE-LLV(LOW,VAR5))/(HHV(HIGH,VAR5)-LLV(LOW,VAR5)))*(100),4,1){XG51};
VAR11:=SMA(((CLOSE-LLV(LOW,VAR6))/(HHV(HIGH,VAR6)-LLV(LOW,VAR6)))*(100),4,1){XG51};
VAR12:=SMA(((CLOSE-LLV(LOW,VAR7))/(HHV(HIGH,VAR7)-LLV(LOW,VAR7)))*(100),4,1){XG51};
VAR13:=SMA(((CLOSE-LLV(LOW,VAR8))/(HHV(HIGH,VAR8)-LLV(LOW,VAR8)))*(100),4,1){XG51};
VAR14:=SMA(((CLOSE-LLV(LOW,VAR9))/(HHV(HIGH,VAR9)-LLV(LOW,VAR9)))*(100),4,1){XG51};
VAR17:=SMA(((CLOSE-LLV(LOW,VARB))/(HHV(HIGH,VARB)-LLV(LOW,VARB)))*(100),4,1){XG51};
(SMA((VAR17-50)*(2),3,1)+SMA((VAR13-50)*(2),3,1))/(2),COLOR339933{XG51};
(SMA((VAR14-50)*(2),3,1)+SMA((VAR10-50)*(2),3,1))/(2),COLORFF9966{XG51};
(SMA((VAR13-50)*(2),3,1)+SMA((VARF-50)*(2),3,1))/(2),COLORFF9966{XG51};
(SMA((VAR12-50)*(2),3,1)+SMA((VARE-50)*(2),3,1))/(2),COLORFFFF00{XG51};
(SMA((VAR11-50)*(2),3,1)+SMA((VARD-50)*(2),3,1))/(2),COLORFFCC33,COLORFFFF99{XG51};
(SMA((VAR10-50)*(2),3,1)+SMA((VARC-50)*(2),3,1))/(2)COLORstICK,COLORGREEN{XG51};
((3)*(VAR17-50))*(2)-(2)*(SMA((VAR17-50)*(2),3,1)),COLOR00FFFF{XG51};
VAR18:=(HIGH+LOW+CLOSE)/(3){XG51};
VAR19:=(VAR18-MA(VAR18,14))/((0.015)*(AVEDEV(VAR18,14))){XG51};
VAR1A:=(VAR18-MA(VAR18,70))/((0.015)*(AVEDEV(VAR18,70))){XG51};
VAR1B:=IF((VAR19>=150) AND (VAR19<200) AND (VAR1A>=150) AND (VAR1A<200),(-10),0){XG51};
VAR1C:=IF((VAR19<=(-150)) AND (VAR19>(-200)) AND (VAR1A<=(-150)) AND (VAR1A>(-200)),10,0){XG51};
VAR1D:=((CLOSE-MA(CLOSE,13))/(MA(CLOSE,13)))*(100){XG51};
VAR1E:=100-Abs(VAR1D){XG51};
IF((BARSCOUNT(CLOSE)<13),100,IF((VAR1E<88) AND (VAR1D>0),85,100)),COLORCCFFCC{XG51};
IF((BARSCOUNT(CLOSE)<13),(-100),0-IF((VAR1E<92) AND (VAR1D<0),85,100)),COLOR008000{XG51};
IF((BARSCOUNT(CLOSE)<70),120,IF((VAR1A>=200) AND (VAR19>=150),(-15),VAR1B)+120),COLORCCFF66{XG51};
IF((BARSCOUNT(CLOSE)<70),(-120),IF((VAR1A<=(-200)) AND (VAR19<=(-150)),15,VAR1C)-120),COLOR0000FF{X!G*5?1!C!N!{};