// Downloaded From https://www.WiseStockTrader.com
_SECTION_BEGIN("Price"); 
_N(Title = StrFormat("{{NAME}} - {{INTERVAL}} {{DATE}} Open %g, Hi %g, Lo %g, Close %g (%.1f%%) Vol " +WriteVal( V, 1.0 ) +" {{VALUES}}", O, H, L, C, SelectedValue( ROC( C, 1 )) )); 
Cd1=(C-O)/(H-L)*100;
Cd=Prec((Cd1),2);
BarColor = IIf((Cd>65)OR (Cd<-65),colorYellow,colorCustom12);
Plot( C, _DEFAULT_NAME(),BarColor, styleNoTitle | ParamStyle("Style") | GetPriceStyle() ); 
Plot( Open, "Open", 0, styleHidden );
Plot(Close, "Close", 0, styleHidden );
Plot(High, "High", 0, styleHidden );
Plot(Low, "Low", 0, styleHidden );
_SECTION_END();


WH=TimeFrameGetPrice( "H", 5*inDaily,-1);
WL=TimeFrameGetPrice( "L", 5*inDaily,-1);
MH=TimeFrameGetPrice( "H", inMonthly,-1);
ML=TimeFrameGetPrice( "L", inMonthly,-1);
MW=(WH+WL)/2;
MM=(MH+ML)/2;
Mid=(MW+MM)/2;
Plot(Mid,"",7,4); 

Buy=Cross(C,Mid);
Sell=Cross(Mid,C);
PlotShapes(IIf(Buy,shapeSmallUpTriangle,shapeNone),colorWhite,0,L,-12); 
PlotShapes(IIf(Sell,shapeSmallDownTriangle, shapeNone),colorWhite,0,H,-12);

_SECTION_BEGIN("Exploration");
Filter=Close;
AddColumn(Mid,"Mid",1.4,colorBlue);
Var = WriteIf(Buy,"BUY",WriteIf(Sell,"SELL",""));
AddTextColumn(Var , "Buy/Sell", 1.2 , colorWhite, IIf( Buy, colorBlue,IIf(Sell,colorRed,colorWhite) )); 
_SECTION_END();

_SECTION_BEGIN("AuthorName");
k = (GetPerformanceCounter()/100)%100; 
printf("GetPerformance Counter %g",k);
GfxSelectFont("jokerman", 16,800); 
GfxSetBkMode(1); 
GfxSetTextColor(colorWhite); 
GfxTextOut("M.SaLMaN",-10+k,40); 
RequestTimedRefresh(10); 
_SECTION_END();

_SECTION_BEGIN("MACD Angle");
{ GfxSelectFont("Bernard MT Condensed",15, 800 ); 
GfxSetBkMode(1); 
GfxSetTextColor(colorCustom12); 
GfxTextOut("Mid="+Prec(Mid,2)+" ",1440,25);
}
_SECTION_END();