1, 使用自定义周期划分自行对K线图进行时间切分
工具-市场与板块
2,自行绘制K线主图必须使用VBA编程,搜下历史帖。有相关范例,自行学习
1,您这相当于重新对时间进行切分,属于重新定义K线
PEL编写的指标是基于K线图去做分析,即使编写出来也没完整定义的K线美观。所以建议使用VBA
如果您一定要取未来值,考虑下REFX函数
基本实现,原来的思路,不满五根,画的K线一直在第一根上面,调整了下随着K线向后移动
input:offset(0,-10,10,1),t(5,5,60,5);
nn:=barslast(date<>ref(date,1));//从当天第一根开始
n:mod(nn,t)+1;
o5:if(n=1,open,ref(open,n-1)),NODRAW;
h5:if(n=1,h,hhv(h,n)),NODRAW;
l5:if(n=1,l,llv(l,n)),NODRAW;
c5:if(n=1,c,c),NODRAW;
if n=5 then
begin
kred:STICKLINE( c5>o5,c5+offset ,o5+offset, 10,1 ,COLORRED);//空心实体
kred1:STICKLINE( c5>o5,h5+offset ,max(c5,o5)+offset, 0,1 ,COLORRED);//上引线
kred2:STICKLINE( c5>o5,min(c5,o5)+offset ,l5+offset, 0,1 ,COLORRED);//下引线
kgreen:STICKLINE( c5<=o5,c5+offset ,o5+offset, 10,1 ,COLORGREEN);//实心实体
kgreen1:STICKLINE( c5<=o5,h5+offset ,max(c5,o5)+offset, 0,1 ,COLORGREEN);
kgreen2:STICKLINE( c5<=o5,min(c5,o5)+offset ,l5+offset, 0,1 ,COLORGREEN);
end
//画最后几根
if n<5 and islastbar then
begin
akred:STICKLINE( c5>o5,c5+offset ,o5+offset, 10,1 ,COLORRED);//空心实体
akred1:STICKLINE( c5>o5,h5+offset ,max(c5,o5)+offset, 0,1 ,COLORRED);//上引线
akred2:STICKLINE( c5>o5,min(c5,o5)+offset ,l5+offset, 0,1 ,COLORRED);//下引线
akgreen:STICKLINE( c5<=o5,c5+offset ,o5+offset, 10,1 ,COLORGREEN);//实心实体
akgreen1:STICKLINE( c5<=o5,h5+offset ,max(c5,o5)+offset, 0,1 ,COLORGREEN);
akgreen2:STICKLINE( c5<=o5,min(c5,o5)+offset ,l5+offset, 0,1 ,COLORGREEN);
end
1,采用PEL去绘制,中间空的部分必须让它透明。那么相当于每根K线之间都会存在间隔