帐户持股90日合计-筹码集中度及选股公式<绝对精品> 
				 
 
TODAY:="ddx.ddx"=0;{判断是否有正版数据} 
DD:={SELFDATA('DDY');}1-(SELFDATA('特大买入')+SELFDATA('大单买入')+SELFDATA('中单买入')); 
TODAY1:=DYNAINFO(7)=CLOSE and DYNAINFO(10)=AMOUNT and (ORDER(1)=0 and ORDER(2)=0);;{判断是否有理想数据} 
{比例} 
主单买:=IF(TODAY,IF(TODAY1,"DDEDATA@BIGORDER"(1,2),SELFDATA('特大买入')+SELFDATA('大单买入')),bigorder(1,2)); 
主单卖:=IF(TODAY,IF(TODAY1,"DDEDATA@BIGORDER"(2,2),SELFDATA('特大卖出')+SELFDATA('大单卖出')),bigorder(2,2)); 
主净:=(主单买-主单卖)*vol/capital*100; 
主净多日:=sum(主净,0); 
资金线:=50+sum(主净,0); 
主持:=(主单买-主单卖)*100; 
成交:=(主净* capital) * (amount/(v*100))/10000;  
壹日:percentbar(资金线,REF(资金线,1)); 
贰日:percentbar(资金线,REF(资金线,2)); 
叁日:percentbar(资金线,REF(资金线,3)); 
肆日:percentbar(资金线,REF(资金线,4)); 
伍日:percentbar(资金线,REF(资金线,5)); 
陆日:percentbar(资金线,REF(资金线,6)); 
柒日:percentbar(资金线,REF(资金线,7)); 
捌日:percentbar(资金线,REF(资金线,8)); 
玖日:percentbar(资金线,REF(资金线,9)); 
拾日:percentbar(资金线,REF(资金线,10)); 
廿日:percentbar(资金线,REF(资金线,20)); 
叁拾:percentbar(资金线,REF(资金线,30));  
六拾:percentbar(资金线,REF(资金线,60)); 
九拾:percentbar(资金线,REF(资金线,90)); 
帐户数:=extradata('散户线'); 
均户持股:=(FINANCE2(37)/帐户数)*10000; 
帐户增减:=(帐户数-REF(帐户数,1)); 
持股增减:=(均户持股-REF(均户持股,1)); 
A1:=Sum(持股增减,1); 
A2:=Sum(持股增减,2); 
A3:=Sum(持股增减,3); 
A4:=Sum(持股增减,4); 
A5:=Sum(持股增减,5); 
A6:=Sum(持股增减,6); 
A7:=Sum(持股增减,7); 
A8:=Sum(持股增减,8); 
A9:=Sum(持股增减,9); 
A10:=Sum(持股增减,10); 
A20:=Sum(持股增减,20); 
A30:=Sum(持股增减,30); 
A60:=Sum(持股增减,60); 
A90:=Sum(持股增减,90); 
B1:=帐户数; 
B2:=REF(帐户数,1); 
B3:=REF(帐户数,2); 
B4:=REF(帐户数,3); 
B5:=REF(帐户数,4); 
B6:=REF(帐户数,5); 
B7:=REF(帐户数,6); 
B8:=REF(帐户数,7); 
B9:=REF(帐户数,8); 
B10:=REF(帐户数,9); 
B20:=REF(帐户数,19); 
B30:=REF(帐户数,29); 
B60:=REF(帐户数,59);  
B90:=REF(帐户数,89);  
C1:=sum(帐户增减,1); 
C2:=sum(帐户增减,2); 
C3:=sum(帐户增减,3); 
C4:=sum(帐户增减,4); 
C5:=sum(帐户增减,5); 
C6:=sum(帐户增减,6); 
C7:=sum(帐户增减,7); 
C8:=sum(帐户增减,8); 
C9:=sum(帐户增减,9); 
C10:=sum(帐户增减,10); 
C20:=sum(帐户增减,20); 
C30:=sum(帐户增减,30); 
C60:=sum(帐户增减,60);  
C90:=sum(帐户增减,90);  
D1:=均户持股; 
D2:=REF(均户持股,1); 
D3:=REF(均户持股,2); 
D4:=REF(均户持股,3); 
D5:=REF(均户持股,4); 
D6:=REF(均户持股,5); 
D7:=REF(均户持股,6); 
D8:=REF(均户持股,7); 
D9:=REF(均户持股,8); 
D10:=REF(均户持股,9); 
D20:=REF(均户持股,19); 
D30:=REF(均户持股,29);  
D60:=REF(均户持股,59); 
D90:=REF(均户持股,89); 
drawtextrel(0,995,'户均持股'); 
drawtextrel(0,996,'持股增减'); 
drawtextrel(0,997,'帐号户数'); 
drawtextrel(0,998,'帐户增减'); 
drawtextrel(0,999,'合计日期'); 
drawtextrel(10,996,numtostrn(A1,0)),COLOR00FFFF; 
drawtextrel(20,996,numtostrn(A2,0)),COLOR00FFFF; 
drawtextrel(30,996,numtostrn(A3,0)),COLOR00FFFF; 
drawtextrel(40,996,numtostrn(A4,0)),COLOR00FFFF; 
drawtextrel(50,996,numtostrn(A5,0)),COLOR00FFFF; 
drawtextrel(60,996,numtostrn(A6,0)),COLOR00FFFF; 
drawtextrel(70,996,numtostrn(A7,0)),COLOR00FFFF; 
drawtextrel(80,996,numtostrn(A8,0)),COLOR00FFFF; 
drawtextrel(90,996,numtostrn(A9,0)),COLOR00FFFF; 
drawtextrel(100,996,numtostrn(A10,0)),COLOR00FFFF; 
drawtextrel(110,996,numtostrn(A20,0)),COLOR00FFFF; 
drawtextrel(120,996,numtostrn(A30,0)),COLOR00FFFF;  
drawtextrel(130,996,numtostrn(A60,0)),COLOR00FFFF;  
drawtextrel(140,996,numtostrn(A90,0)),COLOR00FFFF; 
drawtextrel(10,997,numtostrn(B1,0)),COLOR00FFFF; 
drawtextrel(20,997,numtostrn(B2,0)),COLOR00FFFF; 
drawtextrel(30,997,numtostrn(B3,0)),COLOR00FFFF; 
drawtextrel(40,997,numtostrn(B4,0)),COLOR00FFFF; 
drawtextrel(50,997,numtostrn(B5,0)),COLOR00FFFF; 
drawtextrel(60,997,numtostrn(B6,0)),COLOR00FFFF; 
drawtextrel(70,997,numtostrn(B7,0)),COLOR00FFFF; 
drawtextrel(80,997,numtostrn(B8,0)),COLOR00FFFF; 
drawtextrel(90,997,numtostrn(B9,0)),COLOR00FFFF; 
drawtextrel(100,997,numtostrn(B10,0)),COLOR00FFFF; 
drawtextrel(110,997,numtostrn(B20,0)),COLOR00FFFF; 
drawtextrel(120,997,numtostrn(B30,0)),COLOR00FFFF; 
drawtextrel(130,997,numtostrn(B60,0)),COLOR00FFFF; 
drawtextrel(140,997,numtostrn(B90,0)),COLOR00FFFF; 
drawtextrel(10,998,numtostrn(C1,0)),COLOR00FFFF; 
drawtextrel(20,998,numtostrn(C2,0)),COLOR00FFFF; 
drawtextrel(30,998,numtostrn(C3,0)),COLOR00FFFF; 
drawtextrel(40,998,numtostrn(C4,0)),COLOR00FFFF; 
drawtextrel(50,998,numtostrn(C5,0)),COLOR00FFFF; 
drawtextrel(60,998,numtostrn(C6,0)),COLOR00FFFF; 
drawtextrel(70,998,numtostrn(C7,0)),COLOR00FFFF; 
drawtextrel(80,998,numtostrn(C8,0)),COLOR00FFFF; 
drawtextrel(90,998,numtostrn(C9,0)),COLOR00FFFF; 
drawtextrel(100,998,numtostrn(C10,0)),COLOR00FFFF; 
drawtextrel(110,998,numtostrn(C20,0)),COLOR00FFFF; 
drawtextrel(120,998,numtostrn(C30,0)),COLOR00FFFF; 
drawtextrel(130,998,numtostrn(C60,0)),COLOR00FFFF; 
drawtextrel(140,998,numtostrn(C90,0)),COLOR00FFFF; 
drawtextrel(10,995,numtostrn(D1,0)),COLOR00FFFF; 
drawtextrel(20,995,numtostrn(D2,0)),COLOR00FFFF; 
drawtextrel(30,995,numtostrn(D3,0)),COLOR00FFFF; 
drawtextrel(40,995,numtostrn(D4,0)),COLOR00FFFF; 
drawtextrel(50,995,numtostrn(D5,0)),COLOR00FFFF; 
drawtextrel(60,995,numtostrn(D6,0)),COLOR00FFFF; 
drawtextrel(70,995,numtostrn(D7,0)),COLOR00FFFF; 
drawtextrel(80,995,numtostrn(D8,0)),COLOR00FFFF; 
drawtextrel(90,995,numtostrn(D9,0)),COLOR00FFFF; 
drawtextrel(100,995,numtostrn(D10,0)),COLOR00FFFF; 
drawtextrel(110,995,numtostrn(D20,0)),COLOR00FFFF; 
drawtextrel(120,995,numtostrn(D30,0)),COLOR00FFFF;  
drawtextrel(130,995,numtostrn(D60,0)),COLOR00FFFF; 
drawtextrel(140,995,numtostrn(D90,0)),COLOR00FFFF; 
 
  
 
 
 
这个指标不能用公式管理器新建的方式 
建立方法: 
1、在K线图最下面的指标栏右击切分子窗口到下侧  
  
 
  
 
  
 
  
 
复制粘贴源码到空白区、公式起名、公式描述(按自己的习惯填写)、完后确认,  
 
  
				
  |