最新公告
  • 欢迎您光临九毛八公式指标网www.9m8.cn,本站全新改版试运行,期间内容全部免费,欢迎下载!欢迎加入本站VIP
  • 周量叠加及叠加月周K线源码

    正文概述    2024-04-12 23:45:33  

    先做个引入公式
    {辅助001}
     C1:CLOSE;
     O1:OPEN;
     H1:HIGH;
     L1:LOW;
     VVLA:VOL;
     {成交量}
    input:周(0,0,1),n(35),na(5),nb(135);
     ccc1:="辅助001.c1#week";
     ooo1:="辅助001.o1#week";
     ZZL:="辅助001.VVLA#week";
    周量:ZZL,ColorFFff00,LINETHICK0;
     STICKLINE(ccc1>ooo1 AND 周,0,周量*0.45,10,0),Color613076,DOTLINE;
     STICKLINE(ccc1<=ooo1 AND 周,0,周量*0.45,10,0),ColorFA7D32,DOTLINE;
    量:IF(C>200,VOL/1000000,VOL/1),linethick0;
    换手率:VOL/CAPITAL*100,linethick0,colorffff00;
     HSL:=VOL/CAPITAL*100;
    地量0_1:STICKLINE(HSL<1,0,量,0.1,0 ),coloreeeeEE;
     STICKLINE(HSL<1,0,量,5,0 ),coloraaaaAA;
     STICKLINE(HSL<1,0,量,3,0 ),colorccccCC;
     STICKLINE(HSL<1,0,量,1,0 ),coloreeeeEE;
    低靡1_2:STICKLINE(HSL>=1 and HSL<2,0,量,0.1,0 ),coloreeee00;
     STICKLINE(HSL>=1 and HSL<2,0,量,5,0 ),coloraaaa00;
     STICKLINE(HSL>=1 and HSL<2,0,量,3,0 ),colorcccc00;
     STICKLINE(HSL>=1 and HSL<2,0,量,1,0 ),coloreeee00;
    温和2_3:STICKLINE(HSL>=2 and HSL<3,0,量,0.1,0 ),color208eee;
     STICKLINE(HSL>=2 and HSL<3,0,量,5,0 ),color208aaa;
     STICKLINE(HSL>=2 and HSL<3,0,量,3,0 ),color208ccc;
     STICKLINE(HSL>=2 and HSL<3,0,量,1,0 ),color208eee;
    活跃3_5:STICKLINE(HSL>=3 and HSL<5,0,量,0.1,0 ),color00eeee;
     STICKLINE(HSL>=3 and HSL<5,0,量,5,0 ),color00aaaa;
     STICKLINE(HSL>=3 and HSL<5,0,量,3,0 ),color00cccc;
     STICKLINE(HSL>=3 and HSL<5,0,量,1,0 ),color00eeee;
    带量5_8:STICKLINE(HSL>=5 and HSL<8,0,量,0.1,0 ),coloree00ee;
     STICKLINE(HSL>=5 and HSL<8,0,量,5,0 ),coloraa00aa;
     STICKLINE(HSL>=5 and HSL<8,0,量,3,0 ),colorcc00cc;
     STICKLINE(HSL>=5 and HSL<8,0,量,1,0 ),coloree00ee;
    放量8_15:STICKLINE(HSL>=8 and HSL<15,0,量,0.1,0 ),color00ee00;
     STICKLINE(HSL>=8 and HSL<15,0,量,5,0 ),color00aa00;
     sTICKLINE(HSL>=8 and HSL<15,0,量,3,0 ),color00cc00;
     sTICKLINE(HSL>=8 and HSL<15,0,量,1,0 ),color00ee00;
    巨量15_25:STICKLINE(HSL>=15 and HSL<25,0,量,0.01,0 ),coloree0000;
     STICKLINE(HSL>=15 and HSL<25,0,量,5,0 ),coloraa0000;
     STICKLINE(HSL>=15 and HSL<25,0,量,3,0 ),colorcc0000;
     STICKLINE(HSL>=15 and HSL<25,0,量,1,0 ),coloree0000;
    怪异:STICKLINE(HSL=25,0,量,1,0),colorff6600;
     STICKLINE(HSL>=25,0,量,5,1),colorff6600;
     MA3:MA(量,n),COLOR00ffff,linethick1;
     MAd:MA(量,na),COLORffffff,linethick1;
     MA90:MA(量,nb),colorff00dd;
     DRAWTEXT(BARSTATUS=2 AND MAd>REF(MAd,1),MAd,NUMTOSTRN(na,0)+'日↑'),COLORffffff;
     DRAWTEXT(BARSTATUS=2 AND MAd  DRAWTEXT(BARSTATUS=2 AND MAd=REF(MAd,1),MAd,NUMTOSTRN(na,0)+'日='),COLORffffff;
     DRAWTEXT(BARSTATUS=2 AND MA3>REF(MA3,1),MA3,'  '+NUMTOSTRN(n,0)+'日↑'),COLOR00ffff;
     DRAWTEXT(BARSTATUS=2 AND MA3  DRAWTEXT(BARSTATUS=2 AND MA3=REF(MA3,1),MA3,'  '+NUMTOSTRN(n,0)+'日='),COLOR00ffff;
     DRAWTEXT(BARSTATUS=2 AND Ma90>REF(Ma90,1),Ma90,NUMTOSTRN(nb,0)+'日↑'),COLORff00ff;
     DRAWTEXT(BARSTATUS=2 AND Ma90  DRAWTEXT(BARSTATUS=2 AND Ma90=REF(Ma90,1),Ma90,NUMTOSTRN(nb,0)+'日='),COLORff00ff;
     DRAWTEXTABS(2,8,'【放量下跌要减仓,缩量新低是底象。增量回升是关键,回头确认要进场。】'+''),Color00FF00;
     DRAWTEXTABS(2,22,'【新量新价有新高,缩量回调不必逃。一根巨量要警惕,有价无量必须跑。】'+''),Color208fff;
     DRAWFLAGTEXT(HSL<=1,量,'绝对地量:HSL<=1。');
    DRAWFLAGTEXT(HSL>2 AND HSL<3,量,'该股成交温和:2%-3%,属于备份股。');
    DRAWFLAGTEXT(HSL>1 AND HSL<2,量,'该股股成交低靡:1%-2%,属于冷门。');
    DRAWFLAGTEXT(HSL>3 AND HSL<5,量,'该股成交活跃:3%-5%,人们购买该股票的意愿高,属于热门股。');
    DRAWFLAGTEXT(HSL>5 AND HSL<8,量,'该股初步带量:5%-8%!');
    DRAWFLAGTEXT(HSL>=25,量,'该股票成交怪异:HSL>=25!');
    DRAWFLAGTEXT(HSL>15 AND HSL<25,量,'已放巨量:15%-25%!');
     {添加到参数精灵
    -------调整叠加周量--------
    周 Param#1 调节周显示周量;
    -------调整均价量--------
    N  Param#2 调节任意均价量;
    NA Param#3 调节任意均价量;
    NB Param#4 调节任意均价量;}


     {主图}
     {叠加月周K线}
    INPUT:Y(0,0,1),Z(0,0,1);
     ccc1:="辅助001.c1#week";
     ooo1:="辅助001.o1#week";
     hhh1:="辅助001.h1#week";
     lll1:="辅助001.l1#week";
     cc1:="辅助001.c1#MONTH";
     oo1:="辅助001.o1#MONTH";
     hh1:="辅助001.h1#MONTH";
     ll1:="辅助001.l1#MONTH";
     var1:=if(DAY=17 OR DAY=14 OR DAY=15 OR DAY=16,hh1,cc1);
     var2:=if(DAY=17 OR DAY=14 OR DAY=15 OR DAY=16,ll1,oo1);
     STICKLINE(cc1>oo1 AND Z=1,oo1,cc1,10,0),COLOReeaaEE,POINTDOT;
     STICKLINE(cc1>oo1 AND Z=1,var1,var2,10,0),COLOReeaaEE,DOTLINE;
     STICKLINE(oo1>=cc1 AND Z=1,cc1,oo1,10,0),Color6AA932,DOTLINE;
     STICKLINE(oo1>=cc1 AND Z=1,var1,var2,10,0),Color6AA932,DOTLINE;
     vvar1:=if(WEEKDAY=3,hhh1,ccc1);
     vvar2:=if(WEEKDAY=3,lll1,ooo1);
     STICKLINE(ccc1>=ooo1 AND Y=1,ooo1,ccc1,10,0),Color613076,DOTLINE;
     STICKLINE(ccc1>=ooo1 AND Y=1,vvar1,vvar2,3,0),Color613076;
     STICKLINE(ooo1>ccc1 AND Y=1,ccc1,ooo1,10,0),ColorFA7D32,DOTLINE;
     STICKLINE(ooo1>ccc1 AND Y=1,vvar1,vvar2,3,0),ColorFA7D32;
     STICKLINE(C>=O,C,O,8,0),COLOR0000AA;
     STICKLINE(C>=O,C,O,6,0),COLOR0000bb ;
     STICKLINE(C>=O,C,O,4,0),COLOR0000cc ;
     STICKLINE(C>=O,C,O,2,0),COLOR0000ee;
     STICKLINE(C>=O,H,L,0,0),COLOR0000ff;
     STICKLINE(C<=O,C,O,8,0),Color7B7b00;
     STICKLINE(C<=O,C,O,6,0),Color909000;
     STICKLINE(C<=O,C,O,4,0),ColorA8a800;
     STICKLINE(C<=O,C,O,2,0),COLORcece00;
     STICKLINE(C<=O,H,L,0,0),COLORffff00;
     {添加到参数精灵
    -------调整月周--------
    周  Param#1 调节Z显示月线;
    月  Param#2 调节Y显示周线;}


    九毛八公式指标,一个优质的公式指标平台!
    九毛八公式指标 » 周量叠加及叠加月周K线源码 加入收藏