Perfect 1 Expert - MetaStock.com Forum

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

Notification

Error

Perfect 1 Expert - Perfect 1 Expert

Options

Previous Topic Next Topic

henry1224		#1 Posted : Tuesday, April 19, 2005 1:55:32 PM(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 to use this expert Highlights Long A:=((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - Mov(((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - ROC((Mov(WC(),5,E) - Mov(WC(),15,E))-1,5,$),27,E); LE:=Cross(A,0); SE:=Cross(0,A); LX:=0; SX:=0; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B>0 Short A:=((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - Mov(((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - ROC((Mov(WC(),5,E) - Mov(WC(),15,E))-1,5,$),27,E); LE:=Cross(A,0); SE:=Cross(0,A); LX:=0; SX:=0; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B<0 Out A:=((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - Mov(((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - ROC((Mov(WC(),5,E) - Mov(WC(),15,E))-1,5,$),27,E); LE:=Cross(A,0); SE:=Cross(0,A); LX:=0; SX:=0; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B=0 Symbols Long Entry A:=((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - Mov(((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - ROC((Mov(WC(),5,E) - Mov(WC(),15,E))-1,5,$),27,E); LE:=Cross(A,0); SE:=Cross(0,A); LX:=0; SX:=0; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B>0 AND Ref(B,-1)<=0 Short Entry A:=((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - Mov(((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - ROC((Mov(WC(),5,E) - Mov(WC(),15,E))-1,5,$),27,E); LE:=Cross(A,0); SE:=Cross(0,A); LX:=0; SX:=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.

henry1224		#2 Posted : Tuesday, April 19, 2005 2:09:37 PM(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 to use this Expert Highlights Long A:=((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - Mov(((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - ROC((Mov(WC(),5,E) - Mov(WC(),15,E))-1,5,$),27,E); LE:=Cross(A,0); SE:=Cross(0,A); lP:=ExtFml("PowerPivots.NthPivotPrice",-1,0,1); hP:=ExtFml("PowerPivots.NthPivotPrice", 1,0,1); LX:=Cross(lP,CLOSE); SX:=Cross(CLOSE,hP); B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B>0 Short A:=((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - Mov(((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - ROC((Mov(WC(),5,E) - Mov(WC(),15,E))-1,5,$),27,E); LE:=Cross(A,0); SE:=Cross(0,A); lP:=ExtFml("PowerPivots.NthPivotPrice",-1,0,1); hP:=ExtFml("PowerPivots.NthPivotPrice", 1,0,1); LX:=Cross(lP,CLOSE); SX:=Cross(CLOSE,hP); B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B<0 Out A:=((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - Mov(((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - ROC((Mov(WC(),5,E) - Mov(WC(),15,E))-1,5,$),27,E); LE:=Cross(A,0); SE:=Cross(0,A); lP:=ExtFml("PowerPivots.NthPivotPrice",-1,0,1); hP:=ExtFml("PowerPivots.NthPivotPrice", 1,0,1); LX:=Cross(lP,CLOSE); SX:=Cross(CLOSE,hP); B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B=0 Symbols Long entry A:=((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - Mov(((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - ROC((Mov(WC(),5,E) - Mov(WC(),15,E))-1,5,$),27,E); LE:=Cross(A,0); SE:=Cross(0,A); lP:=ExtFml("PowerPivots.NthPivotPrice",-1,0,1); hP:=ExtFml("PowerPivots.NthPivotPrice", 1,0,1); LX:=Cross(lP,CLOSE); SX:=Cross(CLOSE,hP); B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B>0 AND Ref(B,-1)<=0 Short Entry A:=((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - Mov(((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - ROC((Mov(WC(),5,E) - Mov(WC(),15,E))-1,5,$),27,E); LE:=Cross(A,0); SE:=Cross(0,A); lP:=ExtFml("PowerPivots.NthPivotPrice",-1,0,1); hP:=ExtFml("PowerPivots.NthPivotPrice", 1,0,1); LX:=Cross(lP,CLOSE); SX:=Cross(CLOSE,hP); B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B<0 AND Ref(B,-1)>=0 Long Exit A:=((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - Mov(((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - ROC((Mov(WC(),5,E) - Mov(WC(),15,E))-1,5,$),27,E); LE:=Cross(A,0); SE:=Cross(0,A); lP:=ExtFml("PowerPivots.NthPivotPrice",-1,0,1); hP:=ExtFml("PowerPivots.NthPivotPrice", 1,0,1); LX:=Cross(lP,CLOSE); SX:=Cross(CLOSE,hP); B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B=0 AND Ref(B,-1)>0 Short exit A:=((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - Mov(((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - ROC((Mov(WC(),5,E) - Mov(WC(),15,E))-1,5,$),27,E); LE:=Cross(A,0); SE:=Cross(0,A); lP:=ExtFml("PowerPivots.NthPivotPrice",-1,0,1); hP:=ExtFml("PowerPivots.NthPivotPrice", 1,0,1); LX:=Cross(lP,CLOSE); SX:=Cross(CLOSE,hP); B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B=0 AND Ref(B,-1)<0


