Matrix Series AFL

kargocu · Jul 10, 2012

// Accumulation or Bought/Distribution or Sold=====\\
//===========Matrix Series==========\\
//============\\

_SECTION_BEGIN("Flower");//=============\\

//Plot (Close,"", IIf( C > O, ParamColor("Up Color", colorWhite ), ParamColor("Down Color", colorRed )),ParamStyle( "Style", styleCandle | styleThick, maskAll));//
Title = StrFormat("\\c02 {{NAME}} | {{DATE}} | Open : %g | High : %g | Low : %g | Close : %g | Change = %.1f%% | Volume = " +WriteVal( V, 1.0 ) +" {{VALUES}}",O, H, L, C, SelectedValue( ROC( C, 1 )) );

_SECTION_END();//=================\\

_SECTION_BEGIN("Sup/Res Detail");//====================================\\
SupResPeriod = Param("LookBack Period", 50, 0, 200,1);
SupResPercentage = Param("Percentage", 100, 0, 200,1);
PricePeriod = Param("Price Period", 16, 0, 200,1);
SupportLinecolor = ParamColor( "Support Color", colorGreen );
SupportLinestyle = ParamStyle("Support Style", styleThick|8|styleNoLabel);
ResistanceLinecolor = ParamColor( "Resistance Color", colorRed );
Resistancestyle = ParamStyle("Resistance Style", styleThick|8|styleNoLabel);
_SECTION_END();//============================\\

_SECTION_BEGIN("Line Detail");//==============\\
OverBought = Param("OverBought Above", 200, 0, 400,1);
OverSold = Param("OverSold Bellow", -200, -400, 0,1);
_SECTION_END();//==================================\\

_SECTION_BEGIN("Trend Bought/Sold Detail");//=======================================\\
Smoother = Param("Trend Smoother", 5, 5, 20);
upcolor = ParamColor( "UpTrend Color", colorGreen );
Downcolor = ParamColor( "DownTrend Color", colorRed );
_SECTION_END();//===================================\\

_SECTION_BEGIN("Circle Detail");//=========================================\\
Warningcolor = ParamColor( "Warning/Watch Signal", colorBlue );
WatchColor = ParamColor( "Accumulation Zone", colorWhite );
EntryColor = ParamColor( "Entry Signal", colorAqua );
ProfitTakeColor = ParamColor( "Distribution Zone", colorYellow );
ExitColor = ParamColor( "Exit Signal", colorRed );
_SECTION_END();//=================================================\\

_SECTION_BEGIN("Swing Sup/Res");//=========================================\\
Lookback=SupResPeriod;
PerCent=SupResPercentage;
Pds =PricePeriod;
Var=MACD();
Up=IIf(Var>Ref(Var,-1),abs(Var-Ref(Var,-1)),0);
Dn=IIf(Var<Ref(Var,-1),abs(Var-Ref(Var,-1)),0);
Ut=Wilders(Up,Pds);
Dt=Wilders(Dn,Pds);
RSIt=100*(Ut/(Ut+Dt));
A1=RSIt; B2=RSI(pds); C3=CCI(pds); D4=StochK(pds); E5=StochD(pds);
F6=MFI(pds); G7=Ultimate(pds); H8=ROC(C,pds);
Osc=C3;
Value1 = Osc;
Value2 = HHV(Value1,Lookback);
Value3 = LLV(Value1,Lookback);
Value4 = Value2 - Value3;
Value5 = Value4 * (PerCent / 100);
ResistanceLine = Value3 + Value5;
SupportLine = Value2 - Value5;
baseline=IIf( Osc < 100 AND Osc > 10 ,50 ,IIf( Osc < 0 ,0,0));
Plot(ResistanceLine,"",SupportLinecolor,SupportLinestyle);
Plot(SupportLine,"",ResistanceLinecolor,Resistancestyle);
_SECTION_END();//================================================\\

