Board logo

标题: 【蔡金摆动指标(Chaikin Oscillator)】 [打印本页]
作者: 龙听    时间: 2022-11-3 14:01     标题: 【蔡金摆动指标(Chaikin Oscillator)】

  1. inputs:
  2.         FastLength( 3 ),
  3.         SlowLength( 10 ),
  4.         AlertLength( 14 ),
  5.         ColorNormLength( 14 ),                                                      
  6.                                                                                      
  7.         UpColor( Yellow ),                                                            
  8.                                      
  9.         DnColor( Red ),                                                            
  10.                                      
  11.         GridForegroundColor( Black ) ;                                                
  12.                                                                                      
  13.                                      
  14.                 
  15.                                                                                     
  16.                                                                                     
  17.                                                                                   
  18.                  

  20. variables:
  21.         var0( 0 ),
  22.         var1( 0 ),
  23.         var2( 0 ),
  24.         var3( 0 ) ;

  26. if CurrentBar = 1 then
  27.         var0 = GetAppInfo( aiApplicationType ) ;
  28.        
  29. if BarType >= 2 and BarType < 5 then                              
  30.         var2 = Volume
  31. else                                                                              
  32.                                                                                  
  33.         var2 = Ticks ;

  35. var1 = ChaikinOsc( var2, FastLength, SlowLength ) ;

  37. Plot1( var1, "ChaikinOsc" ) ;
  38. Plot2( 0 , "ZeroLine" ) ;

  40. condition1 = UpColor >= 0 and DnColor >= 0 ;                                          
  41. if condition1 then
  42.         begin
  43.         var3 = NormGradientColor( var1, true, ColorNormLength, UpColor,
  44.                  DnColor ) ;
  45.         if var0 = 1 then                                
  46.                 SetPlotColor( 1, var3 )
  47.         else if var0 > 1 then                                 
  48.                 begin
  49.                 SetPlotColor( 1, GridForegroundColor ) ;
  50.                 SetPlotBGColor( 1, var3 ) ;
  51.                 end ;
  52.         end ;
  53.                
  54.                   
  55. condition1 = LowestBar( C, AlertLength ) = 0 and LowestBar( var1, AlertLength ) > 0;
  56. if condition1
  57. then
  58.         Alert( "Bullish divergence - new low not confirmed" )
  59. else
  60. begin
  61. condition1 = HighestBar( C, AlertLength ) = 0 and HighestBar( var1, AlertLength ) > 0 ;
  62. if condition1 then
  63.         Alert( "Bearish divergence - new high not confirmed" ) ;
  64. end;
复制代码




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