付费版大智慧才能用的分类持仓图源码沪深通用(大智慧)

TODAY:=DYNAINFO(7)=CLOSE and DYNAINFO(10)=AMOUNT and (ORDER(1)=0 and ORDER(2)=0);

小单买:=IF(TODAY,(1-"ddeDATA@BIGORDER"(1,1)),(1-BIGORDER(1,1)));

小单卖:=IF(TODAY,(1-"DDEDATA@BIGORDER"(2,1)),(1-BIGORDER(2,1)));

中单买:=IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)), (BIGORDER(1,1)-BIGORDER(1,2)));

中单卖:=IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)), (BIGORDER(2,1)-BIGORDER(2,2)));

大单买:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)), (BIGORDER(1,2)-BIGORDER(1,3)));

大单卖:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)), (BIGORDER(2,2)-BIGORDER(2,3)));

特单买:=IF(TODAY,"DDEDATA@BIGORDER"(1,3),BIGORDER(1,3));

特单卖:=IF(TODAY,"DDEDATA@BIGORDER"(2,3),BIGORDER(2,3));

主单买:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)),BIGORDER(1,2));

主单卖:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)),BIGORDER(2,2));

HS:=vol/capital;

DD1:= 主单买-主单卖;

DT1:=HS*DD1*100;

DJG:=DD1*AMOUNT/10000;

机净:DJG,linethick0,COLORRED;

机构:=50+Sum(DT1,0);

DD2:= 特单买-特单卖;

DT2:=HS*DD2*100;

DFR:=DD2*AMOUNT/10000;

法净:DFR,linethick0,color0099ff;

法人:=25+Sum(DT2,0);

DD3:= 大单买-大单卖;

DT3:=HS*DD3*100;

DDH:=DD3*AMOUNT/10000;

大净:DDH,linethick0,colorffaa66;

大户:=25+Sum(DT3,0);

DD4:= 中单买-中单卖;

DT4:=HS*DD4*100;

DZH:=DD4*AMOUNT/10000;

中净:DZH,linethick0,color003399;

中户:=25+Sum(DT4,0);

DD5:= 小单买-小单卖;

DT5:=HS*DD5*100;

DSH:=DD5*AMOUNT/10000;

散净:DSH,linethick0,colorgreen;

散户:=25+Sum(DT5,0);

机1:=sum(DT1*10000,0);

机2:=INTPART(机1);

机构数:机2,linethick0,Color8000FF;

散1:=sum(DT5*10000,0);

散2:=INTPART(散1);

散户数:散2,linethick0,ColorABFF46;

散中和:(散户+中户),Color9DFFFF,linethick2;

大法和:(大户+法人),colorCyan,linethick2;

SZ:=(散中和-ref(散中和,1))*10;

DFJ:=(大法和-ref(大法和,1))*10;

S3:=ref(散户,3);

Z3:=ref(中户,3);

D3:=ref(大户,3);

F3:=ref(法人,3);

J3:=ref(机构,3);

S5:=ref(散户,5);

Z5:=ref(中户,5);

D5:=ref(大户,5);

F5:=ref(法人,5);

J5:=ref(机构,5);

S10:=ref(散户,10);

Z10:=ref(中户,10);

D10:=ref(大户,10);

f10:=ref(法人,10);

J10:=ref(机构,10);

S20:=ref(散户,20);

Z20:=ref(中户,20);

D20:=ref(大户,20);

F20:=ref(法人,20);

J20:=ref(机构,20);

S30:=ref(散户,30);

S60:=ref(散户,60);

S90:=ref(散户,90);

S120:=ref(散户,120);

Z30:=ref(中户,30);

Z60:=ref(中户,60);

Z90:=ref(中户,90);

Z120:=ref(中户,120);

D30:=ref(大户,30);

D60:=ref(大户,60);

D90:=ref(大户,90);

D120:=ref(大户,120);

F30:=ref(法人,30);

F60:=ref(法人,60);

F90:=ref(法人,90);

F120:=ref(法人,120);

J30:=ref(机构,30);

J60:=ref(机构,60);

J90:=ref(机构,90);

J120:=ref(机构,120);

散户数60:=ref(散户数,60);

散户数3:=ref(散户数,3);

散户数5:=ref(散户数,5);

