【Volume Avg】

1. inputs:
   
2.         AvgLength( 50 ),
   
3.         AlertPct( 50 ),
   
4.         UpColor( Cyan ),
   
5.         DownColor( Red ) ;
   
6. 
   
7. variables:
   
8.         var0( 0 ),
   
9.         var1( 0 ),
   
10.         var2( 0 ),
    
11.         var3( 0 ),
    
12.         AlertFactor( 1 + AlertPct * .01 ),
    
13.         AlertStr( NumToStr( AlertPct, 2 ) ) ;
    
14. 
    
15. if BarType >= 2 and BarType < 5 then { not tick/intra-day data nor an advanced chart
    
16. type (Kagi, Renko, Line Break) }
    
17.         begin
    
18.         var0 = Volume ;
    
19.         var1 = AverageFC( Volume, AvgLength ) ;
    
20.         Plot1( var0, "Vol" ) ;
    
21.         Plot2( var1, "VolAvg" ) ;
    
22.         { Alert criteria }
    
23.         condition1 = var0 crosses over var1 * AlertFactor ;
    
24.         if condition1 then
    
25.                 Alert( "Volume breaking through " + AlertStr + "% above its avg" ) ;
    
26.         end
    
27. else { if tick/intra-day data or an advanced chart type;  in the case of minute data,
    
28. also set the "Build Volume On:" field in the Format Instrument dialog to Trade Volume
    
29. or Tick Count, as desired;  when using advanced chart types, Ticks returns volume
    
30. if the chart is built from 1-tick interval data }
    
31.         begin
    
32.         var2 = Ticks ;
    
33.         var3 = AverageFC( Ticks, AvgLength ) ;
    
34.         Plot1( var2, "Vol" ) ;
    
35.         Plot2( var3, "VolAvg" ) ;
    
36.         { Alert criteria }
    
37.         condition1 = var2 crosses over var3 * AlertFactor ;
    
38.         if condition1 then
    
39.                 Alert( "Volume breaking through " + AlertStr + "% above its avg" ) ;
    
40.         end ;
    
41. 
    
42. { Color criteria }
    
43. if C > C[1] then
    
44.         SetPlotColor( 1, UpColor )
    
45. else if C < C[1] then
    
46.         SetPlotColor( 1, DownColor ) ;

复制代码