相關(guān)標(biāo)簽: 大智慧機(jī)構(gòu)持倉(cāng)指標(biāo)公式源碼，機(jī)構(gòu)持倉(cāng)比例查詢 、 機(jī)構(gòu)持倉(cāng) 、 機(jī)構(gòu)的持倉(cāng)比率 、 通達(dá)信 機(jī)構(gòu)持倉(cāng) 、 機(jī)構(gòu)持倉(cāng)數(shù)據(jù) 、 大北農(nóng)最新機(jī)構(gòu)持倉(cāng)率 、 主力散戶持倉(cāng)公式 、 主力持倉(cāng)線指標(biāo)公式 、 主力持倉(cāng)公式 、

大智慧機(jī)構(gòu)持倉(cāng)指標(biāo)公式源碼：

HS:=vol/capital;
DD:=BIGORDER(1,3)-BIGORDER(2,3);
DT:=HS*DD*100;
機(jī)構(gòu)持倉(cāng): Sum(DT,0),linethick2;
當(dāng)日增減度: DT, linethick0;
+DT,5,0),COLORRed;
,5,0),COLORGreen;
當(dāng)日成交 := (DT * capital) * DYNAINFO(11)/10000;
買入手?jǐn)?shù) := (capital*DT)/100;
if (當(dāng)日成交>=0) then
begin
CXH:=STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1));
WARNING('http://www.kzuj.com.cn',CURRENTTIME>180000 and (CXH=4 OR CXH=9));
DRAWTEXTREL(10 ,10 ,'指標(biāo)公式');
Str1:= '凈買入：'+ NUMTOSTRN(當(dāng)日成交,0)+'萬(wàn)元,';
Str2 := '凈買入：'+ NUMTOSTRN(買入手?jǐn)?shù),0)+'手,';
Str3 := '當(dāng)日增減度：' + NUMTOSTRN(DT,3);
end;
if 當(dāng)日成交<0 then
begin
Str1:= '凈賣出：'+ NUMTOSTRN(當(dāng)日成交,0)+'萬(wàn)元,';
Str2 := '凈賣出：'+ NUMTOSTRN(買入手?jǐn)?shù),0)+'手,';
Str3 := '當(dāng)日增減度：' + NUMTOSTRN(DT,3);
end;
DRAWFLAGTEXT(DT>=0,機(jī)構(gòu)持倉(cāng),Str1+str2+str3),COLORRED;
DRAWFLAGTEXT(DT<0,機(jī)構(gòu)持倉(cāng),Str1+str2+str3),COLORGREEN;

{本文來(lái)至程序化交易網(wǎng) cxh99.com}

＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝

源碼解析：

HS賦值:成交量(手)/當(dāng)前流通股本(手)
DD賦值:BIGORDER(1,3)-BIGORDER(2,3)
DT賦值:HS*DD*100
輸出機(jī)構(gòu)持倉(cāng): DT的歷史累和,線寬為2
輸出當(dāng)日增減度: DT, 線寬為0
+DT,5,0),畫紅色
,5,0),畫綠色
賦值: (DT * 當(dāng)前流通股本(手)) * 均價(jià)/10000
賦值: (當(dāng)前流通股本(手)*DT)/100
THENBEGINSTR1賦值: '凈買入：'+ NUMTOSTRN(當(dāng)日成交,0)+'萬(wàn)元,'
賦值: '凈買入：'+ NUMTOSTRN(買入手?jǐn)?shù),0)+'手,'
賦值: '當(dāng)日增減度：' + NUMTOSTRN(DT,3)
END
THENBEGINSTR1賦值: '凈賣出：'+ NUMTOSTRN(當(dāng)日成交,0)+'萬(wàn)元,'
賦值: '凈賣出：'+ NUMTOSTRN(買入手?jǐn)?shù),0)+'手,'
賦值: '當(dāng)日增減度：' + NUMTOSTRN(DT,3)
END
DRAWFLAGTEXT(DT>=0,機(jī)構(gòu)持倉(cāng),STR1+STR2+STR3),畫紅色
DRAWFLAGTEXT(DT<0,機(jī)構(gòu)持倉(cāng),STR1+STR2+STR3),畫綠色