龙听期货论坛's Archiver

龙听 发表于 2022-11-1 10:52

【ADX】

**** Hidden Message *****

ADX衡量的是现行趋势的强度,以及市场是否存在运动。一个低的ADX值(通常小于20)可以表明一个低波动的非趋势性市场,而高于20的交叉可能表明一个趋势的开始(无论是向上还是向下)。如果ADX超过40并开始下降,它可以表明当前趋势的放缓。这个指标也可以用来识别非趋势性的市场,或正在进行的趋势的恶化。尽管市场方向在其计算中很重要,但ADX并不是一个方向性指标。

默认输入
Length(14) 设置在计算ADX时使用的条数。

[img]http://p.algo2.net/2022/1101/36951d29acfa4.png[/img]

龙听 发表于 2022-11-1 10:53

程式码:[code]inputs:
        Length( 14 ) ;

variables:
        var0( 0 ) ;

var0 = ADX( Length ) ;

Plot1( var0, "ADX" ) ;

condition1 = var0 > var0[1] and var0[1] <= var0[2] ;
if condition1 then
        Alert( "Indicator turning up" )  
       
else
begin
condition1 = var0 < var0[1] and var0[1] >= var0[2] ;
if condition1
then
        Alert( "Indicator turning down" ) ;
        end
[/code]

龙听 发表于 2022-11-1 10:54

公式:ADX[code]
inputs:
        Len( numericsimple ) ;                                             

variables:
        var0( 0 ),
        var1( 0 ),
        var2( 0 ),
        var3( 0 ),
        var4( 0 ),
        var5( 0 ) ;

Value1 = DirMovement( H, L, C, Len, var0, var1, var2, var3, var4,
var5 ) ;

ADX = var3 ;
[/code]公式: DirMovement[code]inputs:
        PriceValueH( numericseries ),
        PriceValueL( numericseries ),
        PriceValueC( numericseries ),
        Len( numericsimple ),                                             
        oDMIPlus( numericref ),
        oDMIMinus( numericref ),
        oDMI( numericref ),
        oADX( numericref ),
        oADXR( numericref ),
        oVolty( numericref ) ;

variables:
        var0( 0 ),
        var1( 0 ),
        var2( 0 ),
        var3( 0 ),
        var4( 0 ),
        var5( 0 ),
        var6( 0 ),
        var7( 0 ),
        var8( 0 ),
        var9( 1 / Len ),                     
        var10( 0 ) ;

if CurrentBar = 1 then
        begin
        for Value1 = 0 to Len - 1
                begin
                var0 = 0 ;
                var1 = 0 ;
                var2 = PriceValueH[Value1] - PriceValueH[ Value1 + 1 ] ;
                var3 = PriceValueL[ Value1 + 1 ] - PriceValueL[Value1] ;
                condition1 = var2 > var3 and var2 > 0 ;
                if condition1 then
                        var0 = var2
                else
                begin
                condition1 = var3 > var2 and var3 > 0 ;
                if condition1 then
                        var1 = var3 ;
                        end;
                var4 = var4 + var0 ;
                var5 = var5 + var1 ;
                var6 = var6 + TrueRangeCustom( PriceValueH, PriceValueL, PriceValueC )[Value1] ;
                end ;
        var7 = var4 / Len ;
        var8 = var5 / Len ;
        oVolty = var6 / Len ;
        end
else
        begin
        var0 = 0 ;
        var1 = 0 ;
        var2 = PriceValueH - PriceValueH[1] ;
        var3 = PriceValueL[1] - PriceValueL ;
        condition1 = var2 > var3 and var2 > 0 ;
        if condition1 then
                var0 = var2
        else
        begin
        condition1 = var3 > var2 and var3 > 0 ;
        if condition1 then
                var1 = var3 ;
                end;
        var7 = var7[1] + var9 * ( var0 - var7[1] ) ;
        var8 = var8[1] + var9 * ( var1 - var8[1] ) ;
        oVolty = oVolty[1] + var9 * ( TrueRangeCustom( PriceValueH, PriceValueL, PriceValueC )
         - oVolty[1] ) ;
        end ;

if oVolty > 0 then
        begin
        oDMIPlus = 100 * var7 / oVolty ;
        oDMIMinus = 100 * var8 / oVolty ;
        end
else
        begin
        oDMIPlus = 0 ;
        oDMIMinus = 0 ;
        end ;

var10 = oDMIPlus + oDMIMinus ;
if var10 > 0 then
        oDMI = 100 * AbsValue( oDMIPlus - oDMIMinus ) / var10
else
        oDMI = 0 ;

condition1 = CurrentBar <= Len and CurrentBar > 0 ;
if condition1 then
        begin
        oADX = Cum( oDMI ) / CurrentBar ;
                                                                                     
                                                                                       
                                                                         
                                                                                  
                                       
        oADXR = ( oADX + oADX[ CurrentBar - 1 ] ) * .5 ;
                                                                                        
        end
else
        begin
        oADX = oADX[1] + var9 * ( oDMI - oADX[1] ) ;
        oADXR = ( oADX + oADX[ Len - 1 ] ) * .5 ;
        end ;

DirMovement = 1 ;
[/code]

页: [1]