User Profile View All Posts by User View Thanks

henry1224		#3 Posted : Tuesday, April 19, 2005 4:48:56 PM(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 to use this Expert Highlights Long A:=((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - Mov(((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - ROC((Mov(WC(),5,E) - Mov(WC(),15,E))-1,5,$),27,E); LE:=Cross(A,Ref(A,-1)); SE:=Cross(Ref(A,-1),A); LX:=0; SX:=0; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B>0 Short A:=((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - Mov(((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - ROC((Mov(WC(),5,E) - Mov(WC(),15,E))-1,5,$),27,E); LE:=Cross(A,Ref(A,-1)); SE:=Cross(Ref(A,-1),A); LX:=0; SX:=0; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B<0 Symbols Long entry A:=((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - Mov(((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - ROC((Mov(WC(),5,E) - Mov(WC(),15,E))-1,5,$),27,E); LE:=Cross(A,Ref(A,-1)); SE:=Cross(Ref(A,-1),A); LX:=0; SX:=0; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B>0 AND Ref(B,-1)<=0 Short Entry A:=((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - Mov(((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - ROC((Mov(WC(),5,E) - Mov(WC(),15,E))-1,5,$),27,E); LE:=Cross(A,Ref(A,-1)); SE:=Cross(Ref(A,-1),A); LX:=0; SX:=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

henry1224		#4 Posted : Tuesday, April 19, 2005 9:34:03 PM(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 to have Powerpivots Plus Add-on Installed for this expert to work Highlights Long A:=((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - Mov(((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - ROC((Mov(WC(),5,E) - Mov(WC(),15,E))-1,5,$),27,E); TD:=ExtFml("PowerPivots.TrendDirection",1,2); LE:= Cross(A,0) AND TD=1; SE:= Cross(0,A) AND TD=-1; LX:= Cross(0,A) AND TD>=0; SX:= Cross(A,0) AND TD<=0; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B>0 Short A:=((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - Mov(((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - ROC((Mov(WC(),5,E) - Mov(WC(),15,E))-1,5,$),27,E); TD:=ExtFml("PowerPivots.TrendDirection",1,2); LE:= Cross(A,0) AND TD=1; SE:= Cross(0,A) AND TD=-1; LX:= Cross(0,A) AND TD>=0; SX:= Cross(A,0) AND TD<=0; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B<0 Out A:=((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - Mov(((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - ROC((Mov(WC(),5,E) - Mov(WC(),15,E))-1,5,$),27,E); TD:=ExtFml("PowerPivots.TrendDirection",1,2); LE:= Cross(A,0) AND TD=1; SE:= Cross(0,A) AND TD=-1; LX:= Cross(0,A) AND TD>=0; SX:= Cross(A,0) AND TD<=0; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B=0 Symbols long Entry A:=((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - Mov(((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - ROC((Mov(WC(),5,E) - Mov(WC(),15,E))-1,5,$),27,E); TD:=ExtFml("PowerPivots.TrendDirection",1,2); LE:= Cross(A,0) AND TD=1; SE:= Cross(0,A) AND TD=-1; LX:= Cross(0,A) AND TD>=0; SX:= Cross(A,0) AND TD<=0; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B>0 AND Ref(B,-1)<=0 Short entry A:=((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - Mov(((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - ROC((Mov(WC(),5,E) - Mov(WC(),15,E))-1,5,$),27,E); TD:=ExtFml("PowerPivots.TrendDirection",1,2); LE:= Cross(A,0) AND TD=1; SE:= Cross(0,A) AND TD=-1; LX:= Cross(0,A) AND TD>=0; SX:= Cross(A,0) AND TD<=0; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B<0 AND Ref(B,-1)>=0 Long Exit A:=((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - Mov(((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - ROC((Mov(WC(),5,E) - Mov(WC(),15,E))-1,5,$),27,E); TD:=ExtFml("PowerPivots.TrendDirection",1,2); LE:= Cross(A,0) AND TD=1; SE:= Cross(0,A) AND TD=-1; LX:= Cross(0,A) AND TD>=0; SX:= Cross(A,0) AND TD<=0; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B=0 AND Ref(B,-1)>0 Short exit A:=((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - Mov(((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - ROC((Mov(WC(),5,E) - Mov(WC(),15,E))-1,5,$),27,E); TD:=ExtFml("PowerPivots.TrendDirection",1,2); LE:= Cross(A,0) AND TD=1; SE:= Cross(0,A) AND TD=-1; LX:= Cross(0,A) AND TD>=0; SX:= Cross(A,0) AND TD<=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

