【Mov Avg Exp Ribbon】

1. inputs:
   
2.         Price( Close ),
   
3.         BaseLength( 10 ),
   
4.         ArithOrGeom_1or2( 1 ),
   
5.         IncrementOrMultiplier( 10 ),                                                     
   
6.                                                     
   
7.         FastColor( Yellow ),
   
8.         SlowColor( Red ) ;
   
9. 
   
10. variables:
    
11.         var0( 0 ) ;
    
12. 
    
13. arrays:
    
14.         arr0[8]( 0 ),
    
15.         arr1[8]( 0 ),
    
16.         arr2[8]( 0 ),
    
17.         arr3[8]( 0 ) ;
    
18. 
    
19.                                                                                     
    
20.                
    
21. if CurrentBar = 1 then
    
22.         begin
    
23.         arr0[1] = BaseLength ;
    
24.         arr1[1] = 2 / ( arr0[1] + 1 ) ;
    
25.         arr2[1] = Price ;
    
26.         arr3[1] = GradientColor( 1, 1, 8, FastColor, SlowColor ) ;
    
27.         for var0 = 1 to 7
    
28.                 begin
    
29.                 if ArithOrGeom_1or2 = 1 then
    
30.                         arr0[ var0 + 1 ] = arr0[var0] + IncrementOrMultiplier
    
31.                 else
    
32.                         arr0[ var0 + 1 ] = arr0[var0] * IncrementOrMultiplier ;
    
33.                 arr1[ var0 + 1 ] = 2 / ( arr0[ var0 + 1 ] + 1 ) ;
    
34.                 arr2[ var0 + 1 ] = Price ;
    
35.                 arr3[ var0 + 1 ] = GradientColor( var0 + 1, 1, 8, FastColor,
    
36.                  SlowColor ) ;
    
37.                 end ;
    
38.         end
    
39. else
    
40.                                                           
    
41.         for var0 = 1 to 8
    
42.                 begin
    
43.                 arr2[var0] = arr2[var0][1] + arr1[var0] * ( Price -
    
44.                  arr2[var0][1] ) ;
    
45.                 end ;
    
46. 
    
47.                        
    
48. Plot1( arr2[1], "XMA1", arr3[1] ) ;
    
49. Plot2( arr2[2], "XMA2", arr3[2] ) ;
    
50. Plot3( arr2[3], "XMA3", arr3[3] ) ;
    
51. Plot4( arr2[4], "XMA4", arr3[4] ) ;
    
52. Plot5( arr2[5], "XMA5", arr3[5] ) ;
    
53. Plot6( arr2[6], "XMA6", arr3[6] ) ;
    
54. Plot7( arr2[7], "XMA7", arr3[7] ) ;
    
55. Plot8( arr2[8], "XMA8", arr3[8] ) ;

复制代码