_SECTION_BEGIN("Entry/Exit Detail");//=========================================\\
n=Smoother;
ys1=(High+Low+Close*2)/4;
rk3=EMA(ys1,n);
rk4=StDev(ys1,n);
rk5=(ys1-rk3)*200/rk4;
rk6=EMA(rk5,n);
UP=EMA(rk6,n);
DOWN=EMA(up,n);
Oo=IIf(up<down,up,down);
Hh=Oo;
Ll=IIf(up<down,down,up);
Cc=Ll;
barcolor2=IIf(Ref(oo,-1)<Oo AND Cc<Ref(Cc,-1),upcolor,IIf(up>down,upcolor,downcolor));
PlotOHLC( Oo,hh,ll,Cc, "Matrix - Accumulation or Bought/Distribution or Sold", barcolor2, styleCandle);
Buy=Cross(up,OverSold);
Sell=Cross(OverBought,up);
PlotShapes (IIf(Buy, shapeSmallCircle, shapeNone) ,EntryColor, layer = 0, yposition = -220, offset = 1 );
PlotShapes (IIf(Sell, shapeSmallCircle, shapeNone) ,ExitColor, layer = 0, yposition = 220, offset = 1 );
_SECTION_END();//===================================\\

_SECTION_BEGIN("Overbought/Oversold/Warning Detail");//========================================\\
n=Smoother;
ys1=(High+Low+Close*2)/4;
rk3=EMA(ys1,n);
rk4=StDev(ys1,n);
rk5=(ys1-rk3)*210/rk4;
rk6=EMA(rk5,n);
UP=EMA(rk6,n);
DOWN=EMA(up,n);
Oo=IIf(up<down,up,down);
Hh=Oo;
Ll=IIf(up<down,down,up);
Cc=Ll;
barcolor2=IIf(Ref(oo,-1)<Oo AND Cc<Ref(Cc,-1),colorGreen,IIf(up>down,colorGreen,colorRed));
PlotOHLC( Oo,hh,ll,Cc, "", barcolor2, styleCandle|stylehidden );
UP=EMA(rk6,n);
UPshape = IIf(UP >= OverBought OR UP<=OverSold, shapeHollowSmallCircle, shapeNone);
UPColor = IIf(UP>=210, ProfitTakeColor, IIf(UP<=-210, WatchColor, Warningcolor));
Plot(UP, "", colorGrey50, styleThick|stylehidden);
PlotShapes(UPShape, UPColor, 0, UP, 0);
_SECTION_END();//===================================\\

_SECTION_BEGIN("Plot Lines");//============================================\\
Plot(OverBought,"",colorDarkGrey,styleLine|styleNoLabel);
Plot(0,"",colorDarkGrey,styleDashed|styleNoLabel);
Plot(OverSold,"",colorDarkGrey,styleLine|styleNoLabel);
_SECTION_END();//================================================\\
//===================================================\\
//============End of Code============================\\

PHP:

// Accumulation or Bought/Distribution or Sold=====\\ 
//===========Matrix Series==========\\ 
//============\\ 
 
_SECTION_BEGIN("Flower");//=============\\ 
 
//Plot (Close,"", IIf( C > O, ParamColor("Up Color", colorWhite ), ParamColor("Down Color", colorRed )),ParamStyle( "Style", styleCandle | styleThick, maskAll));//
Title = StrFormat("\\c02 {{NAME}} | {{DATE}} | Open : %g | High : %g | Low : %g | Close : %g | Change = %.1f%% | Volume = " +WriteVal( V, 1.0 ) +" {{VALUES}}",O, H, L, C, SelectedValue( ROC( C, 1 )) );

_SECTION_END();//=================\\ 
 

_SECTION_BEGIN("Sup/Res Detail");//====================================\\
SupResPeriod = Param("LookBack Period", 50, 0, 200,1);   
SupResPercentage = Param("Percentage", 100, 0, 200,1);
PricePeriod = Param("Price Period", 16, 0, 200,1); 
SupportLinecolor = ParamColor( "Support Color", colorGreen ); 
SupportLinestyle = ParamStyle("Support Style", styleThick|8|styleNoLabel);
ResistanceLinecolor = ParamColor( "Resistance Color", colorRed );  
Resistancestyle = ParamStyle("Resistance Style", styleThick|8|styleNoLabel);
_SECTION_END();//============================\\

