筹码集中度副图指标公式 筹码集中度主图公式

通达信指标公式源码概况：

指标类别： 通达信指标公式

授权方式： 免费版

指标评级： ★★★★★

指标分类： 策略

画线方法： 副图

筹码集中度副图指标公式

TYP:=(HIGH+LOW+CLOSE)/3;  

YY:(TYP-MA(TYP,N))/(0.015*AVEDEV(TYP,N));  

TGLJ:=(TYP-MA(TYP,N))/(0.015*AVEDEV(TYP,N));  

日出:IF(CROSS(TGLJ,-200),-200,0),STICK,LAYER0,COLORRED,LINETHICK3;  

DRAWICON(CROSS(TGLJ,-200),200,12);  

FILLRGN(0,YY,YY0,RGB(255,0,255),YY0,RGB(0,250,0));  

STICKLINE(YY0,-202,-200,6,0),COLORGREEN;  

STICKLINE(YY0,-202,-200,6,1),COLORRED;  

DRAWGBKLAST(C0,STRIP(RGB(0,0,0),RGB(0,50,50),0));  

DRAWTEXTABS(10,5,'沙吾提制作'),COLOR00FFFF,LINETHICK2;  

DPC:=INDEXC;  

DPO:=INDEXO;  

DPH:=INDEXH;  

DPL:=INDEXL;  

STICKLINE(DPCDPO,DPC,DPO,8,0),COLOR0000FF;  

STICKLINE(DPCDPO,DPH,DPL,0.5,0),COLOR0000FF;  

STICKLINE(DPCDPO,DPC,DPO,8,0),COLOR00FF00;  

STICKLINE(DPCDPO,DPH,DPL,0.5,0),COLOR00FF00;  

SH:=STKINDI('1A0001','1A0001');  

SZ:=STKINDI('399001','399001');  

IFSTRCMP(MARKETLABEL,'SH')=0THENBEGINDRAWTEXTABS(200,0,'上证指数'),LINETHICK5,Color6666FF;END;  

IFSTRCMP(MARKETLABEL,'SZ')=0THENBEGINDRAWTEXTABS(200,0,'深圳成份指数'),LINETHICK5,Color6666FF;END;  

上证MA1:=STKINDI('1A0001','MA.MA1');  

深证MA1:=STKINDI('399001','MA.MA1');  

上证MA2:=STKINDI('1A0001','MA.MA2');  

深证MA2:=STKINDI('399001','MA.MA2');  

上证MA3:=STKINDI('1A0001','MA.MA3');  

深证MA3:=STKINDI('399001','MA.MA3');  

上证MA4:=STKINDI('1A0001','MA.MA4');  

深证MA4:=STKINDI('399001','MA.MA4');  

上证MA5:=STKINDI('1A0001','MA.MA5');  

深证MA5:=STKINDI('399001','MA.MA5');  

上证MA6:=STKINDI('1A0001','MA.MA6');  

深证MA6:=STKINDI('399001','MA.MA6');  

大盘MA5:IF(STRCMP(MARKETLABEL,'SH')=0,上证MA1,深证MA1),COLORFFFFFF;  

大盘MA10:IF(STRCMP(MARKETLABEL,'SH')=0,上证MA2,深证MA2),COLOR00FFFF;  

大盘MA20:IF(STRCMP(MARKETLABEL,'SH')=0,上证MA3,深证MA3),COLOR3333FF;  

大盘MA30:IF(STRCMP(MARKETLABEL,'SH')=0,上证MA4,深证MA4),COLOR5399FF;  

大盘MA60:IF(STRCMP(MARKETLABEL,'SH')=0,上证MA5,深证MA5),COLOR9900CC;  

大盘MA120:IF(STRCMP(MARKETLABEL,'SH')=0,上证MA6,深证MA6),COLOR39FF00;  

DRAWTEXTABS(5,30,'目前指数：'+INDEXC+'点'),COLORFFFFFF;  

DRAWTEXTABS(5,50,'昨日收盘：'+REF(INDEXC,1)+'点'),COLORFFFFFF;  

DRAWTEXTABS(5,70,'今日开盘：'+INDEXO+'点'),COLORFFFFFF;  

DRAWTEXTABS(5,90,'今日最高：'+INDEXH+'点'),COLORFFFFFF;  

