Cycles Combined

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

Cycles Combined

Post by henry1224 »

Here is an indicator called Cycles_4_8_16_32_64

P0:=EMA(((C-LLV(L,4))/(HHV(H,4) - LLV(L,4))),3);
P1:=EMA(((C-LLV(L,8))/(HHV(H,8) - LLV(L,8))),3);
P2:=EMA(((C-LLV(L,16))/(HHV(H,16) - LLV(L,16))),3);
P3:=EMA(((C-LLV(L,32))/(HHV(H,32) - LLV(L,32))),3);
P4:=EMA(((C-LLV(L,64))/(HHV(H,64) - LLV(L,64))),3);

A0:=EMA(((P0-LLV(P0,4))/(HHV(P0,4) - LLV(P0,4))),3);
A1:=EMA(((P1-LLV(P1,8))/(HHV(P1,8) - LLV(P1,8))),3);
A2:=EMA(((P2-LLV(P2,16))/(HHV(P2,16) - LLV(P2,16))),3);
A3:=EMA(((P3-LLV(P3,32))/(HHV(P3,32) - LLV(P3,32))),3);
A4:=EMA(((P4-LLV(P4,64))/(HHV(P4,64) - LLV(P4,64))),3);

OST:= MA(MA((A0+A1*2+A2*3+A3*4+A4*5)/15,2),2)*100;
Con1:= OST >= 50;
Con2:= OST < 50;
Con3:= OST > Ref(OST,1);
Con4:= OST < Ref(OST,1);
BullRise: If(Con1 & Con3, OST,50),ColorLime;
BullFall: If(Con1 & Con4, OST,50),ColorGreen;
BearFall: If(Con2 & Con4, OST,50),ColorRed;
BearRise: If(Con2 & Con3, OST,50),ColorDarkRed;

Signal: MA(OST,2),ColorBlue;
UZ: MA(OST,34) + (1.3185*STD(OST,34)),ColorViolet;
LZ: MA(OST,34) - (1.3185*STD(OST,34)),ColorViolet;
henry1224
Posts: 457
Joined: Wed Feb 24, 2016 12:04 pm

Re: Cycles Combined

Post by henry1224 »

Here is the new and improved version

P0:=EMA(((C-LLV(L,4))/(HHV(H,4) - LLV(L,4))),3);
P1:=EMA(((C-LLV(L,8))/(HHV(H,8) - LLV(L,8))),3);
P2:=EMA(((C-LLV(L,16))/(HHV(H,16) - LLV(L,16))),3);
P3:=EMA(((C-LLV(L,32))/(HHV(H,32) - LLV(L,32))),3);
P4:=EMA(((C-LLV(L,64))/(HHV(H,64) - LLV(L,64))),3);

A0:=EMA(((P0-LLV(P0,4))/(HHV(P0,4) - LLV(P0,4))),3);
A1:=EMA(((P1-LLV(P1,8))/(HHV(P1,8) - LLV(P1,8))),3);
A2:=EMA(((P2-LLV(P2,16))/(HHV(P2,16) - LLV(P2,16))),3);
A3:=EMA(((P3-LLV(P3,32))/(HHV(P3,32) - LLV(P3,32))),3);
A4:=EMA(((P4-LLV(P4,64))/(HHV(P4,64) - LLV(P4,64))),3);

OST:= MA(MA((A0+A1*2+A2*3+A3*4+A4*5)/15,2),2)*100;
Con1:= OST >= 50;
Con2:= OST < 50;
Con3:= OST > Ref(OST,1);
Con4:= OST < Ref(OST,1);
BullRise: If(Con1 & Con3, OST,50),ColorLime;
BullFall: If(Con1 & Con4, OST,50),ColorGreen;
BearFall: If(Con2 & Con4, OST,50),ColorRed;
BearRise: If(Con2 & Con3, OST,50),ColorDarkRed;

