股资源-股票学习站-学炒股-股票课程-炒股教程-分析选股指标-入门基础知识

 找回密码
 注册昵称

QQ登录

只需一步,快速开始

搜索
上一主题 下一主题

[同花顺] 让主力行为无处藏身,同花顺软件股东人数指标


    [-----复制链接-----]
楼主
 通达信源码安装路径:1,工具栏点击公式选项。2,弹出公式窗口点击新建。3,把源码复制到指标编辑器保存。4,回到K线图界面安装建立好的公式 || 2024-3-29 17:47:49
让主力行为无处藏身,同花顺软件股东人数指标介绍

让主力行为无处藏身,同花顺软件股东人数指标


A1:=REPDATE(&GDZS,1,0);
A2:=REPDATE(&GDZS,2,0);
A3:=GDZS;
A4:=LASTREP(&GDZS,2);
A5:=SHGZG/A3;
A6:=100*(A3/A4-1);
A7:=100*(A4/A3-1);
A8:=IF(COUNTTIME(A2,A1,3)>16,'☆','');
CON1:=GDZS!=REF(GDZS,1);
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)+A8),colorgreen;
TIPTEXT(CON1,GDZS,TOSTRING(A5,0)+'股,较上期变动'+TOSTRING(A7,0)+'%'),colorgray;
鼠标所在:TOSTRING(GDZS,0)+'人(较上期变动'+A6+'%'+')';
实际流通市值:IF(ISLASTBAR,TOSTRING(ZYLTGB*C/100000000,2)+'亿元',NULL);
▲:IF(ISLASTBAR,NULL,'鼠标移到最新K线可显示实际流通市值和活筹个数;鼠标停在"△"上可显示人均持股');
A1:=(STRLEFT(LTGDMC1,2)+STRMID(LTGDMC1,3,2)+STRRIGHT(LTGDMC1,2)=LTGDMC1) OR (STRLEFT(LTGDMC1,2)+STRRIGHT(LTGDMC1,2)=LTGDMC1);
A2:=(STRLEFT(LTGDMC2,2)+STRMID(LTGDMC2,3,2)+STRRIGHT(LTGDMC2,2)=LTGDMC2) OR (STRLEFT(LTGDMC2,2)+STRRIGHT(LTGDMC2,2)=LTGDMC2);
A3:=(STRLEFT(LTGDMC3,2)+STRMID(LTGDMC3,3,2)+STRRIGHT(LTGDMC3,2)=LTGDMC3) OR (STRLEFT(LTGDMC3,2)+STRRIGHT(LTGDMC3,2)=LTGDMC3);
A4:=(STRLEFT(LTGDMC4,2)+STRMID(LTGDMC4,3,2)+STRRIGHT(LTGDMC4,2)=LTGDMC4) OR (STRLEFT(LTGDMC4,2)+STRRIGHT(LTGDMC4,2)=LTGDMC4);
A5:=(STRLEFT(LTGDMC5,2)+STRMID(LTGDMC5,3,2)+STRRIGHT(LTGDMC5,2)=LTGDMC5) OR (STRLEFT(LTGDMC5,2)+STRRIGHT(LTGDMC5,2)=LTGDMC5);
A6:=(STRLEFT(LTGDMC6,2)+STRMID(LTGDMC6,3,2)+STRRIGHT(LTGDMC6,2)=LTGDMC6) OR (STRLEFT(LTGDMC6,2)+STRRIGHT(LTGDMC6,2)=LTGDMC6);
A7:=(STRLEFT(LTGDMC7,2)+STRMID(LTGDMC7,3,2)+STRRIGHT(LTGDMC7,2)=LTGDMC7) OR (STRLEFT(LTGDMC7,2)+STRRIGHT(LTGDMC7,2)=LTGDMC7);
A8:=(STRLEFT(LTGDMC8,2)+STRMID(LTGDMC8,3,2)+STRRIGHT(LTGDMC8,2)=LTGDMC8) OR (STRLEFT(LTGDMC8,2)+STRRIGHT(LTGDMC8,2)=LTGDMC8);
A9:=(STRLEFT(LTGDMC9,2)+STRMID(LTGDMC9,3,2)+STRRIGHT(LTGDMC9,2)=LTGDMC9) OR (STRLEFT(LTGDMC9,2)+STRRIGHT(LTGDMC9,2)=LTGDMC9);
A10:=(STRLEFT(LTGDMC10,2)+STRMID(LTGDMC10,3,2)+STRRIGHT(LTGDMC10,2)=LTGDMC10) OR (STRLEFT(LTGDMC10,2)+STRRIGHT(LTGDMC10,2)=LTGDMC10);
AL1:=A1 AND LTCGS1/SHGZG<0.05;
AL2:=A2 AND LTCGS2/SHGZG<0.05;
AL3:=A3 AND LTCGS3/SHGZG<0.05;
AL4:=A4 AND LTCGS4/SHGZG<0.05;
AL5:=A5 AND LTCGS5/SHGZG<0.05;
AL6:=A6 AND LTCGS6/SHGZG<0.05;
AL7:=A7 AND LTCGS7/SHGZG<0.05;
AL8:=A8 AND LTCGS8/SHGZG<0.05;
AL9:=A9 AND LTCGS9/SHGZG<0.05;
AL10:=A10 AND LTCGS10/SHGZG<0.05;
活筹个数:IF(ISLASTBAR,TOSTRING(AL1+AL2+AL3+AL4+AL5+AL6+AL7+AL8+AL9+AL10,0)+'个',NULL);
Y1:=IF(AL1,0,255);
Y2:=IF(AL2,0,255);
Y3:=IF(AL3,0,255);
Y4:=IF(AL4,0,255);
Y5:=IF(AL5,0,255);
Y6:=IF(AL6,0,255);
Y7:=IF(AL7,0,255);
Y8:=IF(AL8,0,255);
Y9:=IF(AL9,0,255);
Y10:=IF(AL10,0,255);










gd44865

回复

举报

QQ|

GMT+8, 2024-11-17 23:52

快速回复 返回顶部 返回列表