大智慧基本财务主图选股指标公式源码

大智慧基本财务主图选股指标公式源码

源码正文：

INPUT:M(0,0,2),N(130,0,999),P(130,1,999),F(1,0,1), R(1,0,1){XG51};
ma5:MA(CLOSE,5),Precis2;  
MA10:MA(CLOSE,10),Precis2;  
MA20:MA(CLOSE,20),Precis2;
MA30:MA(CLOSE,30),Precis2{XG51};
MA60:MA(CLOSE,60),Precis2,Linethick2{XG51};
MA120:MA(CLOSE,120),Precis2,Linethick2,colorgray{XG51};
MA240:MA(CLOSE,240),Precis2,Linethick2,colorgreen{XG51};
DRAWTEXTAbs(500,30,'主题投资：'+Selfstring('主题投资库')),LINETHICK2,colorWHITE{XG51};
IF(M=1) THEN BEGIN
DRAwrECTABS(0,0,380,140,RGB(1,1,1)),COLOR010101,LAYER4;END{XG51};
DRAWTEXTABS(0,10,'【板块】'+BKNAME),COLORBLUE;
DRAWTEXTABS(5,25,'报告期 '+FINANCE2(1)),COLOR0000FF{XG51};
DRAWTEXTABS(100,25,'总股 '+NUMTOSTRN(FINANCE2(35)/10000,2)+'亿'),COLOR0000FF{XG51};
DRAWTEXTABS(5,40,'流通股 '+NUMTOSTRN(FINANCE2(37)/10000,2)+'亿' ),COLOR0000FF{XG51};
DRAWTEXTABS(100,40,'市值 '+NUMTOSTRN(DYNAINFO(57)/100000000,2)+'亿' ),COLOR0000FF{XG51};
DRAWTEXTABS(5,5,'选股无忧网 www.xg51.cn'),linethick1,COLOR00EEff{XG51};
DRAWTEXTABS(5,55,'股收益 '+NUMTOSTRN(FINANCE2(3),2)+'元'),COLORFFFF00{XG51};
DRAWTEXTABS(100,55,'净利 '+NUMTOSTRN(FINANCE2(10),2)+'%'),COLORFFFF00{XG51};
DRAWTEXTABS(5,70,'股资产 '+NUMTOSTRN(FINANCE2(4),2)+'元'),COLORFFFF00{XG51};
DRAWTEXTABS(100,70,'收益 '+NUMTOSTRN(FINANCE2(5),2)+'%'),COLORFFFF00{XG51};
DRAWTEXTABS(5,85,'市盈率 '+NUMTOSTRN(DYNAINFO(39),2)+'%'),COLORFFFF00{XG51};
DRAWTEXTABS(100,85,'净率 '+NUMTOSTRN(DYNAINFO(58),2)+'%'),COLORFFFF00{XG51};
DRAWTEXTABS(195,25,'股东数 '+NUMTOSTRN(PFFIN(4253,0),0)+'户'),COLOR00FF00{XG51};
DRAWTEXTABS(295,25,'增减 '+NUMTOSTRN(PFFIN(4253,0)/PFFIN(4253,1)*100-100,2)+'%'),COLOR00FF00{XG51};
DRAWTEXTABS(195,40,'人均持 '+NUMTOSTRN(PFFIN(4254,0),0)+'股'),COLOR00FF00{XG51};
DRAWTEXTABS(295,40,'增减 '+NUMTOSTRN(PFFIN(4254,0)/PFFIN(4254,1)*100-100,2)+'%'),COLOR00FF00{XG51};
DRAWTEXTABS(195,55,'前10占 '+NUMTOSTRN(PFFIN(4252,0),2)+'%'),COLOR00FF00{XG51};
DRAWTEXTABS(295,55,'增减 '+NUMTOSTRN(PFFIN(4252,0)/PFFIN(4252,1)*100-100,2)+'%'),COLOR00FF00{XG51};
DRAWTEXTABS(195,70,'散户持 '+NUMTOSTRN((PFFIN(3003,0)-PFFIN(3003,0)*PFFIN(4252,0)/100)/10000,0)+'万'),COLOR00FF00{XG51};
DRAWTEXTABS(295,70,'增减 '+NUMTOSTRN((PFFIN(3003,0)-PFFIN(3003,0)*PFFIN(4252,0)/100)/
(PFFIN(3003,1)-PFFIN(3003,1)*PFFIN(4252,1)/100)*100-100,2)+'%'),COLOR00FF00{XG51};
DRAWTEXTABS(195,85,'散户均 '+NUMTOSTRN((PFFIN(3003,0)-PFFIN(3003,0)*PFFIN(4252,0)/100)/(PFFIN(4253,0)-10),0)+'股'),COLOR00FF00{XG51};
DRAWTEXTABS(295,85,'增减 '+NUMTOSTRN(((PFFIN(3003,0)-PFFIN(3003,0)*PFFIN(4252,0)/100)/(PFFIN(4253,0)-10))/
((PFFIN(3003,1)-PFFIN(3003,1)*PFFIN(4252,1)/100)/(PFFIN(4253,1)-10))*100-100,2)+'%'),COLOR00FF00{XG51};
DRAWTEXTABS(195,40,'人均持 '+NUMTOSTRN(PFFIN(4254,0),0)+'股'),COLOR00FF00{XG51};
DRAWTEXTABS(295,40,'增减 '+NUMTOSTRN(PFFIN(4254,0)/PFFIN(4254,1)*100-100,2)+'%'),COLOR00FF00{XG51};
DRAWTEXTABS(195,55,'前10占 '+NUMTOSTRN(PFFIN(4252,0),2)+'%'),COLOR00FF00{XG51};
DRAWTEXTABS(295,55,'增减 '+NUMTOSTRN(PFFIN(4252,0)/PFFIN(4252,1)*100-100,2)+'%'),COLOR00FF00{XG51};
DRAWTEXTABS(195,70,'散户持 '+NUMTOSTRN((PFFIN(3003,0)-PFFIN(3003,0)*PFFIN(4252,0)/100)/10000,0)+'万'),COLOR00FF00{XG51};
DRAWTEXTABS(295,70,'增减 '+NUMTOSTRN((PFFIN(3003,0)-PFFIN(3003,0)*PFFIN(4252,0)/100)/
(PFFIN(3003,1)-PFFIN(3003,1)*PFFIN(4252,1)/100)*100-100,2)+'%'),COLOR00FF00{XG51};
DRAWTEXTABS(5,5,'选股无忧网 www.xg51.cn'),linethick1,COLOR00EEff{XG51};
DRAWTEXTABS(195,85,'散户均 '+NUMTOSTRN((PFFIN(3003,0)-PFFIN(3003,0)*PFFIN(4252,0)/100)/(PFFIN(4253,0)-10),0)+'股'),COLOR00FF00{XG51};
DRAWTEXTABS(295,85,'增减 '+NUMTOSTRN(((PFFIN(3003,0)-PFFIN(3003,0)*PFFIN(4252,0)/100)/(PFFIN(4253,0)-10))/
((PFFIN(3003,1)-PFFIN(3003,1)*PFFIN(4252,1)/100)/(PFFIN(4253,1)-10))*100-100,2)+'%'),COLOR00FF00{XG51};
var100:='【自选】'{XG51};
IF INBLOCK('自选股')=1
THEN BEGIN var100:=var100+'已选!';END
ELSE BEGIN var100:=var100+'未选。';END{XG51};
DRAWTEXTABS(5,100, var100),COLORWHITE{XG51};
DRAWTEXTABS(100,100,'权重 '+IF(selfdata('300权重')>=0,selfdata('300权重'),0)+'%'),COLOR0000FF{X_G^5+1_C_N_{};