解决画竖线的问题
-
相关简介:编写要求: www.guhai.com.cn 股海网解答: 网友求助: 问题如下,参数A和参数B确定2条竖线,如何能实现:当AB,则第三条竖线出现,如果AB,则第三条线不显示。 初步的公式源码在下面,先谢谢各位老师了 INPUT:A(4500,0,999999),B(4550,0,9999999); vertline(barpos=A),COLORWHITE,linethick2; vertline(barpos=B),COLORWHITE,linethick2; vertline(barpo
-
文章来源:股海网作者:股海网发布时间:2019-03-07浏览次数:
编写要求:
www.guhai.com.cn股海网解答:
网友求助:
问题如下,参数A和参数B确定2条竖线,如何能实现:当A<B,则第三条竖线出现,如果A>B,则第三条线不显示。
初步的公式源码在下面,先谢谢各位老师了
INPUT:A(4500,0,999999),B(4550,0,9999999);
vertline(barpos=A),COLORWHITE,linethick2;
vertline(barpos=B),COLORWHITE,linethick2;
vertline(barpos=A*1.1),COLORGRAY,linethick2;//这条就是第三条竖线
解答如下:
INPUT:A(4500,0,999999),B(4550,0,9999999);
vertline(barpos=A),COLORffff00,linethick2;
vertline(barpos=B),COLORWHITE,linethick2;
aa:=BARSLAST(barpos=A);aa:=aa[DATACOUNT];
bb:=BARSLAST(barpos=B);bb:=bb[DATACOUNT];
if aa>bb then begin vertline(barpos=INTPART(A*1.1)),COLORGRAY,linethick2;end;