相關標簽:主力散戶線指標源碼 、 散戶線指標源碼 、 大智慧散戶線指標公式 、 散戶線指標公式 、 主力和散戶線指標公式 、 散戶線源碼 、 大智慧散戶線源碼 、 股價高 散戶線低 、 指標源碼 抄底高手 、 鎖定籌碼 指標源碼 、

 

{十大股東持股比例};DRAWGBK(C,Strip(RGB(0,10,160),RGB(00,10,160),0));
報告日期:=FINANCE2(1);
DRAWTEXTABS(20,10,'■財務報告日期:'+NUMTOSTRN(報告日期,0)+'日'),Color0000FF,LINETHICK1;
流通盤萬股:=CAPITAL/1000000;
DRAWTEXTABS(200,10,STKLABEL+' '+STKNAME),Color0000FF,LINETHICK2;
DRAWTEXTABS(330,10,'流通盤大小:'+NUMTOSTRN(流通盤萬股,2)+'億'),Color0000FF;
上期合計持股:=PFFINON(4251,2007,0331)/10000;
DRAWTEXTABS(20,30,'■十大股東上季合計持股:'+NUMTOSTRN(上期合計持股,2)+'萬股'),Color00FFFF;
當前合計持股:=PFFINON(5251,2007,0631)/10000;
DRAWTEXTABS(20,50,'■十大股東當季合計持股:'+NUMTOSTRN(當前合計持股,2)+'萬股'),Color00FF00;
上期持股比例:=PFFINON(4252,2007,0331);
DRAWTEXTABS(260,30,'■十大股東上季持股比例:'+NUMTOSTRN(上期持股比例,2)+'%'),Color00FFFF;
當前持股比例:=PFFINON(5252,2007,0631);
DRAWTEXTABS(260,50,'■十大股東當季持股比例:'+NUMTOSTRN(當前持股比例,2)+'%'),Color00FF00;
上期股東人數:=PFFINON(4253,2007,0331);
DRAWTEXTABS(460,30,'■上季股東人數:'+NUMTOSTRN(上期股東人數,0)+'戶'),Color00FFFF;
當前股東人數:=PFFINON(5253,2007,0631);
DRAWTEXTABS(460,50,'■當季股東人數:'+NUMTOSTRN(當前股東人數,0)+'戶'),Color00FF00;
上季人均持股:=PFFINON(4254,2007,0331);
DRAWTEXTABS(620,30,'■上季人均持股:'+NUMTOSTRN(上季人均持股,1)+'股'),Color00FFFF;
當季人均持股:=PFFINON(5254,2007,0631);
DRAWTEXTABS(620,50,'■當季人均持股:'+NUMTOSTRN(當季人均持股,1)+'股'),Color00FF00;
靜態股東增減:=(當前股東人數-上期股東人數);
靜態股東增減％:=(當前股東人數-上期股東人數)/上期股東人數*100;
{動態F10}
動態股東人數:extradata('散戶線'),Color00FFFF,PRECIS0;
動態股東增減:=(動態股東人數-當前股東人數);
SFX:=extradata('散戶線');
A:=CAPITAL*100/SFX;
B:=SFX/CAPITAL*100;
占流通盤:='占流通盤:'+CEILING(B)+'%';
人均持股:='人均持股:'+CEILING(A)+'手';
DRAWTEXTABS(460,10,'■控籌:'+人均持股),Color0000FF;
DRAWTEXTABS(620,10,'■當前人均持股'+占流通盤),Color0000FF;
股東增減％:(動態股東人數-當前股東人數)/當前股東人數*100,PRECIS2,ColorFFFFFF,LINETHICK0;
戶均持股％:capital/extradata('散戶線'),PRECIS2,Color00FF00,LINETHICK0;
DRAWTEXTABS(20,120 ,'■■■ 趨 勢 分 析：'),ColorFFFFFF;
DRAWTEXTABS(148,120,'■靜態股東人數:'+NUMTOSTRN(當前股東人數,0)+'戶'),ColorFFFFFF;
DRAWTEXTABS(310,120,'■靜態股東增減:'+NUMTOSTRN(靜態股東增減％,1)+'%'),ColorFFFFFF;
DRAWTEXTABS(460,120,'■動態股東增減:'+NUMTOSTRN(股東增減％,2)+'%'),ColorFFFFFF;
DRAWTEXTABS(620,120,'■動態戶均持股:'+NUMTOSTRN(戶均持股％,2)+'%'),ColorFFFFFF;CXH:=STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1));
WARNING('http://www.kzuj.com.cn',CURRENTTIME>180000 and (CXH=1 OR CXH=6));
DRAWTEXTREL(10 ,10 ,'指標公式');