Board logo

标题: 【TrendingStocks】 [打印本页]

作者: 龙听    时间: 2022-11-2 14:03     标题: 【TrendingStocks】

  1. Inputs: Len(Numeric), MinimumPriceValue(Numeric);
  2. Variables: var0(0), var1(0), var2(0), var3(0), var4(0), var5(0), var6(0);

  3. var0 = SerialHighsLows(Len);                                    
  4. var1 = BarQuality(Len);                                    
  5. var2 = AverageUpMove(Len);                                    
  6. var3 = AverageDnMove(Len);               
  7. var4 = AbsValue(var2-var3);
  8. var6 = MinList(var0, var4);

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

  12.                                 
  13. For var5 = 0 To Len * 2 Begin
  14. condition1 = High[var5] < Low[var5 + 1];
  15.         If condition1 Then Begin
  16.         condition1 = High[var5] < Low[var5 + 1] * .8;
  17.                 If condition1 Then
  18.                         var6 = 0;
  19.         End
  20.         Else
  21.         begin
  22.         condition1 = Low[var5] > High[var5 + 1];
  23.         If condition1 Then
  24.         Begin
  25.         condition1 = Low[var5] > High[var5 + 1] * 1.2;
  26.                 If condition1 Then
  27.                         var6 = 0;
  28.         End;
  29.         end;
  30. End;

  31. TrendingStocks = var6;
复制代码





欢迎光临 龙听期货论坛 (http://www.qhlt.cn/) Powered by Discuz! 7.2