文章
文章用户商铺文档快讯有问必答话题

请老师帮忙写一个小程序 (文华财经WH6赢顺V6.7)

投资者咨询：请老师帮忙写一个小程序 (文华财经WH6赢顺V6.7)
来源:文华财经  日期:2018-5-21 13:05
 1、在当前星期的星期一的9：00主图画一个竖线（日内分时K线图）；
2、在星期一的三天前的同样位置（9:00）画一个竖线
投资者咨询：请老师帮忙写一个小程序 (文华财经WH6赢顺V6.7)
来源:文华财经  日期:2018-5-21 13:05
 老师，很抱歉，第2条我写错了，应该是这样。
2、在星期一的前2个星期的星期一的同样位置（9:00）画一个竖线。
例如今天5月21日是一星期一，那么我要在今天的9：00画一个竖线，再在5月7号的9：画一个竖线。我是这个意思。谢谢老师。
技术人员回复
日期:2018-5-21 13:44
这样：

A:=WEEKDAY=1&&TIME=0900;
X:=SUMBARS(A,1);
X1:=BACKSET(ISLASTBAR,X);
VERTLINE(CROSS(X1,0.5),COLORYELLOW);
Y:=SUMBARS(A,3);
Y1:=BACKSET(ISLASTBAR,Y);
VERTLINE(CROSS(Y1,0.5),COLORYELLOW);
投资者咨询：请老师帮忙写一个小程序 (文华财经WH6赢顺V6.7)
来源:文华财经  日期:2018-5-21 13:05
 老师，这个程序能不能再改进一下，由于节假日的问题，有些交易日放假停止交易，对于这种情况，假如如5月7号星期一那天恰好放假， 能不能就不划线呢。我要求一定是在星期一的开盘划线。麻烦老师了。
技术人员回复
日期:2018-5-21 21:11
 这样试试：

A:=WEEKDAY=1&&TIME=0900;
X:=SUMBARS(A,1);

X1:=BACKSET(ISLASTBAR,X);
VERTLINE(CROSS(X1,0.5),COLORYELLOW);
Y:SUMBARS(A,3),NODRAW;
Z:SUMBARS(WEEKDAY=5&&TIME=0900,3),NODRAW;
Y1:=BACKSET(ISLASTBAR&&Y<Z,Y);
VERTLINE(CROSS(Y1,0.5),COLORYELLOW);
投资者咨询：请老师帮忙写一个小程序 (文华财经WH6赢顺V6.7)
来源:文华财经  日期:2018-5-21 13:05
 老师，能否这样改进一下
1、在当前日分时K线图9：00划一根竖线；
2、在21天前那天的9:00也画一根线；
3、显然21天前那天和今天的星期应该是一致的（21是7的3倍），如果那一天是假期会导致那个交易日和今天的星期不一致，这时就不画线。
谢谢老师。

投资者咨询：请老师帮忙写一个小程序 (文华财经WH6赢顺V6.7)
来源:文华财经  日期:2018-5-21 13:05
 也就是说划线那天的星期一定和今天的星期是一致的
技术人员回复
日期:2018-6-2 19:21
 请参考：

A:=WEEKDAY=1&&TIME=0900;
X:SUMBARS(A,1);
Y:VALUEWHEN(A,REF(X,1));


X1:=BACKSET(ISLASTBAR,X);
VERTLINE(CROSS(X1,0.5),COLORYELLOW);

Y1:=BACKSET(CROSS(X1,0.5),Y*3+1);
VERTLINE(CROSS(Y1,0.5)&&A,COLORYELLOW);
投资者咨询：请老师帮忙写一个小程序 (文华财经WH6赢顺V6.7)
来源:文华财经  日期:2018-5-21 13:05
 谢谢欧阳老师，我费了很大劲也没全看懂，装载完全达到效果，但是当我试图向左再扩展一根的时候就做不到了。我的意思是在42天前9：00也划一根竖线，如果那天因为假期不交易不是星期一，就不画。谢谢老师。
投资者咨询：请老师帮忙写一个小程序 (文华财经WH6赢顺V6.7)
来源:文华财经  日期:2018-5-21 13:05
 刚才的打错了，应该这样：
在42天前9：00也划一根竖线，如果那天因为假期不交易和当前日的星期不一样，就不画。谢谢老师。