DRAWTEXTABS(5,110,'今日最低：'+INDEXL+'点'),COLORFFFFFF;  

DRAWTEXTABS(5,130,'指数涨幅：'+((INDEXC-REF(INDEXC,1))/INDEXC)*100+'％'),COLORFFFFFF;  

DRAWTEXTABS(5,150,'上涨家数：'+INDEXADV+'家'),COLORFF00FF;  

DRAWTEXTABS(5,170,'走平家数：'+INDEXDEC+'家'),COLOR00FFFF;  

DRAWTEXTABS(5,190,'下跌家数：'+INDEXDEC+'家'),COLOR39FF00;  

上证DIFF:=STKINDI('1A0001','MACD.DIFF');  

深证DIFF:=STKINDI('399001','MACD.DIFF');  

上证DEA:=STKINDI('1A0001','MACD.DEA');  

深证DEA:=STKINDI('399001','MACD.DEA');  

上证MACD:=STKINDI('1A0001','MACD.MACD');  

深证MACD:=STKINDI('399001','MACD.MACD');  

大盘DIFF:=IF(STRCMP(MARKETLABEL,'SH')=0,上证DIFF,深证DIFF);  

大盘DEA:=IF(STRCMP(MARKETLABEL,'SH')=0,上证DEA,深证DEA);  

大盘MACD:=IF(STRCMP(MARKETLABEL,'SH')=0,上证MACD,深证MACD);  

DRAWTEXTABS(165,30,'大盘DIFF：'+大盘DIFF),COLORFFFFFF;  

DRAWTEXTABS(165,50,'大盘DEA：'+大盘DEA),COLOR00FFFF;  

DRAWTEXTABS(165,70,'大盘MACD：'+大盘MACD),COLORFF00FF;  

上证K:=STKINDI('1A0001','KDJ.K');  

深证K:=STKINDI('399001','KDJ.K');  

上证D:=STKINDI('1A0001','KDJ.D');  

深证D:=STKINDI('399001','KDJ.D');  

上证J:=STKINDI('1A0001','KDJ.J');  

深证J:=STKINDI('399001','KDJ.J');  

大盘K:=IF(STRCMP(MARKETLABEL,'SH')=0,上证K,深证K);  

大盘D:=IF(STRCMP(MARKETLABEL,'SH')=0,上证D,深证D);  

大盘J:=IF(STRCMP(MARKETLABEL,'SH')=0,上证J,深证J);  

DRAWTEXTABS(165,90,'大盘K：'+大盘K),COLORFFFFFF;  

DRAWTEXTABS(165,110,'大盘D：'+大盘D),COLOR00FFFF;  

DRAWTEXTABS(165,130,'大盘J：'+大盘J),COLORFF00FF;  

DRAWTEXTABS(310,30,'大盘5天均线：'+大盘MA5),COLORFFFFFF,LINETHICK2;  

DRAWTEXTABS(310,50,'大盘10天均线：'+大盘MA10),COLOR00FFFF,LINETHICK2;  

DRAWTEXTABS(310,70,'大盘20天均线：'+大盘MA20),COLORFF00FF,LINETHICK2;  

DRAWTEXTABS(310,90,'大盘30天均线：'+大盘MA30),COLOR39FF00,LINETHICK2;  

DRAWTEXTABS(310,110,'大盘60天均线：'+大盘MA60),COLORFF3366,LINETHICK2;  

DRAWTEXTABS(310,130,'大盘120天均线：'+大盘MA120),COLORFFCC00,LINETHICK2;  

上证BIAS1:=STKINDI('1A0001','BIAS.BIAS1');  

深证BIAS1:=STKINDI('399001','BIAS.BIAS1');  

上证BIAS2:=STKINDI('1A0001','BIAS.BIAS2');  

深证BIAS2:=STKINDI('399001','BIAS.BIAS2');  

上证BIAS3:=STKINDI('1A0001','BIAS.BIAS3');  

深证BIAS3:=STKINDI('399001','BIAS.BIAS3');  

大盘BIAS1:=IF(STRCMP(MARKETLABEL,'SH')=0,上证BIAS1,深证BIAS1);  

大盘BIAS2:=IF(STRCMP(MARKETLABEL,'SH')=0,上证BIAS2,深证BIAS2);  

