change861 發表於 18-5-29 22:50

如何將Multicharts的RSI公式轉為VBA程式碼

各位大大們

我原先想將MC上的策略轉成VBA，但是發現RSI算出來的數值跟MC上有落差，發現他的公式跟網路上流傳的方式似乎不一樣，有沒有人可以幫我解釋MC的RSI公式或告訴我轉為VBA會是怎樣的嘛？

附上MC內建RSI函數

inputs:
        PriceValue( numericseries ),
        Len( numericsimple ) ;                                             

variables:
        var0( 0 ),
        var1( 0 ),
        var2( 0 ),
        var3( 1 / Len ),                     
        var4( 0 ) ;

if CurrentBar = 1 then
        begin
        var0 = ( PriceValue - PriceValue ) / Len ;
        var1 = Average( AbsValue( PriceValue - PriceValue ), Len ) ;
        end
else
        begin
        var2 = PriceValue - PriceValue ;
        var0 = var0 + var3 * ( var2 - var0 ) ;
        var1 = var1 + var3 * ( AbsValue( var2 ) - var1 ) ;
        end ;

if var1 <> 0 then
        var4 = var0 / var1
else
        var4 = 0 ;

RSI = 50 * ( var4 + 1 ) ;


Anonymous 發表於 18-5-30 13:13

MC的RSI是從TS來的，看TS的比較好懂，為何與原版不同注解已經說明得很清楚了{:4_202:}

change861 發表於 18-5-30 16:36

我已經知道了，以上沒問題，謝謝回答得大大
頁: [1]
查看完整版本: 如何將Multicharts的RSI公式轉為VBA程式碼