請問自訂MC指標dpo-singal該如何寫?Thanks!

f29825604

在下參考
plot1($disparity, "disparity");
另外弄一個dpo

/////////////////////////////
eleader-fucntion
////////////////////////////
def dpo(period) :
        return c - ma(c,period)[((period / 2) + 1)]

*********************
inputs:period(36);
vars: $dpo(0);

$dpo = close - average(close,period)[((period / 2) + 1)];

plot1($dpo, "dpo");
*********************
可以用

dpo-mc-el

dpo-mc

dpo-eleader

eleader內dpo
有多一條紅線dpo-singal
ema(dpo(36),3)
請問大大該如何補上這條ema線
感謝您!!

easytrader788

Ema 改為  Xaverage 的方式即可

f29825604

easytrader788 發表於 16-5-22 12:38
Ema 改為  Xaverage 的方式即可

感謝您!!
可以用了!

1. inputs:period(36),period2(3);
   
2. 
   
3. vars: $dpo(0),$dpo_singal(0);
   
4. 
   
5. $dpo = close - average(close,period)[((period / 2) + 1)];
   
6. 
   
7. $dpo_singal = xaverage($dpo,period2);
   
8. 
   
9. plot1($dpo, "dpo");
   
10. 
    
11. plot2($dpo_singal, "dpo_singal");

複製代碼

感激不盡!!!

easytrader788

http://www.moneydj.com/KMDJ/Wiki/wikiViewer.aspx?keyid=358679c7-b45c-48d5-8ef5-07c8e0fef8f8

easytrader788

DPO 非價格趨勢指標

f29825604

f29825604 發表於 16-5-22 13:23
感謝您!!
可以用了!

自訂mc指標CCICXAverage

///////////////////////////
//    eleader-fucntion
///////////////////////////
def cci(period) :
        
        m1 = (h+l+c)/3
        m2 = ma(m1, period)

        d1 = array(len(m2) - period + 1)
        
        for i in range(period) :
                d1 = d1 + abs(m1 - m2)
               
        d1 = d1 / period
        
        return (m1-m2) / (0.015 * d1)
****************************
mc 內 CCIClassic[Buildin-Fucntion]
****************************

1. Inputs: Len(NumericSimple);
   
2. Variables: var0(0),var1(0),var2(0),var3(0), var4(0);
   
3. 
   
4. If Len > 0 Then Begin
   
5.         var4 = (High + Low + Close) / 3;
   
6.         var3 = Average(var4 , Len);
   
7.         var2 = 0;
   
8.         for var1 = 0 to Len - 1 Begin
   
9.                 var2 = var2 + AbsValue(var4[var1] - var3);
   
10.         End;
    
11.         var2 = var2 / Len;
    
12.         If var2 = 0 Then
    
13.                 CCIClassic = 0
    
14.         Else
    
15.                 CCIClassic = (var4 - var3) / (0.015 * var2);
    
16. End
    
17. Else
    
18.         CCIClassic = 0;
    

複製代碼

新增CCICXAverage指標
用原本mc指標CCI Average修改

1. inputs:
   
2.         CCILength( 14 ),
   
3.         CCIAvgLength( 9 ),
   
4.         OverSold( -100 ),
   
5.         OverBought( 100 ) ;
   
6. 
   
7. variables:
   
8.         var0( 0 ),
   
9.         var1( 0 ) ;
   
10. 
    
11. var0 = CCIClassic( CCILength ) ;
    
12. var1 = XAverage( var0, CCIAvgLength ) ;
    
13. 
    
14. Plot1( var0, "CCIC" ) ;
    
15. Plot2( var1, "CCIXAvg" ) ;
    
16. Plot3( OverBought, "OverBot" ) ;
    
17. Plot4( OverSold, "OverSld" ) ;
    
18. 
    
19. condition1 = var1 crosses over OverSold ;
    
20. if condition1 then
    
21.         Alert( "Indicator exiting oversold zone" )
    
22. else
    
23. begin
    
24. condition1 = var1 crosses under OverBought ;
    
25. if condition1 then
    
26.         Alert( "Indicator exiting overbought zone" ) ;
    
27. end;
    
28. 
    

複製代碼

可以用


做紀錄
可查詢
Thanks!!

f29825604

f29825604 發表於 16-5-28 10:21
自訂mc指標CCICXAverage

///////////////////////////

MultiCharts Version 8.0 Release (Build 5620)
語法似乎有些不同
紀錄一下

1. inputs:
   
2.         CCILength( 14 ),
   
3.         CCIAvgLength( 9 ),
   
4.         OverSold( -100 ),
   
5.         OverBought( 100 ) ;
   
6. 
   
7. variables:
   
8.         var0( 0 ),
   
9.         var1( 0 ) ;
   
10. 
    
11. var0 = CCI( CCILength ) ;
    
12. var1 = XAverage( var0, CCIAvgLength ) ;
    
13. 
    
14. Plot1( var0, "CCI" ) ;
    
15. Plot2( var1, "CCIXAvg" ) ;
    
16. Plot3( OverBought, "OverBot" ) ;
    
17. Plot4( OverSold, "OverSld" ) ;
    
18. 
    
19. condition1 = var1 crosses over OverSold ;
    
20. if condition1 then
    
21.         Alert( "Indicator exiting oversold zone" )
    
22. else
    
23. begin
    
24. condition1 = var1 crosses under OverBought ;
    
25. if condition1 then
    
26.         Alert( "Indicator exiting overbought zone" ) ;
    
27. end;
    

複製代碼