通达信源码：
EME13:=(EMA(EMA(C,13),13)/REF(EMA(EMA(C,13),13),1)-1)*1000;
NOTEXT吸:IF(BACKSET(EME13 0 AND EME13 REF(EME13,1),2),EME13,DRAWNULL),COLORLIRED,LINETHICK3;
NOTEXT拉:IF(BACKSET(EME13 =0 AND EME13 REF(EME13,1),2),EME13,DRAWNULL),COLORRED,LINETHICK3;
NOTEXT派:IF(BACKSET(EME13 =0 AND EME13 =REF(EME13,1),2),EME13,DRAWNULL),COLORGREEN,LINETHICK3;
NOTEXT落:IF(BACKSET(EME13 0 AND EME13 =REF(EME13,1),2),EME13,DRAWNULL),COLORWHITE,LINETHICK3;
大智慧源码：
EME13:=(EMA(EMA(C,13),13)/REF(EMA(EMA(C,13),13),1)-1)*1000;
PARTLINE(EME13,EME13 0 AND EME13 REF(EME13,1),RGB(255,128,192),EME13 =0 AND EME13 REF(EME13,1),RGB(255,0,0),EME13 =0 AND EME13 =REF(EME13,1),RGB(0,255,0),EME13 0 AND EME13 =REF(EME13,1),RGB(255,255,255)),LINETHICK3;
