粘合度副图，实心绿柱后出现红柱视为买点，紫柱出现视同为超买

{粘合度}

{参数精灵:

请设置计算参数:

极值周期: PARAM#0 (1.00--250.00)

首根K线周期: PARAM#1 (1.00--1000.00)

均线间隔周期: PARAM#2 (1.00--1000.00)

显示数量: PARAM#3 (1.00--1000.00)

用法注释:无

公式源码:}

极值周期:=7;

首根K线周期:=5;

均线间隔周期:=11;

显示数量:=5;

 

X_1:=MA(CLOSE,首根K线周期);

X_2:=MA(CLOSE,首根K线周期+1*均线间隔周期);

X_3:=MA(CLOSE,首根K线周期+2*均线间隔周期);

X_4:=MA(CLOSE,首根K线周期+3*均线间隔周期);

X_5:=MA(CLOSE,首根K线周期+4*均线间隔周期);

X_6:=MA(CLOSE,首根K线周期+5*均线间隔周期);

X_7:=(X_1+X_2+X_3+X_4+X_5)/5;

X_8:=SQRT(((X_1-X_7)*(X_1-X_7)+(X_2-X_7)*(X_2-X_7)+(X_3-X_7)*(X_3-X_7)+(X_4-X_7)*(X_4-X_7)+(X_5-X_7)*(X_5-X_7))/5)*100;

粘合度:IF(CURRBARSCOUNT<=显示数量,X_8,DRAWNULL),NODRAW;

增量:粘合度-REF(粘合度,1),NODRAW;

X_9:=REF(HHV(粘合度,极值周期),1);

X_10:=REF(LLV(粘合度,极值周期),1);

STICKLINE(粘合度>REF(粘合度,1),0,粘合度,2,1),COLORRED;

STICKLINE(粘合度>REF(粘合度,1) AND 粘合度>X_9,0,粘合度,2,0),COLORMAGENTA;

STICKLINE(粘合度>REF(粘合度,1) AND 粘合度>0.5*X_9 AND 粘合度<X_9,0,粘合度,2,0),COLORRED;

STICKLINE(粘合度=REF(粘合度,1),0,粘合度,2,0),COLORWHITE;

STICKLINE(粘合度>REF(粘合度,1) AND 粘合度<0.5*X_9,0,粘合度,2,1),COLORRED;

STICKLINE(粘合度<REF(粘合度,1),0,粘合度,2,1),COLORGREEN;

超买:X_9,DOTLINE,COLORWHITE;

超卖:0.25*X_9,DOTLINE,COLORWHITE;

中间:0.5*X_9,COLORWHITE;

STICKLINE(粘合度<REF(粘合度,1) AND 粘合度=LLV(粘合度,5) AND 粘合度<超卖,0,粘合度,2,0),COLORGREEN;