[通达信指标]主散筹码附图公式

{友情提示，该指标含有获利盘函数}

PPSCM:=EMA(WINNER(CLOSE)*70,3);

SHCM:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,3);

ZSHTL:=SHCM/(PPSCM+SHCM)*100;

TTSLKP:=PPSCM/(PPSCM+SHCM)*100;

ZCMPPS:=MA(PPSCM+SHCM,13);

TTSNTS:=BARSLAST(ZSHTL<90 AND REF(ZSHTL,1)>90);

ZSHJJ:=EMA(ZSHTL,89);

TTSLJJ:=EMA(TTSLKP,89);

ZJLRQD:=INTPART(TTSLKP-TTSLJJ);

SH8:=EMA(ZSHTL,8);

DKB:=IF(TTSLKP-REF(TTSLKP,1)>ZSHTL-REF(ZSHTL,1),1,0);

STICKLINE(ZSHJJ>REF(ZSHJJ,1),ZSHTL,ZSHJJ,2,0),COLOR00FF00;

STICKLINE(TTSLJJ>REF(TTSLJJ,1),TTSLKP,TTSLJJ,2,0),COLORRED;

(TTSLJJ>REF(TTSLJJ,1))>0,COLORRED;

INTPART(ZSHTL),COLORCYAN,LINETHICK1;

INTPART(TTSLKP),COLORWHITE,LINETHICK1;

RSV1:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;

RSV4:=(CLOSE-LLV(LOW,89))/(HHV(HIGH,89)-LLV(LOW,89))*100;

DUANQB:=SMA(RSV1,3,1);

DUANQA:=SMA(DUANQB,3,1);

K4:=SMA(RSV4,8,1);

ZHONGMA:SMA(K4,3,1),LINETHICK0,COLORWHITE;

VV1:=SMA((CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100,5,1);

VV2:=SMA(VV1,3,1);

VV3:=3*VV1-2*VV2;

QUHISZB:=EMA(VV3,3);

VV4:=(QUHISZB-REF(QUHISZB,1))/REF(QUHISZB,1)*100;

SSTZ1:IF(QUHISZB<13,1,0),LINETHICK0,COLORCYAN;

SSTZ2:IF(QUHISZB<13 AND VV4>13,1,0),LINETHICK0,COLORYELLOW;

VA1:=(CLOSE*2+HIGH+LOW)/4*10; 

VA2:=EMA(VA1,13);

VA3:=EMA(VA1,34);

NN:=0;

VA4:=VA2-VA3;

VA5:=EMA(VA4,5);

VA6:=2*(VA4-VA5)*5.5;

ZHUJX:IF(VA6>=0 AND QUHISZB<13,1,0),LINETHICK0,COLORFF00FF;

ZHUANZ:=IF(REF(ZHONGMA,1)<REF(ZHONGMA,2) AND ZHONGMA>REF(ZHONGMA,1),1,0);

CHAODI:IF(SSTZ2=1 AND ZHUJX=1 AND ZHONGMA>REF(ZHONGMA,1),1,0),COLORRED,LINETHICK0;

DUANBD:IF((ZHUANZ=1 AND DUANQB>=DUANQA) OR (REF(DUANQB,1)<REF(DUANQA,1) AND DUANQB>=DUANQA AND ZHONGMA>REF(ZHONGMA,1)),1,0),LINETHICK0,COLOR0080EF;

STICKLINE(DUANQB>=DUANQA,DUANQA,REF(DUANQA,1),3,0),COLOR0080EF;

STICKLINE(DUANQB<DUANQA,DUANQA,REF(DUANQA,1),3,0),COLORFF6600;

DRAWICON(CHAODI=1,REF(DUANQA,1),1);

DRAWICON(DUANBD=1 AND CHAODI=0,REF(DUANQA,1),7);

SMA(K4,3,1),COLORGREEN,LINETHICK3; 

IF(ZHONGMA>REF(ZHONGMA,1),ZHONGMA,DRAWNULL),LINETHICK3,COLORRED;

STICKLINE(SSTZ1=1,3,-2,5,0),COLORCYAN;

STICKLINE(SSTZ2=1,10,-2,5,0),COLORYELLOW;

STICKLINE(ZHUJX=1 AND SSTZ2=1,6,-2,5,0),COLORFF00FF;

ZJLRQD,LINETHICK2,COLORRED;

INTPART(ZCMPPS),COLORWHITE,NODRAW;