龙听期货论坛's Archiver

龙听 发表于 2022-11-1 11:12

【ADXClassic】

[code]Inputs: Len(NumericSimple);
Variables: var0(0), var1(0), var2(0);

var2 = 0;

If Len > 0 Then Begin
        If CurrentBar = Len Then Begin
                var1 = 0;
                For var0 = 0 To (CurrentBar - 1) Begin
                        var1 = var1 + DMI(Len)[var0];
                End;
                var2 = var1 / CurrentBar;
        End
        Else
                If Currentbar > Len Then
                        var2 = (ADXClassic[1] * (Len - 1) + DMI(Len)) / Len ;
End;

ADXClassic = IntPortion(var2);
[/code]

页: [1]