散户数10:=ref(散户数,10);

散户数20:=ref(散户数,20);

散户数30:=ref(散户数,30);

散户数90:=ref(散户数,90);

散户数120:=ref(散户数,120);

机构数3:=ref(机构数,3);

机构数5:=ref(机构数,5);

机构数10:=ref(机构数,10);

机构数20:=ref(机构数,20);

机构数30:=ref(机构数,30);

机构数60:=ref(机构数,60);

机构数90:=ref(机构数,90);

机构数120:=ref(机构数,120);

DRAWTEXTAbs(70,5,'散户持仓(%)'),color00ff00;

DRAWTEXTABS(150,5,'中户持仓(%)'),color003399;

DRAWTEXTABS(230,5,'大户持仓(%)'),colorffaa66;

DRAWTEXTABS(310,5,'法人持仓(%)'),color0099ff;

DRAWTEXTABS(390,5,'机构持仓(%)'),colorred;

DRAWTEXTABS(10,5,'分 类'),COLORFFFFCC;

DRAWTEXTABS(10,25,'壹 日'),colorddffff;

DRAWTEXTABS(10,45,'叁 日'),colorddffff;

DRAWTEXTABS(10,65,'伍 日'),colorddffff;

DRAWTEXTABS(10,85,'拾 日'),colorddffff;

DRAWTEXTABS(10,105,'廿 日'),colorddffff;

DRAWTEXTABS(10,125,'叁 拾'),colorddffff;

DRAWTEXTABS(10,145,'陆 拾'),colorddffff;

DRAWTEXTABS(10,165,'玖 拾'),colorddffff;

DRAWTEXTABS(10,185,'佰 廿'),colorddffff;

DRAWTEXTABS(80,25,NUMTOstRN(散户,2)), color00ff00;

DRAWTEXTABS(160,25,NUMTOSTRN(中户,2)), color003399;

DRAWTEXTABS(240,25,NUMTOSTRN(大户,2)), colorffaa66;

DRAWTEXTABS(320,25,NUMTOSTRN(法人,2)), color0099ff;

DRAWTEXTABS(400,25,NUMTOSTRN(机构,2)), colorred;

DRAWTEXTABS(80,45,NUMTOSTRN(S3,2)), color00ff00;

DRAWTEXTABS(160,45,NUMTOSTRN(Z3,2)), color003399;

DRAWTEXTABS(240,45,NUMTOSTRN(D3,2)), colorffaa66;

DRAWTEXTABS(320,45,NUMTOSTRN(F3,2)), color0099ff;

DRAWTEXTABS(400,45,NUMTOSTRN(J3,2)), colorred;

DRAWTEXTABS(80,65,NUMTOSTRN(S5,2)), color00ff00;

DRAWTEXTABS(160,65,NUMTOSTRN(Z5,2)), color003399;

DRAWTEXTABS(240,65,NUMTOSTRN(D5,2)), colorffaa66;

DRAWTEXTABS(320,65,NUMTOSTRN(F5,2)), color0099ff;

DRAWTEXTABS(400,65,NUMTOSTRN(J5,2)), colorred;

DRAWTEXTABS(80,85,NUMTOSTRN(S10,2)), color00ff00;

DRAWTEXTABS(160,85,NUMTOSTRN(Z10,2)), color003399;

DRAWTEXTABS(240,85,NUMTOSTRN(D10,2)), colorffaa66;

DRAWTEXTABS(320,85,NUMTOSTRN(F10,2)), color0099ff;

DRAWTEXTABS(400,85,NUMTOSTRN(J10,2)), colorred;

DRAWTEXTABS(80,105,NUMTOSTRN(S20,2)), color00ff00;

DRAWTEXTABS(160,105,NUMTOSTRN(Z20,2)), color003399;

DRAWTEXTABS(240,105,NUMTOSTRN(D20,2)), colorffaa66;

DRAWTEXTABS(320,105,NUMTOSTRN(F20,2)), color0099ff;

DRAWTEXTABS(400,105,NUMTOSTRN(J20,2)), colorred;

DRAWTEXTABS(80,125,NUMTOSTRN(S30,2)), color00ff00;

DRAWTEXTABS(160,125,NUMTOSTRN(Z30,2)), color003399;

