Hi, Some1 developed it for me, I thought I should share it here:-
Drop on blank screen:-
_SECTION_BEGIN("CANDLE COLOUR ON DIFFERENT TIMEFRAME");
TimeFrameSet(in1Minute*3);
locationW = Param("locationW",700,1,1200,1,1);
locationH = 30;
GfxSelectFont("Tahoma", 12);
GfxSetBkColor(colorBlack); GfxSetTextColor(colorWhite);
GfxTextOut(" 3min CANDLE", locationW, locationH);
locationW = locationW + 120;
if (C[BarCount-2] >O[BarCount-2] ) GfxSetBkColor( colorGreen); else GfxSetBkColor(colorRed);
GfxTextOut( WriteIf(Ref(C,-1)>Ref(O,-1) ,"PG","PR"), locationW, locationH );
locationW = locationW + 30;
if (C[BarCount-1] >O[BarCount-1] ) GfxSetBkColor( colorGreen); else GfxSetBkColor(colorRed);
GfxTextOut( WriteIf(C>O ,"CG","CR"), locationW, locationH);
locationH = locationH+25;
RestorePriceArrays();
/******* REPEAT THIS SECTION AS MUCH ****/
TimeFrameSet(in5Minute);
locationW = Param("locationW",700,1,1200,1,1);
GfxSelectFont("Tahoma", 12);
GfxSetBkColor(colorBlack); GfxSetTextColor(colorWhite);
GfxTextOut("5 MIN CANDLE", locationW, locationH);
locationW = locationW + 120;
if (C[BarCount-2] >O[BarCount-2] ) GfxSetBkColor( colorGreen); else GfxSetBkColor(colorRed);
GfxTextOut( WriteIf(Ref(C,-1)>Ref(O,-1) ,"PG","PR"), locationW, locationH );
locationW = locationW + 30;
if (C[BarCount-1] >O[BarCount-1] ) GfxSetBkColor( colorGreen); else GfxSetBkColor(colorRed);
GfxTextOut( WriteIf(C>O ,"CG","CR"), locationW, locationH);
locationH = locationH+30;
RestorePriceArrays();
/******* REPEAT THIS SECTION AS MUCH ****/
TimeFrameSet(in1Minute*10);
locationW = Param("locationW",700,1,1200,1,1);
GfxSelectFont("Tahoma", 12);
GfxSetBkColor(colorBlack); GfxSetTextColor(colorWhite);
GfxTextOut("10 MIN CANDLE", locationW, locationH);
locationW = locationW + 120;
if (C[BarCount-2] >O[BarCount-2] ) GfxSetBkColor( colorGreen); else GfxSetBkColor(colorRed);
GfxTextOut( WriteIf(Ref(C,-1)>Ref(O,-1) ,"PG","PR"), locationW, locationH );
locationW = locationW + 30;
if (C[BarCount-1] >O[BarCount-1] ) GfxSetBkColor( colorGreen); else GfxSetBkColor(colorRed);
GfxTextOut( WriteIf(C>O ,"CG","CR"), locationW, locationH);
locationH = locationH+35;
RestorePriceArrays();
/******* REPEAT THIS SECTION AS MUCH ****/
TimeFrameSet(in15Minute);
locationW = Param("locationW",700,1,1200,1,1);
GfxSelectFont("Tahoma", 12);
GfxSetBkColor(colorBlack); GfxSetTextColor(colorWhite);
GfxTextOut("15 MIN CANDLE", locationW, locationH);
locationW = locationW + 120;
if (C[BarCount-2] >O[BarCount-2] ) GfxSetBkColor( colorGreen); else GfxSetBkColor(colorRed);
GfxTextOut( WriteIf(Ref(C,-1)>Ref(O,-1) ,"PG","PR"), locationW, locationH );
locationW = locationW + 30;
if (C[BarCount-1] >O[BarCount-1] ) GfxSetBkColor( colorGreen); else GfxSetBkColor(colorRed);
GfxTextOut( WriteIf(C>O ,"CG","CR"), locationW, locationH);
locationH = locationH+40;
RestorePriceArrays();
/******* REPEAT THIS SECTION AS MUCH ****/
TimeFrameSet(in15Minute*2);
locationW = Param("locationW",700,1,1200,1,1);
GfxSelectFont("Tahoma", 12);
GfxSetBkColor(colorBlack); GfxSetTextColor(colorWhite);
GfxTextOut("30 MIN CANDLE", locationW, locationH);
locationW = locationW + 120;
if (C[BarCount-2] >O[BarCount-2] ) GfxSetBkColor( colorGreen); else GfxSetBkColor(colorRed);
GfxTextOut( WriteIf(Ref(C,-1)>Ref(O,-1) ,"PG","PR"), locationW, locationH );
locationW = locationW + 30;
if (C[BarCount-1] >O[BarCount-1] ) GfxSetBkColor( colorGreen); else GfxSetBkColor(colorRed);
GfxTextOut( WriteIf(C>O ,"CG","CR"), locationW, locationH);
locationH = locationH+45;
RestorePriceArrays();
/******* REPEAT THIS SECTION AS MUCH ****/
TimeFrameSet(in15Minute*3);
locationW = Param("locationW",700,1,1200,1,1);
GfxSelectFont("Tahoma", 12);
GfxSetBkColor(colorBlack); GfxSetTextColor(colorWhite);
GfxTextOut("45 MIN CANDLE", locationW, locationH);
locationW = locationW + 120;
if (C[BarCount-2] >O[BarCount-2] ) GfxSetBkColor( colorGreen); else GfxSetBkColor(colorRed);
GfxTextOut( WriteIf(Ref(C,-1)>Ref(O,-1) ,"PG","PR"), locationW, locationH );
locationW = locationW + 30;
if (C[BarCount-1] >O[BarCount-1] ) GfxSetBkColor( colorGreen); else GfxSetBkColor(colorRed);
GfxTextOut( WriteIf(C>O ,"CG","CR"), locationW, locationH);
locationH = locationH+50;
RestorePriceArrays();
/******* REPEAT THIS SECTION AS MUCH ****/
TimeFrameSet(in15Minute*4);
locationW = Param("locationW",700,1,1200,1,1);
GfxSelectFont("Tahoma", 12);
GfxSetBkColor(colorBlack); GfxSetTextColor(colorWhite);
GfxTextOut("15 MIN CANDLE", locationW, locationH);
locationW = locationW + 120;
if (C[BarCount-2] >O[BarCount-2] ) GfxSetBkColor( colorGreen); else GfxSetBkColor(colorRed);
GfxTextOut( WriteIf(Ref(C,-1)>Ref(O,-1) ,"PG","PR"), locationW, locationH );
locationW = locationW + 30;
if (C[BarCount-1] >O[BarCount-1] ) GfxSetBkColor( colorGreen); else GfxSetBkColor(colorRed);
GfxTextOut( WriteIf(C>O ,"CG","CR"), locationW, locationH);
locationH = locationH+55;
RestorePriceArrays();
TimeFrameSet(inHourly);
locationW = Param("locationW",700,1,1200,1,1);
GfxSelectFont("Tahoma", 12);
GfxSetBkColor(colorBlack); GfxSetTextColor(colorWhite);
GfxTextOut("60 MIN CANDLE", locationW, locationH);
locationW = locationW + 120;
if (C[BarCount-2] >O[BarCount-2] ) GfxSetBkColor( colorGreen); else GfxSetBkColor(colorRed);
GfxTextOut( WriteIf(Ref(C,-1)>Ref(O,-1) ,"PG","PR"), locationW, locationH );
locationW = locationW + 30;
if (C[BarCount-1] >O[BarCount-1] ) GfxSetBkColor( colorGreen); else GfxSetBkColor(colorRed);
GfxTextOut( WriteIf(C>O ,"CG","CR"), locationW, locationH);
locationH = locationH+60;
RestorePriceArrays();
_SECTION_END();