[RT] Re: Triple Switch

["clydelee.com" <clydelee@xxxxxxxxxx>]

Bob (and lists),
 
The attached  .txt  file is the code for 
the   .ela   that is attached.
 
The  .gif  files show the use of the 
original "plot" version and the
modified "trendline" version.
 
Hope folks enjoy this as it is an excellent trend 
indicator.
 
It can be easily modified to look only for longer 
trends.
 
Clyde
 
 
- - - - - - - - - - - - - - - - - - - - -  - - - - - - -Clyde 
Lee   
Chairman/CEO          (Home of 
SwingMachine)SYTECH 
Corporation          email: <A 
href="">clydelee@xxxxxxxxxxxx  7910 
Westglen, Suite 105       
Office:    (713) 783-9540Houston,  TX  
77063               
Fax:    (713) 783-1092Details 
at:                      
www.theswingmachine.com- - - - 
- - - - - - - - - - - - - - - -  - - - - - - - -
<BLOCKQUOTE dir=ltr 
>
  ----- Original Message ----- 
  <DIV 
  >From: 
  BobR 
  
  To: <A title=clydelee@xxxxxxxxxxxx 
  href="">Clyde Lee 
  Sent: Thursday, May 22, 2003 3:35 
PM
  Subject: Triple Switch
   
  It is the FibonacciTrader Triple Switch.  I 
  translated it and Clyde recoded it as he always does.  I should check 
  with him to see if he has any problems with publishing his version.  I'll 
  ask him and let him post it so he can get some free advertising.
   






Yahoo! Groups Sponsor


  ADVERTISEMENT 









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.



{Indicator:     BobR_Triple Switch}
  
{Indicator, (FibonacciTrader Triple Switch) using plot 
commands was originally coded by Bob Roeske.
Bob Roeske:  bobrabcd@xxxxxxxxxxxxx
http://www.oextrader.com/sigma_trader

Clyde Lee recoded it and provided the facility to use
TRENDLINES to draw lines.  Trendlines are much slower 
to initially draw the indicator but provide a much more 
pleasing picture.  
Clyde Lee:  clydelee@xxxxxxxxxxxx
http://www.theswingmachine.com

}


Input:  DoPlot(False),  {set true to use faster plot method        }
                        {set false to use more pleasing trendlines }
        DoVert(True);   {if in trendline mode, set false to inhibit}
                        {drawing of vertical lines.                }

Var: Pos(1), TSUP(0), TSDN(0);
Vars: Color1(GetPlotColor(1)), Color2(GetPlotColor(3)); 

TSUP=Average(H,4)[1];
TSDN=Average(L,4)[1];

If Pos=+1 and C<=TSDN then begin
   If DoPlot then begin
     Plot1(TSUP,"TSUP");
     Plot2(TSUP,"TSUP");
     Plot3(TSDN,"TSDN");
     Plot4(TSDN,"TSDN");
   End
   Else Begin
     Value1=TL_New(Date[1],Time[1],TSUP,Date,Time,TSUP);
     Value2=TL_SetAll(Value1, color1, 1, 3, false, false);
   End;
   Pos=-1;
End;

If Pos=-1 and C>=TSUP then begin
   If DoPlot then begin
     Plot1(TSUP,"TSUP");
     Plot2(TSUP,"TSUP");
     Plot3(TSDN,"TSDN");
     Plot4(TSDN,"TSDN");
   End
   Else Begin
     Value1=TL_New(Date[1],Time[1],TSDN,Date,Time,TSDN);
     Value2=TL_SetAll(Value1, color2, 1, 3, false, false);
   End;
   Pos=+1;
End;

If DoPlot then begin
  If Pos=-1 and C<TSUP then Plot1(TSUP,"TSUP");
  If Pos=-1 and C<TSUP then Plot2(TSUP,"TSUP");
  If Pos=+1 and C>TSDN then Plot3(TSDN,"TSDN");
  If Pos=+1 and C>TSDN then Plot4(TSDN,"TSDN");
End
Else Begin
  If Pos=-1 then begin
     Value1=TL_New(Date[1],Time[1],TSUP,Date,Time,TSUP);
     Value2=TL_SetAll(Value1, color1, 1, 3, false, false);
     If TSUP[1]<>TSUP and Pos[1]=-1 and DoVert then begin
       Value1=TL_New(Date[1],Time[1],TSUP[1],Date[1],Time[1],TSUP);
       Value2=TL_SetAll(Value1, color1, 1, 3, false, false);
     End;
  End;
  If Pos=+1 then begin
     Value1=TL_New(Date[1],Time[1],TSDN,Date,Time,TSDN);
     Value2=TL_SetAll(Value1, color2, 1, 3, false, false);
     If TSDN[1]<>TSDN and Pos[1]=+1 and DoVert then begin
       Value1=TL_New(Date[1],Time[1],TSDN[1],Date[1],Time[1],TSDN);
       Value2=TL_SetAll(Value1, color2, 1, 3, false, false);
     End;
  End;
End;    











Attachment:
BOBRTRIPLE SWITCH.ELA
Description: Binary data
Attachment:
TripleSwitch_Plot.gif
Description: GIF image

Attachment: Description: "Description: GIF image"

Attachment: Description: "TripleSwitch_Trend.gif"

Attachment: Description: "Attachment:"