RSI Triple Smoothed Wilders Expert You will need the PowerPivots Plus Add-on for this Expert Highlights Long a:= 5; D:=Wilders(Wilders(Wilders(RSI(3),a),a),a); LE:=D>Ref(D,-1) AND D>50; SE:=D0 Short a:= 5; D:=Wilders(Wilders(Wilders(RSI(3),a),a),a); LE:=D>Ref(D,-1) AND D>50; SE:=DRef(D,-1) AND D>50; SE:=D0 AND Ref(B,-1)<=0 Short Entry a:= 5; D:=Wilders(Wilders(Wilders(RSI(3),a),a),a); LE:=D>Ref(D,-1) AND D>50; SE:=D=0 *****RSI Triple Smoothed Wilders W Trend Direction Expert***** You will Need the PowerPivots Plus Add-on to use this Expert Highlights Long a:= 5; D:=Wilders(Wilders(Wilders(RSI(3),a),a),a); TD:=ExtFml("PowerPivots.TrendDirection",1,2); LE:=Cross(D,Ref(D,-1)) AND TD=1; SE:=Cross(Ref(D,-1),D) AND TD=0; LX:=Cross(Ref(D,-1),D) AND TD=1; SX:=Cross(D,Ref(D,-1)) AND TD=0; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B>0 Short a:= 5; D:=Wilders(Wilders(Wilders(RSI(3),a),a),a); TD:=ExtFml("PowerPivots.TrendDirection",1,2); LE:=Cross(D,Ref(D,-1)) AND TD=1; SE:=Cross(Ref(D,-1),D) AND TD=0; LX:=Cross(Ref(D,-1),D) AND TD=1; SX:=Cross(D,Ref(D,-1)) AND TD=0; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B<0 Out a:= 5; D:=Wilders(Wilders(Wilders(RSI(3),a),a),a); TD:=ExtFml("PowerPivots.TrendDirection",1,2); LE:=Cross(D,Ref(D,-1)) AND TD=1; SE:=Cross(Ref(D,-1),D) AND TD=0; LX:=Cross(Ref(D,-1),D) AND TD=1; SX:=Cross(D,Ref(D,-1)) AND TD=0; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B=0 Highlights Long Entry a:= 5; D:=Wilders(Wilders(Wilders(RSI(3),a),a),a); TD:=ExtFml("PowerPivots.TrendDirection",1,2); LE:=Cross(D,Ref(D,-1)) AND TD=1; SE:=Cross(Ref(D,-1),D) AND TD=0; LX:=Cross(Ref(D,-1),D) AND TD=1; SX:=Cross(D,Ref(D,-1)) AND TD=0; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B>0 AND Ref(B,-1)<=0 Short Entry a:= 5; D:=Wilders(Wilders(Wilders(RSI(3),a),a),a); TD:=ExtFml("PowerPivots.TrendDirection",1,2); LE:=Cross(D,Ref(D,-1)) AND TD=1; SE:=Cross(Ref(D,-1),D) AND TD=0; LX:=Cross(Ref(D,-1),D) AND TD=1; SX:=Cross(D,Ref(D,-1)) AND TD=0; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B<0 AND Ref(B,-1)>=0 Long Exit a:= 5; D:=Wilders(Wilders(Wilders(RSI(3),a),a),a); TD:=ExtFml("PowerPivots.TrendDirection",1,2); LE:=Cross(D,Ref(D,-1)) AND TD=1; SE:=Cross(Ref(D,-1),D) AND TD=0; LX:=Cross(Ref(D,-1),D) AND TD=1; SX:=Cross(D,Ref(D,-1)) AND TD=0; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B=0 AND Ref(B,-1)>0 Short exit a:= 5; D:=Wilders(Wilders(Wilders(RSI(3),a),a),a); TD:=ExtFml("PowerPivots.TrendDirection",1,2); LE:=Cross(D,Ref(D,-1)) AND TD=1; SE:=Cross(Ref(D,-1),D) AND TD=0; LX:=Cross(Ref(D,-1),D) AND TD=1; SX:=Cross(D,Ref(D,-1)) AND TD=0; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B=0 AND Ref(B,-1)<0 *****Another version w Trend Direction***** You will Need the PowerPivots Plus Add-on to use this Expert Highlights Long a:= 5; D:=Wilders(Wilders(Wilders(RSI(3),a),a),a); TD:=ExtFml("PowerPivots.TrendDirection",1,2); LE:=Cross(D,Ref(D,-1)) AND TD=1; SE:=Cross(Ref(D,-1),D) AND TD=-1; LX:=Cross(Ref(D,-1),D) AND TD>=0; SX:=Cross(D,Ref(D,-1)) AND TD<=0; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B>0 Short a:= 5; D:=Wilders(Wilders(Wilders(RSI(3),a),a),a); TD:=ExtFml("PowerPivots.TrendDirection",1,2); LE:=Cross(D,Ref(D,-1)) AND TD=1; SE:=Cross(Ref(D,-1),D) AND TD=-1; LX:=Cross(Ref(D,-1),D) AND TD>=0; SX:=Cross(D,Ref(D,-1)) AND TD<=0; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B<0 Out a:= 5; D:=Wilders(Wilders(Wilders(RSI(3),a),a),a); TD:=ExtFml("PowerPivots.TrendDirection",1,2); LE:=Cross(D,Ref(D,-1)) AND TD=1; SE:=Cross(Ref(D,-1),D) AND TD=-1; LX:=Cross(Ref(D,-1),D) AND TD>=0; SX:=Cross(D,Ref(D,-1)) AND TD<=0; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B=0 Highlights Long Entry a:= 5; D:=Wilders(Wilders(Wilders(RSI(3),a),a),a); TD:=ExtFml("PowerPivots.TrendDirection",1,2); LE:=Cross(D,Ref(D,-1)) AND TD=1; SE:=Cross(Ref(D,-1),D) AND TD=-1; LX:=Cross(Ref(D,-1),D) AND TD>=0; SX:=Cross(D,Ref(D,-1)) AND TD<=0; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B>0 AND Ref(B,-1)<=0 Short Entry a:= 5; D:=Wilders(Wilders(Wilders(RSI(3),a),a),a); TD:=ExtFml("PowerPivots.TrendDirection",1,2); LE:=Cross(D,Ref(D,-1)) AND TD=1; SE:=Cross(Ref(D,-1),D) AND TD=-1; LX:=Cross(Ref(D,-1),D) AND TD>=0; SX:=Cross(D,Ref(D,-1)) AND TD<=0; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B<0 AND Ref(B,-1)>=0 Long Exit a:= 5; D:=Wilders(Wilders(Wilders(RSI(3),a),a),a); TD:=ExtFml("PowerPivots.TrendDirection",1,2); LE:=Cross(D,Ref(D,-1)) AND TD=1; SE:=Cross(Ref(D,-1),D) AND TD=-1; LX:=Cross(Ref(D,-1),D) AND TD>=0; SX:=Cross(D,Ref(D,-1)) AND TD<=0; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B=0 AND Ref(B,-1)>0 Short exit a:= 5; D:=Wilders(Wilders(Wilders(RSI(3),a),a),a); TD:=ExtFml("PowerPivots.TrendDirection",1,2); LE:=Cross(D,Ref(D,-1)) AND TD=1; SE:=Cross(Ref(D,-1),D) AND TD=-1; LX:=Cross(Ref(D,-1),D) AND TD>=0; SX:=Cross(D,Ref(D,-1)) AND TD<=0; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B=0 AND Ref(B,-1)<0 *****RSI Triple smoothed Wilders Expert w Patrick's Latch***** Highlights LONG : a:= 5; D:=Wilders(Wilders(Wilders(RSI(3),a),a),a); LE:=D>Ref(D,-1) AND D>50; SE:=DRef(D,-1) AND D>50; SE:=DRef(D,-1) AND D>50; SE:=DRef(D,-1) AND D>50; SE:=D 1 ENTER SHORT : a:= 5; D:=Wilders(Wilders(Wilders(RSI(3),a),a),a); LE:=D>Ref(D,-1) AND D>50; SE:=D -1 EXIT LONG : a:= 5; D:=Wilders(Wilders(Wilders(RSI(3),a),a),a); LE:=D>Ref(D,-1) AND D>50; SE:=DRef(D,-1) AND D>50; SE:=D