我想在主图背面上下的条形色块如图，怎么搞？

这是我收集整理的1000例中一例,供参考
2问:
       主图背景指标,按照K线的日期不同 每年分为12个月份 在主图填充12中不同颜色的背景色, 就  
       是每个月的背景色不同 背景颜色改变时画出分隔的垂直线
    设置个2个参数
    N（0，1，1，1)   
    0：按照阴历月
    1：按照阳历月
    M（1，31，1，1)
    1-31：表示从每月第M日开始划分到下月的M-1日m
    比如 N=1 M=15 就是 按阳历从每月15日到下月14日为一个周期划分 填充颜色
答:
        input:p(1,1,2),d(1,1,31);
        dd:=if(p=1,day,LDAY);
        mm:=if(p=1,month,LMONTH);
        tj1:=(mm=1 and dd>=d) or (mm=2 and dd<d and ref(mm,BARSLAST(dd<ref(dd,1))+1)=
              1);
        tj2:=(mm=2 and dd>=d) or (mm=3 and dd<d and ref(mm,BARSLAST(dd<ref(dd,1))+1)=
              2);
        tj3:=(mm=3 and dd>=d) or (mm=4 and dd<d and ref(mm,BARSLAST(dd<ref(dd,1))+1)=
              3);
        tj4:=(mm=4 and dd>=d) or (mm=5 and dd<d and ref(mm,BARSLAST(dd<ref(dd,1))+1)=
               4);
        tj5:=(mm=5 and dd>=d) or (mm=6 and dd<d and ref(mm,BARSLAST(dd<ref(dd,1))+1)=
               5);
        tj6:=(mm=6 and dd>=d) or (mm=7 and dd<d and ref(mm,BARSLAST(dd<ref(dd,1))+1)=
                6);
        tJ7:=(mm=7 and dd>=d) or (mm=8 and dd<d and ref(mm,BARSLAST(dd<ref(dd,1))+1)=
                7);
         tj8:=(mm=8 and dd>=d) or (mm=9 and dd<d and ref(mm,BARSLAST(dd<ref(dd,1))+1)=
                8);
         tj9:=(mm=9 and dd>=d) or (mm=10 and dd<d and ref(mm,BARSLAST(dd<ref(dd,1))+1)
               =9);
         tj10:=(mm=10 and dd>=d) or (mm=11 and dd<d and ref(mm,BARSLAST(dd<ref(dd,1))+
                1)=10);
         tj11:=(mm=11 and dd>=d) or (mm=12 and dd<d and ref(mm,BARSLAST(dd<ref(dd,1))+
                1)=11);
         tj12:=(mm=12 and dd>=d) or (mm=1 and dd<d and ref(mm,BARSLAST(dd<ref(dd,1))+
                1)=12);
         hh:=hhv(h,0);ll:=llv(l,0);
         STICKLINE(tj1,hh[datacount],ll[datacount],10,0.1),colorc0c0c0;
         STICKLINE(tj2,hh[datacount],ll[datacount],10,0.1),colorb5a5b5;
         STICKLINE(tj3,hh[datacount],ll[datacount],10,0.1),color808080;
         STICKLINE(tj4,hh[datacount],ll[datacount],10,0.1),color8080ff;
         STICKLINE(tj5,hh[datacount],ll[datacount],10,0.1),colorff0080;
         STICKLINE(tj6,hh[datacount],ll[datacount],10,0.1),colorff8000;
         STICKLINE(tj7,hh[datacount],ll[datacount],10,0.1),color0080ff;
         STICKLINE(tj8,hh[datacount],ll[datacount],10,0.1),colorffff00;
         STICKLINE(tj9,hh[datacount],ll[datacount],10,0.1),color33ff00;
         STICKLINE(tj10,hh[datacount],ll[datacount],10,0.1),colorffff80;
         STICKLINE(tj11,hh[datacount],ll[datacount],10,0.1),color00ffff;
         STICKLINE(tj12,hh[datacount],ll[datacount],10,0.1),color0099ff;
         VERTLINE(tj1<>ref(tj1,1) or tj2<>ref(tj2,1) or tj3<>ref(tj3,1) or tj4<>ref
          (tj4,1) or tj5<>ref(tj5,1) or tj6<>ref(tj6,1) or tj7<>ref(tj7,1) or tj8<>ref
          (tj8,1) or tj9<>ref(tj9,1) or tj10<>ref(tj10,1) or tj11<>ref(tj11,1) or tj12
          <>ref(tj12,1)),colorred;
         STICKLINE(c>o,c,o,8,1),colorred;
         STICKLINE(c>o,l,o,0.9,1),colorred;
         STICKLINE(c>o,h,c,0.9,1),colorred;
         STICKLINE(c<o,c,o,8,0.5),colorffff00;
         STICKLINE(c<o,h,l,0.9,0.5),colorffff00;
         STICKLINE(c=o and c>ref(c,1),c,o,8,1),colorred;
         STICKLINE(c=o and c>ref(c,1),l,h,0.9,1),colorred;
         STICKLINE(c=o and c<ref(c,1),c,o,8,0.5),colorffff00;
         STICKLINE(c=o and c<ref(c,1),h,l,0.9,0.5),colorffff00;

