//modified code
//use blackbackground
setchartbkcolor(64);
//http://www.wisestocktrader.com/indicators/1635-stoch-macd+rsi-williams+trend-arrows.txt
//1635-stoch-MACD+RSI-williams+trend-arrows
_SECTION_BEGIN("STOCHRSI3");
_SECTION_BEGIN("StochMACD");
StochMACD=100*(MACD(12,20)-LLV(MACD(12,20),14))/(HHV(MACD(12,20),14)-LLV(MACD(12,20),14));
Plot(StochMACD,"StochMACD",colorBrightGreen,styleThick);
Plot(75,"",colorRed,styleLine);
//Plot(50,"",colorYellow,styleDashed);
Plot(25,"",colorRed,styleLine);
_SECTION_BEGIN("Trend arrow");
n= Param("No. of Bars",3,2,8,1);
TrendUp = cross(StochMACD,25);
TrendDn = cross(75, StochMACD);
TrendUp = ExRem(TrendUp,TrendDn);
TrendDn = ExRem(TrendDn,TrendUp);
PlotShapes(TrendUp*shapeUpArrow,colorWhite);
PlotShapes(TrendDn*shapeDownArrow,coloryellow);
//===========================================
//add this to see digital price on chart
_SECTION_BEGIN("Magnified Market Price");
//by Vidyasagar, [email protected]//
FS=Param("Font Size",30,11,100,1);
GfxSelectFont("Times New Roman", FS, 700, True );
GfxSetBkMode( colorWhite );
GfxSetTextColor( ParamColor("Color",colorGreen) );
Hor=Param("Horizontal Position",1050,1,1200,1);
Ver=Param("Vertical Position",1,1,830,1);
GfxTextOut(""+C, Hor , Ver );
YC=TimeFrameGetPrice("C",inDaily,-1);
DD=Prec(C-YC,2);
xx=Prec((DD/YC)*100,2);
GfxSelectFont("Times New Roman", 11, 700, True );
GfxSetBkMode( colorWhite );
GfxSetTextColor(ParamColor("Color",colorGreen) );
GfxTextOut(""+DD+" ("+xx+"%)", Hor , Ver+45 );
_SECTION_END();
//=============================================