大智慧F10提取解禁流通提示公式:
?
日期:=SELFDATA('解禁日期' );
股份:=SELFDATA('解禁股份' );
占比:=SELFDATA('占比' );
jjrq1:=2010;
jjrq2:=INTPART(日期);
jjrq3:=FRACPART(日期)*100;
jxz:=DATETOD1970(1100000+jjrq2*100+jjrq3)-DATETOD1970(DATE);
xstj:=股份>0;
bt1:=ifs(xstj,'◆解禁流通◆','');
bt2:=ifs(xstj,'日期 解禁股份(萬股) 占總股份(%)','');
xs1:=ifs(xstj,NUMTOSTR(jjrq1)+'-'+ifs(jjrq2>=10,NUMTOSTR(jjrq2),'0'+NUMTOSTR(jjrq2))+'-'+ifs(jjrq3>=10,NUMTOSTR(jjrq3),'0'+NUMTOSTR(jjrq3)),'');
xs2:=ifs(xstj,NUMTOSTRN(股份,2),'');
xs3:=ifs(xstj,NUMTOSTRN(占比,2)+'%','');
DRAWTEXTABS(10,10,bt1),Color00FF80;
DRAWTEXTABS(10,25,bt2),ColorFF8080;
DRAWTEXTABS(10,40,xs1),ColorFFFFFF;
DRAWTEXTABS(90,40,xs2),ColorFFFFFF;
DRAWTEXTABS(190,40,xs3),ColorFFFFFF;
DRAWTEXTABS(10,55,ifs(xstj,'距今'+jxz+'天','')),ColorFF80FF;
?
{程序化交易 www.weiqiv.net.cn }
{程序化交易 www.weiqiv.net.cn }
?
公式導入教程: 【通達信公式源碼導入方法教程】 【同花順公式源碼導入方法教程】 【大智慧新一代公式源碼導入方法教程】
?
打印本文
關閉窗口