// Downloaded From https://www.WiseStockTrader.com _SECTION_BEGIN("Background Color"); BKswitch = ParamToggle("Background Color","On,Off"); OUTcolor = ParamColor("Outer Panel Color",colorBlack); INUPcolor = ParamColor("Inner Panel Upper",colorBlack); INDNcolor = ParamColor("Inner Panel Lower",colorBlack); TitleColor = ParamColor("Title Color ",colorBlack); if (NOT BKswitch) { SetChartBkColor(OUTcolor); // color of outer border SetChartBkGradientFill(INUPcolor,INDNcolor,TitleColor); // color of inner panel } _SECTION_END(); _SECTION_BEGIN("trixm"); SetChartOptions( 1, chartWrapTitle ); K1=5;// Param("EMA Periods?",5,3,50); K2=10;// Param("ATR Periods?",10,2,50); Mul=1;// Param("ATR Multiplier?",1,0.5,5,0.5); Mi=EMA(C, K1); Kel= ATR(K2)*Mul; UB= Mi + Kel; LB= Mi - Kel; N = 9;//Param( "N", 9, 2, 200, 1 ); M = 5;//Param( "M", 5, 2, 200, 1 ); MTM = Close-(UB-LB)/2; TR= EMA(EMA(EMA(MTM,M),M),M); TRIXM = TR-Ref(TR,-1); TRIXMA = MA(TRIXM,4); TrixMAUpper4= MA(IIf(TRIXMA>=0,TRIXMA,TRIXMA*-1),99)*6.8540; TrixMAUpper3= MA(IIf(TRIXMA>=0,TRIXMA,TRIXMA*-1),99)*4.2360; TrixMAUpper2= MA(IIf(TRIXMA>=0,TRIXMA,TRIXMA*-1),99)*2.6180; TrixMAUpper1= MA(IIf(TRIXMA>=0,TRIXMA,TRIXMA*-1),99)*1.6180; TrixMALower1= MA(IIf(TRIXMA>=0,TRIXMA*-1,TRIXMA),99)*1.6180; TrixMALower2= MA(IIf(TRIXMA>=0,TRIXMA*-1,TRIXMA),99)*2.6180; TrixMALower3= MA(IIf(TRIXMA>=0,TRIXMA*-1,TRIXMA),99)*4.2360; TrixMALower4= MA(IIf(TRIXMA>=0,TRIXMA*-1,TRIXMA),99)*6.8540; Plot( TrixM, "TRIXM", colorBlue ); Plot( TrixMA, "TRIXMA", colorLime); Plot( TrixMAUpper4, "TrixMAUpper4", colorDarkTeal); Plot( TrixMAUpper3, "TrixMAUpper3", colorDarkGrey); Plot( TrixMAUpper2, "TrixMAUpper2", colorDarkRed); Plot( TrixMAUpper1, "TrixMAUpper1", colorViolet); Plot(0,"",colorDarkYellow); Plot( TrixMALower1, "TrixMALower1", colorViolet); Plot( TrixMALower2, "TrixMALower2", colorDarkRed); Plot( TrixMALower3, "TrixMALower3", colorDarkGrey); Plot( TrixMALower4, "TrixMALower4", colorDarkTeal); Buy = Cross(TrixM,TrixMA); Sell = Cross(TrixMA,TrixM); Short = Sell; Cover = Buy; Lower_1= Trixma-Trixm>Ref(Trixma,-1)-Ref(Trixm,-1) AND trixma>trixm AND Ref(trixma,-1)>Ref(trixm,-1); Lower_2= Trixma-Trixm>Ref(Trixma,-1)-Ref(Trixm,-1) AND Ref(Trixma,-1)-Ref(Trixm,-1)>Ref(Trixma,-2)-Ref(Trixm,-2) AND trixma>trixm AND Ref(trixma,-1)>Ref(trixm,-1) AND Ref(trixma,-2)>Ref(trixm,-2); Lower_3= Trixma-Trixm>Ref(Trixma,-1)-Ref(Trixm,-1) AND Ref(Trixma,-1)-Ref(Trixm,-1)>Ref(Trixma,-2)-Ref(Trixm,-2) AND Ref(Trixma,-2)-Ref(Trixm,-2)>Ref(Trixma,-3)-Ref(Trixm,-3) AND trixma>trixm AND Ref(trixma,-1)>Ref(trixm,-1) AND Ref(trixma,-2)>Ref(trixm,-2) AND Ref(trixma,-3)>Ref(trixm,-3); Lower_4= Trixma-Trixm>Ref(Trixma,-1)-Ref(Trixm,-1) AND Ref(Trixma,-1)-Ref(Trixm,-1)>Ref(Trixma,-2)-Ref(Trixm,-2) AND Ref(Trixma,-2)-Ref(Trixm,-2)>Ref(Trixma,-3)-Ref(Trixm,-3) AND Ref(Trixma,-3)-Ref(Trixm,-3)>Ref(Trixma,-4)-Ref(Trixm,-4) AND trixma>trixm AND Ref(trixma,-1)>Ref(trixm,-1) AND Ref(trixma,-2)>Ref(trixm,-2) AND Ref(trixma,-3)>Ref(trixm,-3) AND Ref(trixma,-4)>Ref(trixm,-4) ; Lower_5= Trixma-Trixm>Ref(Trixma,-1)-Ref(Trixm,-1) AND Ref(Trixma,-1)-Ref(Trixm,-1)>Ref(Trixma,-2)-Ref(Trixm,-2) AND Ref(Trixma,-2)-Ref(Trixm,-2)>Ref(Trixma,-3)-Ref(Trixm,-3) AND Ref(Trixma,-3)-Ref(Trixm,-3)>Ref(Trixma,-4)-Ref(Trixm,-4) AND Ref(Trixma,-4)-Ref(Trixm,-4)>Ref(Trixma,-5)-Ref(Trixm,-5) AND trixma>trixm AND Ref(trixma,-1)>Ref(trixm,-1) AND Ref(trixma,-2)>Ref(trixm,-2) AND Ref(trixma,-3)>Ref(trixm,-3) AND Ref(trixma,-4)>Ref(trixm,-4) AND Ref(trixma,-5)>Ref(trixm,-5); Lower_6= Trixma-Trixm>Ref(Trixma,-1)-Ref(Trixm,-1) AND Ref(Trixma,-1)-Ref(Trixm,-1)>Ref(Trixma,-2)-Ref(Trixm,-2) AND Ref(Trixma,-2)-Ref(Trixm,-2)>Ref(Trixma,-3)-Ref(Trixm,-3) AND Ref(Trixma,-3)-Ref(Trixm,-3)>Ref(Trixma,-4)-Ref(Trixm,-4) AND Ref(Trixma,-4)-Ref(Trixm,-4)>Ref(Trixma,-5)-Ref(Trixm,-5) AND Ref(Trixma,-6)-Ref(Trixm,-6)>Ref(Trixma,-6)-Ref(Trixm,-6) AND trixma>trixm AND Ref(trixma,-1)>Ref(trixm,-1) AND Ref(trixma,-2)>Ref(trixm,-2) AND Ref(trixma,-3)>Ref(trixm,-3) AND Ref(trixma,-4)>Ref(trixm,-4) AND Ref(trixma,-5)>Ref(trixm,-5) AND Ref(trixma,-6)>Ref(trixm,-6); Lower_7= Trixma-Trixm>Ref(Trixma,-1)-Ref(Trixm,-1) AND Ref(Trixma,-1)-Ref(Trixm,-1)>Ref(Trixma,-2)-Ref(Trixm,-2) AND Ref(Trixma,-2)-Ref(Trixm,-2)>Ref(Trixma,-3)-Ref(Trixm,-3) AND Ref(Trixma,-3)-Ref(Trixm,-3)>Ref(Trixma,-4)-Ref(Trixm,-4) AND Ref(Trixma,-4)-Ref(Trixm,-4)>Ref(Trixma,-5)-Ref(Trixm,-5) AND Ref(Trixma,-5)-Ref(Trixm,-5)>Ref(Trixma,-6)-Ref(Trixm,-6) AND Ref(Trixma,-6)-Ref(Trixm,-6)>Ref(Trixma,-7)-Ref(Trixm,-7) AND trixma>trixm AND Ref(trixma,-1)>Ref(trixm,-1) AND Ref(trixma,-2)>Ref(trixm,-2) AND Ref(trixma,-3)>Ref(trixm,-3) AND Ref(trixma,-4)>Ref(trixm,-4) AND Ref(trixma,-5)>Ref(trixm,-5) AND Ref(trixma,-6)>Ref(trixm,-6) AND Ref(trixma,-7)>Ref(trixm,-7); Lower_8= Trixma-Trixm>Ref(Trixma,-1)-Ref(Trixm,-1) AND Ref(Trixma,-1)-Ref(Trixm,-1)>Ref(Trixma,-2)-Ref(Trixm,-2) AND Ref(Trixma,-2)-Ref(Trixm,-2)>Ref(Trixma,-3)-Ref(Trixm,-3) AND Ref(Trixma,-3)-Ref(Trixm,-3)>Ref(Trixma,-4)-Ref(Trixm,-4) AND Ref(Trixma,-4)-Ref(Trixm,-4)>Ref(Trixma,-5)-Ref(Trixm,-5) AND Ref(Trixma,-5)-Ref(Trixm,-5)>Ref(Trixma,-6)-Ref(Trixm,-6) AND Ref(Trixma,-6)-Ref(Trixm,-6)>Ref(Trixma,-7)-Ref(Trixm,-7) AND Ref(Trixma,-7)-Ref(Trixm,-7)>Ref(Trixma,-8)-Ref(Trixm,-8) AND trixma>trixm AND Ref(trixma,-1)>Ref(trixm,-1) AND Ref(trixma,-2)>Ref(trixm,-2) AND Ref(trixma,-3)>Ref(trixm,-3) AND Ref(trixma,-4)>Ref(trixm,-4) AND Ref(trixma,-5)>Ref(trixm,-5) AND Ref(trixma,-6)>Ref(trixm,-6) AND Ref(trixma,-7)>Ref(trixm,-7) AND Ref(trixma,-8)>Ref(trixm,-8); Lower_9= Trixma-Trixm>Ref(Trixma,-1)-Ref(Trixm,-1) AND Ref(Trixma,-1)-Ref(Trixm,-1)>Ref(Trixma,-2)-Ref(Trixm,-2) AND Ref(Trixma,-2)-Ref(Trixm,-2)>Ref(Trixma,-3)-Ref(Trixm,-3) AND Ref(Trixma,-3)-Ref(Trixm,-3)>Ref(Trixma,-4)-Ref(Trixm,-4) AND Ref(Trixma,-4)-Ref(Trixm,-4)>Ref(Trixma,-5)-Ref(Trixm,-5) AND Ref(Trixma,-5)-Ref(Trixm,-5)>Ref(Trixma,-6)-Ref(Trixm,-6) AND Ref(Trixma,-6)-Ref(Trixm,-6)>Ref(Trixma,-7)-Ref(Trixm,-7) AND Ref(Trixma,-7)-Ref(Trixm,-7)>Ref(Trixma,-8)-Ref(Trixm,-8) AND Ref(Trixma,-8)-Ref(Trixm,-8)>Ref(Trixma,-9)-Ref(Trixm,-9) AND trixma>trixm AND Ref(trixma,-1)>Ref(trixm,-1) AND Ref(trixma,-2)>Ref(trixm,-2) AND Ref(trixma,-3)>Ref(trixm,-3) AND Ref(trixma,-4)>Ref(trixm,-4) AND Ref(trixma,-5)>Ref(trixm,-5) AND Ref(trixma,-6)>Ref(trixm,-6) AND Ref(trixma,-7)>Ref(trixm,-7) AND Ref(trixma,-8)>Ref(trixm,-8) AND Ref(trixma,-9)>Ref(trixm,-9) ; Upper_1= Trixm-Trixma>Ref(Trixm,-1)-Ref(Trixma,-1) AND trixm>trixma AND Ref(trixm,-1)>Ref(trixma,-1); Upper_2= Trixm-Trixma>Ref(Trixm,-1)-Ref(Trixma,-1) AND Ref(Trixm,-1)-Ref(Trixma,-1)>Ref(Trixm,-2)-Ref(Trixma,-2) AND trixm>trixma AND Ref(trixm,-1)>Ref(trixma,-1) AND Ref(trixm,-2)>Ref(trixma,-2); Upper_3= Trixm-Trixma>Ref(Trixm,-1)-Ref(Trixma,-1) AND Ref(Trixm,-1)-Ref(Trixma,-1)>Ref(Trixm,-2)-Ref(Trixma,-2) AND Ref(Trixm,-2)-Ref(Trixma,-2)>Ref(Trixm,-3)-Ref(Trixma,-3) AND trixm>trixma AND Ref(trixm,-1)>Ref(trixma,-1) AND Ref(trixm,-2)>Ref(trixma,-2) AND Ref(trixm,-3)>Ref(trixma,-3); Upper_4= Trixm-Trixma>Ref(Trixm,-1)-Ref(Trixma,-1) AND Ref(Trixm,-1)-Ref(Trixma,-1)>Ref(Trixm,-2)-Ref(Trixma,-2) AND Ref(Trixm,-2)-Ref(Trixma,-2)>Ref(Trixm,-3)-Ref(Trixma,-3) AND Ref(Trixm,-3)-Ref(Trixma,-3)>Ref(Trixm,-4)-Ref(Trixma,-4) AND trixm>trixma AND Ref(trixm,-1)>Ref(trixma,-1) AND Ref(trixm,-2)>Ref(trixma,-2) AND Ref(trixm,-3)>Ref(trixma,-3) AND Ref(trixm,-4)>Ref(trixma,-4); Upper_5= Trixm-Trixma>Ref(Trixm,-1)-Ref(Trixma,-1) AND Ref(Trixm,-1)-Ref(Trixma,-1)>Ref(Trixm,-2)-Ref(Trixma,-2) AND Ref(Trixm,-2)-Ref(Trixma,-2)>Ref(Trixm,-3)-Ref(Trixma,-3) AND Ref(Trixm,-3)-Ref(Trixma,-3)>Ref(Trixm,-4)-Ref(Trixma,-4) AND Ref(Trixm,-4)-Ref(Trixma,-4)>Ref(Trixm,-5)-Ref(Trixma,-5) AND trixm>trixma AND Ref(trixm,-1)>Ref(trixma,-1) AND Ref(trixm,-2)>Ref(trixma,-2) AND Ref(trixm,-3)>Ref(trixma,-3) AND Ref(trixm,-4)>Ref(trixma,-4) AND Ref(trixm,-5)>Ref(trixma,-5); Upper_6= Trixm-Trixma>Ref(Trixm,-1)-Ref(Trixma,-1) AND Ref(Trixm,-1)-Ref(Trixma,-1)>Ref(Trixm,-2)-Ref(Trixma,-2) AND Ref(Trixm,-2)-Ref(Trixma,-2)>Ref(Trixm,-3)-Ref(Trixma,-3) AND Ref(Trixm,-3)-Ref(Trixma,-3)>Ref(Trixm,-4)-Ref(Trixma,-4) AND Ref(Trixm,-4)-Ref(Trixma,-4)>Ref(Trixm,-5)-Ref(Trixma,-5) AND Ref(Trixm,-5)-Ref(Trixma,-5)>Ref(Trixm,-6)-Ref(Trixma,-6) AND trixm>trixma AND Ref(trixm,-1)>Ref(trixma,-1) AND Ref(trixm,-2)>Ref(trixma,-2) AND Ref(trixm,-3)>Ref(trixma,-3) AND Ref(trixm,-4)>Ref(trixma,-4) AND Ref(trixm,-5)>Ref(trixma,-5) AND Ref(trixm,-6)>Ref(trixma,-6); Upper_7= Trixm-Trixma>Ref(Trixm,-1)-Ref(Trixma,-1) AND Ref(Trixm,-1)-Ref(Trixma,-1)>Ref(Trixm,-2)-Ref(Trixma,-2) AND Ref(Trixm,-2)-Ref(Trixma,-2)>Ref(Trixm,-3)-Ref(Trixma,-3) AND Ref(Trixm,-3)-Ref(Trixma,-3)>Ref(Trixm,-4)-Ref(Trixma,-4) AND Ref(Trixm,-4)-Ref(Trixma,-4)>Ref(Trixm,-5)-Ref(Trixma,-5) AND Ref(Trixm,-5)-Ref(Trixma,-5)>Ref(Trixm,-6)-Ref(Trixma,-6) AND Ref(Trixm,-6)-Ref(Trixma,-6)>Ref(Trixm,-7)-Ref(Trixma,-7) AND trixm>trixma AND Ref(trixm,-1)>Ref(trixma,-1) AND Ref(trixm,-2)>Ref(trixma,-2) AND Ref(trixm,-3)>Ref(trixma,-3) AND Ref(trixm,-4)>Ref(trixma,-4) AND Ref(trixm,-5)>Ref(trixma,-5) AND Ref(trixm,-6)>Ref(trixma,-6) AND Ref(trixm,-7)>Ref(trixma,-7); Upper_8= Trixm-Trixma>Ref(Trixm,-1)-Ref(Trixma,-1) AND Ref(Trixm,-1)-Ref(Trixma,-1)>Ref(Trixm,-2)-Ref(Trixma,-2) AND Ref(Trixm,-2)-Ref(Trixma,-2)>Ref(Trixm,-3)-Ref(Trixma,-3) AND Ref(Trixm,-3)-Ref(Trixma,-3)>Ref(Trixm,-4)-Ref(Trixma,-4) AND Ref(Trixm,-4)-Ref(Trixma,-4)>Ref(Trixm,-5)-Ref(Trixma,-5) AND Ref(Trixm,-5)-Ref(Trixma,-5)>Ref(Trixm,-6)-Ref(Trixma,-6) AND Ref(Trixm,-6)-Ref(Trixma,-6)>Ref(Trixm,-7)-Ref(Trixma,-7) AND Ref(Trixm,-7)-Ref(Trixma,-7)>Ref(Trixm,-8)-Ref(Trixma,-8) AND trixm>trixma AND Ref(trixm,-1)>Ref(trixma,-1) AND Ref(trixm,-2)>Ref(trixma,-2) AND Ref(trixm,-3)>Ref(trixma,-3) AND Ref(trixm,-4)>Ref(trixma,-4) AND Ref(trixm,-5)>Ref(trixma,-5) AND Ref(trixm,-6)>Ref(trixma,-6) AND Ref(trixm,-7)>Ref(trixma,-7) AND Ref(trixm,-8)>Ref(trixma,-8); Upper_9= Trixm-Trixma>Ref(Trixm,-1)-Ref(Trixma,-1) AND Ref(Trixm,-1)-Ref(Trixma,-1)>Ref(Trixm,-2)-Ref(Trixma,-2) AND Ref(Trixm,-2)-Ref(Trixma,-2)>Ref(Trixm,-3)-Ref(Trixma,-3) AND Ref(Trixm,-3)-Ref(Trixma,-3)>Ref(Trixm,-4)-Ref(Trixma,-4) AND Ref(Trixm,-4)-Ref(Trixma,-4)>Ref(Trixm,-5)-Ref(Trixma,-5) AND Ref(Trixm,-5)-Ref(Trixma,-5)>Ref(Trixm,-6)-Ref(Trixma,-6) AND Ref(Trixm,-6)-Ref(Trixma,-6)>Ref(Trixm,-7)-Ref(Trixma,-7) AND Ref(Trixm,-7)-Ref(Trixma,-7)>Ref(Trixm,-8)-Ref(Trixma,-8) AND Ref(Trixm,-8)-Ref(Trixma,-8)>Ref(Trixm,-9)-Ref(Trixma,-9) AND trixm>trixma AND Ref(trixm,-1)>Ref(trixma,-1) AND Ref(trixm,-2)>Ref(trixma,-2) AND Ref(trixm,-3)>Ref(trixma,-3) AND Ref(trixm,-4)>Ref(trixma,-4) AND Ref(trixm,-5)>Ref(trixma,-5) AND Ref(trixm,-6)>Ref(trixma,-6) AND Ref(trixm,-7)>Ref(trixma,-7) AND Ref(trixm,-8)>Ref(trixma,-8) AND Ref(trixm,-9)>Ref(trixma,-9); //Plot( Flip( Buy, Sell ), "Trade", colorDarkGreen, styleArea | styleOwnScale, 0, 1 ); x=IIf(trixm>trixma AND Ref(trixm,-1)>Ref(trixma,-1),Trixm-Trixma>Ref(Trixm,-1)-Ref(Trixma,-1),IIf(trixma>trixm AND Ref(trixma,-1)>Ref(trixm,-1),Trixma-Trixm>Ref(Trixma,-1)-Ref(Trixm,-1),0)); Lower_x=IIf(TrixmTrixma AND x,1,0); if (NOT ParamToggle("ATR Trading System Switch","On,Off")) { PlotShapes( Lower_x * shapeHollowUpArrow , colorDarkGreen,0,Graph0,-12); PlotShapes( Upper_x * shapeHollowDownArrow , colorDarkRed,0,Graph0,-12); } PlotShapes( Buy * shapeUpArrow, colorGreen); PlotShapes( Sell * shapeDownArrow, colorRed); Filter = 1!=0; //Filter = TRIXM>0; //Buy=ExRem(Buy,Sell); Sell=ExRem(Sell,Buy); AddColumn(IIf(Trixm>Trixma,0,1),"Cr",1.0,colorDefault,IIf(Trixm>Trixma,colorRed,colorGreen)); AddColumn(IIf(Lower_9,9,IIf(Lower_8,8,IIf(Lower_7,7,IIf(Lower_6,6,IIf(Lower_5,5,IIf(Lower_4,4,IIf(Lower_3,3,IIf(Lower_2,2,IIf(Lower_1,1,0))))))))),"Low",1.0,colorDefault,IIf(Lower_x,colorGreen,colorDefault)); AddColumn(IIf(Upper_9,9,IIf(Upper_8,8,IIf(Upper_7,7,IIf(Upper_6,6,IIf(Upper_5,5,IIf(Upper_4,4,IIf(Upper_3,3,IIf(Upper_2,2,IIf(Upper_1,1,0))))))))),"Up",1.0,colorDefault,IIf(Upper_x,colorRed,colorDefault)); AddColumn(IIf(Trixm>0,0,1),"Cr_0",1.0,colorDefault,IIf(Trixm>0,colorRed,colorGreen)); AddColumn(IIf(Trixm<0 AND Trixm>=TrixMALower1,1,0),"L_01",1.0,colorDefault,IIf(Trixm<0 AND Trixm>=TrixMALower1,colorGreen,colorDefault)); AddColumn(IIf(Trixm=TrixMALower2,1,0),"L_12",1.0,colorDefault,IIf(Trixm=TrixMALower2,colorGreen,colorDefault)); AddColumn(IIf(Trixm=TrixMALower3,1,0),"L_23",1.0,colorDefault,IIf(Trixm=TrixMALower3,colorGreen,colorDefault)); AddColumn(IIf(Trixm=TrixMALower4,1,0),"L_34",1.0,colorDefault,IIf(Trixm=TrixMALower4,colorGreen,colorDefault)); AddColumn(IIf(Trixm0 AND Trixm<=TrixMAUpper1,1,0),"U_01",1.0,colorDefault,IIf(Trixm>0 AND Trixm<=TrixMAUpper1,colorRed,colorDefault)); AddColumn(IIf(Trixm>TrixMAUpper1 AND Trixm<=TrixMAUpper2,1,0),"U_12",1.0,colorDefault,IIf(Trixm>TrixMAUpper1 AND Trixm<=TrixMAUpper2,colorRed,colorDefault)); AddColumn(IIf(Trixm>TrixMAUpper2 AND Trixm<=TrixMAUpper3,1,0),"U_23",1.0,colorDefault,IIf(Trixm>TrixMAUpper2 AND Trixm<=TrixMAUpper3,colorRed,colorDefault)); AddColumn(IIf(Trixm>TrixMAUpper3 AND Trixm<=TrixMAUpper4,1,0),"U_34",1.0,colorDefault,IIf(Trixm>TrixMAUpper3 AND Trixm<=TrixMAUpper4,colorRed,colorDefault)); AddColumn(IIf(Trixm>TrixMAUpper4,1,0),"U_4",1.0,colorDefault,IIf(Trixm>TrixMAUpper4,colorRed,colorDefault)); _SECTION_END();