龙听期货论坛's Archiver

C
+
+
版
量
化		 微信： QQ：

龙听 发表于 2022-11-2 12:49

【RSI】

[code]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] ) / Len ;
        var1 = Average( AbsValue( PriceValue - PriceValue[1] ), Len ) ;
        end
else
        begin
        var2 = PriceValue - PriceValue[1] ;
        var0 = var0[1] + var3 * ( var2 - var0[1] ) ;
        var1 = var1[1] + var3 * ( AbsValue( var2 ) - var1[1] ) ;
        end ;

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

RSI = 50 * ( var4 + 1 ) ;
[/code]

页: [1]