P1:=5;
P2:=4;
減倉線:70, POINTDOT,COLOryellow;
增倉線:45, POINTDOT,colorf4e202;
var1:=LLV(LOW,P1);
var2:=HHV(HIGH,P1);
黃線上穿增: EMA((CLOSE-var1)/(var2-var1)*100,P2),COLOryellow,LINETHICK1;
黃線下穿減: EMA(0.667*REF(黃線上穿增,1)+0.333*黃線上穿增,2),colorf4e202,LINETHICK1;
FL:=MA(CLOSE,17)+ABS(MA(CLOSE,17)-REF(MA(CLOSE,17),2));
FS:=MA(CLOSE,17)+MA(CLOSE,17)-REF(MA(CLOSE,17),2);
CG:=IF(MA(CLOSE,17) DRAWTEXT(CROSS(黃線上穿增,黃線下穿減) AND 黃線上穿增<45 and cg=fl and cg=fs,25,'增倉'),COLOR00FF00;
DRAWTEXT(CROSS(黃線上穿增,var2) AND 黃線上穿增<45 and cg=fl and cg=fs,27,'●'),COLORFFFFFF;
DRAWTEXT(CROSS(黃線下穿減,黃線上穿增) AND 黃線上穿增>70 and cg=fl and cg=fs,85,’減倉’),COLOR00FF00;
DRAWTEXT(CROSS(黃線下穿減,黃線上穿增) AND 黃線上穿增>70 and cg=fl and cg=fs,82,’●’),COLOR00FF00;