_SECTION_BEGIN("Line Detail");//==============\\ 
OverBought = Param("OverBought Above", 200, 0, 400,1); 
OverSold = Param("OverSold Bellow", -200, -400, 0,1);
_SECTION_END();//==================================\\

_SECTION_BEGIN("Trend Bought/Sold Detail");//=======================================\\ 
Smoother = Param("Trend Smoother", 5, 5, 20); 
upcolor = ParamColor( "UpTrend Color", colorGreen ); 
Downcolor = ParamColor( "DownTrend Color", colorRed );
_SECTION_END();//===================================\\

_SECTION_BEGIN("Circle Detail");//=========================================\\ 
Warningcolor = ParamColor( "Warning/Watch Signal", colorBlue );
WatchColor = ParamColor( "Accumulation Zone", colorWhite );
EntryColor = ParamColor( "Entry Signal", colorAqua );
ProfitTakeColor = ParamColor( "Distribution Zone", colorYellow );
ExitColor = ParamColor( "Exit Signal", colorRed );
_SECTION_END();//=================================================\\

_SECTION_BEGIN("Swing Sup/Res");//=========================================\\
Lookback=SupResPeriod;
PerCent=SupResPercentage;
Pds =PricePeriod;
Var=MACD(); 
Up=IIf(Var>Ref(Var,-1),abs(Var-Ref(Var,-1)),0); 
Dn=IIf(Var<Ref(Var,-1),abs(Var-Ref(Var,-1)),0); 
Ut=Wilders(Up,Pds); 
Dt=Wilders(Dn,Pds);
RSIt=100*(Ut/(Ut+Dt)); 
A1=RSIt; B2=RSI(pds); C3=CCI(pds); D4=StochK(pds); E5=StochD(pds);
F6=MFI(pds); G7=Ultimate(pds); H8=ROC(C,pds);
Osc=C3;
Value1 = Osc;
Value2 = HHV(Value1,Lookback);
Value3 = LLV(Value1,Lookback); 
Value4 = Value2 - Value3;
Value5 = Value4 * (PerCent / 100);
ResistanceLine = Value3 + Value5;
SupportLine = Value2 - Value5;
baseline=IIf( Osc < 100 AND Osc > 10 ,50 ,IIf( Osc < 0 ,0,0));
Plot(ResistanceLine,"",SupportLinecolor,SupportLinestyle);  
Plot(SupportLine,"",ResistanceLinecolor,Resistancestyle); 
_SECTION_END();//================================================\\

_SECTION_BEGIN("Entry/Exit Detail");//=========================================\\      
n=Smoother; 
ys1=(High+Low+Close*2)/4; 
rk3=EMA(ys1,n); 
rk4=StDev(ys1,n); 
rk5=(ys1-rk3)*200/rk4;
rk6=EMA(rk5,n);
UP=EMA(rk6,n); 
DOWN=EMA(up,n);
Oo=IIf(up<down,up,down);
Hh=Oo;
Ll=IIf(up<down,down,up);
Cc=Ll;
barcolor2=IIf(Ref(oo,-1)<Oo AND Cc<Ref(Cc,-1),upcolor,IIf(up>down,upcolor,downcolor));
PlotOHLC( Oo,hh,ll,Cc, "Matrix - Accumulation or Bought/Distribution or Sold", barcolor2, styleCandle);
Buy=Cross(up,OverSold);
Sell=Cross(OverBought,up);
PlotShapes (IIf(Buy, shapeSmallCircle, shapeNone) ,EntryColor, layer = 0, yposition = -220, offset = 1 );
PlotShapes (IIf(Sell, shapeSmallCircle, shapeNone) ,ExitColor, layer = 0, yposition = 220, offset = 1 );
_SECTION_END();//===================================\\

