[RT] Display of Multiple time frames on same chart

[Clyde Lee <clydelee@xxxxxxxxxx>]

A client of mine asked if there were some 
way in which it might be
possible to display multiple time frames on 
a single chart.
 
The attached  NBarBox  indicator 
is an attempt to do so.
 
This is not very sophisticated or fancy but 
I was surprised at some
of the results as I "played" with 
this.
 
Junk5.gif  is the purpose for which 
this was designed.
 
The other two  .gif  files show a 
somewhat different approach to the
use of this routine.
 
I'm not including an   
.els   since it is just too easy to cut and
paste the following into your editor and 
save it as  NBarBox  indicator
or whatever you want to call 
it.
 
TS4 users are invited to modify this (and 
hopefully post the results)
in which the early trendlines are deleted 
once you reach a level of
600 or so trendlines.
 
Clyde
 
 
 
{Indicator:  NBarBox}  
{Purpose:    Draw a box covering NBars with the bottom of 
the             
box corresponding to the Lowest Low in the 
NBars             
of the group and the top of the box being 
the             
Highest High in the group.
 
<FONT face="Courier New" 
size=2>             
Vertical lines are drawn at the beginning and 
end             
of the group of bars and extends from LL to HH.
 
<FONT face="Courier New" 
size=2> Use:        Display higher time 
frame on chart.
 
 Problems:   ONLY FOR TS2000 
unless you add something to 
insure             
only the most recent 600 or so trendlines are 
             
drawn -- that would cover 150 groups.
 
<FONT face="Courier New" 
size=2>             
DO NOT APPLY TO A VERY LONG DATA SERIES AS IT 
WILL             
TAKE A VERY LONG TIME TO UPDATE ! ! !
 
 Author:     Clyde 
Lee, Copyright 2001
 
 Permission: This application for 
Omega Tradestation can be 
             
freely distributed with proper credit.}
 
Input:  
NBars(4),      {Number of bars to be included in box 
}        
Shift(0),      {Move starting bar by amount 
entered  }        
LColor(red),   {Line color for 
box                   
}        
LSize(0);      {Line size for 
box                    
}
 
Vars:   
MBars(NBars-1),HH(0),LL(0);
 
If Mod(CurrentBar,NBars)=Shift then 
begin  HH=Highest(H,NBars);  LL=Lowest(L,Nbars);  
Value1=TL_New(Date[Mbars], Time[MBars], HH, Date, Time, HH);    
Value2=TL_New(Date[Mbars], Time[MBars], LL, Date, Time, LL);  
Value3=TL_New(Date[Mbars], Time[MBars], HH, Date[MBars], Time[MBars], LL);  
  Value4=TL_New(Date, Time, HH, Date, Time, LL);  
TL_SetColor(Value1, LColor);  TL_SetColor(Value2, LColor);  
TL_SetColor(Value3, LColor);  TL_SetColor(Value4, LColor);  
TL_SetSize(Value1, LSize);  TL_SetSize(Value2, LSize);  
TL_SetSize(Value3, LSize);  TL_SetSize(Value4, 
LSize);End;
 
 
 
 
- - - - - - - - - - - - - - - - - - - - 
-  - - - - - - -Clyde Lee   
Chairman/CEO          (Home of 
SwingMachine)SYTECH 
Corporation          email: <A 
href="mailto:clydelee@xxxxxxxxxxxx";>clydelee@xxxxxxxxxxxx  7910 
Westglen, Suite 105       
Office:    (713) 783-9540Houston,  TX  
77063               
Fax:    (713) 783-1092Details 
at:                      
www.theswingmachine.com- - - - 
- - - - - - - - - - - - - - - -  - - - - - - - 
-



To unsubscribe from this group, send an email to:
realtraders-unsubscribe@xxxxxxxxxxxxxxx





Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.

Attachment: Description: "junk3.gif"

Attachment: Description: "junk4.gif"

Attachment: Description: "junk5.gif"