设为首页收藏本站

 找回密码
 注册
查看: 452|回复: 1

在分钟图中模拟日线移动平均线 [复制链接]

Rank: 4

精华
0
UID
110114
积分
378
帖子
314
主题
16
阅读权限
50
注册时间
2012-4-20
最后登录
2021-11-29
发表于 2020-6-1 14:10:59 |显示全部楼层
分享一个在分钟图中模拟日线移动平均线的简单快速的程序。

附件: 你需要登录才可以下载或查看附件。没有帐号?注册

Rank: 4

精华
0
UID
110114
积分
378
帖子
314
主题
16
阅读权限
50
注册时间
2012-4-20
最后登录
2021-11-29
发表于 2020-6-1 14:12:34 |显示全部楼层
  1. //------------------------------------------------------------------------
  2. // 简称: MA_DinM
  3. // 名称: DM
  4. // 类别: 公式应用
  5. // 类型: 用户应用
  6. //------------------------------------------------------------------------

  7. Params
  8.     Numeric Period_MA_D(10);       
  9.        
  10. Vars
  11.         NumericSeries MA_D;                                // 日线的收盘价移动平均线
  12.         NumericSeries Pos_D_Close;                // 日线收盘价所在K线位置
  13.         Numeric k;
  14.         Numeric iPos;
  15.        
  16. Begin
  17.         // 初始化
  18.         MA_D = Close;
  19.         Pos_D_Close = 0;
  20.        
  21.         // 仅应用于N分钟K线图
  22.         If(!(BarType == 1 and BarInterval <= 60))
  23.                 Return;
  24.        
  25.         // 记录前一日线收盘K线位置
  26.         If(Time[1]*10000 == 1460 - BarInterval)
  27.                 Pos_D_Close = 1;
  28.         Else If(Pos_D_Close[1] > 0)
  29.                 Pos_D_Close = Pos_D_Close[1] + 1;
  30.        
  31.         // 模拟日线的收盘价移动平均线
  32.         If(Pos_D_Close[1] > -1)
  33.         {
  34.                 // 前Period_MA_D日收盘K线的位置,为iPos
  35.                 k = 0;
  36.                 iPos = 0;
  37.                 While(iPos <= CurrentBar)
  38.                 {
  39.                         iPos = iPos + Pos_D_Close[iPos];
  40.                         k = k + 1;
  41.                         If(k >= Period_MA_D or Pos_D_Close[iPos] < 0)
  42.                                 Break;
  43.                 }
  44.                
  45.                 MA_D = (Close+MA_D[Pos_D_Close]*k-Close[iPos])/k;
  46.         }
  47.        
  48.         // 显示日线移动平均线
  49.         PlotNumeric("MA_D", MA_D, 0, Green);
  50.        
  51. End

  52. //------------------------------------------------------------------------
  53. // 编译版本        GS2015.12.25
  54. // 用户版本        2020/06/01 13:43:08
  55. // 版权所有        Yuen Lee
  56. // 更改声明        TradeBlazer Software保留对TradeBlazer平台
  57. //                        每一版本的TradeBlazer公式修改和重写的权利
  58. //------------------------------------------------------------------------
复制代码

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

bottom

静态版|手机版|联系我们|交易开拓者 ( 粤ICP备07044698   

GMT+8, 2021-12-7 10:31

Powered by Discuz! X2 LicensedChrome插件扩展

© 2011-2012 交易开拓者 Inc.

回顶部