WW1:=EMA(C/REF(LLV(L,5),3),9);
WW2:=LLV(WW1,3);
EE1:=EMA(C/REF(HHV(H,5),3),9);
EE2:=HHV(EE1,3);
BW1:=EMA(c/REF(LLV(c,5),3),9);
BW2:=LLV(BW1,3);
BE1:=EMA(c/REF(HHV(c,5),3),9);
BE2:=HHV(BE1,3);
partline(WW1,WW1>WW2,rgb(250,0,0),WW2=WW1,rgb(0,250,0)),linethick3;
partline(EE1,EE2>EE1,rgb(0,250,0),EE1=EE2,rgb(250,0,0)),linethick3;
partline(BW1,BW1>BW2,rgb(250,0,0),BW2=BW1,rgb(0,250,0)),linethick3;
partline(BE1,BE2>BE1,rgb(0,250,0),BE1=BE2,rgb(250,0,0)),linethick3;
DRAWICON(WW1>WW2 AND BARSTATUS=2 ,WW1,7),ALIGN1;
DRAWICON(WW1=WW2 AND BARSTATUS=2 ,WW1,8),ALIGN1;
DRAWICON(EE2>EE1 AND BARSTATUS=2 ,EE1,8),ALIGN1;
DRAWICON(EE1=EE2 AND BARSTATUS=2 ,EE1,7),ALIGN1;
DRAWICON(BW1>BW2 AND BARSTATUS=2 ,BW1,7),ALIGN1;
DRAWICON(BW1=BW2 AND BARSTATUS=2 ,BW1,8),ALIGN1;
DRAWICON(BE2>BE1 AND BARSTATUS=2 ,BE1,8),ALIGN1;
DRAWICON(BE1=BE2 AND BARSTATUS=2 ,BE1,7),ALIGN1; |
