- 精华
- 20
- 在线时间
- 2981 小时
- UID
- 4
- 积分
- 22709
- 帖子
- 4802
- 阅读权限
- 255
- 注册时间
- 2007-7-20
- 最后登录
- 2024-1-15
- 精华
- 20
- UID
- 4
- 积分
- 22709
- 帖子
- 4802
- 主题
- 64
- 阅读权限
- 255
- 注册时间
- 2007-7-20
- 最后登录
- 2024-1-15
|
标准的宝塔线可能存在一个Bar一半红,一般绿,这样的图,现在TB是不支持的。
不过我可以提供一个调整后的宝塔线指标,你看看是否满足你的需求。- Vars
- Numeric MyOpen;
- Numeric MyClose;
- BoolSeries bRiseUp;
- Begin
- If(CurrentBar==0)
- {
- MyOpen = Open;
- MyClose = Close;
- }Else
- {
- If(Close >= Close[1])
- {
- If(bRiseUp[1]==False && Close <= High[1])
- {
- MyOpen = Max(Close[1],Close);
- MyClose = Min(Close[1],Close);
- }Else
- {
- MyOpen = Close[1];
- MyClose = Close;
- }
- }Else
- {
- If(bRiseUp[1] && Close >= Low[1])
- {
- MyOpen = Min(Close[1],Close);
- MyClose = Max(Close[1],Close);
- }Else
- {
- MyOpen = Close[1];
- MyClose = Close;
- }
- }
- }
-
- bRiseUp = (MyClose >= MyOpen);
-
- PlotNumeric("Open",MyOpen);
- PlotNumeric("Close",MyClose);
- PlotNumeric("High",Max(MyOpen,MyClose));
- PlotNumeric("Low",Min(MyOpen,MyClose));
- End
复制代码 |
|