自用疊加在主圖的基本面公式，(源碼，通達信，貼圖)

秦王888 2016-05-05

展開全文

說明，
第一句增加NOFRAME函數可以變成無框，DRAWRECTREL(0,0,378,348,RGB(28,26,28))NOFRAME;
刪除第一句可以去除背景框，
修改ＲＧＢ參數可以改變背景框顏色，

以下源碼

{-----------------------------------------------------------------------------------------------------}
{-------------------------------------------------基本面----------------------------------------------}
{距形}
DRAWRECTREL(0,0,378,348,RGB(0,32,64));
{基本資料}
品種類型:=FINANCE(3);
所屬板塊:=HYBLOCK;
上市天數:=FINANCE(42);
股總市值:=ROUND(FINANCE(41)/100000000);
流通市值:=ROUND(FINANCE(40)/100000000);
股東人數:=FINANCE(8);
人均持股:=ROUND(FINANCE(7)/FINANCE(8));
{}
DRAWTEXT_FIX(1,0.008,0.01,0,'基本資料：'),COLORLIBLUE;
DRAWTEXT_FIX(1,0.008,0.05,0,'品種類型：'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.008,0.09,0,'行業板塊：'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.008,0.13,0,'上市天數：'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.008,0.17,0,'股東人數：'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.008,0.21,0,'人均持股：'),COLORLIGREEN;
{}
DRAWTEXT_FIX(品種類型=1,0.055,0.05,0,'滬深 A 股'),COLORYELLOW;
DRAWTEXT_FIX(品種類型=2,0.055,0.05,0,' 中小板'),COLORYELLOW;
DRAWTEXT_FIX(品種類型=3,0.055,0.05,0,' 創業板'),COLORYELLOW;
DRAWTEXT_FIX(1,0.055,0.09,0,HYBLOCK),COLORYELLOW;{行業板塊}
{數值}
DRAWNUMBER_FIX(1,0.050,0.13,0,上市天數),COLORCYAN;
DRAWNUMBER_FIX(1,0.050,0.17,0,股東人數),COLORCYAN;
DRAWNUMBER_FIX(1,0.050,0.21,0,人均持股),COLORCYAN;
{單位}
DRAWTEXT_FIX(1,0.08,0.13,0,'天'),COLORWHITE;
DRAWTEXT_FIX(1,0.08,0.17,0,'人'),COLORWHITE;
DRAWTEXT_FIX(1,0.08,0.21,0,'股'),COLORWHITE;
{所屬板塊}
DRAWTEXT_FIX(1,0.008,0.25,0,'地區板塊：')COLORLIGREEN;
DRAWTEXT_FIX(1,0.048,0.25,0,DYBLOCK)COLORCYAN;
DRAWTEXT_FIX(1,0.095,0.25,0,'概念板塊：')COLORLIGREEN;
DRAWTEXT_FIX(1,0.135,0.25,0,GNBLOCK)COLORCYAN;
DRAWTEXT_FIX(1,0.008,0.29,0,'風格板塊：')COLORLIGREEN;
DRAWTEXT_FIX(1,0.048,0.29,0,FGBLOCK)COLORCYAN;
{財務(1)}
凈資收益率:=(FINANCE(33)/FINANCE(34)*100);
主營利潤率:=(FINANCE(23)/FINANCE(20)*100);
現金負債比:=(FINANCE(25)/FINANCE(15));
主營收入同比%:=FINANCE(44);{主營收入同比增長率}
凈利潤同比%:=FINANCE(43);{凈利潤同比增長率}
{}
DRAWTEXT_FIX(1,0.105,0.01,0,'財務資料(1)：'),COLORLIBLUE;
DRAWTEXT_FIX(1,0.105,0.05,0,'凈資產收益率：'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.105,0.09,0,'主營業務利潤率：'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.105,0.13,0,'現金流動負債比：'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.105,0.17,0,'主營收入同比%：'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.105,0.21,0,'凈利潤同比%：'),COLORLIGREEN;
{}
DRAWNUMBER_FIX(1,0.171,0.05,0,凈資收益率),COLORCYAN;
DRAWNUMBER_FIX(1,0.171,0.09,0,主營利潤率),COLORCYAN;
DRAWNUMBER_FIX(1,0.171,0.13,0,現金負債比),COLORCYAN;
DRAWNUMBER_FIX(1,0.171,0.17,0,主營收入同比%),COLORCYAN;
DRAWNUMBER_FIX(1,0.171,0.21,0,凈利潤同比%),COLORCYAN;
{財務(2)}
每股收益:=CONST(FINANCE(38));{近期}{每股稅后利潤}
每股收益年:=CONST(FINANCE(33));
每股凈資產:=CONST(FINANCE(34));
每股現金流:=CONST((FINANCE(25)/FINANCE(1)));
每股未分配:=CONST(FINANCE(32));
每股公積金:=CONST(FINANCE(18));
{}
DRAWTEXT_FIX(1,0.210,0.01,0,'財務資料(2)：'),COLORLIBLUE;
DRAWTEXT_FIX(1,0.210,0.05,0,'每股收益(近)：'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.210,0.09,0,'每股收益年：'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.210,0.13,0,'每股凈資產：'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.210,0.17,0,'每股未分配：'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.210,0.21,0,'每股公積金：'),COLORLIGREEN;
{}
DRAWNUMBER_FIX(1,0.281,0.05,1,每股收益),COLORCYAN;
DRAWNUMBER_FIX(1,0.281,0.09,1,每股收益年),COLORCYAN;
DRAWNUMBER_FIX(1,0.281,0.13,1,每股凈資產),COLORCYAN;
DRAWNUMBER_FIX(1,0.281,0.17,1,每股未分配),COLORCYAN;
DRAWNUMBER_FIX(1,0.281,0.21,1,每股公積金),COLORCYAN;
{}
{財務(3)}
市盈率:=DYNAINFO(39);
市銷率:=CONST(FINANCE(1)*DYNAINFO(7)/FINANCE(20));
市凈率:=CONST(DYNAINFO(7) / FINANCE(34));
毛利率:=((FINANCE(20)-FINANCE(21))/FINANCE(20)*100);
凈利潤率:=CONST(FINANCE(30)/FINANCE(20));
{}
DRAWTEXT_FIX(1,0.300,0.01,0,'財務資料(3)：'),COLORLIBLUE;
DRAWTEXT_FIX(1,0.300,0.05,0,'市盈率：'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.300,0.09,0,'市銷率：'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.300,0.13,0,'市凈率：'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.300,0.17,0,'毛利率：'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.300,0.21,0,'凈利潤率：'),COLORLIGREEN;
{}
DRAWNUMBER_FIX(1,0.361,0.05,1,市盈率),COLORCYAN;
DRAWNUMBER_FIX(1,0.361,0.09,1,市銷率),COLORCYAN;
DRAWNUMBER_FIX(1,0.361,0.13,1,市凈率),COLORCYAN;
DRAWNUMBER_FIX(1,0.361,0.17,1,毛利率),COLORCYAN;
DRAWNUMBER_FIX(1,0.361,0.21,1,凈利潤率),COLORCYAN;
{-----------------------------------------------------------------------------------------------------}
{-----------------------------------------------------------------------------------------------------};