Simple Coding Help - No Promise.
- Thread starter Happy_Singh
- Start date
I am trying to use below afl on 10 min TF using expand command, but there is some mistake, Nifty 10 min ribbon becomes red at 1.10pm on 04.06.15 but when we see it on 5 min, ribbon for 10 min has become red at 12.40 pm itself instead of 1.10 pm
Seniors, please correct the code.
Nifty 5min chart
Nifty 10min chart
Seniors, please correct the code.
Nifty 5min chart
Nifty 10min chart
Code:
_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();
_SECTION_BEGIN("HA");
a=20;
GraphXSpace=5;
p=30;
//p = Param("p",30,2,100,1);
Om=DEMA(O,p);
hm=DEMA(H,p);
lm=DEMA(L,p);
Cm=DEMA(C,p);
HACLOSE=(Om+Hm+Lm+Cm)/4;
HaOpen = AMA( Ref( HaClose, -1), 1);
HaHigh = Max( Hm, Max( HaClose, HaOpen ) );
HaLow = Min( Lm, Min( HaClose, HaOpen ) );
slope = Param("slope",2,2,100,1);
Color20= IIf(LinRegSlope(MA(HaClose,a),slope)<0,colorRed,colorBlue);
Color=IIf(Haclose>MA(HaClose,a),colorBlue, colorRed);
PlotOHLC( HaOpen, HaOpen, HaClose, HaClose, "" + Name(), color, styleCandle);
mycfly5=IIf(Haclose>MA(HaClose,a),colorBlue,
IIf(Haclose<MA(HaClose,a),colorRed,31));
Plot(3, "", mycfly5, styleOwnScale| styleArea|styleNoLabel,-0.5,100);
_SECTION_END();
_SECTION_BEGIN("HA 10min");
tf=Param("Time Frame (min)",10,1,10,1);tfrm=in1Minute*tf;
TimeFrameSet(tfrm);
a2=20;
p2=30;
//p2 = Param("p2",30,2,100,1);
Om2=DEMA(O,p2);
hm2=DEMA(H,p2);
lm2=DEMA(L,p2);
Cm2=DEMA(C,p2);
HACLOSE2=(Om2+Hm2+Lm2+Cm2)/4;
HaOpen2 = AMA( Ref( HaClose2, -1), 1);
HaHigh2 = Max( Hm2, Max( HaClose2, HaOpen2 ) );
HaLow2 = Min( Lm2, Min( HaClose2, HaOpen2 ) );
slope2 = Param("slope",2,2,100,1);
Color= IIf(LinRegSlope(MA(HaClose2,a2),slope2)<0,colorRed,colorBlue);
TimeFrameRestore();
a2f = TimeFrameExpand(a2, tfrm);
HaOpen2f = TimeFrameExpand(HaOpen2, tfrm);
HaHigh2f = TimeFrameExpand(HaHigh2, tfrm);
HaLow2f = TimeFrameExpand(HaLow2, tfrm);
Haclose2f = TimeFrameExpand(Haclose2, tfrm);
Color2=IIf(Haclose2f>MA(HaClose2f,a2f),colorSkyblue, colorPink);
//PlotOHLC( HaOpen2f, HaOpen2f, HaClose2f, HaClose2f, "" + Name(), color2, styleCandle);
mycfly10=IIf(Haclose2f>MA(HaClose2f,a2f),colorBlue,
IIf(Haclose2f<MA(HaClose2f,a2f),colorRed,31));
Plot(9, "", mycfly10, styleOwnScale| styleArea|styleNoLabel,-0.5,100);
_SECTION_END();1. you do not need to put numeric values like a2 into timeframeset and then expand them. They are just scalars. Timeframeset is for arrays in other time frames.
2. you haven't put MA(HaClose2f ... ) into timeframeset.
Code:
_SECTION_BEGIN("Price");
SetChartOptions(0,chartShowArrows|chartShowDates|chartWrapTitle);
_N(Title = StrFormat("{{NAME}} - {{INTERVAL}} {{DATE}} Op: %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();
_SECTION_BEGIN("HA");
a=20;
GraphXSpace = 10;
p = 30;
//p = Param("p",30,2,100,1);
Om = DEMA( O, p );
hm = DEMA( H, p );
lm = DEMA( L, p );
Cm = DEMA( C, p );
HACLOSE = ( Om + Hm + Lm + Cm ) / 4;
HaOpen = AMA( Ref( HaClose, -1 ), 1 );
HaHigh = Max( Hm, Max( HaClose, HaOpen ) );
HaLow = Min( Lm, Min( HaClose, HaOpen ) );
slope = Param( "slope", 2, 2, 100, 1 );
Color20 = IIf( LinRegSlope( MA( HaClose, a ), slope ) < 0, colorRed, colorBlue );
Color = IIf( Haclose > MA( HaClose, a ), colorBlue, colorRed );
SetBarFillColor( Color );
PlotOHLC( HaOpen, HaOpen, HaClose, HaClose, "HAclose", color, styleCandle | styleNoTitle );
mycfly5 = IIf( Haclose > MA( HaClose, a ), colorBlue, IIf( Haclose < MA( HaClose, a ), colorRed, 31 ) );
Plot( 1, "", mycfly5, styleOwnScale | styleArea | styleNoLabel, 0, 30 );
SetChartOptions( 0, chartShowArrows | chartShowDates | chartWrapTitle );
_N( Title += StrFormat( "\n{{NAME}} - {{INTERVAL}} {{DATE}} " +
EncodeColor( SelectedValue( Color ) ) + "HAOpen: %g HAClose: %g (%.1f%%) {{VALUES}}",
HaOpen, HaClose, SelectedValue( ROC( HaClose, 1 ) ) ) );
_SECTION_END();
_SECTION_BEGIN("HA 10min");
tf = Param( "Time Frame (min)", 10, 1, 10, 1 );
tfrm = in1Minute * tf;
a2 = 20;
p2 = 30;
//p2 = Param("p2",30,2,100,1);
slope2 = Param( "slope", 2, 2, 100, 1 );
TimeFrameSet(tfrm);
Om2 = DEMA( O, p2 );
hm2 = DEMA( H, p2 );
lm2 = DEMA( L, p2 );
Cm2 = DEMA( C, p2 );
HACLOSE2 = ( Om2 + Hm2 + Lm2 + Cm2 ) / 4;
HaOpen2 = AMA( Ref( HaClose2, -1 ), 1 );
HaHigh2 = Max( Hm2, Max( HaClose2, HaOpen2 ) );
HaLow2 = Min( Lm2, Min( HaClose2, HaOpen2 ) );
myMA = MA( HaClose2, a2 );
//Color = IIf( LinRegSlope( myMA, slope2 ) < 0, colorRed, colorBlue );
TimeFrameRestore();
expandmode = expandLast;
HaOpen2f = TimeFrameExpand( HaOpen2, tfrm, expandmode );
HaHigh2f = TimeFrameExpand( HaHigh2, tfrm, expandmode );
HaLow2f = TimeFrameExpand( HaLow2, tfrm, expandmode );
Haclose2f = TimeFrameExpand( Haclose2, tfrm, expandmode );
myMA = TimeFrameExpand( myMA, tfrm, expandmode );
//Color = TimeFrameExpand( Color, tfrm, expandmode );
//Color2 = IIf( Haclose2f > myMA, colorSkyblue, colorPink );
//PlotOHLC( HaOpen2f, HaOpen2f, HaClose2f, HaClose2f, "" + Name(), color2, styleCandle);
mycfly10 = IIf( Haclose2f > myMA, colorBlue, IIf( Haclose2f < myMA, colorRed, 31 ) );
Plot( 2, "", mycfly10, styleOwnScale | styleArea | styleNoLabel, 0, 30 );
_SECTION_END();
Last edited:
@ NEhal
Do really read the help offered to u.
Do really try to learn from the help or just come here and post the similar request here again and want the ready made solution.
See tht was the similar request and the solution is given by me.
try to read it, understand it and now plz try to solve your problem of your own
Do really read the help offered to u.
Do really try to learn from the help or just come here and post the similar request here again and want the ready made solution.
Please replace the First part in your code by the code following.
This will solve your purpose.
But as u said u have no purpose except learning to solve the error
Here is the Explanation :
a). Bookish / Veteran Explanation :
Use HTF Variable in calculation when TF is set on HTF.
b). Simple Indepth explanation for normal human beings like me.
As in your code u have expanded the Higher Time frame (HTF) on Lower Time Frame (LTF).
For this u have expanded the variable "BridgeT2" to "BridgeT2f"
So u will have two bars of 5M in 1 bar of 10M.
and for coloring purpose u directly used expanded variable. so as per your coloring condition when the ref value is equal to current value (Comparing the two parts of one flat line of 10M) it is giving grey color output.
I hope u got it.
Code:
_SECTION_BEGIN("10min Earth");
tf=Param("Time Frame (min)",10,1,10,1);tfrm=in1Minute*tf;
TimeFrameSet(tfrm);
VarT2 = ( High + Low + Close * 2 ) / 4;
BT2 = (EMA((VarT2 - LLV(VarT2,15))/(HHV(Low, 15) - LLV(VarT2, 15)), 2)) * 38;
BotT2 = (((-1)) * (EMA( (VarT2- LLV(VarT2,15) ) / (HHV(Low, 15)-LLV(VarT2, 15)), 2) + 0.01)) * 38;
Var2T2 = ((Close-LLV(Low, 10))/(HHV(High, 10)-LLV(Low, 10))) * 100;
Var3T2 = EMA(Var2T2, 10);
Var4T2 = EMA(Var3T2, 10);
Var5T2 = 3 * Var3T2 - 2 * Var4T2;
Var6T2 = EMA(Var5T2, 5);
BridgeT2 = EMA(Var6T2, 1);
myc2e=IIf(BridgeT2 > Ref(BridgeT2, -1),colorBlue,IIf(BridgeT2 < Ref(BridgeT2, -1),colorRed,31));
TimeFrameRestore() ;
BridgeT2f = TimeFrameExpand(BridgeT2, tfrm);
myc2ef=TimeFrameExpand(myc2e, tfrm);
Plot(6, "ribbon", myc2ef, styleOwnScale | styleArea|styleNoLabel, 0.1, 100);
_SECTION_END();But as u said u have no purpose except learning to solve the error
Here is the Explanation :
a). Bookish / Veteran Explanation :
Use HTF Variable in calculation when TF is set on HTF.
b). Simple Indepth explanation for normal human beings like me.
As in your code u have expanded the Higher Time frame (HTF) on Lower Time Frame (LTF).
For this u have expanded the variable "BridgeT2" to "BridgeT2f"
So u will have two bars of 5M in 1 bar of 10M.
and for coloring purpose u directly used expanded variable. so as per your coloring condition when the ref value is equal to current value (Comparing the two parts of one flat line of 10M) it is giving grey color output.
I hope u got it.
try to read it, understand it and now plz try to solve your problem of your own
Sirs.
Does the ExRem function in a AFL ,
remove the excess Occurences only Visually & in BackTesting ?, And it has no effect on other pieces of codes in the AFL ? -->
like it has no effect on
? Bcos "SRngPrft" takes a new "ShortPrice" whenever & wherever there is an Excess "SHORT Signal" wud hve occured (even when the excess "SHORT Signal" is NOT VISIBLE on the CHART or BACKTESTING Report).
Pls Guide to clear the Confusion and to overcome this issue.
Thank U All
Rgrds
--ShiraJ--
Does the ExRem function in a AFL ,
Code:
Short= ExRem(Short,Cover);like it has no effect on
Code:
SRngPrft= ShortPrice-C;Pls Guide to clear the Confusion and to overcome this issue.
Thank U All
Rgrds
--ShiraJ--
Last edited:
Similar threads
-
3 Ways To Find Out The Current Trend/Market Direction For Your Trade With A Simple Online Tool
- Started by Oscar_0
- Replies: 1
-
-
Coding help.........adding exploration for the simple combo
- Started by praveen5344
- Replies: 2
-
Help with simple coding...........SUPERTREND AND STOCHASTICS
- Started by praveen5344
- Replies: 3
-