This indicator was done for a friend of mine (Waldir)
It works but I am sure someone here can improve on it. (I am sharing it anyway)
Waldir1:=LastValue(((Typical()-((2*Typical())+H-L))*-1));
Waldir2:=LastValue( ((2*Typical())-L));
Waldir3:=LastValue(Typical());
Waldir4:= LastValue(((2*Typical())-H));
Waldir5:= LastValue(((Typical()-((2*Typical())-H+L))*-1));
ValueWhen(1,Cum(1)=LastValue(Cum(1)),Waldir1);
ValueWhen(1,Cum(1)=LastValue(Cum(1)),Waldir2);
ValueWhen(1,Cum(1)=LastValue(Cum(1)),Waldir3);
ValueWhen(1,Cum(1)=LastValue(Cum(1)),Waldir4);
ValueWhen(1,Cum(1)=LastValue(Cum(1)),Waldir5);

Bulli