通达信MA20偏离度主图/副图 跟踪趋势的好指标 源码 附图

{AMA20偏离度源码如下}
EF20:=ABS(C-REF(C,20))/SUM(ABS(C-REF(C,1)),20)*(2/(2+1)-2/(30+1))+2/(30+1);
AMA20:=EMA(DMA(C,EF20*EF20),2);

偏离度:EMA((C-AMA20)/AMA20*100,3);
STICKLINE(C>0,0,0,1,0);


{AMA20主图源码如下}

{AMA 参数:T=1,100,20}
EF20:=ABS(C-REF(C,20))/SUM(ABS(C-REF(C,1)),20)*(2/(2+1)-2/(30+1))+2/(30+1);
KAMA:=EMA(DMA(C,EF20*EF20),2);


{红K}
STICKLINE(C>=KAMA AND C>O,O,C,-1,1),COLOR0000DD; {红色空心柱}
STICKLINE(C>=KAMA AND C>O,H,C,0,0),COLOR0000DD;
STICKLINE(C>=KAMA AND C>O,O,L,0,0),COLOR0000DD;
STICKLINE(C>=KAMA AND C<=O,O,C,-1,0),COLOR0000DD;{红色实心柱}
STICKLINE(C>=KAMA AND C<=O,H,O,0,0),COLOR0000DD;
STICKLINE(C>=KAMA AND C<=O,C,L,0,0),COLOR0000DD;
{蓝K}
STICKLINE(C<KAMA AND C>O,O,C,-1,1),COLORFFBB00; {蓝色空心柱}
STICKLINE(C<KAMA AND C>O,H,C,0,0),COLORFFBB00;
STICKLINE(C<KAMA AND C>O,O,L,0,0),COLORFFBB00;
STICKLINE(C<KAMA AND C<=O,O,C,-1,0),COLORFFBB00;{蓝色实心柱}
STICKLINE(C<KAMA AND C<=O,H,O,0,0),COLORFFBB00;
STICKLINE(C<KAMA AND C<=O,C,L,0,0),COLORFFBB00;

AMA20:KAMA,COLORFFAA00;
UP:IF(AMA20>REF(AMA20,1),AMA20,DRAWNULL),COLORRED,LINETHICK1;

{---------------------------------------------------}

{ATR止盈}
MTR:=MAX(MAX((HIGH-LOW),ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW));
ATR:=SMA(MTR,20,1);
NH20:HHV(H,20),NODRAW;
止盈位:NH20-2*ATR,NODRAW;
{STICKLINE(ISLASTBAR,止盈位,止盈位,20,1),COLORWHITE;
DRAWTEXT(ISLASTBAR,止盈位*1.03,'止盈');}

{在20日最高价处出标注数字、画红点}
TB:=HHV(H,20);
TBT:=HHVBARS(H,20);
T60:=BARSLAST(CURRBARSCOUNT=CONST(TBT)+1);
HH20:DRAWLINE(T60=0,HIGH,ISLASTBAR,REF(HIGH,TBT),0),DOTLINE,COLORYELLOW;{水平线}
{DRAWLINE(T60=0,H,T60=4,REF(H,4),0),COLORGREEN;}{短水平线}
DRAWNUMBER(T60=0,H,H),COLORYELLOW,DRAWABOVE;
●:IF(T60=0,H,DRAWNULL),POINTDOT,COLORRED,LINETHICK4;{红点};


{ATR跟踪止损}
{MTR:=MAX(MAX((HIGH-LOW),ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW));}
MTR1:=MAX(MAX((HIGH-LOW),ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW))/REF(C,1)*100;
日振幅:=ABS(H-L)/REF(C,1)*100,NODRAW;
{日涨幅:(C-REF(C,1))/REF(C,1)*100,NODRAW;}
ATR20:SMA(MTR,20,1),NODRAW;
ATR20幅度:=SMA(MTR1,20,1),NODRAW;
AMA20乖离:(O-AMA20)/AMA20*100,NODRAW;

{均线抵扣}
MA5抵扣:REF(CLOSE,5),COLORFFFF00,NODRAW;
MA20抵扣:REF(CLOSE,20),COLORFFBB00,NODRAW;

{效率系数}
{DIR:=ABS(CLOSE-REF(CLOSE,20));
VIR:=SUM(ABS(CLOSE-REF(CLOSE,1)),20);
效率系数:SUM(ABS(DIR/VIR),1),NODRAW;}