大盘BIAS3:=IF(STRCMP(MARKETLABEL,'SH')=0,上证BIAS3,深证BIAS3);  

DRAWTEXTABS(165,150,'大盘BIAS1：'+大盘BIAS1),COLORFFFFFF;  

DRAWTEXTABS(165,170,'大盘BIAS2：'+大盘BIAS2),COLOR00FFFF;  

DRAWTEXTABS(165,190,'大盘BIAS3：'+大盘BIAS3),COLORFF00FF;  

m5:cost(5);  

m10:cost(10);  

m20:cost(20);  

m30:cost(30);  

m40:cost(40);  

m50:cost(50);  

m60:cost(60);  

m70:cost(70);  

m80:cost(80);  

m90:cost(90);  

cyc5:ema(AMOUNT/(100*vol),5),colorwhite;  

cyc51:=ema(cyc5,2);  

cyc52:=ema(cyc51,2);  

cyc53:=ema(cyc52,2);  

cyc54:=ema(cyc53,2);  

cyc55:=ema(cyc54,2);  

cyc56:ema(cyc55,2),coloryellow;  

PARTLINE(cyc51,cyc51ref(cyc51,1),rgb(255,0,0),cyc51ref(cyc51,1),rgb(0,255,0),1,rgb(0,0,255)),DOTLINE;  

PARTLINE(cyc52,cyc52ref(cyc52,1),rgb(255,0,0),cyc52ref(cyc52,1),rgb(0,255,0),1,rgb(0,0,255)),DOTLINE;  

PARTLINE(cyc53,cyc53ref(cyc53,1),rgb(255,0,0),cyc53ref(cyc53,1),rgb(0,255,0),1,rgb(0,0,255)),DOTLINE;  

PARTLINE(cyc54,cyc54ref(cyc54,1),rgb(255,0,0),cyc54ref(cyc54,1),rgb(0,255,0),1,rgb(0,0,255)),DOTLINE;  

PARTLINE(cyc55,cyc55ref(cyc55,1),rgb(255,0,0),cyc55ref(cyc55,1),rgb(0,255,0),1,rgb(0,0,255)),DOTLINE;  

筹码集中度主图公式

input:n(5,1,100,1);

DRAWGBKLAST(v1,STRIP(RGB(0,100,0),RGB(0,0,0),0));

MA5:MA(CLOSE,5),PRECIS2,COLORred,linethick2;

MA10:MA(CLOSE,10),PRECIS2,color009900,linethick2;

MA20:MA(CLOSE,20),linethick0;

MA30:MA(CLOSE,30),PRECIS2,colorffffFF,linethick0;

MA120:=MA(CLOSE,120);

MA250:=MA(CLOSE,250);

{底:llv(l,N),color009900,PRECIS2,CROSSDOT;}

DTPL:=MA10MA30 AND MA20MA30 AND MA30REF(MA30,1);

破线:MIN(MA20*1.05,MA30*1.1),COLORff89b2,DOTLINE,LINETHICK1,PRECIS2;

差幅:=C/MIN(MA20*1.05,MA30*1.1)-1;

均线流:=(DTPL AND MA5MA30 AND MA5MA10)*-0.1;

偏离率:=(CMIN(MA20*1.05,MA30*1.1) AND CMA30)*0.1;

BDGD:=C=HHV(C,20);

GDSJ:=BARSLAST(BDGD);

REF(C,GDSJ),COLORff9933,POINTDOT,LINETHICK3,PRECIS2;

{C/REF(C,GDSJ)-1,COLOR00FF00,POINTDOT;}

目标:=IF(均线流=-0.1 AND 偏离率=0.1 AND GDSJ=N,0.8,0);

MBSJ:=BARSLAST(目标=0.8);

TP1:=CROSS(C,MIN(MA20*1.05,MA30*1.1)) AND REF(GDSJ,1)=N;

TP2:=偏离率=0 AND REF(COUNT(偏离率=0.1,N)=N,1) AND CREF(C,1);

突破:=(TP1 OR TP2)*1;

QSXS1:=MA5REF(MA5,1);

LYHT:=DTPL AND MA5MA10 AND NOT(QSXS1) AND REF(QSXS1,1);

MAV5:=EMA(V,5);

