同花顺神龙筹码未加密选股指标公式源码

同花顺神龙筹码未加密选股指标公式源码

源码正文：

M:=13;N:=30;
A01:=(C+O+L+H)/4;
A02:=(WINNER((A01 * 1.04)) * 100.000);
A03:=(WINNER((A01 * 0.96)) * 100.000);
A04:A03,NODRAW;
A08:A02-A03,NODRAW;
A06:( 100.000 - A02),NODRAW;
stICKLINE( 1.000,0,A04, 2,0),colorred;
STICKLINE( 1.000, 100.000,A02, 2,0),colorgreen;
STICKLINE( 1.000,A04,(100-A06), 2,0),coloryellow;
A0A:=(((((HHV(A04, 15.000) - A03) / A03) * 100.000) > N) AND (HHV(A04, 15.000) > 50.000));
STICKLINE(A0A,(0 - 2.000), 2.000, 4,0),coloryellow;
STICKLINE(NOT(A0A),(0 - 2.000), 2.000, 4,0),colormagenta;
获利:MA(A03,M),colorred,LINETHICK3;
浮动: (MA(A02,M) - MA(A03,M)),coloryellow,LINETHICK3;
套牢: (100.000 - MA(A02,M)),colorgreen,LINETHICK3;

同花顺换手吸筹未加密选股指标公式源码

源码正文：

换手率=vol/SHGZG*100;
A1=REPDATE(&GDZS,1,0);/*最近一次日期*/
A2=REPDATE(&GDZS,2,0);/*最近一次日期*/
日数=BArslAst(A1<>REF(A1,1))+1;/*上一次报告期不一致时，至今日数*/
n=1;
累=0;
IF 日数=1 THEN
累=累+REF(换手率,n);
n=n+1;}}
累换:=BacKSET(累,n),colorgreen;
/*流通比例=（1-十大流通股东比例）*/
流=100-JGCGS/SHGZG*100;
/*理论股东变化*/
gd=累/流;
/*真实股东变化*/
B1=GDZS;
B2=LASTREP(&GDZS,2);/*上次股东户数*/
B3=(B1/B2-1)*100;/*真实股东变化率*/
吸筹比例:BACKSET(B3/gd,n);
HORLINE(1,0,0,3),colorblack;