一个很简单但比较准的指标，主力机构差。(大智慧)

一个很简单但比较准的指标，主力机构差。(大智慧)

源码正文：

input:p1(60),p2(5),p3(10){XG51};
variable:资金=0{XG51};
资金:(ordervol(1,2)-orderVOL(2,2))/capital*100{XG51};
主力力度:SUM(资金,0){XG51};
主力单数:sum(ORDERNUM(2,0)-ORDERNUM(1,0),0){XG51};
a1:=SUM((ORDERVOL(1,3)),0){XG51};
a2:=SUM((ORDERVOL(2,3)),0){XG51};
a3:=(SUM((ORDERVOL(1,2)),0)) - a1{XG51};
a4:=(SUM((ORDERVOL(2,2)),0)) - a2{XG51};
a5:=(SUM((ORDERVOL(1,1)),0)) - (SUM((ORDERVOL(1,2)),0)){XG51};
a6:=(SUM((ORDERVOL(2,1)),0)) - (SUM((ORDERVOL(2,2)),0)){XG51};
a7:=(SUM((ORDERVOL(1,0)),0)) - (SUM((ORDERVOL(1,1)),0)){XG51};
a8:=(SUM((ORDERVOL(2,0)),0)) - (SUM((ORDERVOL(2,1)),0)){XG51};
a9:=(SUM((ORDERVOL(1,0)),0)) + (SUM((ORDERVOL(2,0)),0)){XG51};
a10:=a7 - a8{XG51};
a11:=a5 - a6{XG51};
a12:=a3 - a4{XG51};
a13:=a1 - a2{XG51};
a14:=(SUM((ORDERVOL(1,2)),0)) - (SUM((ORDERVOL(2,2)),0)){XG51};
a15:=(100 * a7) / a9{XG51};
a16:=(100 * a8) / a9{XG51};
a17:=(100 * a5) / a9{XG51};
a18:=(100 * a6) / a9{XG51};
a19:=(100 * a3) / a9{XG51};
a20:=(100 * a4) / a9{XG51};
a21:=(100 * a1) / a9;

a22:=(100 * a2) / a9{XG51};
a23:=(100 * (SUM((ORDERVOL(1,2)),0))) / a9{XG51};
a24:=(100 * (SUM((ORDERVOL(2,2)),0))) / a9{XG51};
a25:=(100 * a10) / a9{XG51};
a26:=(100 * a11) / a9{XG51};
a27:=(100 * a12) / a9{XG51};
a28:=(100 * a13) / a9{XG51};
a29:=(100 * a14) / a9{XG51};
a30:=(a1){XG51};
a31:=(a2){XG51};
a32:=(a3){XG51};
a33:=(a4){XG51};
a34:=(a5){XG51};
a35:=(a6){XG51};
a36:=(a7){XG51};
a37:=(a8){XG51};
a38:=((SUM((ORDERVOL(1,2)),0))){XG51};
a39:=((SUM((ORDERVOL(2,2)),0))){XG51};
a40:=(a10){XG51};
DRAWTEXTREL(2,720,'机买:'+NUMTOstR(a21)+'%'+' 大买:'+NUMTOSTR(a19)+'%'+' 中买:'+NUMTOSTR(a17)+'%'+' 散买:'+NUMTOSTR(a15)+'%'),colorRed{XG51};
DRAWTEXTREL(2,790,'机卖:'+NUMTOSTR(a22)+'%'+' 大卖:'+NUMTOSTR(a20)+'%'+' 中卖:'+NUMTOSTR(a18)+'%'+' 散卖:'+NUMTOSTR(a16)+'%'),colorGreen{XG51};
DRAWTEXTREL(2,860,'机差:'+NUMTOSTR(a28)+'%'+' 大差:'+NUMTOSTR(a27)+'%'+' 中差:'+NUMTOSTR(a26)+'%'+' 散差:'+NUMTOSTR(a25)+'%'),colorWhite{XG51};
DRAWTEXTREL(2,930,'主差:'+NUMTOSTR(a29)+'%'),colorRed{X_G-5~1_C_N_{};