通达信持仓分析副图公式源码

通达信持仓分析副图公式源码

我觉得还　不错，所以给大家参考

源码：

换手:=V*100/CAPITAL;

主力:=MA(换手,4);

大户:=MA(换手,9);

中户:=MA(换手,17);

散户:=MA(换手,34);

均量:=(主力+大户+中户+散户)/4;

主力能量:(主力-均量),NODRAW;

大户能量:(大户-均量),NODRAW;

中户能量:(中户-均量),NODRAW;

散户能量:(散户-均量),NODRAW;

操盘:STICKLINE(主力能量>=0 AND 主力能量>=REF(主力能量,1),6,6+主力能量,1,0),COLORRED;

减仓:STICKLINE(主力能量>=0 AND 主力能量< REF(主力能量,1),6,6+主力能量,1,0)COLORYELLOW;

反弹:STICKLINE(主力能量=REF(主力能量,1),6,6+主力能量,1,0),COLORGREEN;

寻底:STICKLINE(主力能量<0 AND 主力能量< REF(主力能量,1),6,6+主力能量,1,0),COLORBLUE;

DRAWTEXT(ISLASTBAR=1,IF(主力能量>=0,6,6),\’主力\’),COLORBLUE;

主力线:6,COLORRED;

操盘1:STICKLINE(大户能量>=0 AND 大户能量>=REF(大户能量,1),4,4+大户能量,1,0),COLORRED;

减仓1:STICKLINE(大户能量>=0 AND 大户能量< REF(大户能量,1),4,4+大户能量,1,0),COLORYELLOW;

反弹1:STICKLINE(大户能量=REF(大户能量,1),4,4+大户能量,1,0),COLORGREEN;

寻底1:STICKLINE(大户能量<0 AND 大户能量< REF(大户能量,1),4,4+大户能量,1,0),COLORBLUE;

DRAWTEXT(ISLASTBAR=1,IF(大户能量>=0,4,4),\’大户\’),COLORBLUE;

大户线:4,COLORYELLOW;

操盘2:STICKLINE(中户能量>=0 AND 中户能量>=REF(中户能量,1),2,2+中户能量,1,0),COLORRED;

减仓2:STICKLINE(中户能量>=0 AND 中户能量< REF(中户能量,1),2,2+中户能量,1,0),COLORYELLOW;

反弹2:STICKLINE(中户能量=REF(中户能量,1),2,2+中户能量,1,0),COLORGREEN;

寻底2:STICKLINE(中户能量<0 AND 中户能量< REF(中户能量,1),2,2+中户能量,1,0),COLORBLUE;

DRAWTEXT(ISLASTBAR=1,IF(中户能量>=0,2,2),\’中户\’),COLORBLUE;

中户线:2,COLORMAGENTA;

操盘3:STICKLINE(散户能量>=0 AND 散户能量>=REF(散户能量,1),0,散户能量,1,0),COLORRED;

减仓3:STICKLINE(散户能量>=0 AND 散户能量< REF(散户能量,1),0,散户能量,1,0),COLORYELLOW;

反弹3:STICKLINE(散户能量=REF(散户能量,1),0,散户能量,1,0),COLORGREEN;

寻底3:STICKLINE(散户能量<0 AND 散户能量< REF(散户能量,1),0,散户能量,1,0),COLORBLUE;

DRAWTEXT(ISLASTBAR=1,IF(散户能量>=0,-0.3,0.3),\’散户\’),COLORBLUE;

散户线:0,COLORWHITE;

XXQ:=\”KDJ.J\”(9,3,3);{引用J}

XXW:=\”KDJ.D\”(9,3,3);{引用D}

XXN:=CROSS(XXQ,XXW);{J上穿D}

XXE:=\”MACD.DIF\”(12,26,9);{引用DIF}

XXR:=\”MACD.DEA\”(12,26,9);{引用DEA}

XXM:=CROSS(XXE,XXR);{DIF上穿DEA}

XXT:=\”RSI.RSI1\”(6,12,24);{引用RSI1}

XXC:=\”RSI.RSI3\”(6,12,24);{引用RSI3}

XXA:=CROSS(XXT,XXC);{RSI1上穿RSI3}

XXS:=\”DMI.PDI\”(14,6);{引用PDI}

XXD:=\”DMI.MDI\”(14,6);{引用MDI}

XXJ:=CROSS(XXS,XXD);{PDI上穿MDI}

爆涨1:XXN AND XXM AND XXA  AND XXJ AND MA(C,30)>REF(MA(C,30),1),LINETHICK3,COLORGREEN;