龙听期货论坛's Archiver

C
+
+
版
量
化		 微信： QQ：

龙听 发表于 2022-11-2 14:03

【TrendingStocks】

[code]Inputs: Len(Numeric), MinimumPriceValue(Numeric);
Variables: var0(0), var1(0), var2(0), var3(0), var4(0), var5(0), var6(0);

var0 = SerialHighsLows(Len);                                    
var1 = BarQuality(Len);                                    
var2 = AverageUpMove(Len);                                    
var3 = AverageDnMove(Len);               
var4 = AbsValue(var2-var3);
var6 = MinList(var0, var4);

condition1 = Lowest(Low, Len) < MinimumPriceValue OR var1 < 10 Or var0 < 15 ;
If condition1 Then
        var6 = 0;                                                                                       

                                
For var5 = 0 To Len * 2 Begin
condition1 = High[var5] < Low[var5 + 1];
        If condition1 Then Begin
        condition1 = High[var5] < Low[var5 + 1] * .8;
                If condition1 Then
                        var6 = 0;
        End
        Else
        begin
        condition1 = Low[var5] > High[var5 + 1];
        If condition1 Then
        Begin
        condition1 = Low[var5] > High[var5 + 1] * 1.2;
                If condition1 Then
                        var6 = 0;
        End;
        end;
End;

TrendingStocks = var6;
[/code]

页: [1]