MAV10:=EMA(V,10);

LNMACD:=((V-MAV5)/MAV5*2+(V-MAV10)/MAV10)*10;

量坑:=LNMACD=-10;

优选:=目标 AND COUNT(量坑,3)=1;

{以下设置主图显示方式}

DRAWTEXT(目标=0.8,L*1.009,'='),colorFFFFFF,LINETHICK3,ALIGN1;

DRAWTEXT(突破,L,'★'),coloryellow;

DRAWTEXT(LYHT,(MA10+MA20)/2, ''),COLORFF00FF;

DRAWICON(优选,L*0.98,1),ALIGN1;

GX:=MAX(MA5,MAX(MA10,MA20));

DX:=MIN(MA5,MIN(MA10,MA20));

QSXS:=DXMA30 AND MA30REF(MA30,1);

均线粘合:=IF(ABS(GX/DX-1)*100=3,1,0);

FL:=VREF(V,1) OR VMA(V,5);

SZ:=(CROSS(C,MA(C,3)) OR CROSS(C,MA(C,5))) AND C=O;

放量上涨:=IF(FL AND SZ,1,0);

果断出击:=FILTER(COUNT(均线粘合,2) AND COUNT(放量上涨,2) AND CO AND QSXS,2)*100;

{以下设置果断出击后的涨幅跟踪,不需要的可以删除}

MRSJ:=BARSLAST(果断出击);

涨:=(C/REF(C,MRSJ)-1)*100*(MRSJ=20);

ZZ:=MRSJ20 AND CROSS(H,REF(C,MRSJ)*1.09999);

知足:=ZZ AND COUNT(ZZ,MRSJ)=1;

DB:=MRSJ20 AND CROSS(H,REF(C,MRSJ)*1.05);

达标:=DB AND COUNT(DB,MRSJ)=1;

DRAWTEXT(知足,H*1.03,'+10%'),COLORFFFFFF;

DRAWTEXT(果断出击,L,'♂'),COLORFFFF33,ALIGN1,LINETHICK3;

DRAWTEXT(达标,H*1.01,'+5%'),COLORYELLOW,ALIGN1;

WR5:=100*(HHV(H,5)-C)/(HHV(H,5)-LLV(L,5));

WR6:=100*(HHV(H,6)-C)/(HHV(H,6)-LLV(L,6));

WR:=80-(WR5*3+WR6*2)/5;

DRAWTEXT(WR-10,L*0.99, '#'),COLOR00ff00;

MTM:=C-REF(C,1);

DX1:=100*EMA(EMA(MTM,N),N)/EMA(EMA(ABS(MTM),N),N);

买1:=IF(LLV(DX1,2)=LLV(DX1,7) AND COUNT(DX10,2) AND CROSS(DX1,MA(DX1,2)),1,0);

卖1:=IF(HHV(DX1,2)=HHV(DX1,7) AND COUNT(DX150,2) AND CROSS(MA(DX1,2),DX1),1,0);

DRAWTEXT(filter(卖1=1,5),high*1.02,'卖'),color00ff00,ALIGN1;

DRAWTEXT(filter(买1=1,5),low*0.99, '买'),colorRED,ALIGN1;

QSXS3:=MA20=REF(MA20,1);

DTPL3:=MA5MA10 AND MA10MA20 AND MA20MA30;

ZWP3:=COUNT(CMA20,5)=5 AND DTPL3;

HCP3A:=CROSS(MA20*1.03,L) AND REF(ZWP3,1);

HCP3B:=CROSS(MA20,C) AND REF(ZWP3,1);

回3:=((HCP3A OR HCP3B) AND QSXS3)*3;

HCSJ3:=BARSLAST(回3);

ZC3:=(CROSS(C,MA20) OR CROSS(C,MA20*1.03)) AND HCSJ3=5;

支撑:IF(COUNT(ZC30,5),REF(L,HCSJ3),REF(L,HCSJ3)),COLORFF00ff,POINTDOT,linethick3,PRECIS2;

KK:=ATAN((MA5/REF(MA5,1)-1)*100)*180/3.14159;

准备:=CROSS(KK,0)*80;

ZBSJ:=BARSLAST(准备=80);

IF(NOT(准备=80),REF(L,ZBSJ),REF(L,ZBSJ)),COLOR00FF00,POINTDOT,linethick3,PRECIS2;

