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

 找回密码
 注册昵称

QQ登录

只需一步,快速开始

搜索
上一主题 下一主题

[大智慧] 涨跌家数直接影响到指数的涨跌这个附图就叫【涨跌家数】 (副图,源码,附图)


    [-----复制链接-----]
楼主
 通达信源码安装路径:1,工具栏点击公式选项。2,弹出公式窗口点击新建。3,把源码复制到指标编辑器保存。4,回到K线图界面安装建立好的公式 || 2024-3-15 15:38:21
涨跌家数直接影响到指数的涨跌这个附图就叫【涨跌家数】 (副图,源码,附图)介绍

涨跌家数直接影响到指数的涨跌这个附图就叫【涨跌家数】 (副图,源码,附图)

DRAWRECTREL(-1,0,1000,1000,RGB(10,10,10)),color000000,LINETHICK2,LAYER7;
VERTLINE(BARSTATUS=2,2),COLOR00ffff,LINETHICK2,LAYER3;
0,DOTLINE,LAYER0;
DRAWTEXTABS(645,1,'【涨家数:'+NUMTOSTRN(DYNAINFO(69),0)+ '】'),COLOR0000ff,LINETHICK4;
DRAWTEXTABS(795,1,'【平家数:'+NUMTOSTRN(DYNAINFO(71),0)+ '】'),COLOR00FFff,LINETHICK4;
DRAWTEXTABS(935,1,'【跌家数:'+NUMTOSTRN(DYNAINFO(70),0)+ '】'),COLOR00ff00,LINETHICK4;
DRAWRECTABS(640,20 ,640+(DYNAINFO(69)+DYNAINFO(71)+DYNAINFO(70))/2.8,30, rgb(0,255,0)),COLOR00ff00,LAYER4;
DRAWRECTABS(640,20 ,640+(DYNAINFO(69)+DYNAINFO(71))/2.8,30, rgb(255,255,0)),COLOR00FFFF,LAYER3;
DRAWRECTABS(640,20 ,640+(DYNAINFO(69))/2.8,30, rgb(255,0,0)),COLOR0000ff,LAYER2;


总家数:DYNAINFO(69)+DYNAINFO(71)+DYNAINFO(70),color00FFff,PRECIS0,linethick0;
ADV:EMA(IF(INDEXADV=0,DYNAINFO(69),INDEXADV),5),PRECIS0,color0000FF,linethick2,LAYER3;;
DEC:EMA(-IF(INDEXDEC=0,DYNAINFO(70),INDEXDEC),5),PRECIS0,color00FF00,linethick2,LAYER3;
差:(ADV+DEC),PRECIS0,COLORFFffff,LINETHICK2,LAYER2;;
FILLRGN(ADV,0,(ADV)>0,RGB(100,40,30)),LAYER5;;
FILLRGN(DEC,0,(DEC)<0,RGB(0,50,60)),LAYER5;;
FILLRGN(差,0,差>0,RGB(200,150,0),差<0,RGB(0,5,120)),LAYER4;;
DRAWTEXT(barstatus=2,DYNAINFO(69),'涨▄'+NUMTOSTRN(DYNAINFO(69),0)+'家'),ALIGN0,VALIGN0,linethick4,color0069ff;
DRAWTEXT(barstatus=2,-DYNAINFO(70),'跌▄'+NUMTOSTRN(DYNAINFO(70),0)+'家'),ALIGN0,VALIGN2,linethick4,color00ff00;
涨跌差:DYNAINFO(69)-DYNAINFO(70),PRECIS0,LINETHICK0;
DRAWTEXT(barstatus=2,涨跌差,'涨跌差▄'+NUMTOSTRN(涨跌差,0)+'家,'),ALIGN0,VALIGN2,linethick4,colorFFFFFF;

{叠加VOL}
BBV:=if(VOL=0,ref(VOL,BARSLAST(VOL)),VOL);
zjcbf:=MAX(hhvall(BBV),0-llvall(BBV));
zjcx:=(BBV/zjcbf)*(ADV-DEC);
K:=LLVALL(DEC)*1.2;
价涨量增:STICKLINE(C>=REF(Ema(C,5),1) AND V>=REF(Ema(V,5),1),K,K+zjcx,4,0 ),COLOR0000FF,LAYER0;;
价涨量减:STICKLINE(C>=REF(Ema(C,5),1) AND V<REF(Ema(V,5),1),K,K+zjcx,2,0 ),COLOR0099FF,LAYER0;
价跌量减:STICKLINE(C<REF(Ema(C,5),1) AND V<REF(Ema(V,5),1),K,K+zjcx,2,0),COLORffffff,LAYER0;
价跌量增:STICKLINE(C<REF(Ema(C,5),1) AND V>=REF(Ema(V,5),1),K,K+zjcx,4,0),COLOR00FF00,LAYER0;

========================【注意】=================
涨家数:'+NUMTOSTRN(DYNAINFO(69)
平家数:'+NUMTOSTRN(DYNAINFO(71)
跌家数:'+NUMTOSTRN(DYNAINFO(70)
这三个函数都是【及时】函数.不能成为【线】.为此他分分都在变.就是不能画出线记录变化过程来--------不同于INDEXADV,INDEXDEC可以画线可是这两个函数也有毛病.经常出现【零】 画线也不完整. 所以我编辑这个公式也想了些办法才解决,
所以利用本公式开盘后不要关机. 图形才有连续性. 候补的图形也可以用. 就是这时图形多了不少锯齿图形而已.就是【INDEXADV,INDEXDEC】这两个函数经常出现【零】造成的.只要咱们【心知肚明】就可以了


 










gd45145

回复

举报

QQ|

GMT+8, 2024-10-1 08:35

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