重心趋势 靓丽的副图通达信指标 副图 源码附图

A1:=(CLOSE*2+HIGH+LOW)/4;

A2:=EMA(A1,13)-EMA(A1,34);

A3:=EMA(A2,5);

重心: 2*(A2-A3)*3.8,COLORSTICK;

J:=重心;

STICKLINE(J>REF(J,1),HHV(J,3),LLV(J,3),0,0),COLOR000088;

STICKLINE(J>REF(J,1),J,REF(J,1),3,0),COLOR0000AA;

STICKLINE(J>REF(J,1),J,REF(J,1),1.5,0),COLOR0000CC;

STICKLINE(J>REF(J,1),J,REF(J,1),0,0),COLOR0000EE;

STICKLINE(J< REF(J,1),HHV(J,3),LLV(J,3),0,0),COLORFFAA00;

STICKLINE(J< REF(J,1),J,REF(J,1),3,0),COLORFF4400;

STICKLINE(J< REF(J,1),J,REF(J,1),1.5,0),COLORFF8800;

STICKLINE(J< REF(J,1),J,REF(J,1),0,0),COLORFFAA00;

DIF:=EMA(CLOSE,12) - EMA(CLOSE,26);

DEA:=EMA(DIF,9);

MACD:=2*(DIF-DEA);

DRAWTEXT(DIF>DEA,-0.2,'★'),COLOR00FFFF;

PEG:(C/FINANCE(33))/(FINANCE(21)/FINANCE(20)+0.038)/100,NODRAW;

RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;

K:=SMA(RSV,3,1);

D:=SMA(K,3,1);

J1:=3*K-2*D;

DRAWTEXT(J1>D,-0.3,'★'),COLORRED;

TYP:=(HIGH + LOW + CLOSE)/3;

CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));

卖:= CROSS(100,CCI);

买:= CROSS(CCI,-100);

买2:=CROSS(CCI,100);

DRAWICON(卖,J+0.1,8),NODRAW;

DRAWICON(买,J-0.1,9);

DRAWICON(买2,J+0.1,10),NODRAW;

LC:=REF(CLOSE,1);

RSI2:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;

R6:=(SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100),COLORRED,LINETHICK2;

IF( R6>50 AND R6< 100,0,DRAWNULL),COLORYELLOW,LINETHICK5,NODRAW;

MR持股:= K>D AND K>REF(K,1) AND DIF>DEA AND DIF>REF(DIF,1)AND R6>50 AND R6>REF(R6,1) AND C>BBI AND BBI>REF(BBI,1);

IF(MR持股,J/3,DRAWNULL),COLORFFFF00,LINETHICK8;

MTR:=EXPMEMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),14);

HD :=HIGH-REF(HIGH,1);

LD :=REF(LOW,1)-LOW;

DMP:=EXPMEMA(IF(HD>0&&HD>LD,HD,0),14);

DMM:=EXPMEMA(IF(LD>0&&LD>HD,LD,0),14);

PDI:=DMP*100/MTR,LINETHICK3,NODRAW;

MDI:=DMM*100/MTR,LINETHICK3,NODRAW;

ADX:=EXPMEMA(ABS(MDI-PDI)/(MDI+PDI)*100,6),NODRAW;

ADXR:=EXPMEMA(ADX,6),NODRAW;

IF(ADX>=ADXR,0,DRAWNULL),COLORMAGENTA,LINETHICK6,NODRAW;

IF(PDI>=MDI,0,DRAWNULL)COLORRED,CIRCLEDOT,LINETHICK2;

最新价:C,NODRAW;

市盈率:=IF(FINANCE(33)>0,DYNAINFO(39),0)*0.35;

每股收益:=IF(FINANCE(33)>0.01,FINANCE(33)*0.65,0);

参考定价:每股收益*市盈率*4,NODRAW;

负100买点:K>D AND K>REF(K,1) AND DIF>DEA AND DIF>REF(DIF,1)AND R6>50 AND R6>REF(R6,1)AND 买 AND 重心>REF(重心,1),COLORYELLOW,LINETHICK2;

M交叉临界:351/28*(EMA(DIF,9)-11/13*EMA(C,12)+25/27*EMA(C,26)),COLORLIBLUE,NODRAW;

K交叉点:(3*REF(D,1)-2*REF(K,1))/100*(HHV(H,9)-LLV(L,9))+LLV(L,9)COLORYELLOW,NODRAW;

长线持股:=K>D AND DIF>DEA AND R6>50 AND C>BBI ,COLORMAGENTA,DOTLINE;

IF(长线持股,J/2,DRAWNULL)COLORMAGENTA,LINETHICK5;

 

