Board logo

标题: 【动量指标(Momentum)】 [打印本页]
作者: 龙听    时间: 2022-11-3 13:37     标题: 【动量指标(Momentum)】

  1. inputs:
  2.         Price( Close ),
  3.         Length( 12 ),
  4.         ColorNormLength( 14 ),                                                      
  5.                                                                                      
  6.         UpColor( Yellow ),                                                            
  7.                                      
  8.         DnColor( Red ),                                                            
  9.                                      
  10.         GridForegroundColor( Black ) ;                                                
  11.                                                                                      
  12.                  

  14. variables:
  15.         var0( 0 ),
  16.         var1( 0 ),
  17.         var2( 0 ),
  18.         var3( 0 ) ;

  20. if CurrentBar = 1 then
  21.         var0 = GetAppInfo( aiApplicationType ) ;

  23. var1 = Momentum( Price, Length ) ;
  24. var2 = Momentum( var1, 1 ) ;                       

  26. Plot1( var1, "Momentum" ) ;
  27. Plot2( 0, "ZeroLine" ) ;

  29. condition1 = UpColor >= 0 and DnColor >= 0 ;        
  30. if condition1 then
  31.         begin
  32.         var3 = NormGradientColor( var1, true, ColorNormLength, UpColor, DnColor ) ;
  33.         if var0 = 1 then                                
  34.                 SetPlotColor( 1, var3 )
  35.         else if var0 > 1 then                                 
  36.                 begin
  37.                 SetPlotColor( 1, GridForegroundColor ) ;
  38.                 SetPlotBGColor( 1, var3 ) ;
  39.                 end ;
  40.         end ;

  42. condition1 = var1 > 0 and var2 > 0 ;                  
  43. if condition1 then
  44.         Alert( "Indicator positive and increasing" )
  45. else
  46. begin
  47. condition1 = var1 < 0 and var2 < 0 ;
  48. if condition1 then
  49.         Alert( "Indicator negative and decreasing" ) ;
  50. end;
复制代码




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