Signal: MA(OST,2),width2,ColorBlue;
UZ: MA(OST,34) + (1.3185*STD(OST,34)),width2,ColorViolet;
LZ: MA(OST,34) - (1.3185*STD(OST,34)),width2,ColorViolet;
FillRgn(1,BullRise,50),Brush#5000FF00;
FillRgn(1,BullFall,50),Brush#50006400;
FillRgn(1,BearRise,50),Brush#508B0000;
FillRgn(1,BearFall,50),Brush#50FF0000;
henry1224
Posts: 457
Joined: Wed Feb 24, 2016 12:04 pm

Re: Cycles Combined

Post by henry1224 »

Here is another indicator Cycles_5-10_15_20_25

P0:=EMA(((C-LLV(L,4))/(HHV(H,5) - LLV(L,5))),3);
P1:=EMA(((C-LLV(L,8))/(HHV(H,10) - LLV(L,10))),3);
P2:=EMA(((C-LLV(L,16))/(HHV(H,15) - LLV(L,15))),3);
P3:=EMA(((C-LLV(L,32))/(HHV(H,20) - LLV(L,20))),3);
P4:=EMA(((C-LLV(L,64))/(HHV(H,25) - LLV(L,25))),3);

A0:=EMA(((P0-LLV(P0,4))/(HHV(P0,5) - LLV(P0,5))),3);
A1:=EMA(((P1-LLV(P1,8))/(HHV(P1,10) - LLV(P1,10))),3);
A2:=EMA(((P2-LLV(P2,16))/(HHV(P2,15) - LLV(P2,15))),3);
A3:=EMA(((P3-LLV(P3,32))/(HHV(P3,20) - LLV(P3,20))),3);
A4:=EMA(((P4-LLV(P4,64))/(HHV(P4,25) - LLV(P4,25))),3);

OST:= MA(MA((A0+A1*2+A2*3+A3*4+A4*5)/15,2),2)*100;
Con1:= OST >= 50;
Con2:= OST < 50;
Con3:= OST > Ref(OST,1);
Con4:= OST < Ref(OST,1);
BullRise: If(Con1 & Con3, OST,50),ColorLime;
BullFall: If(Con1 & Con4, OST,50),ColorGreen;
BearFall: If(Con2 & Con4, OST,50),ColorRed;
BearRise: If(Con2 & Con3, OST,50),ColorDarkRed;

Signal: MA(OST,2),width2,ColorBlue;
UZ: MA(OST,34) + (1.3185*STD(OST,34)),width2,ColorViolet;
LZ: MA(OST,34) - (1.3185*STD(OST,34)),width2,ColorViolet;
FillRgn(1,BullRise,50),Brush#5000FF00;
FillRgn(1,BullFall,50),Brush#50006400;
FillRgn(1,BearRise,50),Brush#508B0000;
FillRgn(1,BearFall,50),Brush#50FF0000;
henry1224
Posts: 457
Joined: Wed Feb 24, 2016 12:04 pm

Re: Cycles Combined

Post by henry1224 »

here is another Cycles_ 5_10_20_40_80

P0:=EMA(((C-LLV(L,4))/(HHV(H,5) - LLV(L,5))),3);
P1:=EMA(((C-LLV(L,8))/(HHV(H,10) - LLV(L,10))),3);
P2:=EMA(((C-LLV(L,16))/(HHV(H,20) - LLV(L,20))),3);
P3:=EMA(((C-LLV(L,32))/(HHV(H,40) - LLV(L,40))),3);
P4:=EMA(((C-LLV(L,64))/(HHV(H,80) - LLV(L,80))),3);

A0:=EMA(((P0-LLV(P0,4))/(HHV(P0,5) - LLV(P0,5))),3);
A1:=EMA(((P1-LLV(P1,8))/(HHV(P1,10) - LLV(P1,10))),3);
A2:=EMA(((P2-LLV(P2,16))/(HHV(P2,20) - LLV(P2,20))),3);
A3:=EMA(((P3-LLV(P3,32))/(HHV(P3,40) - LLV(P3,40))),3);
A4:=EMA(((P4-LLV(P4,64))/(HHV(P4,80) - LLV(P4,80))),3);

