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

Notification

Icon
Error

Options
Go to last post Go to first unread
henry1224  
#1 Posted : Friday, May 20, 2005 1:35:39 AM(UTC)
henry1224

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 for this expert to work Highlights Long UDPC:=(C>((H-L)*.5)+L) AND C>Ref(C,-1); UDNC:=(C<((H-L)*.5)+L) AND C>Ref(C,-1); DDPC:=(C>((H-L)*.5)+L) AND C<Ref(C,-1); DDNC:=(C<((H-L)*.5)+L) AND C<Ref(C,-1); HVWS:=((H-L)>Ref((H-L),-1)) AND V>Ref(V,-1); HVNS:=((H-L)<Ref((H-L),-1)) AND V>Ref(V,-1); LVWS:=((H-L)>Ref((H-L),-1)) AND V<Ref(V,-1); LVNS:=((H-L)<Ref((H-L),-1)) AND V<Ref(V,-1); B:=If(UDPC AND HVWS,8,If(UDPC AND HVNS,7,If(UDPC AND LVWS,6,If(UDPC AND LVNS,5, If(UDNC AND HVWS,4,If(UDNC AND HVNS,3,If(UDNC AND LVWS,2,If(UDNC AND LVNS,1, If(DDPC AND HVWS,-8,If(DDPC AND HVNS,-7,If(DDPC AND LVWS,-6,If(DDPC AND LVNS,-5, If(DDNC AND HVWS,-4,If(DDNC AND HVNS,-3,If(DDNC AND LVWS,-2,If(DDNC AND LVNS,-1,0)))))))))))))))); TD:=ExtFml("PowerPivots.TrendDirection",1,2); LE:=Mov(B,5,S)>0 AND Sum(TD>0,2)>1; SE:=Mov(B,5,S)<0 AND Sum(TD<0,2)>1; SX:=Mov(B,5,S)>0; LX:=Mov(B,5,S)<0; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B>0 Short UDPC:=(C>((H-L)*.5)+L) AND C>Ref(C,-1); UDNC:=(C<((H-L)*.5)+L) AND C>Ref(C,-1); DDPC:=(C>((H-L)*.5)+L) AND C<Ref(C,-1); DDNC:=(C<((H-L)*.5)+L) AND C<Ref(C,-1); HVWS:=((H-L)>Ref((H-L),-1)) AND V>Ref(V,-1); HVNS:=((H-L)<Ref((H-L),-1)) AND V>Ref(V,-1); LVWS:=((H-L)>Ref((H-L),-1)) AND V<Ref(V,-1); LVNS:=((H-L)<Ref((H-L),-1)) AND V<Ref(V,-1); B:=If(UDPC AND HVWS,8,If(UDPC AND HVNS,7,If(UDPC AND LVWS,6,If(UDPC AND LVNS,5, If(UDNC AND HVWS,4,If(UDNC AND HVNS,3,If(UDNC AND LVWS,2,If(UDNC AND LVNS,1, If(DDPC AND HVWS,-8,If(DDPC AND HVNS,-7,If(DDPC AND LVWS,-6,If(DDPC AND LVNS,-5, If(DDNC AND HVWS,-4,If(DDNC AND HVNS,-3,If(DDNC AND LVWS,-2,If(DDNC AND LVNS,-1,0)))))))))))))))); TD:=ExtFml("PowerPivots.TrendDirection",1,2); LE:=Mov(B,5,S)>0 AND Sum(TD>0,2)>1; SE:=Mov(B,5,S)<0 AND Sum(TD<0,2)>1; SX:=Mov(B,5,S)>0; LX:=Mov(B,5,S)<0; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B<0 Out UDPC:=(C>((H-L)*.5)+L) AND C>Ref(C,-1); UDNC:=(C<((H-L)*.5)+L) AND C>Ref(C,-1); DDPC:=(C>((H-L)*.5)+L) AND C<Ref(C,-1); DDNC:=(C<((H-L)*.5)+L) AND C<Ref(C,-1); HVWS:=((H-L)>Ref((H-L),-1)) AND V>Ref(V,-1); HVNS:=((H-L)<Ref((H-L),-1)) AND V>Ref(V,-1); LVWS:=((H-L)>Ref((H-L),-1)) AND V<Ref(V,-1); LVNS:=((H-L)<Ref((H-L),-1)) AND V<Ref(V,-1); B:=If(UDPC AND HVWS,8,If(UDPC AND HVNS,7,If(UDPC AND LVWS,6,If(UDPC AND LVNS,5, If(UDNC AND HVWS,4,If(UDNC AND HVNS,3,If(UDNC AND LVWS,2,If(UDNC AND LVNS,1, If(DDPC AND HVWS,-8,If(DDPC AND HVNS,-7,If(DDPC AND LVWS,-6,If(DDPC AND LVNS,-5, If(DDNC AND HVWS,-4,If(DDNC AND HVNS,-3,If(DDNC AND LVWS,-2,If(DDNC AND LVNS,-1,0)))))))))))))))); TD:=ExtFml("PowerPivots.TrendDirection",1,2); LE:=Mov(B,5,S)>0 AND Sum(TD>0,2)>1; SE:=Mov(B,5,S)<0 AND Sum(TD<0,2)>1; SX:=Mov(B,5,S)>0; LX:=Mov(B,5,S)<0; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B=0 Symbols long Entry UDPC:=(C>((H-L)*.5)+L) AND C>Ref(C,-1); UDNC:=(C<((H-L)*.5)+L) AND C>Ref(C,-1); DDPC:=(C>((H-L)*.5)+L) AND C<Ref(C,-1); DDNC:=(C<((H-L)*.5)+L) AND C<Ref(C,-1); HVWS:=((H-L)>Ref((H-L),-1)) AND V>Ref(V,-1); HVNS:=((H-L)<Ref((H-L),-1)) AND V>Ref(V,-1); LVWS:=((H-L)>Ref((H-L),-1)) AND V<Ref(V,-1); LVNS:=((H-L)<Ref((H-L),-1)) AND V<Ref(V,-1); B:=If(UDPC AND HVWS,8,If(UDPC AND HVNS,7,If(UDPC AND LVWS,6,If(UDPC AND LVNS,5, If(UDNC AND HVWS,4,If(UDNC AND HVNS,3,If(UDNC AND LVWS,2,If(UDNC AND LVNS,1, If(DDPC AND HVWS,-8,If(DDPC AND HVNS,-7,If(DDPC AND LVWS,-6,If(DDPC AND LVNS,-5, If(DDNC AND HVWS,-4,If(DDNC AND HVNS,-3,If(DDNC AND LVWS,-2,If(DDNC AND LVNS,-1,0)))))))))))))))); TD:=ExtFml("PowerPivots.TrendDirection",1,2); LE:=Mov(B,5,S)>0 AND Sum(TD>0,2)>1; SE:=Mov(B,5,S)<0 AND Sum(TD<0,2)>1; SX:=Mov(B,5,S)>0; LX:=Mov(B,5,S)<0; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B>0 AND Ref(B,-1)<=0 Short entry UDPC:=(C>((H-L)*.5)+L) AND C>Ref(C,-1); UDNC:=(C<((H-L)*.5)+L) AND C>Ref(C,-1); DDPC:=(C>((H-L)*.5)+L) AND C<Ref(C,-1); DDNC:=(C<((H-L)*.5)+L) AND C<Ref(C,-1); HVWS:=((H-L)>Ref((H-L),-1)) AND V>Ref(V,-1); HVNS:=((H-L)<Ref((H-L),-1)) AND V>Ref(V,-1); LVWS:=((H-L)>Ref((H-L),-1)) AND V<Ref(V,-1); LVNS:=((H-L)<Ref((H-L),-1)) AND V<Ref(V,-1); B:=If(UDPC AND HVWS,8,If(UDPC AND HVNS,7,If(UDPC AND LVWS,6,If(UDPC AND LVNS,5, If(UDNC AND HVWS,4,If(UDNC AND HVNS,3,If(UDNC AND LVWS,2,If(UDNC AND LVNS,1, If(DDPC AND HVWS,-8,If(DDPC AND HVNS,-7,If(DDPC AND LVWS,-6,If(DDPC AND LVNS,-5, If(DDNC AND HVWS,-4,If(DDNC AND HVNS,-3,If(DDNC AND LVWS,-2,If(DDNC AND LVNS,-1,0)))))))))))))))); TD:=ExtFml("PowerPivots.TrendDirection",1,2); LE:=Mov(B,5,S)>0 AND Sum(TD>0,2)>1; SE:=Mov(B,5,S)<0 AND Sum(TD<0,2)>1; SX:=Mov(B,5,S)>0; LX:=Mov(B,5,S)<0; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B<0 AND Ref(B,-1)>=0 Long Entry UDPC:=(C>((H-L)*.5)+L) AND C>Ref(C,-1); UDNC:=(C<((H-L)*.5)+L) AND C>Ref(C,-1); DDPC:=(C>((H-L)*.5)+L) AND C<Ref(C,-1); DDNC:=(C<((H-L)*.5)+L) AND C<Ref(C,-1); HVWS:=((H-L)>Ref((H-L),-1)) AND V>Ref(V,-1); HVNS:=((H-L)<Ref((H-L),-1)) AND V>Ref(V,-1); LVWS:=((H-L)>Ref((H-L),-1)) AND V<Ref(V,-1); LVNS:=((H-L)<Ref((H-L),-1)) AND V<Ref(V,-1); B:=If(UDPC AND HVWS,8,If(UDPC AND HVNS,7,If(UDPC AND LVWS,6,If(UDPC AND LVNS,5, If(UDNC AND HVWS,4,If(UDNC AND HVNS,3,If(UDNC AND LVWS,2,If(UDNC AND LVNS,1, If(DDPC AND HVWS,-8,If(DDPC AND HVNS,-7,If(DDPC AND LVWS,-6,If(DDPC AND LVNS,-5, If(DDNC AND HVWS,-4,If(DDNC AND HVNS,-3,If(DDNC AND LVWS,-2,If(DDNC AND LVNS,-1,0)))))))))))))))); TD:=ExtFml("PowerPivots.TrendDirection",1,2); LE:=Mov(B,5,S)>0 AND Sum(TD>0,2)>1; SE:=Mov(B,5,S)<0 AND Sum(TD<0,2)>1; SX:=Mov(B,5,S)>0; LX:=Mov(B,5,S)<0; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B=0 AND Ref(B,-1)>0 Short exit UDPC:=(C>((H-L)*.5)+L) AND C>Ref(C,-1); UDNC:=(C<((H-L)*.5)+L) AND C>Ref(C,-1); DDPC:=(C>((H-L)*.5)+L) AND C<Ref(C,-1); DDNC:=(C<((H-L)*.5)+L) AND C<Ref(C,-1); HVWS:=((H-L)>Ref((H-L),-1)) AND V>Ref(V,-1); HVNS:=((H-L)<Ref((H-L),-1)) AND V>Ref(V,-1); LVWS:=((H-L)>Ref((H-L),-1)) AND V<Ref(V,-1); LVNS:=((H-L)<Ref((H-L),-1)) AND V<Ref(V,-1); B:=If(UDPC AND HVWS,8,If(UDPC AND HVNS,7,If(UDPC AND LVWS,6,If(UDPC AND LVNS,5, If(UDNC AND HVWS,4,If(UDNC AND HVNS,3,If(UDNC AND LVWS,2,If(UDNC AND LVNS,1, If(DDPC AND HVWS,-8,If(DDPC AND HVNS,-7,If(DDPC AND LVWS,-6,If(DDPC AND LVNS,-5, If(DDNC AND HVWS,-4,If(DDNC AND HVNS,-3,If(DDNC AND LVWS,-2,If(DDNC AND LVNS,-1,0)))))))))))))))); TD:=ExtFml("PowerPivots.TrendDirection",1,2); LE:=Mov(B,5,S)>0 AND Sum(TD>0,2)>1; SE:=Mov(B,5,S)<0 AND Sum(TD<0,2)>1; SX:=Mov(B,5,S)>0; LX:=Mov(B,5,S)<0; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B=0 AND Ref(B,-1)<0
henry1224  
#2 Posted : Friday, May 20, 2005 1:38:19 AM(UTC)
henry1224

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)
Long entry UDPC:=(C>((H-L)*.5)+L) AND C>Ref(C,-1); UDNC:=(C<((H-L)*.5)+L) AND C>Ref(C,-1); DDPC:=(C>((H-L)*.5)+L) AND C<Ref(C,-1); DDNC:=(C<((H-L)*.5)+L) AND C<Ref(C,-1); HVWS:=((H-L)>Ref((H-L),-1)) AND V>Ref(V,-1); HVNS:=((H-L)<Ref((H-L),-1)) AND V>Ref(V,-1); LVWS:=((H-L)>Ref((H-L),-1)) AND V<Ref(V,-1); LVNS:=((H-L)<Ref((H-L),-1)) AND V<Ref(V,-1); B:=If(UDPC AND HVWS,8,If(UDPC AND HVNS,7,If(UDPC AND LVWS,6,If(UDPC AND LVNS,5, If(UDNC AND HVWS,4,If(UDNC AND HVNS,3,If(UDNC AND LVWS,2,If(UDNC AND LVNS,1, If(DDPC AND HVWS,-8,If(DDPC AND HVNS,-7,If(DDPC AND LVWS,-6,If(DDPC AND LVNS,-5, If(DDNC AND HVWS,-4,If(DDNC AND HVNS,-3,If(DDNC AND LVWS,-2,If(DDNC AND LVNS,-1,0)))))))))))))))); TD:=ExtFml("PowerPivots.TrendDirection",1,2); LE:=Mov(B,5,S)>0 AND Sum(TD>0,2)>1; SE:=Mov(B,5,S)<0 AND Sum(TD<0,2)>1; SX:=Mov(B,5,S)>0; LX:=Mov(B,5,S)<0; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B>0 AND Ref(B,-1)<=0 Short entry UDPC:=(C>((H-L)*.5)+L) AND C>Ref(C,-1); UDNC:=(C<((H-L)*.5)+L) AND C>Ref(C,-1); DDPC:=(C>((H-L)*.5)+L) AND C<Ref(C,-1); DDNC:=(C<((H-L)*.5)+L) AND C<Ref(C,-1); HVWS:=((H-L)>Ref((H-L),-1)) AND V>Ref(V,-1); HVNS:=((H-L)<Ref((H-L),-1)) AND V>Ref(V,-1); LVWS:=((H-L)>Ref((H-L),-1)) AND V<Ref(V,-1); LVNS:=((H-L)<Ref((H-L),-1)) AND V<Ref(V,-1); B:=If(UDPC AND HVWS,8,If(UDPC AND HVNS,7,If(UDPC AND LVWS,6,If(UDPC AND LVNS,5, If(UDNC AND HVWS,4,If(UDNC AND HVNS,3,If(UDNC AND LVWS,2,If(UDNC AND LVNS,1, If(DDPC AND HVWS,-8,If(DDPC AND HVNS,-7,If(DDPC AND LVWS,-6,If(DDPC AND LVNS,-5, If(DDNC AND HVWS,-4,If(DDNC AND HVNS,-3,If(DDNC AND LVWS,-2,If(DDNC AND LVNS,-1,0)))))))))))))))); TD:=ExtFml("PowerPivots.TrendDirection",1,2); LE:=Mov(B,5,S)>0 AND Sum(TD>0,2)>1; SE:=Mov(B,5,S)<0 AND Sum(TD<0,2)>1; SX:=Mov(B,5,S)>0; LX:=Mov(B,5,S)<0; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B<0 AND Ref(B,-1)>=0 Long exit UDPC:=(C>((H-L)*.5)+L) AND C>Ref(C,-1); UDNC:=(C<((H-L)*.5)+L) AND C>Ref(C,-1); DDPC:=(C>((H-L)*.5)+L) AND C<Ref(C,-1); DDNC:=(C<((H-L)*.5)+L) AND C<Ref(C,-1); HVWS:=((H-L)>Ref((H-L),-1)) AND V>Ref(V,-1); HVNS:=((H-L)<Ref((H-L),-1)) AND V>Ref(V,-1); LVWS:=((H-L)>Ref((H-L),-1)) AND V<Ref(V,-1); LVNS:=((H-L)<Ref((H-L),-1)) AND V<Ref(V,-1); B:=If(UDPC AND HVWS,8,If(UDPC AND HVNS,7,If(UDPC AND LVWS,6,If(UDPC AND LVNS,5, If(UDNC AND HVWS,4,If(UDNC AND HVNS,3,If(UDNC AND LVWS,2,If(UDNC AND LVNS,1, If(DDPC AND HVWS,-8,If(DDPC AND HVNS,-7,If(DDPC AND LVWS,-6,If(DDPC AND LVNS,-5, If(DDNC AND HVWS,-4,If(DDNC AND HVNS,-3,If(DDNC AND LVWS,-2,If(DDNC AND LVNS,-1,0)))))))))))))))); TD:=ExtFml("PowerPivots.TrendDirection",1,2); LE:=Mov(B,5,S)>0 AND Sum(TD>0,2)>1; SE:=Mov(B,5,S)<0 AND Sum(TD<0,2)>1; SX:=Mov(B,5,S)>0; LX:=Mov(B,5,S)<0; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B=0 AND Ref(B,-1)>0 Short exit UDPC:=(C>((H-L)*.5)+L) AND C>Ref(C,-1); UDNC:=(C<((H-L)*.5)+L) AND C>Ref(C,-1); DDPC:=(C>((H-L)*.5)+L) AND C<Ref(C,-1); DDNC:=(C<((H-L)*.5)+L) AND C<Ref(C,-1); HVWS:=((H-L)>Ref((H-L),-1)) AND V>Ref(V,-1); HVNS:=((H-L)<Ref((H-L),-1)) AND V>Ref(V,-1); LVWS:=((H-L)>Ref((H-L),-1)) AND V<Ref(V,-1); LVNS:=((H-L)<Ref((H-L),-1)) AND V<Ref(V,-1); B:=If(UDPC AND HVWS,8,If(UDPC AND HVNS,7,If(UDPC AND LVWS,6,If(UDPC AND LVNS,5, If(UDNC AND HVWS,4,If(UDNC AND HVNS,3,If(UDNC AND LVWS,2,If(UDNC AND LVNS,1, If(DDPC AND HVWS,-8,If(DDPC AND HVNS,-7,If(DDPC AND LVWS,-6,If(DDPC AND LVNS,-5, If(DDNC AND HVWS,-4,If(DDNC AND HVNS,-3,If(DDNC AND LVWS,-2,If(DDNC AND LVNS,-1,0)))))))))))))))); TD:=ExtFml("PowerPivots.TrendDirection",1,2); LE:=Mov(B,5,S)>0 AND Sum(TD>0,2)>1; SE:=Mov(B,5,S)<0 AND Sum(TD<0,2)>1; SX:=Mov(B,5,S)>0; LX:=Mov(B,5,S)<0; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B=0 AND Ref(B,-1)<0
henry1224  
#3 Posted : Friday, May 20, 2005 1:39:48 AM(UTC)
henry1224

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)
UDPC:=(C>((H-L)*.5)+L) AND C>Ref(C,-1); UDNC:=(C<((H-L)*.5)+L) AND C>Ref(C,-1); DDPC:=(C>((H-L)*.5)+L) AND C<Ref(C,-1); DDNC:=(C<((H-L)*.5)+L) AND C<Ref(C,-1); HVWS:=((H-L)>Ref((H-L),-1)) AND V>Ref(V,-1); HVNS:=((H-L)<Ref((H-L),-1)) AND V>Ref(V,-1); LVWS:=((H-L)>Ref((H-L),-1)) AND V<Ref(V,-1); LVNS:=((H-L)<Ref((H-L),-1)) AND V<Ref(V,-1); B:=If(UDPC AND HVWS,8,If(UDPC AND HVNS,7,If(UDPC AND LVWS,6,If(UDPC AND LVNS,5, If(UDNC AND HVWS,4,If(UDNC AND HVNS,3,If(UDNC AND LVWS,2,If(UDNC AND LVNS,1, If(DDPC AND HVWS,-8,If(DDPC AND HVNS,-7,If(DDPC AND LVWS,-6,If(DDPC AND LVNS,-5, If(DDNC AND HVWS,-4,If(DDNC AND HVNS,-3,If(DDNC AND LVWS,-2,If(DDNC AND LVNS,-1,0)))))))))))))))); TD:=ExtFml("PowerPivots.TrendDirection",1,2); LE:=Mov(B,5,S)>0 AND Sum(TD>0,2)>1; SE:=Mov(B,5,S)<0 AND Sum(TD<0,2)>1; SX:=Mov(B,5,S)>0; LX:=Mov(B,5,S)<0; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B=0 AND Ref(B,-1)<0
henry1224  
#4 Posted : Sunday, July 17, 2005 11:59:19 PM(UTC)
henry1224

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)
UDPC:=(C>((H-L)*.5)+L) AND C>Ref(C,-1); UDNC:=(C<((H-L)*.5)+L) AND C>Ref(C,-1); DDPC:=(C>((H-L)*.5)+L) AND C<Ref(C,-1); DDNC:=(C<((H-L)*.5)+L) AND C<Ref(C,-1); HVWS:=((H-L)>Ref((H-L),-1)) AND V>Ref(V,-1); HVNS:=((H-L)<Ref((H-L),-1)) AND V>Ref(V,-1); LVWS:=((H-L)>Ref((H-L),-1)) AND V<Ref(V,-1); LVNS:=((H-L)<Ref((H-L),-1)) AND V<Ref(V,-1); B:=If(UDPC AND HVWS,8,If(UDPC AND HVNS,7,If(UDPC AND LVWS,6,If(UDPC AND LVNS,5, If(UDNC AND HVWS,4,If(UDNC AND HVNS,3,If(UDNC AND LVWS,2,If(UDNC AND LVNS,1, If(DDPC AND HVWS,-8,If(DDPC AND HVNS,-7,If(DDPC AND LVWS,-6,If(DDPC AND LVNS,-5, If(DDNC AND HVWS,-4,If(DDNC AND HVNS,-3,If(DDNC AND LVWS,-2,If(DDNC AND LVNS,-1,0)))))))))))))))); prd:=Input("Period",1,100,5); If(Mov(B,prd,S)>=0,Mov(B,prd,S),0); If(Mov(B,prd,S)<0,Mov(B,prd,S),0);
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.