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 : Tuesday, August 9, 2005 1:55:00 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 TD:=ExtFml("PowerPivots.TrendDirection",1,2); A1:=Mov(MP(),5,S); A2:=Mov(MP(),17,S); Sig:=Mov(A1,5,S); LE:=Cross(A1,A2) OR Cross(A1,Sig) AND A1>A2 AND TD=1; LX:=Cross(Sig,A1) AND A1>A2; SE:=Cross(A2,A1) OR Cross(Sig,A1) AND A1<A2 AND TD=-1; SX:=Cross(A1,Sig) AND A1<A2; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B>0 Short TD:=ExtFml("PowerPivots.TrendDirection",1,2); A1:=Mov(MP(),5,S); A2:=Mov(MP(),17,S); Sig:=Mov(A1,5,S); LE:=Cross(A1,A2) OR Cross(A1,Sig) AND A1>A2 AND TD=1; LX:=Cross(Sig,A1) AND A1>A2; SE:=Cross(A2,A1) OR Cross(Sig,A1) AND A1<A2 AND TD=-1; SX:=Cross(A1,Sig) AND A1<A2; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B<0 Out TD:=ExtFml("PowerPivots.TrendDirection",1,2); A1:=Mov(MP(),5,S); A2:=Mov(MP(),17,S); Sig:=Mov(A1,5,S); LE:=Cross(A1,A2) OR Cross(A1,Sig) AND A1>A2 AND TD=1; LX:=Cross(Sig,A1) AND A1>A2; SE:=Cross(A2,A1) OR Cross(Sig,A1) AND A1<A2 AND TD=-1; SX:=Cross(A1,Sig) AND A1<A2; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B=0 Symbols Long entry TD:=ExtFml("PowerPivots.TrendDirection",1,2); A1:=Mov(MP(),5,S); A2:=Mov(MP(),17,S); Sig:=Mov(A1,5,S); LE:=Cross(A1,A2) OR Cross(A1,Sig) AND A1>A2 AND TD=1; LX:=Cross(Sig,A1) AND A1>A2; SE:=Cross(A2,A1) OR Cross(Sig,A1) AND A1<A2 AND TD=-1; SX:=Cross(A1,Sig) AND A1<A2; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B>0 AND Ref(B,-1)<=0 Short entry TD:=ExtFml("PowerPivots.TrendDirection",1,2); A1:=Mov(MP(),5,S); A2:=Mov(MP(),17,S); Sig:=Mov(A1,5,S); LE:=Cross(A1,A2) OR Cross(A1,Sig) AND A1>A2 AND TD=1; LX:=Cross(Sig,A1) AND A1>A2; SE:=Cross(A2,A1) OR Cross(Sig,A1) AND A1<A2 AND TD=-1; SX:=Cross(A1,Sig) AND A1<A2; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B<0 AND Ref(B,-1)>=0 Long exit TD:=ExtFml("PowerPivots.TrendDirection",1,2); A1:=Mov(MP(),5,S); A2:=Mov(MP(),17,S); Sig:=Mov(A1,5,S); LE:=Cross(A1,A2) OR Cross(A1,Sig) AND A1>A2 AND TD=1; LX:=Cross(Sig,A1) AND A1>A2; SE:=Cross(A2,A1) OR Cross(Sig,A1) AND A1<A2 AND TD=-1; SX:=Cross(A1,Sig) AND A1<A2; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B=0 AND Ref(B,-1)>0 Short exit TD:=ExtFml("PowerPivots.TrendDirection",1,2); A1:=Mov(MP(),5,S); A2:=Mov(MP(),17,S); Sig:=Mov(A1,5,S); LE:=Cross(A1,A2) OR Cross(A1,Sig) AND A1>A2 AND TD=1; LX:=Cross(Sig,A1) AND A1>A2; SE:=Cross(A2,A1) OR Cross(Sig,A1) AND A1<A2 AND TD=-1; SX:=Cross(A1,Sig) AND A1<A2; B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B=0 AND Ref(B,-1)<0
gabe  
#2 Posted : Tuesday, August 16, 2005 1:25:40 PM(UTC)
gabe

Rank: Newbie

Groups: Registered, Registered Users
Joined: 8/14/2005(UTC)
Posts: 2

Henry I have been looking for to do an exploration with 2 moving average crossover with up trend and I think the program you show is what I am looking for. I don't know anything about programming and I do have Power pivot. How do I get this program into Power Pivot. I am trying to do a 25 day MA crossing over to 200 day MA. I guess I can substitute the numbers. Please help. Thanks Gabriel Tran trangabe@yahoo.com
henry1224  
#3 Posted : Tuesday, August 16, 2005 11:14:54 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)
This expert is for short term traders looking for quick trades. It is based on Advanced Get's 5 17 Osc To implement this into metastock you will need to create a new expert under highlights click new name it long and cut and paste the appropriate formulas into the respective highlights and symbols. Reread the user manual on experts
henry1224  
#4 Posted : Wednesday, August 17, 2005 1:09:29 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)
This expert was designed for Daily Charts only If you want to trade this on other time frames, you will have to change the Trend Direction value to reflect the next higher time frame than the one you are currently trading
henry1224  
#5 Posted : Wednesday, August 17, 2005 1:12:38 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)
for intraday or hourly charts try TD:=ExtFml("PowerPivots.TrendDirection",1,1); for intraday charts less than 60 min try TD:=ExtFml("PowerPivots.TrendDirection",1,60);
vaughn  
#6 Posted : Wednesday, August 17, 2005 1:34:32 AM(UTC)
vaughn

Rank: Advanced Member

Groups: Registered, Registered Users, Subscribers
Joined: 3/16/2005(UTC)
Posts: 93
Location: Maryland,US

Henry, just checking - the last line of the Long Exit says:
Quote:
B0 AND Ref(B,-1)>0
taking B0 as a variable. Should it be B<0 AND... like short entry? Thanks again for all the code vm
henry1224  
#7 Posted : Wednesday, August 17, 2005 11:10:21 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)
B=0 and REf(B,-1)>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.