龙听期货论坛's Archiver

龙听 发表于 2022-11-2 11:02

【MoneyFlow】

[code]inputs: Len( numericsimple) ;
variables: var0( 0 ), var1( 0 ) ;

if BarType >= 2 and BarType < 5 then                              
        begin
        var0 = SummationIF( H + L + C > ( H + L + C )[1], ( H + L + C ) * Volume,
         Len ) ;
        var1 = Summation( ( H + L + C ) * Volume, Len ) ;
        end
else                                                                              
                                                                                 
        begin
        var0 = SummationIF( H + L + C > ( H + L + C )[1], ( H + L + C ) * Ticks,
         Len ) ;
        var1 = Summation( ( H + L + C ) * Ticks, Len ) ;
        end ;

if var1 <> 0 then
        MoneyFlow = 100 * var0 / var1
else
        MoneyFlow = 0 ;
[/code]

页: [1]