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;
A:=250;
DIF:=(EMA(CLOSE,12) - EMA(CLOSE,26));
DEA:=EMA(DIF,9);
MACD:=2*(DIF-DEA);
MM:=IF(MACD< 0,MACD,0);
JJ:=MM> REF(MM,1);
ZZ:=REF(JJ,1)=1;
准备:=(JJ AND ZZ)*DEA;
STICKLINE(准备=DEA,1,-1,1.5,1),COLORFFFF00;
JH:=HHV(MAX(K,MAX(D,J)),A);
DH:=HHV(MAX(DIF,DEA),A);
SH:=INTPART(JH/DH)/2;
DIF50:=SH*DIF+50;
DEA50:=SH*DEA+50;
STICKLINE(DIF50>DEA50,0,1.5*(DIF50-DEA50),0,0),COLORBLUE;
STICKLINE(DIF50<DEA50,0,1.5*(DIF50-DEA50),0,0),COLORFFFF00;
DRAWTEXTABS(5,5,'萃富网 www.cuiv.com'),linethick1,COLOR00EEff;
红柱:IF(1.5*(DIF50-DEA50)>REF(1.5*(DIF50-DEA50),1),1.5*(DIF50-DEA50),0),STICK,COLORBLUE;
绿柱:IF(1.5*(DIF50-DEA50)<REF(1.5*(DIF50-DEA50),1),1.5*(DIF50-DEA50),0),STICK,COLORGREEN;
缩脚:=IF(1.5*(DIF50-DEA50)<0 AND REF(1.5*(DIF50-DEA50),1)< REF(1.5*(DIF50-DEA50),2) AND 1.5*(DIF50-DEA50)>REF(1.5*(DIF50-DEA50),1),1,0);
STICKLINE(FILTER(缩脚,3) AND 缩脚,0,-红柱,2,0),COLORRED;
买:FILTER(缩脚,3) AND 缩脚;