_SECTION_BEGIN("Overbought/Oversold/Warning Detail");//========================================\\   
n=Smoother; 
ys1=(High+Low+Close*2)/4;
rk3=EMA(ys1,n); 
rk4=StDev(ys1,n); 
rk5=(ys1-rk3)*210/rk4;
rk6=EMA(rk5,n);
UP=EMA(rk6,n); 
DOWN=EMA(up,n);
Oo=IIf(up<down,up,down);
Hh=Oo;
Ll=IIf(up<down,down,up);
Cc=Ll;
barcolor2=IIf(Ref(oo,-1)<Oo AND Cc<Ref(Cc,-1),colorGreen,IIf(up>down,colorGreen,colorRed));
PlotOHLC( Oo,hh,ll,Cc, "", barcolor2, styleCandle|stylehidden );
UP=EMA(rk6,n);
UPshape = IIf(UP >= OverBought OR UP<=OverSold, shapeHollowSmallCircle, shapeNone);
UPColor = IIf(UP>=210, ProfitTakeColor, IIf(UP<=-210, WatchColor, Warningcolor));
Plot(UP, "", colorGrey50, styleThick|stylehidden);
PlotShapes(UPShape, UPColor, 0, UP, 0);
_SECTION_END();//===================================\\

_SECTION_BEGIN("Plot Lines");//============================================\\  
Plot(OverBought,"",colorDarkGrey,styleLine|styleNoLabel);
Plot(0,"",colorDarkGrey,styleDashed|styleNoLabel);
Plot(OverSold,"",colorDarkGrey,styleLine|styleNoLabel);
_SECTION_END();//================================================\\
//===================================================\\
//============End of Code============================\\

gsam · Jul 10, 2012

kargocu thank you so much for sharing this afl.

mbzd · Jul 28, 2012

Thanks kargocu..

It would be nice if backtesting option can be added..

Anyone can add this?

peterpeter · Jul 1, 2015

this similar to 007 of 9trading is awesaome

peterpeter · Jul 1, 2015

especially if u plot it below most of Ehlers osc like my stoc, universal osc,...

test123 · Jul 2, 2015

thanks it;s nice afl ....

sumantra · Jul 2, 2015

kargocu said:

// Accumulation or Bought/Distribution or Sold=====\\
//===========Matrix Series==========\\
//============\\

_SECTION_BEGIN("Flower");//=============\\

//Plot (Close,"", IIf( C > O, ParamColor("Up Color", colorWhite ), ParamColor("Down Color", colorRed )),ParamStyle( "Style", styleCandle | styleThick, maskAll));//
Title = StrFormat("\\c02 {{NAME}} | {{DATE}} | Open : %g | High : %g | Low : %g | Close : %g | Change = %.1f%% | Volume = " +WriteVal( V, 1.0 ) +" {{VALUES}}",O, H, L, C, SelectedValue( ROC( C, 1 )) );

_SECTION_END();//=================\\

_SECTION_BEGIN("Sup/Res Detail");//====================================\\
SupResPeriod = Param("LookBack Period", 50, 0, 200,1);
SupResPercentage = Param("Percentage", 100, 0, 200,1);
PricePeriod = Param("Price Period", 16, 0, 200,1);
SupportLinecolor = ParamColor( "Support Color", colorGreen );
SupportLinestyle = ParamStyle("Support Style", styleThick|8|styleNoLabel);
ResistanceLinecolor = ParamColor( "Resistance Color", colorRed );
Resistancestyle = ParamStyle("Resistance Style", styleThick|8|styleNoLabel);
_SECTION_END();//============================\\

_SECTION_BEGIN("Line Detail");//==============\\
OverBought = Param("OverBought Above", 200, 0, 400,1);
OverSold = Param("OverSold Bellow", -200, -400, 0,1);
_SECTION_END();//==================================\\

_SECTION_BEGIN("Trend Bought/Sold Detail");//=======================================\\
Smoother = Param("Trend Smoother", 5, 5, 20);
upcolor = ParamColor( "UpTrend Color", colorGreen );
Downcolor = ParamColor( "DownTrend Color", colorRed );
_SECTION_END();//===================================\\

