- 金字塔客服中心 - 专业程序化交易软件提供商 (http://222.73.7.161/bbs/index.asp)
-- 公式模型编写问题提交 (http://222.73.7.161/bbs/list.asp?boardid=4)
---- 周Ｋ线图上画线 (http://222.73.7.161/bbs/dispbbs.asp?boardid=4&id=160957)
-- 发布时间：2018/1/10 0:21:42
-- 周Ｋ线图上画线
请教专家：
Ｋ线图坐标：自然日坐标、农历时间
在周K线图上，每隔三个农历月的十五号画一根彩色竖线，竖线由红、兰、绿、白四种颜色交替出现，应如何实现？
-- 发布时间：2018/1/10 8:50:12
--
按照周周期来的话，至多能在15号所在的那个周线上画线，而且如果15号是节假日这种还没办法处理。
-- 发布时间：2018/1/10 13:21:09
--
是呢，在15号所在的那个周线上画一根彩色竖线，竖线由红、兰、绿、白四种颜色交替出现，应如何实现？谢谢！
-- 发布时间：2018/1/10 14:02:11
--
VARIABLE:z:=0;
M:=LMONTH;
D:=LDAY;
cond:ref(M,1)=M and ref(D,1)<15 and D>=15; //判断上一个K月份和当前K月份是否一致，月份需要一致，并且当前K日期大于等于15号上一个K日期小于15号。说明15号包含在当前这个K下面。
if cond then
begin
z:=if(z<3,z+1,0);
VERTLINE(1,0,0,if(z=0,COLORBLUE,if(z=1,COLORRED,if(z=2,COLORYELLOW,COLORGRAY))))；//颜色可以自行调整下 我这里只是范例。
end
颜色你自己调整下，我测试就随便弄了几个颜色。
[此贴子已经被作者于2018/1/10 14:04:00编辑过]
-- 发布时间：2018/1/10 16:52:56
--
需要每隔三个农历月，画一根彩色竖线。
-- 发布时间：2018/1/10 16:53:31
--
不是每个月都画线，需要每隔三个农历月，画一根彩色竖线。
-- 发布时间：2018/1/10 17:07:52
--
之前没注意到。改下代码即可。
VARIABLE:z:=0,ct:=0;
M:=LMONTH;
D:=LDAY;
cond:ref(M,1)=M and ref(D,1)<15 and D>=15; //判断上一个K月份和当前K月份需要一致，并且当前K日期大于等于15号上一个K日期小于15号。
if cond then
begin
z:=if(z<3,z+1,0);
end
if cond and z=0 then
begin
ct:=if(ct<3,ct+1,0);
end
VERTLINE(z=0 and cond ,0,0,if(ct=0,COLORBLUE,if(ct=1,COLORRED,if(ct=2,COLORYELLOW,COLORGRAY))))；//颜色可以自行调整下 我这里只是范例。
-- 发布时间：2018/1/10 17:39:39
--
谢谢！
