求一段编程，关于开盘价跟收盘价在K线图中显示

作者：文华财经来源：cxh99.com 发布时间：2017年07月09日

咨询内容： 求一段编程，关于开盘价跟收盘价在K线图中显示。。。1）把每天的开盘价跟收盘价显示为两条直线。2）开盘价跟前一天收盘价比，高了显示为红色的直线，低了显示为蓝色。3）收盘价与当天的开盘价比，高了显示为红，低了显示为蓝色直线，4）对比一样的显示为白色线。谢谢

来源:程序化99（ WWW.CXH99.COM ）
文华技术人员： 好像有点乱了，开盘价，高了显示黄，低了显示绿，，，，收盘价高了红，低了蓝，，，，一样的显示白色，，，谢谢
文华客服： 跟您核实下：
1、您加载在什么周期使用？
2、每天的开盘价和收盘价都画线？到下个交易日结束，再重新开始新一天的画线？
网友回复： 1，我一般用在3.5.15分钟，反正是日以内的周期。。。2，对，画出每天的开盘价线，收盘价线，也就是一天两根线。。。3，今天刚开盘的那就只有开盘价线了。。。。DRAWHORIZONTALLINE(DATE<>REF(DATE,1),O,COLORCYAN);，，这个是我之前找人画的开盘价线，只是没有对比不太好。。。
网友回复：
分钟周期，当前交易日的收盘价无法取到，所以今天无法绘制收盘价线

编写参考：

QO:="DAY$1$O";//前一天的开盘价
QC:="DAY$1$C";//前一天的收盘价
N:=BARSLAST(DATE<>REF(DATE,1))+1;
JO:=VALUEWHEN(N=1,O);//今天的开盘价
QQC:=REF(QC,N);//前第2天的收盘价
COND1:REFX(DATE<>REF(DATE,1),1),NODRAW;
DRAWSL(COND1&&QO>QQC,JO,0,-1*BARSLAST(DATE<>REF(DATE,1)),0,COLORYELLOW);
DRAWSL(COND1&&QO<QQC,JO,0,-1*BARSLAST(DATE<>REF(DATE,1)),0,COLORGREEN);
DRAWSL(COND1&&QO<QC,C,0,-1*BARSLAST(DATE<>REF(DATE,1)),0,COLORRED);
DRAWSL(COND1&&QO>QC,C,0,-1*BARSLAST(DATE<>REF(DATE,1)),0,COLORBLUE);
DRAWSL(COND1&&(QO=QC || QO=QQC),QO,0,-1*BARSLAST(DATE<>REF(DATE,1)),0,COLORBLUE);
COND2:CROSS(BACKSET(ISLASTBAR,N),0.5),NODRAW;
DRAWSL(COND2&&JO>QC,JO,0,1,2,COLORYELLOW);
DRAWSL(COND2&&JO<QC,JO,0,1,2,COLORGREEN);
DRAWSL(COND2&&JO=QC,JO,0,1,2,COLORWHITE);