在分钟图中模拟日线移动平均线　[开拓者 TB]

 来源:CXH99.COM

1. //------------------------------------------------------------------------
   
2. // 简称: MA_DinM
   
3. // 名称: DM
   
4. // 类别: 公式应用
   
5. // 类型: 用户应用
   
6. //------------------------------------------------------------------------
   
7. 
   
8. Params
   
9.     Numeric Period_MA_D(10);       
   
10.        
    
11. Vars
    
12.         NumericSeries MA_D;                                // 日线的收盘价移动平均线
    
13.         NumericSeries Pos_D_Close;                // 日线收盘价所在K线位置
    
14.         Numeric k;
    
15.         Numeric iPos;
    
16.        
    
17. Begin
    
18.         // 初始化
    
19.         MA_D = Close;
    
20.         Pos_D_Close = 0;
    
21.        
    
22.         // 仅应用于N分钟K线图
    
23.         If(!(BarType == 1 and BarInterval <= 60))
    
24.                 Return;
    
25.        
    
26.         // 记录前一日线收盘K线位置
    
27.         If(Time[1]*10000 == 1460 - BarInterval)
    
28.                 Pos_D_Close = 1;
    
29.         Else If(Pos_D_Close[1] > 0)
    
30.                 Pos_D_Close = Pos_D_Close[1] + 1;
    
31.        
    
32.         // 模拟日线的收盘价移动平均线
    
33.         If(Pos_D_Close[1] > -1)
    
34.         {
    
35.                 // 前Period_MA_D日收盘K线的位置，为iPos
    
36.                 k = 0;
    
37.                 iPos = 0;
    
38.                 While(iPos <= CurrentBar)
    
39.                 {
    
40.                         iPos = iPos + Pos_D_Close[iPos];
    
41.                         k = k + 1;
    
42.                         If(k >= Period_MA_D or Pos_D_Close[iPos] < 0)
    
43.                                 Break;
    
44.                 }
    
45.                
    
46.                 MA_D = (Close+MA_D[Pos_D_Close]*k-Close[iPos])/k;
    
47.         }
    
48.        
    
49.         // 显示日线移动平均线
    
50.         PlotNumeric("MA_D", MA_D, 0, Green);
    
51.        
    
52. End
    
53. 
    
54. //------------------------------------------------------------------------
    
55. // 编译版本        GS2015.12.25
    
56. // 用户版本        2020/06/01 13:43:08
    
57. // 版权所有        Yuen Lee
    
58. // 更改声明        TradeBlazer Software保留对TradeBlazer平台
    
59. //                        每一版本的TradeBlazer公式修改和重写的权利
    
60. //------------------------------------------------------------------------