Rank: Advanced Member
Groups: Registered, Registered Users, Subscribers Joined: 10/29/2004(UTC) Posts: 1,394 Location: Glastonbury, CT
Was thanked: 2 time(s) in 2 post(s)
|
{you will need the PowerPivots + Add-on for the exact formula to work}
click on the expert advisor
click new
you will now see a screen for the name
name it Chaos BL MTF2
you also have a space to write a note about the system
click on the trends tab
in the bullish box
factor:=2;
offset:=0;
HD:=ExtFml("PowerPivots.TDataCreate",1, factor);
LD:=ExtFml("PowerPivots.TDataCreate",2, factor);
A3:=
{Alligator Blue Balance Line - Jaw}
{13 bar smoothed average offset 8 bars}
Ref(Wilders((HD+LD)/2,13),-8);
A2:=
{Alligator Red Balance Line - Teeth}
{8 bar smoothed average offset 5 bars}
Ref(Wilders((HD+LD)/2,8),-5);
A1:=
{Alligator Green Balance Line - Lip}
{5 bar smoothed average offset 3 bars}
Ref(Wilders((HD+LD)/2,5),-3);
UCloud:=Max(A1,Max(A2,A3));
LCloud:=Min(A1,Min(A2,A3));
UCloud:=ExtFml("PowerPivots.TDataLocalize", UCloud, factor, offset);
A3:=ExtFml("PowerPivots.TDataLocalize", A3, factor, offset);
A2:=ExtFml("PowerPivots.TDataLocalize", A2, factor, offset);
A1:=ExtFml("PowerPivots.TDataLocalize", A1, factor, offset);
LCloud:=ExtFml("PowerPivots.TDataLocalize", LCloud, factor, offset);
Z:=If(C>Ucloud,1,If(C<LCloud,-1,0));
Z=1
in the bearish box
factor:=2;
offset:=0;
HD:=ExtFml("PowerPivots.TDataCreate",1, factor);
LD:=ExtFml("PowerPivots.TDataCreate",2, factor);
A3:=
{Alligator Blue Balance Line - Jaw}
{13 bar smoothed average offset 8 bars}
Ref(Wilders((HD+LD)/2,13),-8);
A2:=
{Alligator Red Balance Line - Teeth}
{8 bar smoothed average offset 5 bars}
Ref(Wilders((HD+LD)/2,8),-5);
A1:=
{Alligator Green Balance Line - Lip}
{5 bar smoothed average offset 3 bars}
Ref(Wilders((HD+LD)/2,5),-3);
UCloud:=Max(A1,Max(A2,A3));
LCloud:=Min(A1,Min(A2,A3));
UCloud:=ExtFml("PowerPivots.TDataLocalize", UCloud, factor, offset);
A3:=ExtFml("PowerPivots.TDataLocalize", A3, factor, offset);
A2:=ExtFml("PowerPivots.TDataLocalize", A2, factor, offset);
A1:=ExtFml("PowerPivots.TDataLocalize", A1, factor, offset);
LCloud:=ExtFml("PowerPivots.TDataLocalize", LCloud, factor, offset);
Z:=If(C>Ucloud,1,If(C<LCloud,-1,0));
Z=-1
click ok
click on the highlights tab
click new
name it long
factor:=2;
offset:=0;
HD:=ExtFml("PowerPivots.TDataCreate",1, factor);
LD:=ExtFml("PowerPivots.TDataCreate",2, factor);
A3:=
{Alligator Blue Balance Line - Jaw}
{13 bar smoothed average offset 8 bars}
Ref(Wilders((HD+LD)/2,13),-8);
A2:=
{Alligator Red Balance Line - Teeth}
{8 bar smoothed average offset 5 bars}
Ref(Wilders((HD+LD)/2,8),-5);
A1:=
{Alligator Green Balance Line - Lip}
{5 bar smoothed average offset 3 bars}
Ref(Wilders((HD+LD)/2,5),-3);
UCloud:=Max(A1,Max(A2,A3));
LCloud:=Min(A1,Min(A2,A3));
UCloud:=ExtFml("PowerPivots.TDataLocalize", UCloud, factor, offset);
A3:=ExtFml("PowerPivots.TDataLocalize", A3, factor, offset);
A2:=ExtFml("PowerPivots.TDataLocalize", A2, factor, offset);
A1:=ExtFml("PowerPivots.TDataLocalize", A1, factor, offset);
LCloud:=ExtFml("PowerPivots.TDataLocalize", LCloud, factor, offset);
Z:=If(C>Ucloud,1,If(C<LCloud,-1,0));
Z=1
color it green
click ok
click new
name it short
factor:=2;
offset:=0;
HD:=ExtFml("PowerPivots.TDataCreate",1, factor);
LD:=ExtFml("PowerPivots.TDataCreate",2, factor);
A3:=
{Alligator Blue Balance Line - Jaw}
{13 bar smoothed average offset 8 bars}
Ref(Wilders((HD+LD)/2,13),-8);
A2:=
{Alligator Red Balance Line - Teeth}
{8 bar smoothed average offset 5 bars}
Ref(Wilders((HD+LD)/2,8),-5);
A1:=
{Alligator Green Balance Line - Lip}
{5 bar smoothed average offset 3 bars}
Ref(Wilders((HD+LD)/2,5),-3);
UCloud:=Max(A1,Max(A2,A3));
LCloud:=Min(A1,Min(A2,A3));
UCloud:=ExtFml("PowerPivots.TDataLocalize", UCloud, factor, offset);
A3:=ExtFml("PowerPivots.TDataLocalize", A3, factor, offset);
A2:=ExtFml("PowerPivots.TDataLocalize", A2, factor, offset);
A1:=ExtFml("PowerPivots.TDataLocalize", A1, factor, offset);
LCloud:=ExtFml("PowerPivots.TDataLocalize", LCloud, factor, offset);
Z:=If(C>Ucloud,1,If(C<LCloud,-1,0));
Z=-1
color it red
click ok
click new
name it out
factor:=2;
offset:=0;
HD:=ExtFml("PowerPivots.TDataCreate",1, factor);
LD:=ExtFml("PowerPivots.TDataCreate",2, factor);
A3:=
{Alligator Blue Balance Line - Jaw}
{13 bar smoothed average offset 8 bars}
Ref(Wilders((HD+LD)/2,13),-8);
A2:=
{Alligator Red Balance Line - Teeth}
{8 bar smoothed average offset 5 bars}
Ref(Wilders((HD+LD)/2,8),-5);
A1:=
{Alligator Green Balance Line - Lip}
{5 bar smoothed average offset 3 bars}
Ref(Wilders((HD+LD)/2,5),-3);
UCloud:=Max(A1,Max(A2,A3));
LCloud:=Min(A1,Min(A2,A3));
UCloud:=ExtFml("PowerPivots.TDataLocalize", UCloud, factor, offset);
A3:=ExtFml("PowerPivots.TDataLocalize", A3, factor, offset);
A2:=ExtFml("PowerPivots.TDataLocalize", A2, factor, offset);
A1:=ExtFml("PowerPivots.TDataLocalize", A1, factor, offset);
LCloud:=ExtFml("PowerPivots.TDataLocalize", LCloud, factor, offset);
Z:=If(C>Ucloud,1,If(C<LCloud,-1,0));
Z=0
color it blue
click ok
click on the symbol tab
click new
name it long entry
factor:=2;
offset:=0;
HD:=ExtFml("PowerPivots.TDataCreate",1, factor);
LD:=ExtFml("PowerPivots.TDataCreate",2, factor);
A3:=
{Alligator Blue Balance Line - Jaw}
{13 bar smoothed average offset 8 bars}
Ref(Wilders((HD+LD)/2,13),-8);
A2:=
{Alligator Red Balance Line - Teeth}
{8 bar smoothed average offset 5 bars}
Ref(Wilders((HD+LD)/2,8),-5);
A1:=
{Alligator Green Balance Line - Lip}
{5 bar smoothed average offset 3 bars}
Ref(Wilders((HD+LD)/2,5),-3);
UCloud:=Max(A1,Max(A2,A3));
LCloud:=Min(A1,Min(A2,A3));
UCloud:=ExtFml("PowerPivots.TDataLocalize", UCloud, factor, offset);
A3:=ExtFml("PowerPivots.TDataLocalize", A3, factor, offset);
A2:=ExtFml("PowerPivots.TDataLocalize", A2, factor, offset);
A1:=ExtFml("PowerPivots.TDataLocalize", A1, factor, offset);
LCloud:=ExtFml("PowerPivots.TDataLocalize", LCloud, factor, offset);
Z:=If(C>Ucloud,1,If(C<LCloud,-1,0));
Z=1 and ref(Z,-1)<1
in the graphic tab select an arrow pointing up and color green
click ok
click new
name it short entry
factor:=2;
offset:=0;
HD:=ExtFml("PowerPivots.TDataCreate",1, factor);
LD:=ExtFml("PowerPivots.TDataCreate",2, factor);
A3:=
{Alligator Blue Balance Line - Jaw}
{13 bar smoothed average offset 8 bars}
Ref(Wilders((HD+LD)/2,13),-8);
A2:=
{Alligator Red Balance Line - Teeth}
{8 bar smoothed average offset 5 bars}
Ref(Wilders((HD+LD)/2,8),-5);
A1:=
{Alligator Green Balance Line - Lip}
{5 bar smoothed average offset 3 bars}
Ref(Wilders((HD+LD)/2,5),-3);
UCloud:=Max(A1,Max(A2,A3));
LCloud:=Min(A1,Min(A2,A3));
UCloud:=ExtFml("PowerPivots.TDataLocalize", UCloud, factor, offset);
A3:=ExtFml("PowerPivots.TDataLocalize", A3, factor, offset);
A2:=ExtFml("PowerPivots.TDataLocalize", A2, factor, offset);
A1:=ExtFml("PowerPivots.TDataLocalize", A1, factor, offset);
LCloud:=ExtFml("PowerPivots.TDataLocalize", LCloud, factor, offset);
Z:=If(C>Ucloud,1,If(C<LCloud,-1,0));
Z=-1 and ref(Z,-1)>-1
click the graphic tab
select a pointing down arrow and color it red
click ok
click new
name it long exit
factor:=2;
offset:=0;
HD:=ExtFml("PowerPivots.TDataCreate",1, factor);
LD:=ExtFml("PowerPivots.TDataCreate",2, factor);
A3:=
{Alligator Blue Balance Line - Jaw}
{13 bar smoothed average offset 8 bars}
Ref(Wilders((HD+LD)/2,13),-8);
A2:=
{Alligator Red Balance Line - Teeth}
{8 bar smoothed average offset 5 bars}
Ref(Wilders((HD+LD)/2,8),-5);
A1:=
{Alligator Green Balance Line - Lip}
{5 bar smoothed average offset 3 bars}
Ref(Wilders((HD+LD)/2,5),-3);
UCloud:=Max(A1,Max(A2,A3));
LCloud:=Min(A1,Min(A2,A3));
UCloud:=ExtFml("PowerPivots.TDataLocalize", UCloud, factor, offset);
A3:=ExtFml("PowerPivots.TDataLocalize", A3, factor, offset);
A2:=ExtFml("PowerPivots.TDataLocalize", A2, factor, offset);
A1:=ExtFml("PowerPivots.TDataLocalize", A1, factor, offset);
LCloud:=ExtFml("PowerPivots.TDataLocalize", LCloud, factor, offset);
Z:=If(C>Ucloud,1,If(C<LCloud,-1,0));
Z=0 and Ref(Z,-1)=1
click the graphic tab
select a stop sign and color it blue
click ok
click new
name it short exit
factor:=2;
offset:=0;
HD:=ExtFml("PowerPivots.TDataCreate",1, factor);
LD:=ExtFml("PowerPivots.TDataCreate",2, factor);
A3:=
{Alligator Blue Balance Line - Jaw}
{13 bar smoothed average offset 8 bars}
Ref(Wilders((HD+LD)/2,13),-8);
A2:=
{Alligator Red Balance Line - Teeth}
{8 bar smoothed average offset 5 bars}
Ref(Wilders((HD+LD)/2,8),-5);
A1:=
{Alligator Green Balance Line - Lip}
{5 bar smoothed average offset 3 bars}
Ref(Wilders((HD+LD)/2,5),-3);
UCloud:=Max(A1,Max(A2,A3));
LCloud:=Min(A1,Min(A2,A3));
UCloud:=ExtFml("PowerPivots.TDataLocalize", UCloud, factor, offset);
A3:=ExtFml("PowerPivots.TDataLocalize", A3, factor, offset);
A2:=ExtFml("PowerPivots.TDataLocalize", A2, factor, offset);
A1:=ExtFml("PowerPivots.TDataLocalize", A1, factor, offset);
LCloud:=ExtFml("PowerPivots.TDataLocalize", LCloud, factor, offset);
Z:=If(C>Ucloud,1,If(C<LCloud,-1,0));
Z=0 and Ref(Z,-1)=-1
Click the graphic tab sselect a stop sign and color it blue
click ok
for those that want alerts just repeat the the instructions for the symbols but under the alert tab
click ok and attach it to a chart
|