同花顺牛二线未加密选股指标公式源码

同花顺牛二线未加密选股指标公式源码

源码正文：

VAR255:=LLV(LOW,5);
VAR355:=HHV(HIGH,50);
动力线:ema((CLOSE-VAR255)/(VAR355-VAR255)*5,5)*20,POINTDOT,;
stICKLINE(动力线>REF(动力线,1) ,动力线 ,REF(动力线,1),8,1),colorlired;
STICKLINE(动力线<=REF(动力线,1) ,动力线 ,REF(动力线,1),8,1),COLOR00FF00;
LC:=REF(CLOSE,1);
rsi6:=SMA(maX(CLOSE-LC,0),4,1)/SMA(Abs(CLOSE-LC),4,1)*100;
MA6 :MA(RSI6,3),colorgreen;
STICKLINE(MA6>REF(MA6,1) ,MA6 ,REF(MA6,1),2,1),COLOR0000FF;
STICKLINE(动力线>MA6,动力线,MA6,2,0),coloryellow,LINETHICK3;
B:=zig(3,51/5)*100,colorwhite;
G:=MA(B,2),coloryellow;
D:=crOSS(B,G)*1000,colorred;
W:=CROSS(G,B)*1000,colorblue;
A30:=MA(C,30);
angleA30:=ATAN((A30/REF(A30,1)-1)*100)*57.3;
angle30:=angleA30>40 OR angleA30<-48;
A10:=MA(C,10);
angleA10:=ATAN((A10/REF(A10,1)-1)*100)*57.3;
angle10:=angleA10>20 OR angleA10<-25 AND CLOSE>MA(CLOSE,20) ;
A3010:=angle30 OR angle10;
aazt:=COUNT(CLOSE>REF(CLOSE,1)*1.097 ,20)>0;
DRAWGBK( W=1000 ),colorcyan;
DRAWGBK( D=1000 ),color0099FF;
DRAWGBK( W=1000 AND aazt),colorgreen;
DRAWGBK( D=1000 AND aazt),colorred;
F1:=ZIG(3,18);
方向:=IF((F1> REF(F1,1)),-14,99);
STICKLINE(方向>90,-14,-2,10,1),COLOR00FF00;
STICKLINE(方向<0,88,99,10,1),colorred;

同花顺股东户数线未加密选股指标公式源码

源码正文：

本次日期:=REPDATE(&GDZS,1,0);
本次人数:=GDZS;
上次人数:=LAstREP(&GDZS,2);
上两期次人数:=LASTREP(&GDZS,3);
上三期次人数:=LASTREP(&GDZS,4);
差值:=本次人数-上次人数;
人均持股:=SHGZG/本次人数;
人数变比:=100*(本次人数/上次人数-1);
两期人数变比:=100*(本次人数/上两期次人数-1);
三期人数变比:=100*(本次人数/上三期次人数-1);
人均持股变比:=100*(上次人数/本次人数-1);
CON1:=本次日期=DATE;
POLYLINE(CON1,GDZS);
/*以下为股东人数字符显示位置定位的一系列判断，避免数字和线重叠*/
T1:=GDZS!=REF(GDZS,1);/*股东人数变动日*/
T2:=IF(T1,IF(REFX(&GDZS,1)!=GDZS,1,IF(REFX(&GDZS,2)!=GDZS,2,IF(REFX(&GDZS,3)!=GDZS,3,
IF(REFX(&GDZS,4)!=GDZS,4,IF(REFX(&GDZS,5)!=GDZS,5,IF(REFX(&GDZS,6)!=GDZS,6,IF(REFX(&GDZS,7)!=GDZS,7,
IF(REFX(&GDZS,8)!=GDZS,8,IF(REFX(&GDZS,9)!=GDZS,9,IF(REFX(&GDZS,10)!=GDZS,10,IF(REFX(&GDZS,11)!=GDZS,11,
IF(REFX(&GDZS,12)!=GDZS,12,0)))))))))))),0);/*在人数变动日判断下一个变动日离现在的天数*/
T3:=(REFX(&GDZS,T2)-GDZS);
T4:=IF(T3>0,0.95,1.05);
DRAWTEXT(CON1,T4*GDZS,'↓'+TOSTRING(GDZS,0)+'（'+人数变比+'%'+'）'),colorgreen;
/*DRAWNUMBER_FIX(ISLASTBAR,0,0,0,'实际流通市值：'+TOSTRING(ZYLTGB*C/100000000,0)+'亿元'),colorgreen;*/
TIPTEXT(CON1,GDZS,TOSTRING(人均持股,0)+'股，较上期变动'+TOSTRING(人均持股变比,0)+'%'),colorgray;
/*股东人数:TOSTRING(GDZS,0)+'（较上期变动'+人数变比+'%)'+'（较上两期变动'+两期人数变比+'%'+')'+'（较上三期变动'+三期人数变比+'%'+'）',coloryellow;*/
股东人数:TOSTRING(GDZS,0),colorgreen;
较上期:TOSTRING(人数变比,0)+'%',colorgreen;
较上两期:TOSTRING(两期人数变比,0)+'%',coloryellow;
较上三期:TOSTRING(三期人数变比,0)+'%',colorred;
实际流通市值:TOSTRING(ZYLTGB*C/100000000,0)+'亿元',colorwhite;