[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[amibroker] Re: HISTORICAL TRENDLINES and BREAKOUTS



PureBytes Links

Trading Reference Links

Phsst,
Paste the /*HISTORICAL TRENDLINES and BREAKOUTS*/  formula in an 
empty ind.builder window, select scaling automatic and select, for 
example, ^NDX ticker.
Move your cursor [with the keyboard arrow] from June20, 2003 to 
Aug15, 2003 and you will see the trendlines movie for this period.
Dimitris Tsokakis
--- In amibroker@xxxxxxxxxxxxxxx, "Phsst" <phsst@xxxx> wrote:
> Dimitris,
> 
> I see you dream about this stuff too, only your afl gets changed 
while
> mine doesn't.
> 
> Very nice work.
> 
> Phsst
> 
> --- In amibroker@xxxxxxxxxxxxxxx, "DIMITRIS TSOKAKIS" 
<TSOKAKIS@xxxx>
> wrote:
> > /*HISTORICAL TRENDLINES and BREAKOUTS, by D. Tsokakis, Oct2003*/
> > x = Cum(1);
> > per = 3;// CALIBRATE THE ZIG() SENSITIVITY
> > s1=L;s11=H;
> > pS = TroughBars( s1, per, 1 ) == 0;
> > endt=SelectedValue(ValueWhen( pS, x ,1));
> > startt=SelectedValue(ValueWhen( pS, x ,2));
> > dtS =endt-startt;
> > endS = SelectedValue((ValueWhen( pS, s1,1) ));
> > startS = SelectedValue(( ValueWhen( pS, s1 ,2)));
> > aS = (endS-startS)/dtS;bS = endS;
> > trendlineS = aS * ( x -endt ) + bS;//SUPPORT LINE
> > pR = PeakBars( s11, per, 1 ) == 0;
> > endt1= SelectedValue(ValueWhen( pR, x, 1));
> > startt1=SelectedValue(ValueWhen( pR, x, 2 ));
> > dtR =endt1-startt1;
> > endR = SelectedValue(ValueWhen( pR, s11, 1 ) );
> > startR = SelectedValue( ValueWhen( pR, s11, 2 ));
> > aR = (endR-startR)/dtR;bR = endR;
> > trendlineR = aR * ( x -endt1 ) + bR;//RESISTANCE LINE 
> > first=Min(startt,startt1);Last=Max(endt,endt1);
> > d=10;// INCREASE d TO EXTEND THE LINES
> > bullishbreakout=x>endt1 AND x<last+d AND Cross(C,trendlineR);
> > bearishbreakout=x>endt AND x<last+d AND Cross(trendlineS,C);
> > Plot(C,"Close",IIf(bullishbreakout,colorBrightGreen,IIf
> > (bearishbreakout,colorRed,colorBlack)),64);
> > Plot(IIf(x>=first -d AND x<=Last+d,trendlineS,-
> > 1e10),"Support",colorBrightGreen,1);
> > Plot(IIf(x>=first-d AND x<=Last+d,trendlineR,-
> > 1e10),"Resistance",colorRed,1);
> > 
> > Place the cursor in a previous bar and see the trendlines for 
this 
> > period. 
> > Move the cursor [to the left or to the right] to see the 
formation 
> > changes.
> > The Resistance breakouts are painted green, the Support breakouts 
are 
> > red. 
> > Dimitris Tsokakis
> > --- In amibroker@xxxxxxxxxxxxxxx, "DIMITRIS TSOKAKIS" 
<TSOKAKIS@xxxx> 
> > wrote:
> > > Select an empty IB window and paste the
> > > 
> > >  /*HISTORICAL TRENDLINES, v.2.*/
> > > x = Cum(1);per = 3;s1=L;s11=H;
> > > pS = TroughBars( s1, per, 1 ) == 0;
> > > endt=SelectedValue(ValueWhen( pS, x ,1));
> > > startt=SelectedValue(ValueWhen( pS, x ,2));
> > > dtS =endt-startt;
> > > endS = SelectedValue((ValueWhen( pS, s1,1) ));
> > > startS = SelectedValue(( ValueWhen( pS, s1 ,2)));
> > > aS = (endS-startS)/dtS;bS = endS;
> > > trendlineS = aS * ( x -endt ) + bS;//SUPPORT LINE
> > > pR = PeakBars( s11, per, 1 ) == 0;
> > > endt1= SelectedValue(ValueWhen( pR, x, 1));
> > > startt1=SelectedValue(ValueWhen( pR, x, 2 ));
> > > dtR =endt1-startt1;
> > > endR = SelectedValue(ValueWhen( pR, s11, 1 ) );
> > > startR = SelectedValue( ValueWhen( pR, s11, 2 ));
> > > aR = (endR-startR)/dtR;bR = endR;
> > > trendlineR = aR * ( x -endt1 ) + bR;//RESISTANCE LINE 
> > > first=Min(startt,startt1);Last=Max(endt,endt1);
> > > Plot(IIf(x>=first -10 AND x<=Last+10,trendlineS,-
> > > 1e10),"Support",colorBrightGreen,1);
> > > Plot(IIf(x>=first-10 AND x<=Last+10,trendlineR,-
> > > 1e10),"Resistance",colorRed,1);
> > > Plot(C,"Close",colorBlack,64);
> > > 
> > > Place your cursor at the last bar and move it slowly to the 
left.
> > > Your graph will recall, one by one, the trendlines of the 
past.!!
> > > Dimitris Tsokakis


------------------------ Yahoo! Groups Sponsor ---------------------~-->
Rent DVDs from home.
Over 14,500 titles. Free Shipping
& No Late Fees. Try Netflix for FREE!
http://us.click.yahoo.com/ybSovB/hP.FAA/3jkFAA/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/