Arc Tangent OHLC 15 w SAR Stop - MetaStock.com Forum

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

Notification

Error

Arc Tangent OHLC 15 w SAR Stop - Arc Tangent OHLC 15 w SAR Stop

Options

Previous Topic Next Topic

henry1224		#1 Posted : Sunday, March 27, 2005 5:07:24 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)		This expert needs to have the PowerPivots plus Add-on Highlights Long A2:=Sum((O+H+L+C)/4,15); A:=Mov(Mov(Atan(Ref(A2,-15),A2),2,S),2,S); B:=Mov(Mov(Atan(A2,Ref(A2,-15)),2,S),2,S); Buy:=A<B; Sell:=A>B; D:=If(BarsSince(Buy)<BarsSince(Sell),-1,If(BarsSince(Buy)>BarsSince(Sell),1,0)); LE:=D=-1 AND SAR(.02,.2)<L; LX:=D=-1 AND SAR(.02,.2)>L; SE:=D=1 AND SAR(.02,.2)>H; SX:=D=1 AND SAR(.02,.2)<H; F:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); F>0 Short A2:=Sum((O+H+L+C)/4,15); A:=Mov(Mov(Atan(Ref(A2,-15),A2),2,S),2,S); B:=Mov(Mov(Atan(A2,Ref(A2,-15)),2,S),2,S); Buy:=A<B; Sell:=A>B; D:=If(BarsSince(Buy)<BarsSince(Sell),-1,If(BarsSince(Buy)>BarsSince(Sell),1,0)); LE:=D=-1 AND SAR(.02,.2)<L; LX:=D=-1 AND SAR(.02,.2)>L; SE:=D=1 AND SAR(.02,.2)>H; SX:=D=1 AND SAR(.02,.2)<H; F:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); F<0 Out A2:=Sum((O+H+L+C)/4,15); A:=Mov(Mov(Atan(Ref(A2,-15),A2),2,S),2,S); B:=Mov(Mov(Atan(A2,Ref(A2,-15)),2,S),2,S); Buy:=A<B; Sell:=A>B; D:=If(BarsSince(Buy)<BarsSince(Sell),-1,If(BarsSince(Buy)>BarsSince(Sell),1,0)); LE:=D=-1 AND SAR(.02,.2)<L; LX:=D=-1 AND SAR(.02,.2)>L; SE:=D=1 AND SAR(.02,.2)>H; SX:=D=1 AND SAR(.02,.2)<H; F:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); F=0 Symbols LE A2:=Sum((O+H+L+C)/4,15); A:=Mov(Mov(Atan(Ref(A2,-15),A2),2,S),2,S); B:=Mov(Mov(Atan(A2,Ref(A2,-15)),2,S),2,S); Buy:=A<B; Sell:=A>B; D:=If(BarsSince(Buy)<BarsSince(Sell),-1,If(BarsSince(Buy)>BarsSince(Sell),1,0)); LE:=D=-1 AND SAR(.02,.2)<L; LX:=D=-1 AND SAR(.02,.2)>L; SE:=D=1 AND SAR(.02,.2)>H; SX:=D=1 AND SAR(.02,.2)<H; F:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); F>0 AND Ref(F,-1)<=0 SE A2:=Sum((O+H+L+C)/4,15); A:=Mov(Mov(Atan(Ref(A2,-15),A2),2,S),2,S); B:=Mov(Mov(Atan(A2,Ref(A2,-15)),2,S),2,S); Buy:=A<B; Sell:=A>B; D:=If(BarsSince(Buy)<BarsSince(Sell),-1,If(BarsSince(Buy)>BarsSince(Sell),1,0)); LE:=D=-1 AND SAR(.02,.2)<L; LX:=D=-1 AND SAR(.02,.2)>L; SE:=D=1 AND SAR(.02,.2)>H; SX:=D=1 AND SAR(.02,.2)<H; F:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); F<0 AND Ref(F,-1)>=0 LX A2:=Sum((O+H+L+C)/4,15); A:=Mov(Mov(Atan(Ref(A2,-15),A2),2,S),2,S); B:=Mov(Mov(Atan(A2,Ref(A2,-15)),2,S),2,S); Buy:=A<B; Sell:=A>B; D:=If(BarsSince(Buy)<BarsSince(Sell),-1,If(BarsSince(Buy)>BarsSince(Sell),1,0)); LE:=D=-1 AND SAR(.02,.2)<L; LX:=D=-1 AND SAR(.02,.2)>L; SE:=D=1 AND SAR(.02,.2)>H; SX:=D=1 AND SAR(.02,.2)<H; F:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); F=0 AND Ref(F,-1)>0 SX A2:=Sum((O+H+L+C)/4,15); A:=Mov(Mov(Atan(Ref(A2,-15),A2),2,S),2,S); B:=Mov(Mov(Atan(A2,Ref(A2,-15)),2,S),2,S); Buy:=A<B; Sell:=A>B; D:=If(BarsSince(Buy)<BarsSince(Sell),-1,If(BarsSince(Buy)>BarsSince(Sell),1,0)); LE:=D=-1 AND SAR(.02,.2)<L; LX:=D=-1 AND SAR(.02,.2)>L; SE:=D=1 AND SAR(.02,.2)>H; SX:=D=1 AND SAR(.02,.2)<H; F:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); F=0 AND Ref(F,-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 : Sunday, July 31, 2005 11:05:20 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)		Highlights LONG : A2:=Sum((O+H+L+C)/4,15); A:=Mov(Mov(Atan(Ref(A2,-15),A2),2,S),2,S); B:=Mov(Mov(Atan(A2,Ref(A2,-15)),2,S),2,S); Buy:=A<B; Sell:=A>B; D:=If(BarsSince(Buy)<BarsSince(Sell),-1,If(BarsSince(Buy)>BarsSince(Sell),1,0)); LE:=D=-1 AND SAR(.02,.2)<L; LX:=D=-1 AND SAR(.02,.2)>L; SE:=D=1 AND SAR(.02,.2)>H; SX:=D=1 AND SAR(.02,.2)<H; B:= ExtFml("ForumDll.Latch",LE,LX,SE,SX); B = 1 SHORT : A2:=Sum((O+H+L+C)/4,15); A:=Mov(Mov(Atan(Ref(A2,-15),A2),2,S),2,S); B:=Mov(Mov(Atan(A2,Ref(A2,-15)),2,S),2,S); Buy:=A<B; Sell:=A>B; D:=If(BarsSince(Buy)<BarsSince(Sell),-1,If(BarsSince(Buy)>BarsSince(Sell),1,0)); LE:=D=-1 AND SAR(.02,.2)<L; LX:=D=-1 AND SAR(.02,.2)>L; SE:=D=1 AND SAR(.02,.2)>H; SX:=D=1 AND SAR(.02,.2)<H; B:= ExtFml("ForumDll.Latch",LE,LX,SE,SX); B = -1 out : A2:=Sum((O+H+L+C)/4,15); A:=Mov(Mov(Atan(Ref(A2,-15),A2),2,S),2,S); B:=Mov(Mov(Atan(A2,Ref(A2,-15)),2,S),2,S); Buy:=A<B; Sell:=A>B; D:=If(BarsSince(Buy)<BarsSince(Sell),-1,If(BarsSince(Buy)>BarsSince(Sell),1,0)); LE:=D=-1 AND SAR(.02,.2)<L; LX:=D=-1 AND SAR(.02,.2)>L; SE:=D=1 AND SAR(.02,.2)>H; SX:=D=1 AND SAR(.02,.2)<H; B:= ExtFml("ForumDll.Latch",LE,LX,SE,SX); B = 0 Symbols tab ENTER LONG : A2:=Sum((O+H+L+C)/4,15); A:=Mov(Mov(Atan(Ref(A2,-15),A2),2,S),2,S); B:=Mov(Mov(Atan(A2,Ref(A2,-15)),2,S),2,S); Buy:=A<B; Sell:=A>B; D:=If(BarsSince(Buy)<BarsSince(Sell),-1,If(BarsSince(Buy)>BarsSince(Sell),1,0)); LE:=D=-1 AND SAR(.02,.2)<L; LX:=D=-1 AND SAR(.02,.2)>L; SE:=D=1 AND SAR(.02,.2)>H; SX:=D=1 AND SAR(.02,.2)<H; B:= ExtFml("ForumDll.Latch",LE,LX,SE,SX); B = 1 AND Ref(B,-1) <> 1 ENTER SHORT : A2:=Sum((O+H+L+C)/4,15); A:=Mov(Mov(Atan(Ref(A2,-15),A2),2,S),2,S); B:=Mov(Mov(Atan(A2,Ref(A2,-15)),2,S),2,S); Buy:=A<B; Sell:=A>B; D:=If(BarsSince(Buy)<BarsSince(Sell),-1,If(BarsSince(Buy)>BarsSince(Sell),1,0)); LE:=D=-1 AND SAR(.02,.2)<L; LX:=D=-1 AND SAR(.02,.2)>L; SE:=D=1 AND SAR(.02,.2)>H; SX:=D=1 AND SAR(.02,.2)<H; B:= ExtFml("ForumDll.Latch",LE,LX,SE,SX); B = -1 AND Ref(B,-1) <> -1 EXIT LONG : A2:=Sum((O+H+L+C)/4,15); A:=Mov(Mov(Atan(Ref(A2,-15),A2),2,S),2,S); B:=Mov(Mov(Atan(A2,Ref(A2,-15)),2,S),2,S); Buy:=A<B; Sell:=A>B; D:=If(BarsSince(Buy)<BarsSince(Sell),-1,If(BarsSince(Buy)>BarsSince(Sell),1,0)); LE:=D=-1 AND SAR(.02,.2)<L; LX:=D=-1 AND SAR(.02,.2)>L; SE:=D=1 AND SAR(.02,.2)>H; SX:=D=1 AND SAR(.02,.2)<H; B:= ExtFml("ForumDll.Latch",LE,LX,SE,SX); B = 0 AND Ref(B,-1) = 1 EXIT SHORT : A2:=Sum((O+H+L+C)/4,15); A:=Mov(Mov(Atan(Ref(A2,-15),A2),2,S),2,S); B:=Mov(Mov(Atan(A2,Ref(A2,-15)),2,S),2,S); Buy:=A<B; Sell:=A>B; D:=If(BarsSince(Buy)<BarsSince(Sell),-1,If(BarsSince(Buy)>BarsSince(Sell),1,0)); LE:=D=-1 AND SAR(.02,.2)<L; LX:=D=-1 AND SAR(.02,.2)>L; SE:=D=1 AND SAR(.02,.2)>H; SX:=D=1 AND SAR(.02,.2)<H; 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.