乐于分享
好东西不私藏

一个副图指标源码

一个副图指标源码

N:=13*4;
M:=5*4;
N2:=13;
M2:=5;
RSV1:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;
K:=SMA(RSV1,M,1);
D:=SMA(K,M,1);
J:=3*K-2*D;

{参数定义}
N_KDJ:=13;
M_KDJ:=5;
N_MACD1:=12;
N_MACD2:=26;

{基础数据计算}
均价:=(2*CLOSE+HIGH+LOW)/4;
低点34:=LLV(LOW,34);
高点34:=HHV(HIGH,34);
RSV0:=(CLOSE-LLV(LOW,N_KDJ))/(HHV(HIGH,N_KDJ)-LLV(LOW,N_KDJ))*100;
K0:=SMA(RSV0,M_KDJ,1);
D0:=SMA(K0,M_KDJ,1);
J0:=3*K0-2*D0;

{通道强度系统}
通道强度:=EMA((均价-低点34)/(高点34-低点34)*100,1);
多头线:=EMA((均价-低点34)/(高点34-低点34)*100,30);
空头线:=EMA(多头线,5);
通道差值:=通道强度-空头线;

{趋势强度系统}
VAR1:=3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1);
趋势强度:=EMA(VAR1,8);

{多空力量系统}
多方:=3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1);
空方:=100*(HHV(HIGH,55)-CLOSE)/(HHV(HIGH,55)-LLV(LOW,55));
多空差:=多方-50;

{短线KDJ系统}

K1:=SMA(RSV1,5,1);
D1:=SMA(K1,5,1);
J1:=3*K1-2*D1;

{MACD系统}
DIF:=EMA(CLOSE,N_MACD1)-EMA(CLOSE,N_MACD2);
DEA:=EMA(DIF,9);
MACD:=(DIF-DEA)*2;

{长线KDJ系统}
RSV2:=(CLOSE-LLV(LOW,N2))/(HHV(HIGH,N2)-LLV(LOW,N2))*100;
K2:=SMA(RSV2,M2,1),LINETHICK1;
D2:=SMA(K2,M2,1),LINETHICK1;
J2:=3*K2-2*D2,LINETHICK1;

{多周期数据合成}
大周期数据:=EMA(通道差值,5);
大周期平滑:=EMA(大周期数据,10);
中周期数据:=趋势强度-50;
中周期平滑:=EMA(中周期数据,10);
小周期数据:=(多空差+J1-50)/2;
小周期平滑:=EMA(小周期数据,10);

{色带区域}
DRAWBAND(大周期平滑,RGB(0,200,0),大周期数据,RGB(150,0,0));
DRAWBAND(中周期平滑,RGB(0,150,150),中周期数据,RGB(150,0,150));
DRAWBAND(小周期平滑,RGB(0,100,150),小周期数据,RGB(150,150,0));

{趋势确认线}
小趋势弱:IF(大周期平滑>=大周期数据,大周期平滑,DRAWNULL),COLORGREEN,LINETHICK3;
小趋势强:IF(大周期平滑<大周期数据,大周期平滑,DRAWNULL),COLORRED,LINETHICK3;

中趋势弱:IF(中周期平滑>=中周期数据,中周期平滑,DRAWNULL),COLORCYAN,LINETHICK3;
中趋势强:IF(中周期平滑<中周期数据,中周期平滑,DRAWNULL),COLORMAGENTA,LINETHICK3;

大趋势弱:IF(小周期平滑>=小周期数据,小周期平滑,DRAWNULL),COLORBLUE,LINETHICK3;
大趋势强:IF(小周期平滑<小周期数据,小周期平滑,DRAWNULL),COLORYELLOW,LINETHICK2;

{===== 关注信号=====}
N1_GD:=7;
LC_GD:=REF(CLOSE,1);
XD_GD:=SMA(MAX(CLOSE-LC_GD,0),N1_GD,1)/SMA(ABS(CLOSE-LC_GD),N1_GD,1)*100;
空_GD:=EMA(C,5);
均衡_GD:=EMA(空_GD,5);
中轨_GD:=HHV(MA(H,13),13);
VAR55_GD:=FILTER(均衡_GD>REF(均衡_GD,1) AND 中轨_GD<REF(中轨_GD,1) AND C>REF(C,1),11);

{抄底信号 }
DRAWTEXT(VAR55_GD, 小周期平滑, ‘关注’), COLORYELLOW;

T1R:=XMA(XMA(XMA(EMA(CLOSE,1),2),2),2);
TR1:=EMA((T1R-REF(T1R,1))/REF(T1R,1),1)*1000;
净:=XMA(TR1,11);
流:=EMA(净,11);
主力动向:=EMA(净+流,1)-XMA(净-流,2);
MA1:=XMA(主力动向,11);

DRAWTEXT(CROSS(MA1,0),0,’买’),COLORFF00FF;