通达信子午多周期共振指标公式源码副图[万物公式]

-13;

50;

60;

{1日cci}

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

CCI日:=(P-MA(P,14))*100/(1.5*AVEDEV(P,14)),COLORWHITE,LINETHICK1;

CCI3日均:=MA(CCI日,3),COLOREF03CC,LINETHICK1;

DRAWICON(CCI3日均>=REF(CCI3日均,1),50,38);

DRAWICON(CCI3日均

DRAWTEXT(CURRBARSCOUNT=1,49, CCI3日均 ),COLORFF00FF;

{1日wr}

WR:100-100*(HHV(HIGH,5*8)-CLOSE)/(HHV(HIGH,5*8)-LLV(LOW,5*8)),COLORFFFFFF,NODRAW;

WR2日:=EMA(WR,5),COLORF933C2;

WR4日:=EMA(WR,9),COLORLIRED;

DRAWICON(WR2日>=REF(WR2日,1),45,38);

DRAWICON(WR2日

DRAWTEXT(CURRBARSCOUNT=1,44, 1日WR ),COLORFF00FF;

{1日改良LWR}

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

LWR1:=SMA(RSV1,4,1);

LWR2:=SMA(LWR1,4,1);

DRAWICON(LWR1>=REF(LWR1,1),40,38);

DRAWICON(LWR1

DRAWTEXT(CURRBARSCOUNT=1,39, 1日LWR改良 ),COLORFF00FF;

{kdj1日}

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

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

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

J:=3*K-2*D;

DRAWICON(D>=REF(D*0.95,1),35,38);

DRAWICON(D

DRAWTEXT(CURRBARSCOUNT=1,34, 1日kdJ ),COLORFF00FF;

{1日macd}

DIF:=EMA(CLOSE,9)-EMA(CLOSE,21);

DEA:=EMA(DIF,9);

DRAWICON(DIF>=REF(DIF,1),30,38);

DRAWICON(DIF

DRAWTEXT(CURRBARSCOUNT=1,29, 1日MACD ),COLORFF00FF;

{120分MACD}

DIF120:=EMA(CLOSE,9/2)-EMA(CLOSE,21/2);

DEA120:=EMA(DIF120,9/2);

DRAWICON(DIF120>=DEA120,25,34);

DRAWICON(DIF120

DRAWTEXT(CURRBARSCOUNT=1,24, 120MACD ),COLORFF00FF;

{1日控盘}

B1:=(HHV(H,20)-C)/(HHV(H,20)-LLV(LOW,20))*100-100;

B2:=SMA(B1,25,1)+100;

B3:=(C-LLV(L,20))/(HHV(H,20)- LLV(L,20))*100;

B4:=SMA(B3,3,1);

B5:=SMA(B4,3,1)+100;

B6:=B5-B2;

控盘程度:=(IF(B6>40,B6-40,0))*2.5,COLORYELLOW;

控盘度:=100,COLOR0037CD;

DRAWICON(控盘程度

DRAWICON(控盘程度<1 AND 控盘程度>=REF(控盘程度,1)*1.011,20,43);

DRAWICON(控盘程度>=1 AND 控盘程度>=REF(控盘程度,1)*1.011,20,42);

DRAWTEXT(CURRBARSCOUNT=1,19, 1日控盘 ),COLORYELLOW;

{1日obv}

VA:=IF(CLOSE>REF(MAX(O,C),1),vol, IF(CLOSE

OBV:=SUM(IF(CLOSE=REF(CLOSE,1),0,VA),0);

MAOBV1:=MA(OBV,2),COLOR8AD8FD;

MAOBV2:=MA(OBV,3),COLOREF03CC,LINETHICK2;

MAOBV3:=MA(MAOBV2,4),COLORB57826;

DRAWICON(MAOBV2>=REF(MAOBV2,1),15,38);

DRAWICON(MAOBV2

DRAWTEXT(CURRBARSCOUNT=1,14, 1日OBV ),COLOR3E9EFF;

{1日Srsi}

VALUE1:=C-O;

VALUE2:=H-L;

VALUE3:=IF(VALUE2=0,0,VALUE1/VALUE2);

SRSIN:=SUM(VALUE3,7);

SRSI:=SRSIN/7,COLORLIBLUE;

SRSIM:=MA(SRSI,3),COLORF933C2;

SRSIK:=MA(SRSI,6),COLORLIRED;

DRAWICON(SRSIM>=REF(SRSIM*1.005,1),10,38);

DRAWICON(SRSIM

DRAWTEXT(CURRBARSCOUNT=1,9, 1日SRSI ),COLOR3E9EFF;

日RSI1:="RSI.RSI1#DAY"(7);

日RSI2:="RSI.RSI2#DAY"(7);

DRAWICON(日RSI1>=日RSI2,5,38);

DRAWICON(日RSI1<日RSI2,5,39);

DRAWTEXT(CURRBARSCOUNT=1,4, 日R金叉 ),COLOR3E9EFF;

VOLUME:=VOL,VOLSTICK;

MAVOL1:=MA(VOLUME,3);

MAVOL2:=MA(VOLUME,7);

DRAWICON(MAVOL1>=MAVOL2,0,38);

DRAWICON(MAVOL1

DRAWTEXT(CURRBARSCOUNT=1,-1, 成交量 ),COLOR3E9EFF;

{KDJ2日}

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

K2:=SMA(RSV2,3*2,1);

D2:=SMA(K2,3*2,1);

J2:=3*K2-2*D2;

DRAWICON(J2>=REF(J2*1,1),-5,1);

DRAWICON(J2

DRAWTEXT(CURRBARSCOUNT=1,-6, 2日KDJ ),COLOR3E9EFF;

{2日MACD}

DIF2:=EMA(CLOSE,9*2)-EMA(CLOSE,21*2);

DEA2:=EMA(DIF2,9*2);

DRAWICON(DIF2>=REF(DIF2,1),-10,1);

DRAWICON(DIF2

DRAWTEXT(CURRBARSCOUNT=1,-11, 2日MACD ),COLOR3E9EFF;

{共振力度}

DRAWICON(CCI3日均>=REF(CCI3日均,1) AND WR2日>=REF(WR2日,1) AND LWR1>=REF(LWR1,1) AND D>=REF(D*0.95,1) AND DIF>=REF(DIF,1) AND DIF120>=DEA120 ,59,25);

DRAWICON(控盘程度>=1 AND 控盘程度>=REF(控盘程度,1)*1.011 AND MAOBV2>=REF(MAOBV2,1) AND 日RSI1>=日RSI2 AND MAVOL1>=MAVOL2 AND SRSIM>=REF(SRSIM*1.005,1) AND J2>=REF(J2*1,1) AND DIF2>=REF(DIF2,1),55,26);