大智慧机构持仓指标公式源码[大智慧公式]

大智慧机构持仓指标公式源码：

1. HS:=vol/capital;
   
2. DD:=BIGORDER(1,3)-BIGORDER(2,3);
   
3. DT:=HS*DD*100;
   
4. 机构持仓: Sum(DT,0),linethick2;
   
5. 当日增减度: DT, linethick0;
   
6. +DT,5,0),COLORRed;
   
7. ,5,0),COLORGreen;
   
8. 当日成交 := (DT * capital) * DYNAINFO(11)/10000;
   
9. 买入手数 := (capital*DT)/100;
   
10. if (当日成交>=0) then
    
11. begin
    
12. CXH:=STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1));
    
13. Str1:= '净买入：'+ NUMTOSTRN(当日成交,0)+'万元,';
    
14. Str2 := '净买入：'+ NUMTOSTRN(买入手数,0)+'手,';
    
15. Str3 := '当日增减度：' + NUMTOSTRN(DT,3);
    
16. end;
    
17. if 当日成交<0 then
    
18. begin
    
19. Str1:= '净卖出：'+ NUMTOSTRN(当日成交,0)+'万元,';
    
20. Str2 := '净卖出：'+ NUMTOSTRN(买入手数,0)+'手,';
    
21. Str3 := '当日增减度：' + NUMTOSTRN(DT,3);
    
22. end;
    
23. DRAWFLAGTEXT(DT>=0,机构持仓,Str1+str2+str3),COLORRED;
    
24. DRAWFLAGTEXT(DT<0,机构持仓,Str1+str2+str3),COLORGREEN;

复制代码

源码解析：

HS赋值:成交量(手)/当前流通股本(手)
DD赋值:BIGORDER(1,3)-BIGORDER(2,3)
DT赋值:HS*DD*100
输出机构持仓: DT的历史累和,线宽为2
输出当日增减度: DT, 线宽为0
+DT,5,0),画红色
,5,0),画绿色
赋值: (DT * 当前流通股本(手)) * 均价/10000
赋值: (当前流通股本(手)*DT)/100
THENBEGINSTR1赋值: '净买入：'+ NUMTOSTRN(当日成交,0)+'万元,'
赋值: '净买入：'+ NUMTOSTRN(买入手数,0)+'手,'
赋值: '当日增减度：' + NUMTOSTRN(DT,3)
END
THENBEGINSTR1赋值: '净卖出：'+ NUMTOSTRN(当日成交,0)+'万元,'
赋值: '净卖出：'+ NUMTOSTRN(买入手数,0)+'手,'
赋值: '当日增减度：' + NUMTOSTRN(DT,3)
END
DRAWFLAGTEXT(DT>=0,机构持仓,STR1+STR2+STR3),画红色
DRAWFLAGTEXT(DT<0,机构持仓,STR1+STR2+STR3),画绿色