OST:= MA(MA((A0+A1*2+A2*3+A3*4+A4*5)/15,2),2)*100;
Con1:= OST >= 50;
Con2:= OST < 50;
Con3:= OST > Ref(OST,1);
Con4:= OST < Ref(OST,1);
BullRise: If(Con1 & Con3, OST,50),ColorLime;
BullFall: If(Con1 & Con4, OST,50),ColorGreen;
BearFall: If(Con2 & Con4, OST,50),ColorRed;
BearRise: If(Con2 & Con3, OST,50),ColorDarkRed;

Signal: MA(OST,2),width2,ColorBlue;
UZ: MA(OST,34) + (1.3185*STD(OST,34)),width2,ColorViolet;
LZ: MA(OST,34) - (1.3185*STD(OST,34)),width2,ColorViolet;
FillRgn(1,BullRise,50),Brush#5000FF00;
FillRgn(1,BullFall,50),Brush#50006400;
FillRgn(1,BearRise,50),Brush#508B0000;
FillRgn(1,BearFall,50),Brush#50FF0000;
henry1224
Posts: 457
Joined: Wed Feb 24, 2016 12:04 pm

Re: Cycles Combined

Post by henry1224 »

here is a Fibonacci based cycles indicator with 9 cycles

P0:=EMA(((C-LLV(L,3))/(HHV(H,3) - LLV(L,3))),3);
P1:=EMA(((C-LLV(L,5))/(HHV(H,5) - LLV(L,5))),3);
P2:=EMA(((C-LLV(L,8))/(HHV(H,8) - LLV(L,8))),3);
P3:=EMA(((C-LLV(L,13))/(HHV(H,13) - LLV(L,13))),3);
P4:=EMA(((C-LLV(L,21))/(HHV(H,21) - LLV(L,21))),3);
P5:=EMA(((C-LLV(L,34))/(HHV(H,34) - LLV(L,34))),3);
P6:=EMA(((C-LLV(L,55))/(HHV(H,55) - LLV(L,55))),3);
P7:=EMA(((C-LLV(L,89))/(HHV(H,89) - LLV(L,89))),3);
P8:=EMA(((C-LLV(L,144))/(HHV(H,144) - LLV(L,144))),3);

A0:=EMA(((P0-LLV(P0,3))/(HHV(P0,3) - LLV(P0,3))),3);
A1:=EMA(((P1-LLV(P1,5))/(HHV(P1,5) - LLV(P1,5))),3);
A2:=EMA(((P2-LLV(P2,8))/(HHV(P2,8) - LLV(P2,8))),3);
A3:=EMA(((P3-LLV(P3,13))/(HHV(P3,13) - LLV(P3,13))),3);
A4:=EMA(((P4-LLV(P4,21))/(HHV(P4,21) - LLV(P4,21))),3);
A5:=EMA(((P5-LLV(P5,34))/(HHV(P5,34) - LLV(P5,34))),3);
A6:=EMA(((P6-LLV(P6,55))/(HHV(P6,55) - LLV(P6,55))),3);
A7:=EMA(((P7-LLV(P7,89))/(HHV(P7,89) - LLV(P7,89))),3);
A8:=EMA(((P8-LLV(P8,144))/(HHV(P8,144) - LLV(P8,144))),3);

OST:= MA(MA((A0+A1*2+A2*3+A3*4+A4*5+A5*6+A6*7+A7*8+A8*9)/45,2),2)*100;
Con1:= OST >= 50;
Con2:= OST < 50;
Con3:= OST > Ref(OST,1);
Con4:= OST < Ref(OST,1);
BullRise: If(Con1 & Con3, OST,50),ColorLime;
BullFall: If(Con1 & Con4, OST,50),ColorGreen;
BearFall: If(Con2 & Con4, OST,50),ColorRed;
BearRise: If(Con2 & Con3, OST,50),ColorDarkRed;

Signal: MA(OST,2),width2,ColorBlue;
UZ: MA(OST,34) + (1.3185*STD(OST,34)),width2,ColorViolet;
LZ: MA(OST,34) - (1.3185*STD(OST,34)),width2,ColorViolet;
FillRgn(1,BullRise,50),Brush#5000FF00;
FillRgn(1,BullFall,50),Brush#50006400;
FillRgn(1,BearRise,50),Brush#508B0000;
FillRgn(1,BearFall,50),Brush#50FF0000;
Post Reply