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

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

源码正文：

TODAY:=DYNAINFO(7)=CLOSE and DYNAINFO(10)=AMOUNT and (ORDER(1)=0 and ORDER(2)=0){XG51};
小单买:=IF(TODAY,(1-"ddeDATA@BIGORDER"(1,1)),(1-BIGORDER(1,1))){XG51};
小单卖:=IF(TODAY,(1-"DDEDATA@BIGORDER"(2,1)),(1-BIGORDER(2,1))){XG51};
中单买:=IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)), (BIGORDER(1,1)-BIGORDER(1,2))){XG51};
中单卖:=IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)), (BIGORDER(2,1)-BIGORDER(2,2))){XG51};
大单买:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)), (BIGORDER(1,2)-BIGORDER(1,3))){XG51};
大单卖:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)), (BIGORDER(2,2)-BIGORDER(2,3))){XG51};
特单买:=IF(TODAY,"DDEDATA@BIGORDER"(1,3),BIGORDER(1,3)){XG51};
特单卖:=IF(TODAY,"DDEDATA@BIGORDER"(2,3),BIGORDER(2,3)){XG51};
主单买:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)),BIGORDER(1,2)){XG51};
主单卖:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)),BIGORDER(2,2)){XG51};
HS:=vol/capital{XG51};
DD1:= 主单买-主单卖{XG51};
DT1:=HS*DD1*100{XG51};
DJG:=DD1*AMOUNT/10000{XG51};
机净:DJG,linethick0,COLORWHITE{XG51};
机构:=50+Sum(DT1,0){XG51};
DD2:= 特单买-特单卖{XG51};
DT2:=HS*DD2*100{XG51};
DFR:=DD2*AMOUNT/10000{XG51};
法净:DFR,linethick0,color0099ff{XG51};
法人:=25+Sum(DT2,0){XG51};
DD3:= 大单买-大单卖{XG51};
DT3:=HS*DD3*100{XG51};
DDH:=DD3*AMOUNT/10000{XG51};
大净:DDH,linethick0,colorffaa66{XG51};
大户:=25+Sum(DT3,0){XG51};
DD4:= 中单买-中单卖{XG51};
DT4:=HS*DD4*100{XG51};
DZH:=DD4*AMOUNT/10000{XG51};
中净:DZH,linethick0,color003399{XG51};
中户:=25+Sum(DT4,0){XG51};
DD5:= 小单买-小单卖{XG51};
DT5:=HS*DD5*100{XG51};
DSH:=DD5*AMOUNT/10000{XG51};
散净:DSH,linethick0,colorgreen{XG51};
散户:=25+Sum(DT5,0){XG51};
机1:=sum(DT1*10000,0){XG51};
机2:=INTPART(机1){XG51};
机构数:机2,linethick0,Color8000FF{XG51};
散1:=sum(DT5*10000,0){XG51};
散2:=INTPART(散1){XG51};
散户数:散2,linethick0,ColorABFF46{XG51};
散中和:(散户+中户),Color9DFFFF,linethick2{XG51};
大法和:(大户+法人),colorCyan,linethick2{XG51};
SZ:=(散中和-ref(散中和,1))*10{XG51};
DFJ:=(大法和-ref(大法和,1))*10{XG51};
S3:=ref(散户,3){XG51};
Z3:=ref(中户,3){XG51};
D3:=ref(大户,3){XG51};
F3:=ref(法人,3){XG51};
J3:=ref(机构,3){XG51};
S5:=ref(散户,5){XG51};
Z5:=ref(中户,5){XG51};
D5:=ref(大户,5){XG51};
F5:=ref(法人,5){XG51};
J5:=ref(机构,5){XG51};
S10:=ref(散户,10){XG51};
Z10:=ref(中户,10){XG51};
D10:=ref(大户,10){XG51};
f10:=ref(法人,10){XG51};
J10:=ref(机构,10){XG51};
S20:=ref(散户,20){XG51};
Z20:=ref(中户,20){XG51};
D20:=ref(大户,20){XG51};
F20:=ref(法人,20){XG51};
J20:=ref(机构,20){XG51};
S30:=ref(散户,30){XG51};
S60:=ref(散户,60){XG51};
S90:=ref(散户,90){XG51};
S120:=ref(散户,120){XG51};
Z30:=ref(中户,30){XG51};
Z60:=ref(中户,60){XG51};
Z90:=ref(中户,90){XG51};
Z120:=ref(中户,120){XG51};
D30:=ref(大户,30){XG51};
D60:=ref(大户,60){XG51};
D90:=ref(大户,90){XG51};
D120:=ref(大户,120){XG51};
F30:=ref(法人,30){XG51};
F60:=ref(法人,60){XG51};
F90:=ref(法人,90){XG51};
F120:=ref(法人,120){XG51};
J30:=ref(机构,30){XG51};
J60:=ref(机构,60){XG51};
J90:=ref(机构,90){XG51};
J120:=ref(机构,120){XG51};
散户数60:=ref(散户数,60){XG51};
散户数3:=ref(散户数,3){XG51};
散户数5:=ref(散户数,5){XG51};
散户数10:=ref(散户数,10){XG51};
散户数20:=ref(散户数,20){XG51};
散户数30:=ref(散户数,30){XG51};
散户数90:=ref(散户数,90){XG51};
散户数120:=ref(散户数,120){XG51};
机构数3:=ref(机构数,3){XG51};
机构数5:=ref(机构数,5){XG51};
机构数10:=ref(机构数,10){XG51};
机构数20:=ref(机构数,20){XG51};
机构数30:=ref(机构数,30){XG51};
机构数60:=ref(机构数,60){XG51};
机构数90:=ref(机构数,90){XG51};
机构数120:=ref(机构数,120){XG51};
DRAWTEXTAbs(70,5,'散户持仓(%)'),color00ff00{XG51};
DRAWTEXTABS(150,5,'中户持仓(%)'),color003399{XG51};
DRAWTEXTABS(230,5,'大户持仓(%)'),colorffaa66{XG51};
DRAWTEXTABS(310,5,'法人持仓(%)'),color0099ff{XG51};
DRAWTEXTABS(390,5,'机构持仓(%)'),colorred{XG51};
DRAWTEXTABS(10,5,'分 类'),COLORFFFFCC{XG51};
DRAWTEXTABS(10,25,'壹 日'),colorddffff{XG51};
DRAWTEXTABS(10,45,'叁 日'),colorddffff{XG51};
DRAWTEXTABS(10,65,'伍 日'),colorddffff{XG51};
DRAWTEXTABS(10,85,'拾 日'),colorddffff{XG51};
DRAWTEXTABS(10,105,'廿 日'),colorddffff{XG51};
DRAWTEXTABS(10,125,'叁 拾'),colorddffff{XG51};
DRAWTEXTABS(10,145,'陆 拾'),colorddffff{XG51};
DRAWTEXTABS(10,165,'玖 拾'),colorddffff{XG51};
DRAWTEXTABS(10,185,'佰 廿'),colorddffff{XG51};
DRAWTEXTABS(80,25,NUMTOstRN(散户,2)), color00ff00{XG51};
DRAWTEXTABS(160,25,NUMTOSTRN(中户,2)), color003399{XG51};
DRAWTEXTABS(240,25,NUMTOSTRN(大户,2)), colorffaa66{XG51};
DRAWTEXTABS(320,25,NUMTOSTRN(法人,2)), color0099ff{XG51};
DRAWTEXTABS(400,25,NUMTOSTRN(机构,2)), colorred{XG51};
DRAWTEXTABS(80,45,NUMTOSTRN(S3,2)), color00ff00{XG51};
DRAWTEXTABS(160,45,NUMTOSTRN(Z3,2)), color003399{XG51};
DRAWTEXTABS(240,45,NUMTOSTRN(D3,2)), colorffaa66{XG51};
DRAWTEXTABS(320,45,NUMTOSTRN(F3,2)), color0099ff{XG51};
DRAWTEXTABS(400,45,NUMTOSTRN(J3,2)), colorred{XG51};
DRAWTEXTABS(80,65,NUMTOSTRN(S5,2)), color00ff00{XG51};
DRAWTEXTABS(160,65,NUMTOSTRN(Z5,2)), color003399{XG51};
DRAWTEXTABS(240,65,NUMTOSTRN(D5,2)), colorffaa66{XG51};
DRAWTEXTABS(320,65,NUMTOSTRN(F5,2)), color0099ff{XG51};
DRAWTEXTABS(400,65,NUMTOSTRN(J5,2)), colorred{XG51};
DRAWTEXTABS(80,85,NUMTOSTRN(S10,2)), color00ff00{XG51};
DRAWTEXTABS(160,85,NUMTOSTRN(Z10,2)), color003399{XG51};
DRAWTEXTABS(240,85,NUMTOSTRN(D10,2)), colorffaa66{XG51};
DRAWTEXTABS(320,85,NUMTOSTRN(F10,2)), color0099ff{XG51};
DRAWTEXTABS(400,85,NUMTOSTRN(J10,2)), colorred{XG51};
DRAWTEXTABS(80,105,NUMTOSTRN(S20,2)), color00ff00{XG51};
DRAWTEXTABS(160,105,NUMTOSTRN(Z20,2)), color003399{XG51};
DRAWTEXTABS(240,105,NUMTOSTRN(D20,2)), colorffaa66{XG51};
DRAWTEXTABS(320,105,NUMTOSTRN(F20,2)), color0099ff{XG51};
DRAWTEXTABS(400,105,NUMTOSTRN(J20,2)), colorred{XG51};
DRAWTEXTABS(80,125,NUMTOSTRN(S30,2)), color00ff00{XG51};
DRAWTEXTABS(160,125,NUMTOSTRN(Z30,2)), color003399{XG51};
DRAWTEXTABS(240,125,NUMTOSTRN(D30,2)), colorffaa66{XG51};
DRAWTEXTABS(320,125,NUMTOSTRN(F30,2)), color0099ff{XG51};
DRAWTEXTABS(400,125,NUMTOSTRN(J30,2)), colorred{XG51};
DRAWTEXTABS(80,145,NUMTOSTRN(S60,2)), color00ff00{XG51};
DRAWTEXTABS(160,145,NUMTOSTRN(Z60,2)), color003399{XG51};
DRAWTEXTABS(240,145,NUMTOSTRN(D60,2)), colorffaa66{XG51};
DRAWTEXTABS(320,145,NUMTOSTRN(F60,2)), color0099ff{XG51};
DRAWTEXTABS(400,145,NUMTOSTRN(J60,2)), colorred{XG51};
DRAWTEXTABS(80,165,NUMTOSTRN(S90,2)), color00ff00{XG51};
DRAWTEXTABS(160,165,NUMTOSTRN(Z90,2)), color003399{XG51};
DRAWTEXTABS(240,165,NUMTOSTRN(D90,2)), colorffaa66{XG51};
DRAWTEXTABS(320,165,NUMTOSTRN(F90,2)), color0099ff{XG51};
DRAWTEXTABS(400,165,NUMTOSTRN(J90,2)),colorred{XG51};
DRAWTEXTABS(80,185,NUMTOSTRN(S120,2)), color00ff00{XG51};
DRAWTEXTABS(160,185,NUMTOSTRN(Z120,2)), color003399{XG51};
DRAWTEXTABS(240,185,NUMTOSTRN(D120,2)), colorffaa66{XG51};
DRAWTEXTABS(320,185,NUMTOSTRN(F120,2)), color0099ff{XG51};
DRAWTEXTABS(400,185,NUMTOSTRN(J120,2)),colorred{XG51};
DRAWTEXTABS(500,5,'散中持仓和：'+NUMTOSTRN(散中和,2)+'(%)'),Color9DFFFF{XG51};
DRAWTEXTABS(680,5,'大法持仓和：'+NUMTOSTRN(大法和,2)+'(%)'),colorCyan{XG51};
DRAWTEXTABS(500,25,'散户户数：'+NUMTOSTRN(散户数,3)),ColorABFF46{XG51};
DRAWTEXTABS(500,45,'散户户数：'+NUMTOSTRN(散户数3,3)),ColorABFF46{XG51};
DRAWTEXTABS(500,65,'散户户数：'+NUMTOSTRN(散户数5,3)),ColorABFF46{XG51};
DRAWTEXTABS(500,85,'散户户数：'+NUMTOSTRN(散户数10,3)),ColorABFF46{XG51};
DRAWTEXTABS(500,105,'散户户数：'+NUMTOSTRN(散户数20,3)),ColorABFF46{XG51};
DRAWTEXTABS(500,125,'散户户数：'+NUMTOSTRN(散户数30,3)),ColorABFF46{XG51};
DRAWTEXTABS(500,145,'散户户数：'+NUMTOSTRN(散户数60,3)),ColorABFF46{XG51};
DRAWTEXTABS(500,165,'散户户数：'+NUMTOSTRN(散户数90,3)),ColorABFF46{XG51};
DRAWTEXTABS(500,185,'散户户数：'+NUMTOSTRN(散户数120,3)),ColorABFF46{XG51};
DRAWTEXTABS(680,25,'机构户数：'+NUMTOSTRN(机构数,3)),Color8000FF{XG51};
DRAWTEXTABS(680,45,'机构户数：'+NUMTOSTRN(机构数3,3)),Color8000FF{XG51};
DRAWTEXTABS(680,65,'机构户数：'+NUMTOSTRN(机构数5,3)),Color8000FF{XG51};
DRAWTEXTABS(680,85,'机构户数：'+NUMTOSTRN(机构数10,3)),Color8000FF{XG51};
DRAWTEXTABS(680,105,'机构户数：'+NUMTOSTRN(机构数20,3)),Color8000FF{XG51};
DRAWTEXTABS(680,125,'机构户数：'+NUMTOSTRN(机构数30,3)),Color8000FF{XG51};
DRAWTEXTABS(680,145,'机构户数：'+NUMTOSTRN(机构数60,3)),Color8000FF{XG51};
DRAWTEXTABS(680,165,'机构户数：'+NUMTOSTRN(机构数90,3)),Color8000FF{XG51};
DRAWTEXTABS(680,185,'机构户数：'+NUMTOSTRN(机构数120,3)),Color8000FF{X~G_5_1~C~N~{};