// Downloaded From https://www.WiseStockTrader.com
_SECTION_BEGIN("oi");
//Plot( OI, _DEFAULT_NAME(), ParamColor("Color", colorBlueGrey ), ParamStyle( "Style", styleHistogram | styleOwnScale | styleThick, maskHistogram ), 2 );
_SECTION_END();
//written by Thomas Zmuck
//Date: 15-07-02
//thomas.zm@aon.at

pds = 10;
V1 = OI/MA(OI,10); V2 = OI/MA(OI,20);
V3 = OI/MA(OI,50);
x=100*OI/MA(OI,pds);
barcolor = 
IIf( x>Ref(x,-1),5,6);
/* Colourized price bars drawn here */
Plot(100*OI/MA(OI,pds)," oi/ma(10)",barcolor,2+4);

Plot(100," AVG(10)",1,1);

unsure = V1<1 AND V2<1 AND V3<1;
sure = V1>1 AND V2>1 AND V3>1;

Filter = unsure;
AddColumn(100*V/MA(V,10),"V/ma(V,10)",1.0);
AddColumn(100*V/MA(V,20),"V/ma(V,20)",1.0);
AddColumn(100*V/MA(V,50),"V/ma(V,50)",1.0);
AddColumn(ROC(C,1),"%today");