主筹估算:=EMA(WINNER(c)*70,3);

散筹估算:=EMA((WINNER((c)*1.1)-WINNER((c)*0.9))*70,3);

筹码锁定:=散筹估算-主筹估算 ;

动态底部:=EMA(IF(L= LLV(l,60),SMA(ABS(L-REF(L,1)),60,1)/SMA(MAX(L-REF(l,1),0),99,1),0)*5,3);

涨:=CROSS(主筹估算,筹码锁定);

强:=CROSS(主筹估算,散筹估算);

STICKLINE(涨,O,C,4,0),COLORYELLOW;

STICKLINE(涨,O,H,0,0),COLORYELLOW;

STICKLINE(涨,L,C,0,0),COLORYELLOW;

STICKLINE(强, O,C,4,0),colormagenta;

STICKLINE(强,O,H,0,0),colormagenta;

STICKLINE(强,L,C,0,0),colormagenta;

STICKLINE(筹码锁定-50,O,C,4,0),COLORred;

STICKLINE(筹码锁定-50,O,H,0,0),COLORred;

STICKLINE(筹码锁定-50,L,C,0,0),COLORred;

gj:=if(c=INDEXC,(INDEXC+INDEXh+INDEXl+INDEXO)/4,AMOUNT/(v+0.01)/100);

明日阻力:=l+(gj-l)+(c-l);

明日支撑:=l+(c-gj);

今日阻力:=REF(明日阻力 , 1);

今日支撑:=REF(明日支撑 , 1);

STICKLINE(DISPSTATUS=2 and c=今日阻力,今日阻力,今日阻力,20,0),ColorRED;

STICKLINE(DISPSTATUS=2 and c今日阻力,今日阻力,今日阻力,20,0),Color00FFFF;

STICKLINE(DISPSTATUS=2 and c=今日支撑,今日支撑,今日支撑,20,0),ColorFF00FF;

STICKLINE(DISPSTATUS=2 and c今日支撑,今日支撑,今日支撑,20,0),Color00ADFF;

DRAWTEXTREL(610,40,'今日支撑：'+NUMTOSTRN(今日支撑 ,2 )),Colorred;

DRAWTEXTREL(610,5,'今日阻力：'+NUMTOSTRN(今日阻力 ,2 )),Color00FFFF;

买入:=STRFIND(Extrastring('评级'),'买入',1)0;

增持:=STRFIND(Extrastring('评级'),'增持',1)0;

持有:=STRFIND(Extrastring('评级'),'持有',1)0;

DRAWTEXTREL(5,970,'评级:'+Extrastring('评级')),ColorFFB6C1;

{DRAWTEXTABS(5,360,'板块:'+BKNAME),ColorRED;}

流通:=FINANCE2(37)/10000;

市盈率:=DYNAINFO(39);

F:=COST(5 );J:=COST(95 );

M:=COST(15 );B:=COST(85 );

F1:=(J-F)/(F+J)*100;M1:=(B-M)/(B+M)*100;

集中度90:=F1;

集中度70:=M1;

获利盘:=WINNER(CLOSE)*100;

套牢盘:=100*(1-WINNER(C));

最新收益:=FINANCE2(3);

浮筹比:=(winner(c*1.1)-winner(c*0.9))/winner(hhv(h,0))*100; DRAWTEXTABS(5,50,'浮筹比:'+浮筹比+'% '),LINETHICK1,Colora9a9a9;

DRAWTEXTABS(300,5,'流通:'+流通+' '),LINETHICK1,Colora9a9a9;DRAWTEXTABS(5,65,'市盈率:'+市盈率+' '),LINETHICK1,Colora9a9a9;

DRAWTEXTABS(5,5,'集中度90:'+集中度90+' '),LINETHICK1,Color00FF00;

DRAWTEXTABS(100,5,'集中度70:'+集中度70+' '),LINETHICK1,ColorYELLOW;

DRAWTEXTABS(5,20,'获利盘:'+获利盘+'% '),LINETHICK1,Colora9a9a9;

DRAWTEXTABS(5,35,'套牢盘:'+套牢盘+'% '),LINETHICK1,Colora9a9a9;

VAR1:=1;