_SECTION_BEGIN("Circle Detail");//=========================================\\
Warningcolor = ParamColor( "Warning/Watch Signal", colorBlue );
WatchColor = ParamColor( "Accumulation Zone", colorWhite );
EntryColor = ParamColor( "Entry Signal", colorAqua );
ProfitTakeColor = ParamColor( "Distribution Zone", colorYellow );
ExitColor = ParamColor( "Exit Signal", colorRed );
_SECTION_END();//=================================================\\

_SECTION_BEGIN("Swing Sup/Res");//=========================================\\
Lookback=SupResPeriod;
PerCent=SupResPercentage;
Pds =PricePeriod;
Var=MACD();
Up=IIf(Var>Ref(Var,-1),abs(Var-Ref(Var,-1)),0);
Dn=IIf(Var<Ref(Var,-1),abs(Var-Ref(Var,-1)),0);
Ut=Wilders(Up,Pds);
Dt=Wilders(Dn,Pds);
RSIt=100*(Ut/(Ut+Dt));
A1=RSIt; B2=RSI(pds); C3=CCI(pds); D4=StochK(pds); E5=StochD(pds);
F6=MFI(pds); G7=Ultimate(pds); H8=ROC(C,pds);
Osc=C3;
Value1 = Osc;
Value2 = HHV(Value1,Lookback);
Value3 = LLV(Value1,Lookback);
Value4 = Value2 - Value3;
Value5 = Value4 * (PerCent / 100);
ResistanceLine = Value3 + Value5;
SupportLine = Value2 - Value5;
baseline=IIf( Osc < 100 AND Osc > 10 ,50 ,IIf( Osc < 0 ,0,0));
Plot(ResistanceLine,"",SupportLinecolor,SupportLinestyle);
Plot(SupportLine,"",ResistanceLinecolor,Resistancestyle);
_SECTION_END();//================================================\\

_SECTION_BEGIN("Entry/Exit Detail");//=========================================\\
n=Smoother;
ys1=(High+Low+Close*2)/4;
rk3=EMA(ys1,n);
rk4=StDev(ys1,n);
rk5=(ys1-rk3)*200/rk4;
rk6=EMA(rk5,n);
UP=EMA(rk6,n);
DOWN=EMA(up,n);
Oo=IIf(up<down,up,down);
Hh=Oo;
Ll=IIf(up<down,down,up);
Cc=Ll;
barcolor2=IIf(Ref(oo,-1)<Oo AND Cc<Ref(Cc,-1),upcolor,IIf(up>down,upcolor,downcolor));
PlotOHLC( Oo,hh,ll,Cc, "Matrix - Accumulation or Bought/Distribution or Sold", barcolor2, styleCandle);
Buy=Cross(up,OverSold);
Sell=Cross(OverBought,up);
PlotShapes (IIf(Buy, shapeSmallCircle, shapeNone) ,EntryColor, layer = 0, yposition = -220, offset = 1 );
PlotShapes (IIf(Sell, shapeSmallCircle, shapeNone) ,ExitColor, layer = 0, yposition = 220, offset = 1 );
_SECTION_END();//===================================\\

_SECTION_BEGIN("Overbought/Oversold/Warning Detail");//========================================\\
n=Smoother;
ys1=(High+Low+Close*2)/4;
rk3=EMA(ys1,n);
rk4=StDev(ys1,n);
rk5=(ys1-rk3)*210/rk4;
rk6=EMA(rk5,n);
UP=EMA(rk6,n);
DOWN=EMA(up,n);
Oo=IIf(up<down,up,down);
Hh=Oo;
Ll=IIf(up<down,down,up);
Cc=Ll;
barcolor2=IIf(Ref(oo,-1)<Oo AND Cc<Ref(Cc,-1),colorGreen,IIf(up>down,colorGreen,colorRed));
PlotOHLC( Oo,hh,ll,Cc, "", barcolor2, styleCandle|stylehidden );
UP=EMA(rk6,n);
UPshape = IIf(UP >= OverBought OR UP<=OverSold, shapeHollowSmallCircle, shapeNone);
UPColor = IIf(UP>=210, ProfitTakeColor, IIf(UP<=-210, WatchColor, Warningcolor));
Plot(UP, "", colorGrey50, styleThick|stylehidden);
PlotShapes(UPShape, UPColor, 0, UP, 0);
_SECTION_END();//===================================\\

