EdgeTalk

Here is another system

A:=PDM(High,Low,10) > MDM(High,Low,10);
A1:=PDM(High,Low,50) > MDM(High,Low,50);
Long:= A1 ==1 & A ==1;
Short:= A1 ==0 & A ==0;
Sys:Long - Short, Colorstick;

Here are the events for this system

Long

A:=PDM(High,Low,10) > MDM(High,Low,10);
A1:=PDM(High,Low,50) > MDM(High,Low,50);
Long:= A1 ==1 & A ==1;
Short:= A1 ==0 & A ==0;
Sys:=Long - Short, Colorstick;
Event:Cross(Sys,.5);

Short

A:=PDM(High,Low,10) > MDM(High,Low,10);
A1:=PDM(High,Low,50) > MDM(High,Low,50);
Long:= A1 ==1 & A ==1;
Short:= A1 ==0 & A ==0;
Sys:=Long - Short, Colorstick;
Event:Cross(-.5,Sys);