[通达信公式] 主力筹码

股票abc

ZLCM:=IF(C<0,0,EMA(WINNER(CLOSE)*70,3));
SHCM:=IF(C<0,0,EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,3));
ZSHTL:=IF(C<0,0,SHCM/(ZLCM+SHCM)*100);
ZZLKP:=IF(C<0,0,ZLCM/(ZLCM+SHCM)*100);
ZCMZL:=IF(C<0,0,MA(ZLCM+SHCM,13));
ZZNTS:=IF(C<0,0,BARSLAST(ZSHTL<90 AND REF(ZSHTL,1)>90));
ZSHJJ:=IF(C<0,0,EMA(ZSHTL,89));
ZZLJJ:=IF(C<0,0,EMA(ZZLKP,89));
ZJLRQD:=IF(C<0,0,INTPART(ZZLKP-ZZLJJ));
SH8:=IF(C<0,0,EMA(ZSHTL,8));
DKB:=IF(C<0,0,IF(ZZLKP-REF(ZZLKP,1)>ZSHTL-REF(ZSHTL,1),1,0));
散户套牢系数:IF(C<0,0,INTPART(ZSHTL)),LINETHICK0,colorFFFFFF;
主力控盘系数:IF(C<0,0,INTPART(ZZLKP)),LINETHICK0,colorFFFF00;
资金流入强度:IF(C<0,0,ZJLRQD),LINETHICK0,colorFF;
市场筹码总量:IF(C<0,0,INTPART(ZCMZL)),LINETHICK0,colorFF00;
FILLRGN(ZSHTL,0,REF(ZSHTL,1)>90 AND ZSHTL<90),color9966FF;
STICKLINE(CLOSE>0,ZSHTL,ZZLKP,6,0),colorEEEEEE;
STICKLINE(ZSHJJ>REF(ZSHJJ,1),ZSHTL,ZSHJJ,1,0),colorAAAAAA;
PARTLINE(ZSHTL,CLOSE>0),POINTDOT,colorFFFF;
STICKLINE(CLOSE>0,ZZLKP,0,7,0),colorFF0000;
STICKLINE(ZZLKP>75,ZZLKP,0,7,0),colorFFFFFF;
STICKLINE(ZZLJJ>REF(ZZLJJ,1),ZZLKP,ZZLJJ,7,0),colorFF;
STICKLINE(ZSHTL>=90,ZZLKP,0,7,0),color66FFCC;
PARTLINE(ZCMZL,CLOSE>0),colorFF00;
PARTLINE(ZCMZL,ZCMZL>REF(ZCMZL,1)),color66FF;
DRAWTEXT(ZCMZL>REF(ZCMZL,1) AND SH8<REF(SH8,1) AND BARSTATUS=2,ZCMZL,'←增量资金');