CMO Volt Fib W Trend Direction Expert

Welcome Guest! To enable all features please Login or Register.

Notification

Error

CMO Volt Fib W Trend Direction Expert - CMO Volt Fib W Trend Direction Expert

Options

Previous Topic Next Topic

henry1224		#1 Posted : Saturday, April 30, 2005 2:03:50 AM(UTC)
Rank: Advanced Member Groups: Registered, Registered Users, Subscribers Joined: 10/29/2004(UTC) Posts: 1,394 Location: Glastonbury, CT Was thanked: 2 time(s) in 2 post(s)		You will need the PowerPivots Plus Add-on Highlights Long K1:=Stdev(CMO(C,13),13); K2:=Stdev(CMO(C,21),21); K3:=Stdev(CMO(C,34),34); Pk:=((K1CMO(C,13))+(K2CMO(C,21))+(K3CMO(C,34)))/(K1+K2+K3); MN:=Mov(Pk,30,S); SD:=Stdev(Pk,30); Val1:=If(MN+(1.33SD)>2.08,MN+(1.33SD),2.08); Val2:=If(MN-(1.33SD)<-2.08,MN-(1.33SD),-2.08); LN:=If(Ref(Pk,-1)>=0 AND Pk>0,Val1,If(Ref(Pk,-1)<=0 AND Pk<0,Val2,0)); TD:=ExtFml("PowerPivots.TrendDirection",1,2); SE:=Cross(PK,Ln) AND Ref(Pk,-1)<0 AND TD=-1; LE:=Cross(LN,PK) AND Ref(PK,-1)>0 AND TD=1; LX:=Cross(PK,Ln) AND Ref(Pk,-1)<0; SX:=Cross(LN,PK) AND Ref(PK,-1)>0; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B>0 Short* K1:=Stdev(CMO(C,13),13); K2:=Stdev(CMO(C,21),21); K3:=Stdev(CMO(C,34),34); Pk:=((K1CMO(C,13))+(K2CMO(C,21))+(K3CMO(C,34)))/(K1+K2+K3); MN:=Mov(Pk,30,S); SD:=Stdev(Pk,30); Val1:=If(MN+(1.33SD)>2.08,MN+(1.33SD),2.08); Val2:=If(MN-(1.33SD)<-2.08,MN-(1.33SD),-2.08); LN:=If(Ref(Pk,-1)>=0 AND Pk>0,Val1,If(Ref(Pk,-1)<=0 AND Pk<0,Val2,0)); TD:=ExtFml("PowerPivots.TrendDirection",1,2); SE:=Cross(PK,Ln) AND Ref(Pk,-1)<0 AND TD=-1; LE:=Cross(LN,PK) AND Ref(PK,-1)>0 AND TD=1; LX:=Cross(PK,Ln) AND Ref(Pk,-1)<0; SX:=Cross(LN,PK) AND Ref(PK,-1)>0; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B<0 Out* K1:=Stdev(CMO(C,13),13); K2:=Stdev(CMO(C,21),21); K3:=Stdev(CMO(C,34),34); Pk:=((K1CMO(C,13))+(K2CMO(C,21))+(K3CMO(C,34)))/(K1+K2+K3); MN:=Mov(Pk,30,S); SD:=Stdev(Pk,30); Val1:=If(MN+(1.33SD)>2.08,MN+(1.33SD),2.08); Val2:=If(MN-(1.33SD)<-2.08,MN-(1.33SD),-2.08); LN:=If(Ref(Pk,-1)>=0 AND Pk>0,Val1,If(Ref(Pk,-1)<=0 AND Pk<0,Val2,0)); TD:=ExtFml("PowerPivots.TrendDirection",1,2); SE:=Cross(PK,Ln) AND Ref(Pk,-1)<0 AND TD=-1; LE:=Cross(LN,PK) AND Ref(PK,-1)>0 AND TD=1; LX:=Cross(PK,Ln) AND Ref(Pk,-1)<0; SX:=Cross(LN,PK) AND Ref(PK,-1)>0; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B=0 Symbols long Entry* K1:=Stdev(CMO(C,13),13); K2:=Stdev(CMO(C,21),21); K3:=Stdev(CMO(C,34),34); Pk:=((K1CMO(C,13))+(K2CMO(C,21))+(K3CMO(C,34)))/(K1+K2+K3); MN:=Mov(Pk,30,S); SD:=Stdev(Pk,30); Val1:=If(MN+(1.33SD)>2.08,MN+(1.33SD),2.08); Val2:=If(MN-(1.33SD)<-2.08,MN-(1.33SD),-2.08); LN:=If(Ref(Pk,-1)>=0 AND Pk>0,Val1,If(Ref(Pk,-1)<=0 AND Pk<0,Val2,0)); TD:=ExtFml("PowerPivots.TrendDirection",1,2); SE:=Cross(PK,Ln) AND Ref(Pk,-1)<0 AND TD=-1; LE:=Cross(LN,PK) AND Ref(PK,-1)>0 AND TD=1; LX:=Cross(PK,Ln) AND Ref(Pk,-1)<0; SX:=Cross(LN,PK) AND Ref(PK,-1)>0; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B>0 AND Ref(B,-1)<=0 Short Entry* K1:=Stdev(CMO(C,13),13); K2:=Stdev(CMO(C,21),21); K3:=Stdev(CMO(C,34),34); Pk:=((K1CMO(C,13))+(K2CMO(C,21))+(K3CMO(C,34)))/(K1+K2+K3); MN:=Mov(Pk,30,S); SD:=Stdev(Pk,30); Val1:=If(MN+(1.33SD)>2.08,MN+(1.33SD),2.08); Val2:=If(MN-(1.33SD)<-2.08,MN-(1.33SD),-2.08); LN:=If(Ref(Pk,-1)>=0 AND Pk>0,Val1,If(Ref(Pk,-1)<=0 AND Pk<0,Val2,0)); TD:=ExtFml("PowerPivots.TrendDirection",1,2); SE:=Cross(PK,Ln) AND Ref(Pk,-1)<0 AND TD=-1; LE:=Cross(LN,PK) AND Ref(PK,-1)>0 AND TD=1; LX:=Cross(PK,Ln) AND Ref(Pk,-1)<0; SX:=Cross(LN,PK) AND Ref(PK,-1)>0; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B<0 AND Ref(B,-1)>=0 Long Exit* K1:=Stdev(CMO(C,13),13); K2:=Stdev(CMO(C,21),21); K3:=Stdev(CMO(C,34),34); Pk:=((K1CMO(C,13))+(K2CMO(C,21))+(K3CMO(C,34)))/(K1+K2+K3); MN:=Mov(Pk,30,S); SD:=Stdev(Pk,30); Val1:=If(MN+(1.33SD)>2.08,MN+(1.33SD),2.08); Val2:=If(MN-(1.33SD)<-2.08,MN-(1.33SD),-2.08); LN:=If(Ref(Pk,-1)>=0 AND Pk>0,Val1,If(Ref(Pk,-1)<=0 AND Pk<0,Val2,0)); TD:=ExtFml("PowerPivots.TrendDirection",1,2); SE:=Cross(PK,Ln) AND Ref(Pk,-1)<0 AND TD=-1; LE:=Cross(LN,PK) AND Ref(PK,-1)>0 AND TD=1; LX:=Cross(PK,Ln) AND Ref(Pk,-1)<0; SX:=Cross(LN,PK) AND Ref(PK,-1)>0; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B=0 AND Ref(B,-1)>0 Short exit* K1:=Stdev(CMO(C,13),13); K2:=Stdev(CMO(C,21),21); K3:=Stdev(CMO(C,34),34); Pk:=((K1CMO(C,13))+(K2CMO(C,21))+(K3CMO(C,34)))/(K1+K2+K3); MN:=Mov(Pk,30,S); SD:=Stdev(Pk,30); Val1:=If(MN+(1.33SD)>2.08,MN+(1.33SD),2.08); Val2:=If(MN-(1.33SD)<-2.08,MN-(1.33*SD),-2.08); LN:=If(Ref(Pk,-1)>=0 AND Pk>0,Val1,If(Ref(Pk,-1)<=0 AND Pk<0,Val2,0)); TD:=ExtFml("PowerPivots.TrendDirection",1,2); SE:=Cross(PK,Ln) AND Ref(Pk,-1)<0 AND TD=-1; LE:=Cross(LN,PK) AND Ref(PK,-1)>0 AND TD=1; LX:=Cross(PK,Ln) AND Ref(Pk,-1)<0; SX:=Cross(LN,PK) AND Ref(PK,-1)>0; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B=0 AND Ref(B,-1)<0


User Profile View All Posts by User View Thanks


	Wanna join the discussion?! Login to your Discussions forum account or Register a new forum account.

Users browsing this topic
Guest (Hidden)

Forum Jump

You cannot post new topics in this forum.
You cannot reply to topics in this forum.
You cannot delete your posts in this forum.
You cannot edit your posts in this forum.
You cannot create polls in this forum.
You cannot vote in polls in this forum.