{MACD三线理论主图 王子用 20240403}
DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIF,9);
MACD:=(DIF-DEA)*2;
UY:=CONST(HHV(MACD,144)-LLV(MACD,144))/20;
散户:DIF+EMA(C,26),COLORWHITE,DOTLINE;
DRAWTEXT(ISLASTBAR,散户+0.1*UY,STRCAT(CON2STR(散户,2),' 散户') ),COLORWHITE;
大户:DEA+EMA(C,26),COLORYELLOW,,DOTLINE;
DRAWTEXT(ISLASTBAR,大户-0.1*UY,STRCAT(CON2STR(大户,2),' 大户') ),COLORYELLOW;
主力:MACD+EMA(C,26),COLORMAGENTA;
DRAWTEXT(ISLASTBAR,主力-0.1*UY,STRCAT(CON2STR(主力,2),' 主力') ),COLORMAGENTA;
散:=DIF-DEA/3+EMA(C,26),COLORCYAN,DOTLINE;
DRAWTEXT(ISLASTBAR,散-0.1*UY,STRCAT(CON2STR(散,2),' 散') ),COLORCYAN,,NODRAW;
DRAWICON(CROSS(散户,主力)&&DEA>0,H+UY/3,2);
DRAWICON(CROSS(主力,大户)&&DEA<0,L-UY/3,1);
T主金叉:=BARSLAST(CROSS(MACD,DEA)&&DEA<0&&MACD<0&&DIF<0);
T主死叉:=BARSLAST(CROSS(DEA,MACD)&&DEA>0&&MACD>0&&DIF>0);
{===============================================================}
散顶:=REF(HHV(散,T主金叉),T主死叉),COLORRED,LINETHICK5;
T顶:=BARSLAST(散=CONST(散顶));
DRAWTEXT(T顶=0,H+2*UY,' 顶'),COLORWHITE;
顶参考:=REF(散,T顶),COLORRED,LINETHICK5;
参考顶:REF(H,T顶),COLORRED,LINETHICK5;
DRAWTEXT(ISLASTBAR,参考顶+0.1*UY,STRCAT(CON2STR(参考顶,2),' 参考顶') ),COLORLIRED;
散底:=REF(LLV(散,T主死叉),T主金叉),,COLORGREEN,LINETHICK5;
T底:=BARSLAST(散=CONST(散底));
DRAWTEXT(T底=0,L-2*UY,' 底'),COLORYELLOW;
底参考:=REF(散,T底),COLORBLUE,LINETHICK5;
参考底:REF(L,T底),COLORGREEN,LINETHICK5;
DRAWTEXT(ISLASTBAR,参考底+0.1*UY,STRCAT(CON2STR(参考底,2),' 参考底') ),COLORGREEN;
倍压:2*参考顶-参考底,COLORMAGENTA,LINETHICK5;
DRAWTEXT(ISLASTBAR,倍压+0.1*UY,STRCAT(CON2STR(倍压,2),' 倍压') ),COLORMAGENTA;
最高:HHV(H,T底+1),COLORWHITE,,LINETHICK2;
DRAWTEXT(ISLASTBAR,最高,STRCAT(CON2STR(最高,2),' 最高 ') ),COLORWHITE;
最低:LLV(L,T顶+1),COLORBROWN,,LINETHICK2;
DRAWTEXT(ISLASTBAR,最低,STRCAT(CON2STR(最低,2),' 最低 ') ),COLORYELLOW; |