?

?來源: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. //------------------------------------------------------------------------