{DMIA}
ATRA := SMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),6,1);
HD := HIGH-REF(HIGH,1);
LD := REF(LOW,1)-LOW;
DMP:= SMA(IF(HD>0 AND HD>LD,HD,0),6,1);
DMM:= SMA(IF(LD>0 AND LD>HD,LD,0),6,1);
PDI:= DMP*100/ATRA;
MDI:= DMM*100/ATRA;
ADX: SMA(ABS(MDI-PDI)/(MDI+PDI)*100,6,1),LINETHICK2;
漲趨勢:IF((MDI-PDI)/(MDI+PDI)<0,10,DRAWNULL),COLOR8899DD,NODRAW;
跌趨勢:IF((MDI-PDI)/(MDI+PDI)>=0,10,ADX),COLORDD9988,NODRAW;
DRAWBAND(ADX,RGB(100,80,110),10,0);
DRAWBAND(跌趨勢,RGB(200,120,230),漲趨勢,RGB(180,124,204));
對比線:=(ADX+REF(ADX,6))/2;
STICKLINE(CROSS(ADX,30),ADX,30,3,0),COLOR00FFFF,LINETHICK5;
STICKLINE(C>0,80,80,1.5,0),COLORFFFFFF;
STICKLINE(C>0,50,50,1.5,0),COLOR00FFFF;
STICKLINE(C>0,20,20,1.5,0),COLORFF00FF;
WW1:=SMA(((CLOSE-LLV(CLOSE,10))/(HHV(HIGH,10)-LLV(LOW,10))),3,1);
WW2:=SMA(((WW1-LLV(WW1,3))/(HHV(WW1,3)-LLV(WW1,3))),3,1)*100;
ZZ:=SMA(((VOL-LLV(VOL,10))/(HHV(VOL,10)-LLV(VOL,10))),3,1);
ZZ1:=SMA(((ZZ-LLV(ZZ,3))/(HHV(ZZ,3)-LLV(ZZ,3))),3,1)*100;
快線:=EMA(WW2,1),COLORBLUE,LINETHICK2;
慢線:=EMA(快線,2),COLORGREEN,LINETHICK2;
量快:=EMA(ZZ1,1)COLORWHITE,LINETHICK2;
量慢:=EMA(量快,2),COLORWHITE,LINETHICK2;
AA1:=SMA(((CLOSE-LLV(CLOSE,13))/(HHV(HIGH,13)-LLV(LOW,13))),3,1);
價線:=SMA(((AA1-LLV(AA1,4))/(HHV(AA1,4)-LLV(AA1,4))),3,1)*100;
周線:MA(價線,5),COLORMAGENTA,LINETHICK1;
BB1:=SMA(((VOL-LLV(VOL,13))/(HHV(VOL,13)-LLV(VOL,13))),3,1);
量線:SMA(((BB1-LLV(BB1,4))/(HHV(BB1,4)-LLV(BB1,4))),3,1)*100,NODRAW;
周量:MA(量線,5),COLORYELLOW,LINETHICK1;
月線:=MA(價線,22),COLORRED,LINETHICK0;
月量:=MA(量線,22),COLORYELLOW,LINETHICK0;
快線2:=EMA(周線,1),COLORBLUE,LINETHICK2;
慢線2:=EMA(快線2,2),COLORGREEN,LINETHICK2;
量快2:=EMA(周量,1);
量慢2:=EMA(量快2,2),COLORWHITE,LINETHICK2;
DRAWTEXT(FILTER(快線>=95 AND 慢線>=95 AND 周線>=90 OR 周量>=90,5),85,'減');
看色塊→:30,COLORRED;
IF(周線>=REF(周線,1),周線,DRAWNULL),COLORMAGENTA,LINETHICK2;
IF(周線>=REF(周線,1) AND 月線>=REF(月線,1),周線,DRAWNULL),COLORRED,LINETHICK2;
IF(周線<REF(周線,1),周線,DRAWNULL),COLORGREEN,LINETHICK1;
IF(周量>=REF(周量,1),周量,DRAWNULL),COLORYELLOW,LINETHICK2;
IF(周量<REF(周量,1),周量,DRAWNULL),COLORGREEN,LINETHICK1;
IF(CROSS(快線2,慢線2),慢線2,DRAWNULL),COLORRED,LINETHICK3,CIRCLEDOT;
IF(CROSS(慢線2,快線2),快線2,DRAWNULL),COLORGREEN,LINETHICK3,CIRCLEDOT;
IF(CROSS(量快2,量慢2),量慢2,DRAWNULL),COLORRED,LINETHICK2,CIRCLEDOT;
IF(CROSS(量慢2,量快2),量快2,DRAWNULL),COLORLIGREEN,LINETHICK3,CIRCLEDOT;
（南方財富網SOUTHMONEY.COM）