最新公告
  • 欢迎您光临九毛八公式指标网www.9m8.cn,本站全新改版试运行,期间内容全部免费,欢迎下载!欢迎加入本站VIP
  • 大智慧板块监控的新写法(最新更新:新板块监控完整版源代码开放)

    正文概述    2024-04-12 23:01:00  

    有同学问到大智慧板块监控有没有新的写法,以前的写法每取一个指标数值都需要一大段判断,太费资源。确实,指标技术发展到了今天,理应有更为简洁方便的写法,只是大智慧能用于板块的函数实在少得可怜。这里提供一个全新的思路,语句作了详细说明,方便大家自创指标。

    【说明】 可用于A股任意个股,公式提取的是行业板块,自选股设置为系统默认(自选股、自选股1~8)

    {新板块监控}
    {利用BKNAME函数取得[行业板块]名称字符串,自选股~自选股8}
    X:=MAX(STRFIND(BKNAME,'自选股1',1),STRFIND(BKNAME,'自选股2',1),STRFIND(BKNAME,'自选股3',1),STRFIND(BKNAME,'自选股4',1),STRFIND(BKNAME,'自选股5',1),STRFIND(BKNAME,'自选股6',1),STRFIND(BKNAME,'自选股7',1),STRFIND(BKNAME,'自选股8',1));
    X1:=(STRFIND(BKNAME,'自选股',1)=1)*8;
    XZ:=IF(STRFIND(STRMID(BKNAME,X+X1,5),',',1)=5,5,IF(STRFIND(STRMID(BKNAME,X+X1,7),',',1)=7,7,9));
    BK:=STRMID(BKNAME,X+X1,XZ-1);
    {根据板块字符串比较条件,取得不同[行业板块]代码字符串}
    BKDM:=IFS(STRCMP(BK,'工程建筑')=0,'991002',IFS(STRCMP(BK,'电力')=0,'991003',
    IFS(STRCMP(BK,'计算机')=0,'991004',IFS(STRCMP(BK,'电子信息')=0,'991006',
    IFS(STRCMP(BK,'房地产')=0,'991007',IFS(STRCMP(BK,'纺织服装')=0,'991008',
    IFS(STRCMP(BK,'钢铁')=0,'991009',IFS(STRCMP(BK,'供水供气')=0,'991010',
    IFS(STRCMP(BK,'化工化纤')=0,'991011',IFS(STRCMP(BK,'电器')=0,'991014',
    IFS(STRCMP(BK,'交通设施')=0,'991016',IFS(STRCMP(BK,'银行类')=0,'991017',
    IFS(STRCMP(BK,'旅游酒店')=0,'991018',IFS(STRCMP(BK,'煤炭石油')=0,'991019',
    IFS(STRCMP(BK,'酿酒食品')=0,'991020',IFS(STRCMP(BK,'农林牧渔')=0,'991021',
    IFS(STRCMP(BK,'商业连锁')=0,'991023',IFS(STRCMP(BK,'建材')=0,'991024',
    IFS(STRCMP(BK,'其他行业')=0,'991025',IFS(STRCMP(BK,'交通工具')=0,'991026',
    IFS(STRCMP(BK,'机械')=0,'991027',IFS(STRCMP(BK,'医药')=0,'991028',
    IFS(STRCMP(BK,'外贸')=0,'991031',IFS(STRCMP(BK,'教育传媒')=0,'991032',
    IFS(STRCMP(BK,'仪电仪表')=0,'991033',IFS(STRCMP(BK,'有色金属')=0,'991034',
    IFS(STRCMP(BK,'造纸印刷')=0,'991035',IFS(STRCMP(BK,'券商')=0,'991036',
    IFS(STRCMP(BK,'通信')=0,'991135',IFS(STRCMP(BK,'运输物流')=0,'991136',
    IFS(STRCMP(BK,'保险')=0,'991255','')))))))))))))))))))))))))))))));
    {引用相应板块的指标数值,举例如下:}
    板块指数:STKINDI(BKDM,'MA.MA1',1),LINETHICK0,PRECIS2;
    板块涨幅:STKINDI(BKDM,'涨幅.'),LINETHICK0,PRECIS2;
    板块DDX:STKINDI(BKDM,'DDX.DDX'),LINETHICK0;
    {.......这里可以方便取得任意系统或自定义引用公式的指标数值}

    {下面是文字部分的应用实例,可根据需要修改成线型什么的}
    大盘涨幅:INDEXC/REF(INDEXC,1)*100-100,LINETHICK0,PRECIS2;
    个股涨幅:C/REF(C,1)*100-100,LINETHICK0,PRECIS2;
    DRAWTEXTABS(5,5,'板块信息:'+BK+'('+BKDM+') 涨幅'+NUMTOSTRN(板块涨幅,2)+'%'),COLORDDDDDD;
    DRAWTEXTABS(240,5,IFS(板块涨幅>大盘涨幅,'强于大盘','')),COLOR0000FF;
    DRAWTEXTABS(240,5,IFS(板块涨幅<大盘涨幅,'弱于大盘','')),COLOR00FF00;
    DRAWTEXTABS(5,20,'个股信息:'+STKNAME+'('+STKLABEL+') 涨幅'+NUMTOSTRN(个股涨幅,2)+'%'),COLORDDDDDD;
    DRAWTEXTABS(240,20,IFS(个股涨幅>大盘涨幅,'强于大盘','')),COLOR0000FF;
    DRAWTEXTABS(240,20,IFS(个股涨幅<大盘涨幅,'弱于大盘','')),COLOR00FF00;
    DRAWTEXTABS(300,20,IFS(个股涨幅>板块涨幅,'强于板块','')),COLOR0000FF;
    DRAWTEXTABS(300,20,IFS(个股涨幅<板块涨幅,'弱于板块','')),COLOR00FF00;
     


    九毛八公式指标,一个优质的公式指标平台!
    九毛八公式指标 » 大智慧板块监控的新写法(最新更新:新板块监控完整版源代码开放) 加入收藏