_SECTION_BEGIN("Plot Lines");//============================================\\
Plot(OverBought,"",colorDarkGrey,styleLine|styleNoLabel);
Plot(0,"",colorDarkGrey,styleDashed|styleNoLabel);
Plot(OverSold,"",colorDarkGrey,styleLine|styleNoLabel);
_SECTION_END();//================================================\\
//===================================================\\
//============End of Code============================\\

PHP:

// Accumulation or Bought/Distribution or Sold=====\\ 
//===========Matrix Series==========\\ 
//============\\ 
 
_SECTION_BEGIN("Flower");//=============\\ 
 
//Plot (Close,"", IIf( C > O, ParamColor("Up Color", colorWhite ), ParamColor("Down Color", colorRed )),ParamStyle( "Style", styleCandle | styleThick, maskAll));//
Title = StrFormat("\\c02 {{NAME}} | {{DATE}} | Open : %g | High : %g | Low : %g | Close : %g | Change = %.1f%% | Volume = " +WriteVal( V, 1.0 ) +" {{VALUES}}",O, H, L, C, SelectedValue( ROC( C, 1 )) );

_SECTION_END();//=================\\ 
 

_SECTION_BEGIN("Sup/Res Detail");//====================================\\
SupResPeriod = Param("LookBack Period", 50, 0, 200,1);   
SupResPercentage = Param("Percentage", 100, 0, 200,1);
PricePeriod = Param("Price Period", 16, 0, 200,1); 
SupportLinecolor = ParamColor( "Support Color", colorGreen ); 
SupportLinestyle = ParamStyle("Support Style", styleThick|8|styleNoLabel);
ResistanceLinecolor = ParamColor( "Resistance Color", colorRed );  
Resistancestyle = ParamStyle("Resistance Style", styleThick|8|styleNoLabel);
_SECTION_END();//============================\\

_SECTION_BEGIN("Line Detail");//==============\\ 
OverBought = Param("OverBought Above", 200, 0, 400,1); 
OverSold = Param("OverSold Bellow", -200, -400, 0,1);
_SECTION_END();//==================================\\

_SECTION_BEGIN("Trend Bought/Sold Detail");//=======================================\\ 
Smoother = Param("Trend Smoother", 5, 5, 20); 
upcolor = ParamColor( "UpTrend Color", colorGreen ); 
Downcolor = ParamColor( "DownTrend Color", colorRed );
_SECTION_END();//===================================\\

_SECTION_BEGIN("Circle Detail");//=========================================\\ 
Warningcolor = ParamColor( "Warning/Watch Signal", colorBlue );
WatchColor = ParamColor( "Accumulation Zone", colorWhite );
EntryColor = ParamColor( "Entry Signal", colorAqua );
ProfitTakeColor = ParamColor( "Distribution Zone", colorYellow );
ExitColor = ParamColor( "Exit Signal", colorRed );
_SECTION_END();//=================================================\\

_SECTION_BEGIN("Swing Sup/Res");//=========================================\\
Lookback=SupResPeriod;
PerCent=SupResPercentage;
Pds =PricePeriod;
Var=MACD(); 
Up=IIf(Var>Ref(Var,-1),abs(Var-Ref(Var,-1)),0); 
Dn=IIf(Var<Ref(Var,-1),abs(Var-Ref(Var,-1)),0); 
Ut=Wilders(Up,Pds); 
Dt=Wilders(Dn,Pds);
RSIt=100*(Ut/(Ut+Dt)); 
A1=RSIt; B2=RSI(pds); C3=CCI(pds); D4=StochK(pds); E5=StochD(pds);
F6=MFI(pds); G7=Ultimate(pds); H8=ROC(C,pds);
Osc=C3;
Value1 = Osc;
Value2 = HHV(Value1,Lookback);
Value3 = LLV(Value1,Lookback); 
Value4 = Value2 - Value3;
Value5 = Value4 * (PerCent / 100);
ResistanceLine = Value3 + Value5;
SupportLine = Value2 - Value5;
baseline=IIf( Osc < 100 AND Osc > 10 ,50 ,IIf( Osc < 0 ,0,0));
Plot(ResistanceLine,"",SupportLinecolor,SupportLinestyle);  
Plot(SupportLine,"",ResistanceLinecolor,Resistancestyle); 
_SECTION_END();//================================================\\

