通达信平均价格主图选股指标公式源码

通达信平均价格主图选股指标公式源码

源码正文：

A:=(3*C+H+L+O)/6{XG51};
XJ:=(A+0.618*REF(A,1)+0.382*REF(A,2)+0.236*REF(A,3)+0.146*REF(A,4))/2.382{XG51};
YCZXH:=(ma(HHV(A,2),5)+MA(HHV(A,2),13)+MA(HHV(A,2),21)+MA(HHV(A,2),32))/4{XG51};
YCZXL:=(MA(LLV(A,2),5)+MA(LLV(A,2),13)+MA(LLV(A,2),21)+MA(LLV(A,2),32))/4{XG51};
SMH:ema(YCZXH,21),COLOR004000{XG51};
SML:EMA(YCZXL,21),COLOR004000{XG51};
SMJ:(SML+SMH)/2,COLOR004000{XG51};
PJ:=(10*A+9*REF(A,1)+8*REF(A,2)+7*REF(A,3)+6*REF(A,4)+5*REF(A,5)+4*REF(A,6)+3*REF(A,7)+2*REF(A,8)+REF(A,9))/55{XG51};
A1:=EMA(PJ,3),COLOR004000;A2:=EMA(PJ,5),COLOR004000{XG51};
A3:=EMA(PJ,7),COLOR004000;A4:=EMA(PJ,9),COLOR004000{XG51};
A5:=EMA(PJ,11),COLOR004000{XG51};
LX:=REF(XJ,1){XG51};
ZD:=(SMA(MAX(XJ-LX,0),5,1)/SMA(Abs(XJ-LX),5,1))*100{XG51};
KX1:=(CLOSE>=OPEN) AND ZD>=50{XG51};
KX2:=(CLOSE<OPEN) AND ZD>=50{XG51};
KX3:=(CLOSE>=OPEN) AND ZD<50{XG51};
KX4:=(CLOSE<OPEN) AND ZD<50{XG51};
IF(A5<REF(A5,1),A5,DRAWNULL),COLOR820000,LINETHICK2{XG51};
IF(A5>REF(A5,1),A5,DRAWNULL),COLOR00005B,LINETHICK2{XG51};
IF(A4<REF(A4,1),A4,DRAWNULL),COLOR8C0000,LINETHICK1{XG51};
IF(A4>REF(A4,1),A4,DRAWNULL),COLOR000055,LINETHICK1{XG51};
IF(A3<REF(A3,1),A3,DRAWNULL),COLOR9B0000,LINETHICK1{XG51};
IF(A3>REF(A3,1),A3,DRAWNULL),COLOR00006C,LINETHICK1{XG51};
IF(A2<REF(A2,1),A2,DRAWNULL),COLORBB0000,LINETHICK1{XG51};
IF(A2>REF(A2,1),A2,DRAWNULL),COLOR00007D,LINETHICK1{XG51};
IF(A1<REF(A1,1),A1,DRAWNULL),COLORCC0000,LINETHICK1{XG51};
IF(A1>REF(A1,1),A1,DRAWNULL),COLOR00009B,LINETHICK1{XG51};
stICKLINE(KX1,C,O,4,1),COLOR4440FF{XG51};
STICKLINE(KX1,C,H,0.5,1),COLOR4440FF{XG51};
STICKLINE(KX1,O,L,0.5,1),COLOR4440FF{XG51};
STICKLINE(KX2,C,O,4,0),COLOR4440FF{XG51};
STICKLINE(KX2,O,H,0.5,0),COLOR4440FF{XG51};
STICKLINE(KX2,C,L,0.5,0),COLOR4440FF{XG51};
STICKLINE(KX3,C,O,4,1),COLORFFFF33{XG51};
STICKLINE(KX3,C,H,0.5,1),COLORFFFF33{XG51};
STICKLINE(KX3,O,L,0.5,1),COLORFFFF33{XG51};
STICKLINE(KX4,C,O,4,0),COLORFFFF33{XG51};
STICKLINE(KX4,O,H,0.5,0),COLORFFFF33{XG51};
STICKLINE(KX4,C,L,0.5,0),COLORFFFF33;

{X+G_5_1+C+N+{}