// Downloaded From https://www.WiseStockTrader.com
_SECTION_BEGIN("Price");
SetChartOptions(0,chartShowArrows|chartShowDates);
_N(Title = StrFormat("{{NAME}} - {{INTERVAL}} {{DATE}} Open %g, Hi %g, Lo %g, Close %g (%.1f%%) {{VALUES}}", O, H, L, C, SelectedValue( ROC( C, 1 ) ) ));
Plot( C, "Close", ParamColor("Color", colorDefault ), styleNoTitle | ParamStyle("Style") | GetPriceStyle() ); 
_SECTION_END();
//----------------------------------------//
TimeFrameSet(inHourly);
a=MA(C,50);
TimeFrameRestore();
a60=TimeFrameExpand(a,inHourly,expandfirst);
a60b=a60>Ref(a60,-13);
a60s=a60<Ref(a60,-13);
rahbs=WriteIf(a60b,"bull",WriteIf(a60s,"bear","avoid"));
Hor=Param("Horizontal Position",25,1,1200,1);
Ver=Param("Vertical Position",35,30,1000,1); 
GfxSelectFont("Callibri", 10 , 700, True ); 
GfxSetBkMode( colorWhite );  
GfxSetTextColor( colorWhite );
GfxTextOut("MA ",Hor, Ver);
GfxSetTextColor( colorWhite );
GfxTextOut("Hourly",Hor+72, Ver-15);
//1
 if(rahbs=="bull")
GfxSelectSolidBrush(colorBrightGreen);
if(rahbs=="bear") 
GfxSelectSolidBrush(colorRed);
if(rahbs=="avoid") 
GfxSelectSolidBrush(colorGold);
GfxSelectPen( colorBlack, 1 ); // broader color 
GfxRectangle( Hor+70,Ver+5,Hor+100,Ver+15 );
//---------------------------------------------------------//

TimeFrameSet(in15minute);
ab=MA(C,50);
TimeFrameRestore();
a15=TimeFrameExpand(ab,in15minute,expandfirst);
a15b=a15>Ref(a15,-4);
a15s=a15<Ref(a15,-4);
ra15bs=WriteIf(a15b,"bull",WriteIf(a15s,"bear","avoid"));
Hor=Param("Horizontal Position",25,1,1200,1);
Ver=Param("Vertical Position",35,30,1000,1); 
///1
GfxSelectFont("Callibri", 10 , 700, True ); 
GfxSetBkMode( colorWhite );  
GfxSetTextColor( colorWhite );
//GfxTextOut("Rsi Sig ",Hor, Ver);
//GfxSetTextColor( colorwhite );
GfxTextOut("15MIN",Hor+122, Ver-15);
GfxSetTextColor( colorWhite );
//GfxTextOut("ADX ",Hor, Ver+30);
//GfxSetTextColor( colorwhite );
//GfxTextOut("MACD ",Hor, Ver+60);
 //1
 if(ra15bs=="bull")
GfxSelectSolidBrush(colorBrightGreen);
if(ra15bs=="bear") 
GfxSelectSolidBrush(colorRed);
if(ra15bs=="avoid") 
GfxSelectSolidBrush(colorGold);
GfxSelectPen( colorBlack, 1 ); // broader color 
GfxRectangle( Hor+170,Ver+5,Hor+135,Ver+15 );
//-----------------------------------//

a5=MA(C,50);
a5b=a5>Ref(a5,-1);
a5s=a5<Ref(a5,-1);
ra5bs=WriteIf(a5b,"bull",WriteIf(a5s,"bear","avoid"));
Hor=Param("Horizontal Position",25,1,1200,1);
Ver=Param("Vertical Position",35,30,1000,1); 
///1
GfxSelectFont("Callibri", 10 , 700, True ); 
GfxSetBkMode( colorWhite );  
//GfxSetTextColor( colorwhite );
//GfxTextOut("Rsi Sig ",Hor, Ver);
GfxSetTextColor( colorWhite );
GfxTextOut("5min",Hor+190, Ver-15);
//GfxSetTextColor( colorwhite );
//GfxTextOut("ADX ",Hor, Ver+30);
//GfxSetTextColor( colorwhite );
//GfxTextOut("MACD ",Hor, Ver+60);
 //1
 if(ra5bs=="bull")
GfxSelectSolidBrush(colorBrightGreen);
if(ra5bs=="bear") 
GfxSelectSolidBrush(colorRed);
if(ra5bs=="avoid") 
GfxSelectSolidBrush(colorGold);
GfxSelectPen( colorBlack, 1 ); // broader color 
GfxRectangle( Hor+220,Ver+5,Hor+190,Ver+15 );
//---------------------------------------------//

m=MACD();
ma5b=m>0;
ma5s=m<0;
ma5bs=WriteIf(ma5b,"bull",WriteIf(ma5s,"bear","avoid"));
Hor=Param("Horizontal Position",25,1,1200,1);
Ver=Param("Vertical Position",35,30,1000,1); 
///1
GfxSelectFont("Callibri", 10 , 700, True ); 
GfxSetBkMode( colorWhite );  
//GfxSetTextColor( colorwhite );
//GfxTextOut("Rsi Sig ",Hor, Ver);
GfxSetTextColor( colorWhite );
GfxTextOut("macd",Hor+250, Ver-15);
//GfxSetTextColor( colorwhite );
//GfxTextOut("ADX ",Hor, Ver+30);
//GfxSetTextColor( colorwhite );
//GfxTextOut("MACD ",Hor, Ver+60);
 //1
 if(ma5bs=="bull")
GfxSelectSolidBrush(colorBrightGreen);
if(ma5bs=="bear") 
GfxSelectSolidBrush(colorRed);
if(ma5bs=="avoid") 
GfxSelectSolidBrush(colorGold);
GfxSelectPen( colorBlack, 1 ); // broader color 
GfxRectangle( Hor+280,Ver+5,Hor+250,Ver+15 );