henry1224		#5 Posted : Sunday, July 31, 2005 12:25:16 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)		Highlights LONG : A:=((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - Mov(((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - ROC((Mov(WC(),5,E) - Mov(WC(),15,E))-1,5,$),27,E); LE:=Cross(A,0); SE:=Cross(0,A); LX:=0; SX:=0; B:= ExtFml("ForumDll.Latch",LE,LX,SE,SX); B = 1 SHORT : A:=((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - Mov(((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - ROC((Mov(WC(),5,E) - Mov(WC(),15,E))-1,5,$),27,E); LE:=Cross(A,0); SE:=Cross(0,A); LX:=0; SX:=0; B:= ExtFml("ForumDll.Latch",LE,LX,SE,SX); B = -1 out : A:=((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - Mov(((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - ROC((Mov(WC(),5,E) - Mov(WC(),15,E))-1,5,$),27,E); LE:=Cross(A,0); SE:=Cross(0,A); LX:=0; SX:=0; B:= ExtFml("ForumDll.Latch",LE,LX,SE,SX); B = 0 Symbols tab ENTER LONG : A:=((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - Mov(((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - ROC((Mov(WC(),5,E) - Mov(WC(),15,E))-1,5,$),27,E); LE:=Cross(A,0); SE:=Cross(0,A); LX:=0; SX:=0; B:= ExtFml("ForumDll.Latch",LE,LX,SE,SX); B = 1 AND Ref(B,-1) <> 1 ENTER SHORT : A:=((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - Mov(((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - ROC((Mov(WC(),5,E) - Mov(WC(),15,E))-1,5,$),27,E); LE:=Cross(A,0); SE:=Cross(0,A); LX:=0; SX:=0; B:= ExtFml("ForumDll.Latch",LE,LX,SE,SX); B = -1 AND Ref(B,-1) <> -1 EXIT LONG : A:=((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - Mov(((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - ROC((Mov(WC(),5,E) - Mov(WC(),15,E))-1,5,$),27,E); LE:=Cross(A,0); SE:=Cross(0,A); LX:=0; SX:=0; B:= ExtFml("ForumDll.Latch",LE,LX,SE,SX); B = 0 AND Ref(B,-1) = 1 EXIT SHORT : A:=((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - Mov(((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - ROC((Mov(WC(),5,E) - Mov(WC(),15,E))-1,5,$),27,E); LE:=Cross(A,0); SE:=Cross(0,A); LX:=0; SX:=0; B:= ExtFml("ForumDll.Latch",LE,LX,SE,SX); B = 0 AND Ref(B,-1) = -1


User Profile View All Posts by User View Thanks

henry1224		#6 Posted : Friday, August 5, 2005 12:49:43 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)		Highlights LONG : A:=((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - Mov(((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - ROC((Mov(WC(),5,E) - Mov(WC(),15,E))-1,5,$),27,E); LE:=Cross(A,Ref(A,-1)); SE:=Cross(Ref(A,-1),A); LX:=0; SX:=0; B:= ExtFml("ForumDll.Latch",LE,LX,SE,SX); B = 1 SHORT : A:=((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - Mov(((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - ROC((Mov(WC(),5,E) - Mov(WC(),15,E))-1,5,$),27,E); LE:=Cross(A,Ref(A,-1)); SE:=Cross(Ref(A,-1),A); LX:=0; SX:=0; B:= ExtFml("ForumDll.Latch",LE,LX,SE,SX); B = -1 out : A:=((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - Mov(((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - ROC((Mov(WC(),5,E) - Mov(WC(),15,E))-1,5,$),27,E); LE:=Cross(A,Ref(A,-1)); SE:=Cross(Ref(A,-1),A); LX:=0; SX:=0; B:= ExtFml("ForumDll.Latch",LE,LX,SE,SX); B = 0 Symbols tab ENTER LONG : A:=((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - Mov(((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - ROC((Mov(WC(),5,E) - Mov(WC(),15,E))-1,5,$),27,E); LE:=Cross(A,Ref(A,-1)); SE:=Cross(Ref(A,-1),A); LX:=0; SX:=0; B:= ExtFml("ForumDll.Latch",LE,LX,SE,SX); B = 1 AND Ref(B,-1) <> 1 ENTER SHORT : A:=((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - Mov(((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - ROC((Mov(WC(),5,E) - Mov(WC(),15,E))-1,5,$),27,E); LE:=Cross(A,Ref(A,-1)); SE:=Cross(Ref(A,-1),A); LX:=0; SX:=0; B:= ExtFml("ForumDll.Latch",LE,LX,SE,SX); B = -1 AND Ref(B,-1) <> -1 EXIT LONG : A:=((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - Mov(((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - ROC((Mov(WC(),5,E) - Mov(WC(),15,E))-1,5,$),27,E); LE:=Cross(A,Ref(A,-1)); SE:=Cross(Ref(A,-1),A); LX:=0; SX:=0; B:= ExtFml("ForumDll.Latch",LE,LX,SE,SX); B = 0 AND Ref(B,-1) = 1 EXIT SHORT : A:=((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - Mov(((Mov(WC(),5,E) - Mov(WC(),15,E))-1) - ROC((Mov(WC(),5,E) - Mov(WC(),15,E))-1,5,$),27,E); LE:=Cross(A,Ref(A,-1)); SE:=Cross(Ref(A,-1),A); LX:=0; SX:=0; B:= ExtFml("ForumDll.Latch",LE,LX,SE,SX); B = 0 AND Ref(B,-1) = -1


User Profile View All Posts by User View Thanks

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.