[EquisMetaStock Group] Volume Kraut Colored-Based

[formulapri...@yahoo.com [equismetastock]]

 {Plot as histogram and change color for each individual statements}
 prd:=Input("Periods",1,1000,21);
 Range:= prd; 
 P2:= C; 
 V2:= V; 
 P1:= Ref( C, -Range ); 
 V1:= Ref( V, -Range ); 
 

 If( P2 > P1 AND V2 > V1,V,0);
 If( P2 > P1 AND V2 < V1,V,0);
 If( P2 < P1 AND V2 < V1,V,0);
 
 If( P2 < P1 AND V2 > V1,V,0);