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

input:p1(60),p2(5),p3(10);

variable:资金=0;

资金:(ordervol(1,2)-orderVOL(2,2))/capital*100;

主力力度:SUM(资金,0);

主力单数:sum(ORDERNUM(2,0)-ORDERNUM(1,0),0);

a1:=SUM((ORDERVOL(1,3)),0);

a2:=SUM((ORDERVOL(2,3)),0);

a3:=(SUM((ORDERVOL(1,2)),0)) - a1;

a4:=(SUM((ORDERVOL(2,2)),0)) - a2;

a5:=(SUM((ORDERVOL(1,1)),0)) - (SUM((ORDERVOL(1,2)),0));

a6:=(SUM((ORDERVOL(2,1)),0)) - (SUM((ORDERVOL(2,2)),0));

a7:=(SUM((ORDERVOL(1,0)),0)) - (SUM((ORDERVOL(1,1)),0));

a8:=(SUM((ORDERVOL(2,0)),0)) - (SUM((ORDERVOL(2,1)),0));

a9:=(SUM((ORDERVOL(1,0)),0)) + (SUM((ORDERVOL(2,0)),0));

a10:=a7 - a8;

a11:=a5 - a6;

a12:=a3 - a4;

a13:=a1 - a2;

a14:=(SUM((ORDERVOL(1,2)),0)) - (SUM((ORDERVOL(2,2)),0));

a15:=(100 * a7) / a9;

a16:=(100 * a8) / a9;

a17:=(100 * a5) / a9;

a18:=(100 * a6) / a9;

a19:=(100 * a3) / a9;

a20:=(100 * a4) / a9;

a21:=(100 * a1) / a9;