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

Notification

Icon
Error
limiting the Number of lines plotted by a Formula - limiting the Number of lines plotted by a Formula
Options
Go to last post Go to first unread
Previous Topic Next Topic
Derek Worswick  
#1 Posted : Tuesday, May 14, 2013 5:08:29 AM(UTC)
Derek Worswick

Rank: Advanced Member

Groups: Registered, Registered Users, Subscribers, Unverified Users
Joined: 8/11/2005(UTC)
Posts: 104
HI,

Instead of Plotting all the Horizontal Lines T1;T2;T3;T4;T5;T6;T7;T8;

By Input a value of Inc:=Input("Enter Increment ."1,8,3);
I would like the option of limiting the Number of lines plotted to say if(Inc=2, T1 T2 , Pivot)
or any other "Inc" e.g. if(Inc=3, T1 T2 T3, Pivot)
if(Inc=4, T1 T2 T3 T4, Pivot)

Hoping that you can oblige

Derek

Code:
 ---------------8<-----------------------------------------------------------------------------------
Pivot:= LastValue(Lowest(LOW));
 Rg:=(Sqrt((9 + 12* Pivot))+3)/6; Inc:=Input("Enter Increment .",0,8,7); St:=Input(" Enter Angular Shift Degrees.. ",-359,360,0);
T1:=(Power((((Rg+(1+St/360))*6) -3),2) -9)/12;T2:=(Power((((Rg+(2+St/360))*6) -3),2) -9)/12;T3:=(Power((((Rg+(3+St/360))*6) -3),2) -9)/12;T4:=(Power((((Rg+(4+St/360))*6) -3),2) -9)/12;T5:=(Power((((Rg+(5+St/360))*6) -3),2) -9)/12;T6:=(Power((((Rg+(6+St/360))*6) -3),2) -9)/12;T7:=(Power((((Rg+(7+St/360))*6) -3),2) -9)/12;T8:=(Power((((Rg+(8+St/360))*6) -3),2) -9)/12;
T1;T2;T3;T4;T5;T6;T7;T8;
 Pivot;----------------------8<-------------------------------------------------------------------
Back to top

Wanna join the discussion?! Login to your Discussions forum accountor Register a new forum account.
Back to top  
henry1224  
#2 Posted : Tuesday, May 14, 2013 6:33:34 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 should work, could you explain what this code does?
Code:
Pivot:= LastValue(Lowest(LOW));

Rg:=(Sqrt((9 + 12* Pivot))+3)/6;
Inc:=Input("Enter Increment .",0,8,7); 
 
St:=Input(" Enter Angular Shift Degrees.. ",-359,360,0);
T1:=If(Inc>0,(Power((((Rg+(1+St/360))*6) -3),2) -9)/12,Pivot);
T2:=If(Inc>1,(Power((((Rg+(2+St/360))*6) -3),2) -9)/12,Pivot);
T3:=If(Inc>2,(Power((((Rg+(3+St/360))*6) -3),2) -9)/12,Pivot);
T4:=If(Inc>3,(Power((((Rg+(4+St/360))*6) -3),2) -9)/12,Pivot);
T5:=If(Inc>4,(Power((((Rg+(5+St/360))*6) -3),2) -9)/12,Pivot);
T6:=If(Inc>5,(Power((((Rg+(6+St/360))*6) -3),2) -9)/12,Pivot);
T7:=If(Inc>6,(Power((((Rg+(7+St/360))*6) -3),2) -9)/12,Pivot);
T8:=If(Inc>7,(Power((((Rg+(8+St/360))*6) -3),2) -9)/12,Pivot);
T1;T2;T3;T4;T5;T6;T7;T8;
Back to top
Derek Worswick  
#3 Posted : Tuesday, May 14, 2013 7:08:58 AM(UTC)
Derek Worswick

Rank: Advanced Member

Groups: Registered, Registered Users, Subscribers, Unverified Users
Joined: 8/11/2005(UTC)
Posts: 104
Hi Henry,

Thank you very much, it works fine.

Kind regards,

Derek
Back to top
Derek Worswick  
#4 Posted : Tuesday, May 14, 2013 7:32:25 AM(UTC)
Derek Worswick

Rank: Advanced Member

Groups: Registered, Registered Users, Subscribers, Unverified Users
Joined: 8/11/2005(UTC)
Posts: 104
Hi Henry,

Sorry Henry I missed the first Line of your reply.

The Code produces on MetaStock the From m the Gann Hexaon
See attached screen shot
Back to top
Derek Worswick  
#5 Posted : Thursday, May 16, 2013 3:20:34 AM(UTC)
Derek Worswick

Rank: Advanced Member

Groups: Registered, Registered Users, Subscribers, Unverified Users
Joined: 8/11/2005(UTC)
Posts: 104
Hi,

Is it possible to post a copy of the above Gann Hexagon Wheel Image into a MetaStock Indicator Window.
by any method.

Hoping that you can oblige

Derek
Back to top
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.

Powered by YAF.NET | YAF.NET © 2003-2024, Yet Another Forum.NET