Tilson's T3 & T4 w Donchain Channels W Fib

This is the place to discuss EdgeRater Chart Script

Moderator: Chris White

Post Reply
henry1224
Posts: 457
Joined: Wed Feb 24, 2016 12:04 pm

Tilson's T3 & T4 w Donchain Channels W Fib

Post by henry1224 »

under the parameters tab

N1 double 3 0 100
N2 double 4 0 200
Per Double 21 0 500


Here is the code

A1:= (O+C)/2;
e1:=EMA(A1,n1);
e2:=EMA(e1,n1);
e3:=EMA(e2,n1);
e4:=EMA(e3,n1);
e5:=EMA(e4,n1);
e6:=EMA(e5,n1);
e1a:=EMA(A1,n2);
e2a:=EMA(e1a,n2);
e3a:=EMA(e2a,n2);
e4a:=EMA(e3a,n2);
e5a:=EMA(e4a,n2);
e6a:=EMA(e5a,n2);

c1:=-.618*.618*.618;
c2:=3*.618*.618+3*.618*.618*.618;
c3:=-6*.618*.618-3*.618-3*.618*.618*.618;
c4:=1+3*.618+.618*.618*.618+3*.618*.618;

T2:c1*e6a+c2*e5a+c3*e4a+c4*e3a,Width2,ColorRed;
T1:c1*e6+c2*e5+c3*e4+c4*e3,Width2,ColorBlue;
FillRgn(T1>T2,T1,T2),ExtendLR,Brush#800000FF;
FillRgn(T1<T2,T2,T1),ExtendLR,Brush#80FF0000;

hl:HHV(Ref(high,1),per),Width2,ColorBlue;
ll:LLV(Ref(low,1),per),Width2,ColorBlue;
dist:=hl-ll ;
hf:=hl-dist*0.236 ;
cfh:=hl-dist*0.382 ;
Mid:hl-dist*.5,Crossdot,ColorBlack;
cfl:=hl-dist*0.618 ;
lf:=hl-dist*0.764 ;
FillRgn(1,HL,HF),ExtendLR,Brush#30FFA500;
FillRgn(1,CFH,CFL),ExtendLR,Brush#60B0C4DE;
FillRgn(1,LL,LF),ExtendLR,Brush#30FFA500;




if you plot this indicator twice on the price plot and change the 2nd parameters to 5X the first parameters you will see some substantial areas
henry1224
Posts: 457
Joined: Wed Feb 24, 2016 12:04 pm

Re: Tilson's T3 & T4 w Donchain Channels W Fib

Post by henry1224 »

Here is the same formula only in eighth's

Use the same parameters as the above indicator

Here is the formula

A1:= (O+C)/2;
e1:=EMA(A1,n1);
e2:=EMA(e1,n1);
e3:=EMA(e2,n1);
e4:=EMA(e3,n1);
e5:=EMA(e4,n1);
e6:=EMA(e5,n1);
e1a:=EMA(A1,n2);
e2a:=EMA(e1a,n2);
e3a:=EMA(e2a,n2);
e4a:=EMA(e3a,n2);
e5a:=EMA(e4a,n2);
e6a:=EMA(e5a,n2);

c1:=-.618*.618*.618;
c2:=3*.618*.618+3*.618*.618*.618;
c3:=-6*.618*.618-3*.618-3*.618*.618*.618;
c4:=1+3*.618+.618*.618*.618+3*.618*.618;

T2:c1*e6a+c2*e5a+c3*e4a+c4*e3a,Width2,ColorRed;
T1:c1*e6+c2*e5+c3*e4+c4*e3,Width2,ColorBlue;
FillRgn(T1>T2,T1,T2),ExtendLR,Brush#800000FF;
FillRgn(T1<T2,T2,T1),ExtendLR,Brush#80FF0000;

hh:HHV(Ref(high,1),per),Width2,ColorBlue;
ll:LLV(Ref(low,1),per),Width2,ColorBlue;
Height := HH-LL;
A1 := LL+Height*0.125,Width2,ColorGold;
A2 := LL+Height*0.25,Width2,ColorRed;
A3 := LL+Height*0.375,Width2,ColorGreen;
A4 : LL+Height*0.5,CrossDot,ColorBlack;
A5 := LL+Height*0.625,Width2,ColorGreen;
A6 := LL+Height*0.75,Width2,ColorRed;
A7 := LL+Height*0.875,Width2,ColorGold;

FILLRGN(1,HH,A7),ExtendLR,Brush#30FFD700;
FILLRGN(1,A7,A6),ExtendLR,Brush#15FF0000;
FILLRGN(1,A6,A5),ExtendLR,Brush#4098FB98;
FILLRGN(1,A5,A4),ExtendLR,Brush#2500FFFF;
FILLRGN(1,A4,A3),ExtendLR,Brush#2500FFFF;
FILLRGN(1,A3,A2),ExtendLR,Brush#4098FB98;
FILLRGN(1,A2,A1),ExtendLR,Brush#15FF0000;
FILLRGN(1,A1,LL),ExtendLR,Brush#30FFD700;

@SetTextVisible(HH,false);
@SetTextVisible(LL,false);
@SetTextVisible(A1,false);
@SetTextVisible(A2,false);
@SetTextVisible(A3,false);
@SetTextVisible(A4,false);
@SetTextVisible(A5,false);
@SetTextVisible(A6,false);
@SetTextVisible(A7,false);
Post Reply