短期DELTA(STD): //叠加K线——如果用于主图,以下五行可以不要 STICKLINE(OPEN>CLOSE, LOW,HIGH, 0,0),COLORWHITE; STICKLINE(OPEN>CLOSE, CLOSE,OPEN, 8,0),COLORWHITE; STICKLINE(OPEN<=CLOSE,OPEN, CLOSE,8,1),COLORRED; STICKLINE(OPEN<=CLOSE,CLOSE,HIGH, 0,0),COLORRED; STICKLINE(OPEN<=CLOSE,LOW,OPEN, 0,0),COLORRED;
//光标所在画面的最高价和最低价 HH:=SYSPARAM(4); LL:=SYSPARAM(5);
//判断是否绘制彩线的位置 日:=date; //求当前K线的日期 isColor:=if(日>ref(日,1) or BARSCOUNT(c)=1,1,0); //当K线的日期发生变化时,就是新的彩线绘制位置 DIS:=if(BARSCOUNT(C)=1,0,日-ref(日,1)-1); //星期六、星期日以及节假日也要考虑 Num:=count(isColor,0)+DIS; //计算彩线个数
//绘制彩线 STICKLINE(isColor and mod(Num,4)=0,LL,HH,1,0),colorred ; STICKLINE(isColor and mod(Num,4)=1,LL,HH,1,0),coloryellow ; STICKLINE(isColor and mod(Num,4)=2,LL,HH,1,0),colorblue ; STICKLINE(isColor and mod(Num,4)=3,LL,HH,1,0),colorwhite ;
适用于60分钟线、30分钟线,15分钟线,5分钟线。
(补充:黑体部分很重要,原先给出的代码缺少这句,即忽略了周末和节假日的处理。根据吉姆.索罗门的解释,周末和节假日也在DELTA序列内,虽然它没有K线。原文中用双线来标注周末和节假日,我觉得,只要正确按照顺序标注彩线即可,因此不采用双线。另外,本程序现在已经处理任意长短的节假日和周末。){点击看本软件截图: 58股票 公式网 http://www. 58gu. com 整理} |