谢谢cossack
我想在某条件下，条件成立，背景上下都一色．

上下高度自动调节（不是自动调节的已经知道了）

引用:

Originally posted by cossack at 2005-1-29 02:47 PM:
这是我收集整理的1000例中一例,供参考
2问:
       主图背景指标,按照K线的日期不同 每年分为12个月份 在主图填充12中不同颜色的背景色, 就  
       是每个月的背景色不同 背景颜色改变时画出分隔的垂直线
...

谢谢cossack

引用:

Originally posted by dxzcjkcq at 2005-1-29 03:06 PM:
谢谢cossack
我想在某条件下，条件成立，背景上下都一色．

画画图，改颜色我也是菜鸟一只。就知道下面2个涵数。不行我就没法了！

复制内容到剪贴板

代码:

别名: 画渐变背景色
所属类别: 绘图函数  参数数量: 4

绘制渐变背景色
用法:
DRAWGBK(COND,COLOR1, COLOR2,D);
当COND条件满足时,以COLOR1到COLOR2渐变色填充子图区域,D=0表示从左到右,D=1表示从上到下
例如:DRAWGBK(C>O, COLORRGB(255,0,0), COLORRGB(255,255,0),0);
表示图形上最后一组C>O时从左到右从红色到黄色渐变填充子图。

别名: 画区间彩带
所属类别: 绘图函数  参数数量: 3
=================================================
绘制指标区间彩带。
用法:
FILLRGN(COND,PRICE1,PRICE2),当COND条件满足时,以COLOR填充PRICE1和PRICE2的区间
例如:FILLRGN(MA1>MA2, MA1,MA2),colorred 表示MA1>MA2时以红色填充MA1和MA2之间的区域。

引用:

Originally posted by dxzcjkcq at 2005-1-29 02:06 PM:
我想在主图背面上下的条形色块如图，怎么搞？

试试这个,条件可根据自己的要求定,

复制内容到剪贴板

代码:

xma1:=MA(C,5);xma2:=MA(C,10);//以均线为条件;
xtj1:=CROSS(xma1,xma2) or xma1>xma2;
xtj2:=CROSS(xma2,xma1) or xma1<xma2;
FILLRGN(xtj1,SYSPARAM(5),SYSPARAM(4)),ColorDB3FCA;
FILLRGN(xtj2,SYSPARAM(5),SYSPARAM(4)),Color528608;
ktj:=(CLOSE>OPEN or CLOSE=OPEN and CLOSE>REF(CLOSE,1));
STICKLINE(ktj,HIGH,LOW,0.1,1),colorred;
STICKLINE(ktj,CLOSE,OPEN,7,1),colorred;
STICKLINE(NOT(ktj),HIGH,LOW,0.1,0),colorcyan;
STICKLINE(NOT(ktj),CLOSE,OPEN,7,0),colorcyan;
ma5:MA(CLOSE,5);
ma10:MA(CLOSE,10);
ma20:MA(CLOSE,20);
ma30:MA(CLOSE,30);

引用:

Originally posted by kjyhao at 2005-1-29 04:02 PM:

试试这个,条件可根据自己的要求定,
[code]
xma1:=MA(C,5);xma2:=MA(C,10);//以均线为条件;
xtj1:=CROSS(xma1,xma2) or xma1>xma2;
xtj2:=CROSS(xma2,xma1) or xma1<xma2;
FILLRGN(xtj1,SYSPARAM(5), ...

嘿嘿，这张图象了。
谢谢kjyhao！

嘿:骑兵你好;谢谢加分,还不把头像都换成一样的!!!创幻的那个好看!

引用:

Originally posted by kjyhao at 2005-1-29 04:16 PM:
嘿:骑兵你好;谢谢加分,还不把头像都换成一样的!!!创幻的那个好看!

加分应该的，谢谢你的帮忙！
我是摩托飙车族，很喜欢摩托的，现在还不想换呢！

加分是应当的,飙车太刺激,我已老眼昏花,无可奈何春已去了,我也谢谢骑兵和kjyhao,还有元兴丫头。

谢谢！

谢谢各位了

在此向各位拜早年:祝这里的朋友们,在新的一年里,人旺 财旺 身体旺.

i see