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

[EquisMetaStock Group] Trendlines Scrips for Metastock



PureBytes Links

Trading Reference Links





  Dear all,
      Below is an indicator scrip 
  from Amibroker database. I tried to search for the scrip by name "<FONT 
  face="Courier New" size=3>HISTORICAL TRENDLINES and BREAKOUTS, by D. 
  Tsokakis, Oct2003" on google in metastock 
  format, but was unable to find it. The scrip generates trendlines from both 
  recent 2 tops & recent 2 bottoms, thereby generating a pattern if any. 
  Further if trendlines are generated in the form of an indicator, can they be 
  extended to right-left as can be done with normal 
  trendlines?
      Help on this matter will 
  be highly appreciated.
   
  - pushkan. 
  <DIV 
  >                   
   
   
   
    From: <A 
  title=tanewbie2004@xxxxxxxxx 
  href="">tanewbie2004 
    To: <A 
  title=Technical-Investor@xxxxxxxxxxxxxxx 
  href="">Technical-Investor@xxxxxxxxxxxxxxx 
  
    Sent: Saturday, July 03, 
  2004 9:20 AM
    Subject: [Technical-Investor] 
  Trendlines afl
  
    
      Just copy the following and use it in indicator 
      builder.  /*HISTORICAL TRENDLINES and 
      BREAKOUTS, by D. Tsokakis, Oct2003*/x = 
      Cum(1);per = 3;// CALIBRATE THE ZIG() 
      SENSITIVITYs1=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 LINEpR = 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 LINESbullishbreakout=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); 
            For 
      Warning & Disclaimer please read<A 
      href="">http://finance.groups.yahoo.com/group/Technical-Investor/files/Disclaimer.txt
    
  








Yahoo! Groups Sponsor


  ADVERTISEMENT 












Yahoo! Groups Links
To visit your group on the web, go to:http://groups.yahoo.com/group/equismetastock/ 
To unsubscribe from this group, send an email to:equismetastock-unsubscribe@xxxxxxxxxxxxxxx 
Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.