DRAWTEXTABS(240,125,NUMTOSTRN(D30,2)), colorffaa66;

DRAWTEXTABS(320,125,NUMTOSTRN(F30,2)), color0099ff;

DRAWTEXTABS(400,125,NUMTOSTRN(J30,2)), colorred;

DRAWTEXTABS(80,145,NUMTOSTRN(S60,2)), color00ff00;

DRAWTEXTABS(160,145,NUMTOSTRN(Z60,2)), color003399;

DRAWTEXTABS(240,145,NUMTOSTRN(D60,2)), colorffaa66;

DRAWTEXTABS(320,145,NUMTOSTRN(F60,2)), color0099ff;

DRAWTEXTABS(400,145,NUMTOSTRN(J60,2)), colorred;

DRAWTEXTABS(80,165,NUMTOSTRN(S90,2)), color00ff00;

DRAWTEXTABS(160,165,NUMTOSTRN(Z90,2)), color003399;

DRAWTEXTABS(240,165,NUMTOSTRN(D90,2)), colorffaa66;

DRAWTEXTABS(320,165,NUMTOSTRN(F90,2)), color0099ff;

DRAWTEXTABS(400,165,NUMTOSTRN(J90,2)),colorred;

DRAWTEXTABS(80,185,NUMTOSTRN(S120,2)), color00ff00;

DRAWTEXTABS(160,185,NUMTOSTRN(Z120,2)), color003399;

DRAWTEXTABS(240,185,NUMTOSTRN(D120,2)), colorffaa66;

DRAWTEXTABS(320,185,NUMTOSTRN(F120,2)), color0099ff;

DRAWTEXTABS(400,185,NUMTOSTRN(J120,2)),colorred;

DRAWTEXTABS(500,5,'散中持仓和:'+NUMTOSTRN(散中和,2)+'(%)'),Color9DFFFF;

DRAWTEXTABS(680,5,'大法持仓和:'+NUMTOSTRN(大法和,2)+'(%)'),colorCyan;

DRAWTEXTABS(500,25,'散户户数:'+NUMTOSTRN(散户数,3)),ColorABFF46;

DRAWTEXTABS(500,45,'散户户数:'+NUMTOSTRN(散户数3,3)),ColorABFF46;

DRAWTEXTABS(500,65,'散户户数:'+NUMTOSTRN(散户数5,3)),ColorABFF46;

DRAWTEXTABS(500,85,'散户户数:'+NUMTOSTRN(散户数10,3)),ColorABFF46;

DRAWTEXTABS(500,105,'散户户数:'+NUMTOSTRN(散户数20,3)),ColorABFF46;

DRAWTEXTABS(500,125,'散户户数:'+NUMTOSTRN(散户数30,3)),ColorABFF46;

DRAWTEXTABS(500,145,'散户户数:'+NUMTOSTRN(散户数60,3)),ColorABFF46;

DRAWTEXTABS(500,165,'散户户数:'+NUMTOSTRN(散户数90,3)),ColorABFF46;

DRAWTEXTABS(500,185,'散户户数:'+NUMTOSTRN(散户数120,3)),ColorABFF46;

DRAWTEXTABS(680,25,'机构户数:'+NUMTOSTRN(机构数,3)),Color8000FF;

DRAWTEXTABS(680,45,'机构户数:'+NUMTOSTRN(机构数3,3)),Color8000FF;

DRAWTEXTABS(680,65,'机构户数:'+NUMTOSTRN(机构数5,3)),Color8000FF;

DRAWTEXTABS(680,85,'机构户数:'+NUMTOSTRN(机构数10,3)),Color8000FF;

DRAWTEXTABS(680,105,'机构户数:'+NUMTOSTRN(机构数20,3)),Color8000FF;

DRAWTEXTABS(680,125,'机构户数:'+NUMTOSTRN(机构数30,3)),Color8000FF;

DRAWTEXTABS(680,145,'机构户数:'+NUMTOSTRN(机构数60,3)),Color8000FF;

DRAWTEXTABS(680,165,'机构户数:'+NUMTOSTRN(机构数90,3)),Color8000FF;

DRAWTEXTABS(680,185,'机构户数:'+NUMTOSTRN(机构数120,3)),Color8000FF;