Date on Quarterly Graph

hitesh

Active Member
#1
Hello Friends,

Below is the AFL for Quarterly Graph. The problem is, it doesn't show date correctly. Can anybody help me out please ?


_SECTION_BEGIN("Quarterly Price Graph");
Monthlyopen = TimeFrameGetPrice("O",inMonthly*3);
Monthlyhigh = TimeFrameGetPrice("H",inMonthly*3);
Monthlylow = TimeFrameGetPrice("L",inMonthly*3);
MonthlyClose = TimeFrameGetPrice("C",inMonthly*3);

MonthlyOpen = TimeFrameCompress( MonthlyOpen, inMonthly*3 );
MonthlyHigh = TimeFrameCompress( MonthlyHigh, inMonthly*3 );
MonthlyLow = TimeFrameCompress( MonthlyLow, inMonthly*3 );
MonthlyClose = TimeFrameCompress( MonthlyClose, inMonthly*3 );

PlotOHLC(Monthlyopen,Monthlyhigh,Monthlylow,Monthlyclose,"Month",colorBlack,styleCandle);

Title = "Quarterly Chart, O:" + WriteVal(MonthlyOpen,1.1) + ", H:" + WriteVal(MonthlyHigh,1.1) + ", L:" + WriteVal(MonthlyLow,1.1) + ", C:" + WriteVal(Monthlyclose,1.1);



///////////// Title //////////////////
Change=Monthlyclose-Ref(Monthlyclose,-1);
ROCVal = ROC(Monthlyclose,1);
Title = StrFormat("{{NAME}} - {{INTERVAL}} {{DATE}}"
+EncodeColor(colorAqua)+ " O: " + WriteVal(MonthlyOpen,1.1)
+EncodeColor(colorGreen) +", H:" + WriteVal(MonthlyHigh,1.1)
+EncodeColor(colorRed)+ ", L:" + WriteVal(MonthlyLow,1.1)
+EncodeColor(colorBlack)+ ", C:"+ WriteVal(Monthlyclose,1.1)
+" ("+NumToStr(Change,1.2)+" )" +" ("+NumToStr(ROCVal,1.2)+" %%)")
+EncodeColor(colorYellow)+ " Quarterly Chart";

Thanks & Regards
Hitesh
 
#2
_SECTION_BEGIN("Quarterly Price Graph");
Monthlyopen = TimeFrameGetPrice("O",inMonthly*3);
Monthlyhigh = TimeFrameGetPrice("H",inMonthly*3);
Monthlylow = TimeFrameGetPrice("L",inMonthly*3);
MonthlyClose = TimeFrameGetPrice("C",inMonthly*3);

MonthlyOpen = TimeFrameCompress( MonthlyOpen, inMonthly*3 );
MonthlyHigh = TimeFrameCompress( MonthlyHigh, inMonthly*3 );
MonthlyLow = TimeFrameCompress( MonthlyLow, inMonthly*3 );
MonthlyClose = TimeFrameCompress( MonthlyClose, inMonthly*3 );

PlotOHLC(Monthlyopen,Monthlyhigh,Monthlylow,Monthlyclose,"Month",colorBlack,styleCandle);

Title = "Quarterly Chart, O:" + WriteVal(MonthlyOpen,1.1) + ", H:" + WriteVal(MonthlyHigh,1.1) + ", L:" + WriteVal(MonthlyLow,1.1) + ", C:" + WriteVal(Monthlyclose,1.1);



///////////// Title //////////////////
Change=Monthlyclose-Ref(Monthlyclose,-1);
ROCVal = ROC(Monthlyclose,1);
Title = StrFormat("{{NAME}} - {{INTERVAL}} {{DATE}}"
+EncodeColor(colorAqua)+ " O: " + WriteVal(MonthlyOpen,1.1)
+EncodeColor(colorGreen) +", H:" + WriteVal(MonthlyHigh,1.1)
+EncodeColor(colorRed)+ ", L:" + WriteVal(MonthlyLow,1.1)
+EncodeColor(colorBlack)+ ", C:"+ WriteVal(Monthlyclose,1.1)
+" ("+NumToStr(Change,1.2)+" )" +" ("+NumToStr(ROCVal,1.2)+" %%)")
+EncodeColor(colorYellow)+ " Quarterly Chart";
 

Similar threads