通达信量能红孩未加密选股指标公式源码

源码正文：

N:=23{XG51};
VAR1:=(100-100/(1+SUM(vol,N)/CAPITAL))*CAPITAL*96/10000{XG51};
LNC:=VAR1*CLOSE{XG51};
B1:=REF(LNC,1);B2:=REF(LNC,2){XG51};
SS:=IF(LNC>REF(LNC,1) AND REF(LNC,1)>=REF(LNC,2),1,IF(LNC<REF(LNC,1) AND REF(LNC,1)<=REF(LNC,2),-1,IF(LNC>REF(LNC,2) AND REF(LNC,2)>REF(LNC,1),2,IF(LNC<REF(LNC,2) AND REF(LNC,2)<REF(LNC,1),-2,0))));
SM:=IF(REF(SS,1)>0,REF(SS,1),IF(REF(SS,2)>0,REF(SS,2),IF(REF(SS,3)>0,REF(SS,3),IF(REF(SS,4)>0,REF(SS,4),IF(REF(SS,5)>0,REF(SS,5),IF(REF(SS,6)>0,REF(SS,6),IF(REF(SS,7)>0,REF(SS,7),0))))))){XG51};
MC:=IF(REF(SS,1)>0,B2,IF(SM>0,MIN(B1,B2),maX(B1,B2))),COLORFF00FF{XG51};
SS1:=IF(LNC>REF(LNC,1) AND REF(LNC,1)>=REF(LNC,2),1,IF(LNC<REF(LNC,1) AND REF(LNC,1)<=REF(LNC,2),-1,IF(LNC>REF(LNC,2) AND REF(LNC,2)>REF(LNC,1),2,IF(LNC<REF(LNC,2) AND REF(LNC,2)<REF(LNC,1),-2,0))));
SM1:=IF(REF(SS,1)<0,REF(SS,1),IF(REF(SS,2)<0,REF(SS,2),IF(REF(SS,3)<0,REF(SS,3),IF(REF(SS,4)<0,REF(SS,4),IF(REF(SS,5)<0,REF(SS,5),IF(REF(SS,6)<0,REF(SS,6),IF(REF(SS,7)<0,REF(SS,7),0))))))){XG51};
MC1:=IF(REF(SS,1)<0,B2,IF(SM>0,MIN(B1,B2),MAX(B1,B2))),COLORFF00FF{XG51};
A:MA(SQRT(MC),1),COLORFF9933,LINETHICK2{XG51};
IF(A>=REF(A,1),A,DRAWNULL),COLORWHITE,LINETHICK4{XG51};
IF(A<REF(A,1),A,DRAWNULL),COLORFF9933,LINETHICK2;
A1:MA(SQRT(MC1),5),COLOR33FF33,LINETHICK2{XG51};
IF(A1>=REF(A1,1),A1,DRAWNULL),COLORFF00FF,LINETHICK3{XG51};
IF(A1<REF(A1,1),A1,DRAWNULL),COLOR33FF33,LINETHICK2;
IF(A1>REF(A1,1),A1,DRAWNULL),COLOR00FFFF,POINTDOT,LINETHICK5{X-G-5~1-C-N-{};

源码正文：

V1:=AMOUNT/10000{XG51};
成交金额:V1/1000{XG51};
ma1:MA(AMOUNT/10000,5), LINETHICK2{XG51};
MA2:MA(AMOUNT/10000,24), LINETHICK2{XG51};
MA3:MA(AMOUNT/10000,60), LINETHICK2{XG51};
换手率:100*V/CAPITAL{XG51};
VAR1:=REF(C,1){XG51};
VAR4:=(VAR1-L)/(H-L){XG51};
VAR5:=V1*VAR4{XG51};
VAR2:=V*VAR4{XG51};
VAR3:=Abs(VAR2){XG51};
VAR6:=ABS(VAR5){XG51};
VAR7:=ABS(V1-VAR6){XG51};
买盘:ABS(V-VAR3)/100{XG51};
卖盘:VAR3/100{XG51};
买卖盘比％:ABS(V-VAR3)/V*100{XG51};
stICKLINE(C>0,0,VAR6,3,0),COLORGREEN{XG51};
STICKLINE(换手率<3,VAR6,V1 ,3 ,0),COLORWHITE{XG51};
STICKLINE(换手率>=3 AND 换手率<7,VAR6, V1,3,0),COLORBLUE{XG51};
STICKLINE(换手率>=7,VAR6, V1, 3,0) ,COLORCYAN{X=G!5~1=C=N={};