|
PureBytes Links
Trading Reference Links
|
Dimitri,
Thank you for the input...( actually I was hoping
for your comments , Thank you) ....I will make the adjustment to the
formula and re-post.....
As for the angle view in respect to the zoom
factor...Granted , on the screen , when zoomed in or out the angle
perspective will change .....But ...the angle output ( value ) in
the title will not change when the chart is zoomed in or out.....Therefore, the
angle of ascent or descent will be known......( is this a correct assumption )
.
Anthony
<BLOCKQUOTE
>
----- Original Message -----
<DIV
>From:
DIMITRIS
TSOKAKIS
To: <A title=amibroker@xxxxxxxxxxxxxxx
href="">amibroker@xxxxxxxxxxxxxxx
Sent: Tuesday, June 17, 2003 7:19
PM
Subject: [amibroker] Re: Trendline with
Degree output
Anthony,you do not really need LinRegSlope.In the
straight line equationtrendline = aS * ( x -endbar ) + bS;aS is the
slope, ie the tangent of the angle [in radians] andatan(aS) would be
directly your "myradian"myradian=atan(aS);Then you may transform it to
deg.As for the use : We do not read real angles in amibroker charts, a
pi/3 angle will look like pi/4 or pi/6 according to zoom.aS
alone could do the job, ie aS1>0 for positive slope or aS1>aS2 for
correlations [useful for wedges, for example...].aS is the tangent
function of the angle and, from a math property, angle inequalities go 1
to 1 with tangent inequalities, consequently you will miss nothing
.--- In amibroker@xxxxxxxxxxxxxxx, "Anthony Faragasso"
<ajf1111@xxxx> wrote:> Thanks Mark.....I am looking into
it.....> > Anthony> ----- Original Message
----- > From: MarkF2 > To:
amibroker@xxxxxxxxxxxxxxx > Sent: Tuesday, June 17, 2003
3:20 PM> Subject: [amibroker] Re: Trendline with Degree
output> > > Anthony- really nice, but I think
there's a bug somewhere. Comparing> QQQ with NDX,
I got slopes of 4 and 72 degrees respectively, even> though
both trendlines were 27 days and the slopes looked the same.>
> Mark> > --- In
amibroker@xxxxxxxxxxxxxxx, "Anthony Faragasso"
<ajf1111@xxxx>> wrote:> >
//Automatic Support Trendline With Degrees> >
> > //Anthony Faragasso, 2003> >
> > x = Cum(1);> >
> > per =Param("Percent",2,0.01,3,0.01);// Sensitivity
setting> > > >
s1=L;//Array> > > > EndValue1 =
LastValue( Trough( s1, per, 1 ) );> >
> > startvalue = LastValue( Trough( s1, per, 2 )
);> > > > endbar = LastValue(
ValueWhen( s1 == EndValue1, x, 1 ) );> >
> > startbar = LastValue( ValueWhen( s1 == startvalue,
x, 1 ) );> > > > aS =
(EndValue1-startvalue)/(endbar-startbar);> >
> > bS = EndValue1;> >
> > trendline = aS * ( x -endbar ) +
bS;> > > >
//-----------------------------------//> >
> > // Conversion to
Degrees
//> > > >
//-----------------------------------//> >
> > pi=4*atan(1);> >
> > time=endbar-startbar;> >
> >
myslope=LinRegSlope(trendline,time);> >
> > myradian=atan(myslope);> >
> >
mydegree=myradian*(180/PI);//Degrees> >
> >
//-------------------------------------//> >
> >
Plot(C,"close",colorBlack,styleCandle);> >
> >>
Plot(IIf(x>startbar-5,trendline,-1e10),"Trendline",colorYellow,styleLine);>
> > > direction=WriteIf(mydegree >= 0 AND mydegree
<= 0.99,"Flat> > ",WriteIf(mydegree > 0 ,"Rising
",WriteIf(mydegree < 0 , "Falling ",>
"")));> > > >
DirectionColor=LastValue(IIf(mydegree >>
0,colorBrightGreen,IIf(mydegree < 0,> >
colorRed,IIf(mydegree >= 0 AND mydegree <= 0.99
,colorYellow,Null))));> > > >
Title=Name()+"..."+Date()+"\n"+"TRENDLINE is> >
"+EncodeColor(directioncolor)+direction+EncodeColor(colorBlack)+"at>
"+"( "+> > WriteVal(mydegree,1)+" )"+"
Degrees";> > > >
> > > > //plotting ( x, y )
grid> > > >
Plot(startbar==x,"",colorRed,styleHistogram|styleOwnScale);>
> > >
Plot(ValueWhen(startbar==x,Low),"",colorRed,styleLine);>
> > >
//-----------------------------------//> >
> > // Automatic Anlaysis window Output
//> > > >
//-----------------------------------//> >
> > // Settings : //> >
> > // n last quotations and n=1 //>
> > > // explore //> >
> >
//-----------------------------------//> >
> > Filter=mydegree > 0 OR mydegree
<0;> > > >
AddColumn(mydegree,"Degree",1);> > >
> > > > > >
> ---> > Outgoing mail is certified Virus
Free.> > Checked by AVG anti-virus system (<A
href="">http://www.grisoft.com).>
> Version: 6.0.489 / Virus Database: 288 - Release Date: 6/10/2003>
> > Yahoo!
Groups Sponsor >
> > >
> Send BUG REPORTS to bugs@xxxx> Send
SUGGESTIONS to suggest@xxxx>
-----------------------------------------> Post
AmiQuote-related messages ONLY to: amiquote@xxxxxxxxxxxxxxx
> (Web page: <A
href="">http://groups.yahoo.com/group/amiquote/messages/)>
--------------------------------------------> Check group
FAQ at: <A
href="">http://groups.yahoo.com/group/amibroker/files/groupfaq.html
> > Your use of Yahoo! Groups is subject to the
Yahoo! Terms of Service. > > >
---> Outgoing mail is certified Virus
Free.> Checked by AVG anti-virus system (<A
href="">http://www.grisoft.com).>
Version: 6.0.489 / Virus Database: 288 - Release Date:
6/10/2003
Send BUG REPORTS to bugs@xxxxxxxxxxxxxSend SUGGESTIONS to
suggest@xxxxxxxxxxxxx-----------------------------------------Post
AmiQuote-related messages ONLY to: amiquote@xxxxxxxxxxxxxxx (Web page: <A
href="">http://groups.yahoo.com/group/amiquote/messages/)--------------------------------------------Check
group FAQ at: <A
href="">http://groups.yahoo.com/group/amibroker/files/groupfaq.html
Your use of Yahoo! Groups is subject to the <A
href="">Yahoo! Terms of Service.
<BLOCKQUOTE
><FONT
face="Courier New">---Outgoing mail is certified Virus
Free.Checked by AVG anti-virus system (<A
href="">http://www.grisoft.com).Version: 6.0.490
/ Virus Database: 289 - Release Date:
6/16/2003
Yahoo! Groups Sponsor
Send BUG REPORTS to bugs@xxxxxxxxxxxxx
Send SUGGESTIONS to suggest@xxxxxxxxxxxxx
-----------------------------------------
Post AmiQuote-related messages ONLY to: amiquote@xxxxxxxxxxxxxxx
(Web page: http://groups.yahoo.com/group/amiquote/messages/)
--------------------------------------------
Check group FAQ at: http://groups.yahoo.com/group/amibroker/files/groupfaq.html
Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.
|