{垂直线}
K5:=FILTER(BACKSET(MA(CLOSE,5) AND ISLASTBAR,5),5);
K20:=FILTER(BACKSET(MA(CLOSE,20) AND ISLASTBAR,20),20);
STICKLINE(K5=1,H+(H-L),L-(H-L),0,-1),COLORYELLOW;
STICKLINE(K20=1,H+1.5*(H-L),L-1.2*(H-L),0,-1),COLORYELLOW;

原理解析：
{AMA20偏离度源码如下}EF20赋值:C-20日前的C的绝对值/SUM(ABS(C-1日前的C),20)*(2/(2+1)-2/(30+1))+2/(30+1)
AMA20赋值:EDC的EF20*EF20日简单移动平均,2)
输出偏离度:EMA((C-AMA20)/AMA20*100,3)
当满足条件C>0时,在0和0之间画柱状线
{AMA20主图源码如下}{AMA 参数:T=1,100,20}EF20:=C-20日前的C的绝对值/SUM(ABS(C-1日前的C),20)*(2/(2+1)-2/(30+1))+2/(30+1)
KAMA赋值:EDC的EF20*EF20日简单移动平均,2)
当满足条件C>=KAMA AND C>O时,在O和C之间画柱状线
当满足条件C>=KAMA AND C>O时,在H和C之间画柱状线
当满足条件C>=KAMA AND C>O时,在O和L之间画柱状线
当满足条件C>=KAMA AND C<=O时,在O和C之间画柱状线
当满足条件C>=KAMA AND C<=O时,在H和O之间画柱状线
当满足条件C>=KAMA AND C<=O时,在C和L之间画柱状线
当满足条件CO时,在O和C之间画柱状线
当满足条件CO时,在H和C之间画柱状线
当满足条件CO时,在O和L之间画柱状线
当满足条件C当满足条件C当满足条件C输出AMA20:KAMA,COLORFFAA00
输出UP:IF(AMA20>1日前的AMA20,AMA20,DRAWNULL),画红色,LINETHICK1
{---------------------------------------------------}{ATR止盈}MTR赋值:MAX(MAX((最高价-最低价),1日前的收盘价-最高价的绝对值),ABS(1日前的收盘价-最低价))
MTR的20日[1日权重]移动平均
输出NH20:20日内H最高值,NODRAW
输出止盈位:NH20-2*ATR,NODRAW
当满足条件ISLASTBAR时,在止盈位和止盈位之间画柱状线
当满足条件ISLASTBAR时,在止盈位*1.03和'止盈'位置书写文字
}{在20日最高价处出标注数字、画红点}TB赋值:20日内H最高值
TBT赋值:HHVBARS(H,20)
T60赋值:上次 到最后交易的周期=CONST(TBT距今天数+1)
输出HH20:DRAWLINE(T60=0,最高价,ISLASTBAR,TBT日前的最高价,0),DOTLINE,画黄色
{水平线}{DRAWLINE(T60=0,H,T60=4,4日前的H,0),画绿色
}{短水平线}DRAWNUMBER(T60=0,H,H),画黄色,DRAWABOVE
如果T60=0返回H否则返回DRAWNULL
{红点}
{ATR跟踪止损}{MTR:=MAX(MAX((最高价-最低价),1日前的收盘价-最高价的绝对值),ABS(1日前的收盘价-最低价))
}MTR1赋值:MAX(MAX((最高价-最低价),1日前的收盘价-最高价的绝对值),ABS(1日前的收盘价-最低价))/1日前的C*100
日振幅赋值:H-L的绝对值/1日前的C*100,NODRAW
输出{日涨幅:(C-1日前的C)/1日前的C*100,NODRAW
MTR的20日[1日权重]移动平均
MTR1的20日[1日权重]移动平均
AMA20乖离:(O-AMA20)/AMA20*100,NODRAW
输出{均线抵扣}MA5抵扣:5日前的收盘价,COLORFFFF00,NODRAW
输出MA20抵扣:20日前的收盘价,COLORFFBB00,NODRAW
{效率系数}{DIR赋值:收盘价-20日前的收盘价的绝对值
VIR赋值:SUM(收盘价-1日前的收盘价的绝对值,20)
输出效率系数:SUM(DIR/VIR的绝对值,1),NODRAW
}{垂直线}K5赋值:FILTER(BACKSET(收盘价的5日简单移动平均 AND ISLASTBAR,5),5)
K20赋值:FILTER(BACKSET(收盘价的20日简单移动平均 AND ISLASTBAR,20),20)
STICKLINE(K5=1,H+(H-L),L-(H-L),0,-1),画黄色
STICKLINE(K20=1,H+1.5*(H-L),L-1.2*(H-L),0,-1),画黄色