原理解析：
A1赋值:(收盘价*2+最高价+最低价)/4
A2赋值:A1的13日指数移动平均-A1的34日指数移动平均
A3赋值:A2的5日指数移动平均
输出重心: 2*(A2-A3)*3.8,COLORSTICK
J赋值:重心
STICKLINE(J>1日前的J,3日内J最高值,3日内J最低值,0,0),COLOR000088
STICKLINE(J>1日前的J,J,1日前的J,3,0),COLOR0000AA
STICKLINE(J>1日前的J,J,1日前的J,1.5,0),COLOR0000CC
STICKLINE(J>1日前的J,J,1日前的J,0,0),COLOR0000EE
STICKLINE(J< 1日前的J,3日内J最高值,3日内J最低值,0,0),COLORFFAA00
STICKLINE(J< 1日前的J,J,1日前的J,3,0),COLORFF4400
STICKLINE(J< 1日前的J,J,1日前的J,1.5,0),COLORFF8800
STICKLINE(J< 1日前的J,J,1日前的J,0,0),COLORFFAA00
DIF赋值:收盘价的12日指数移动平均 - 收盘价的26日指数移动平均
DEA赋值:DIF的9日指数移动平均
MACD赋值:2*(DIF-DEA)
当满足条件DIF>DEA时,在-0.2和'★'位置书写文字
输出PEG:(C/FINANCE(33))/(FINANCE(21)/FINANCE(20)+0.038)/100,NODRAW
RSV赋值:(收盘价-9日内最低价最低值)/(9日内最高价最高值-9日内最低价最低值)*100
RSV的3日[1日权重]移动平均
K的3日[1日权重]移动平均
J1:=3*K-2*D
当满足条件J1>D时,在-0.3和'★'位置书写文字
TYP赋值:(最高价 + 最低价 + 收盘价)/3
CCI赋值:(TYP-TYP的14日简单移动平均)/(0.015*AVEDEV(TYP,14))
卖赋值: 100上穿CCI
买赋值: CCI上穿-100
买2:=CCI上穿100
当满足条件卖时,在J+0.1和8之间画图标
当满足条件买时,在J-0.1和9之间画图标
当满足条件买2时,在J+0.1和10之间画图标
LC赋值:1日前的收盘价
RSI2赋值:SMA(收盘价-LC和0较大值,6,1)/SMA(收盘价-LC的绝对值,6,1)*100
R6赋值:(SMA(收盘价-LC和0较大值,6,1)/SMA(收盘价-LC的绝对值,6,1)*100),COLORRED,LINETHICK2
如果 R6>50 AND R6< 100返回0否则返回DRAWNULL
MR持股赋值: K>D AND K>1日前的K AND DIF>DEA AND DIF>1日前的DIFAND R6>50 AND R6>1日前的R6 AND C>BBI AND BBI>1日前的BBI
如果MR持股返回J/3否则返回DRAWNULL
MTR赋值:EXPMEMA(MAX(MAX(最高价-最低价,最高价-1日前的收盘价的绝对值),ABS(1日前的收盘价-最低价)),14)
HD :=最高价-1日前的最高价
LD :=1日前的最低价-最低价
如果HD>0&&HD>LD返回HD否则返回0
如果LD>0&&LD>HD返回LD否则返回0
PDI:=DMP*100/MTR,LINETHICK3,NODRAW
MDI:=DMM*100/MTR,LINETHICK3,NODRAW
ADX:=EXPMEMA(MDI-PDI的绝对值/(MDI+PDI)*100,6),NODRAW
ADXR:=EXPADX的6日平滑移动平均,NODRAW
如果ADX>=ADXR返回0否则返回DRAWNULL
如果PDI>=MDI返回0否则返回DRAWNULL
输出最新价:C,NODRAW
市盈率赋值:IF(FINANCE(33)>0,DYNAINFO(39),0)*0.35
每股收益赋值:IF(FINANCE(33)>0.01,FINANCE(33)*0.65,0)
输出参考定价:每股收益*市盈率*4,NODRAW
负100买点:K>D AND K>1日前的K AND DIF>DEA AND DIF>1日前的DIFAND R6>50 AND R6>1日前的R6AND 买 AND 重心>1日前的重心,画黄色,LINETHICK2
输出M交叉临界:351/28*(DIF的9日指数移动平均-11/13*C的12日指数移动平均+25/27*C的26日指数移动平均),COLORLIBLUE,NODRAW
K交叉点:(3*1日前的D-2*1日前的K)/100*(9日内H最高值-9日内L最低值)+9日内L最低值画黄色,NODRAW
长线持股赋值:K>D AND DIF>DEA AND R6>50 AND C>BBI ,画洋红色,DOTLINE
如果长线持股返回J/2否则返回DRAWNULL