VAR55:=LLV(LOW,8);

VAR66:=HHV(HIGH,8);

VAR77:=(VAR66-VAR55)/10;

VAR88:=SMA((CLOSE-VAR55)/VAR77,20,1);

VARA:=3*VAR88-2*SMA(VAR88,15,1);

散户筹码集中度: (10-VARA)*VAR1*6,COLORGREEN,LINETHICK2;

VAR100:=(CLOSE-MA(CLOSE,34))/MA(CLOSE,34)*(10);

增减力度:VAR100*16,COLORMAGENTA,LINETHICK2;

散筹估算:EMA((WINNER(C*1.1)-WINNER(C*0.9))*70,3),COLORFFFFFF;

主持仓:=EMA(100*(CLOSE-LLV(LOW,30))/(HHV(HIGH,30)-LLV(LOW,30)),9);

庄筹集中度:=EMA(主持仓,1);

庄筹集中监控线:EMA(庄筹集中度,1), COLORCYAN;

主力持仓:EMA(100*(CLOSE- LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34)),3),COLORFF00FF;

主力筹码集中度:WINNER(C)*100,COLORRED;

机构筹码集中度:EMA(WINNER(C)*70,3),LINETHICK2,COLORRED;

V1:=LLV(LOW,10);

V2:=HHV(HIGH,20);

lyf1:=EMA(((CLOSE-V1)/(V2-V1))*((-100)),3);

VARg5:=((CLOSE)/(REF(CLOSE,5))=1.15);

VARg6:=BACKSET(VARg5,5);

入市日:=IF((VARg6 AND (COUNT(VARg6,5)=1) or (CLOSE=HHV(HIGH,HIGH))

AND ((CLOSE)/(REF(CLOSE,1))1.098) AND (REF(VOL,LOW)REF(VOL,34))

AND (REF(VOL,LOW)REF(VOL,1)) AND (LYF1(-93))

AND (REF(VOL,LOW)REF(VOL,8))),60,0);

DRAWTEXT(cross(入市日 ,(58)),20,'十年不败 '),colorgreen;

TYP:=(HIGH+LOW+CLOSE)/3;

C2:=(TYP-MA(TYP,82))/(0.015*AVEDEV(TYP,82));

DRAWTEXT(cross(C2,-70),5,'CCI牛启动 '),colorgreen;

庄筹线:=EMA(WINNER(C)*50,4);

散筹线:=EMA((WINNER(C*1.1)-WINNER(C*0.9))*50,4);

AA:= REF(庄筹线,30)40 OR REF(庄筹线,20)40;

DRAWTEXT(cross(庄筹线,散筹线),15,'庄筹 '),colorgreen;

K1:=CLOSE/REF(CLOSE,3)=1.1;

D1:=BACKSET(K1,3);

加仓买:=IF((D1 AND COUNT(D1,13)=1),58,0);

D2:=CLOSE/REF(CLOSE,3)=1.1;

D3:=BACKSET(D2,3);

短线买:=IF((D3 AND COUNT(D3,3)=1),45,0);

D4:=CLOSE/REF(CLOSE,3)=1.1;

D5:=BACKSET(D4,3);

易涨停:=IF((D5 AND COUNT(D5,15)=1),30,0);

XG:=加仓买 AND 短线买 AND 易涨停;

DRAWTEXT(cross(XG,0),35,'加仓买 '),colorgreen;

参考低7:IF(TROUGHBARS(3,7,1)=0 AND HIGHLOW+0.04,10,0);

VAR1:=(INDEXC-MA(INDEXC,58))/MA(INDEXC,58)-0.152;

VAR2:=(C-EMA(C,58))/EMA(C,58)-0.19;

底区:COUNT(VAR2 AND VAR1,2) ;

抄底:参考低7 AND 底区1,COLORBLUE;

DRAWTEXT(抄底,1,'抄底'),COLORBLUE;

VAR3:=PEAKBARS(3,15,1)10;

VAR5:=IF(VAR3=1,2,0);

顶:= IF(VAR5=2,2,0);

顶A:IF(顶REF(顶,1),90,100),COLORGREEN;

DRAWTEXT(顶A=90,90,'卖'),COLORGREEN;

引用 ：通达信主力筹码副图公式 通信达公式指标大全 - 南方财富网