_SECTION_BEGIN("Entry/Exit Detail");//=========================================\\      
n=Smoother; 
ys1=(High+Low+Close*2)/4; 
rk3=EMA(ys1,n); 
rk4=StDev(ys1,n); 
rk5=(ys1-rk3)*200/rk4;
rk6=EMA(rk5,n);
UP=EMA(rk6,n); 
DOWN=EMA(up,n);
Oo=IIf(up<down,up,down);
Hh=Oo;
Ll=IIf(up<down,down,up);
Cc=Ll;
barcolor2=IIf(Ref(oo,-1)<Oo AND Cc<Ref(Cc,-1),upcolor,IIf(up>down,upcolor,downcolor));
PlotOHLC( Oo,hh,ll,Cc, "Matrix - Accumulation or Bought/Distribution or Sold", barcolor2, styleCandle);
Buy=Cross(up,OverSold);
Sell=Cross(OverBought,up);
PlotShapes (IIf(Buy, shapeSmallCircle, shapeNone) ,EntryColor, layer = 0, yposition = -220, offset = 1 );
PlotShapes (IIf(Sell, shapeSmallCircle, shapeNone) ,ExitColor, layer = 0, yposition = 220, offset = 1 );
_SECTION_END();//===================================\\

_SECTION_BEGIN("Overbought/Oversold/Warning Detail");//========================================\\   
n=Smoother; 
ys1=(High+Low+Close*2)/4;
rk3=EMA(ys1,n); 
rk4=StDev(ys1,n); 
rk5=(ys1-rk3)*210/rk4;
rk6=EMA(rk5,n);
UP=EMA(rk6,n); 
DOWN=EMA(up,n);
Oo=IIf(up<down,up,down);
Hh=Oo;
Ll=IIf(up<down,down,up);
Cc=Ll;
barcolor2=IIf(Ref(oo,-1)<Oo AND Cc<Ref(Cc,-1),colorGreen,IIf(up>down,colorGreen,colorRed));
PlotOHLC( Oo,hh,ll,Cc, "", barcolor2, styleCandle|stylehidden );
UP=EMA(rk6,n);
UPshape = IIf(UP >= OverBought OR UP<=OverSold, shapeHollowSmallCircle, shapeNone);
UPColor = IIf(UP>=210, ProfitTakeColor, IIf(UP<=-210, WatchColor, Warningcolor));
Plot(UP, "", colorGrey50, styleThick|stylehidden);
PlotShapes(UPShape, UPColor, 0, UP, 0);
_SECTION_END();//===================================\\

_SECTION_BEGIN("Plot Lines");//============================================\\  
Plot(OverBought,"",colorDarkGrey,styleLine|styleNoLabel);
Plot(0,"",colorDarkGrey,styleDashed|styleNoLabel);
Plot(OverSold,"",colorDarkGrey,styleLine|styleNoLabel);
_SECTION_END();//================================================\\
//===================================================\\
//============End of Code============================\\

dont know interested...

hatsenlienhuong · Jul 10, 2015

how to use it guy?

Thread starter	Similar threads	Forum	Replies	Date
	Matrix - Index of God	Algo & Automated Trading	1	Jun 15, 2023
	Can Anyone share AFL Matrix???	AmiBroker	9	Jan 8, 2011
K	Market Matrix on eBay	Seminars & Tutors	0	Apr 27, 2008
R	Escalation Matrix for RMoney required	Investors Grievances	0	Jan 20, 2008
B	Market Matrix: Current events affecting Indian Stock Market	General Trading & Investing Chat	2	Apr 17, 2007

Matrix Series AFL

kargocu

Member

gsam

Member

mbzd

Member

peterpeter

New Member

peterpeter

New Member

test123

Banned

sumantra

Active Member

hatsenlienhuong

New Member

Similar threads