|
PureBytes Links
Trading Reference Links
|
Anthony,
you do not really need LinRegSlope.
In the straight line equation
trendline = aS * ( x -endbar ) + bS;
aS is the slope, ie the tangent of the angle [in radians] and
atan(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 (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: 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.
>
>
> ---
> Outgoing mail is certified Virus Free.
> Checked by AVG anti-virus system (http://www.grisoft.com).
> Version: 6.0.489 / Virus Database: 288 - Release Date: 6/10/2003
------------------------ Yahoo! Groups Sponsor ---------------------~-->
Get A Free Psychic Reading! Your Online Answer To Life's Important Questions.
http://us.click.yahoo.com/Lj3uPC/Me7FAA/ySSFAA/GHeqlB/TM
---------------------------------------------------------------------~->
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 http://docs.yahoo.com/info/terms/
|