相關標簽:

?

a:=F10FIND('主要指標:',1);c0:=F10FIND('各家評論',a);aa:=F10TEXT(c0,6600);e1:=F10FIND('每股現金凈流量(元)',a);
y1:=F10FIND('指標名稱',a);a2:=F10FIND('每股收益(元)',a);c1:=F10FIND('每股凈資產(元)',a);
d1:=F10FIND('凈資產收益率(％)',a);f1:=F10FIND('每股資本公積金(元)',a);i1:=F10FIND('凈利潤增長率(%)',a);
EXPLAIN(CLOSE,''+aa+''),COLOR00DDDD;b1:=F10FIND('主營業務利潤率(%)',a);
DRAWTEXTEX(CLOSE,1,70,0,STKLABEL+' '+STKNAME+''),ColorFFEE00;
n1:=F10TEXT(y1+15,2);nn1:=F10TEXT(y1+18,2);nn2:=F10TEXT(y1+21,2);n2:=F10TEXT(y1+35,2);
n3:=F10TEXT(y1+45,2);n4:=F10TEXT(y1+55,2);aa1:=STRTONUM(F10TEXT(a2+20,10));
a01:=STRTONUM(F10TEXT(a2+30,10));aa2:=STRTONUM(F10TEXT(a2+40,10));
aa3:=STRTONUM(F10TEXT(a2+50,10));aa4:=STRTONUM(F10TEXT(a2+60,10));
bb1:=STRTONUM(F10TEXT(b1+20,10));bb2:=STRTONUM(F10TEXT(b1+40,10));
bb3:=STRTONUM(F10TEXT(b1+50,10));bb4:=STRTONUM(F10TEXT(b1+60,10));
cc1:=STRTONUM(F10TEXT(c1+20,10));cc2:=STRTONUM(F10TEXT(c1+40,10));
cc3:=STRTONUM(F10TEXT(c1+50,10));cc4:=STRTONUM(F10TEXT(c1+60,10));
dd1:=STRTONUM(F10TEXT(d1+20,10));dd2:=STRTONUM(F10TEXT(d1+40,10));
dd3:=STRTONUM(F10TEXT(d1+50,10));dd4:=STRTONUM(F10TEXT(d1+60,10));
ee1:=STRTONUM(F10TEXT(e1+20,10));ee2:=STRTONUM(F10TEXT(e1+40,10));
ee3:=STRTONUM(F10TEXT(e1+50,10));ee4:=STRTONUM(F10TEXT(e1+60,10));
ff1:=STRTONUM(F10TEXT(f1+20,10));ff2:=STRTONUM(F10TEXT(f1+40,10));
ff3:=STRTONUM(F10TEXT(f1+50,10));ff4:=STRTONUM(F10TEXT(f1+60,10));
ii1:=STRTONUM(F10TEXT(i1+20,10));ii2:=STRTONUM(F10TEXT(i1+628,10));
ii3:=STRTONUM(F10TEXT(i1+642,10));ii4:=STRTONUM(F10TEXT(i1+656,10));
STICKLINE(BARPOS=DATACOUNT-45,0,aa1,80,0),COLOR0099FF;
STICKLINE(BARPOS=DATACOUNT-35,0,a01,80,0),COLOR009900;
STICKLINE(BARPOS=DATACOUNT-25,0,aa2,80,0),COLOR000099;
STICKLINE(BARPOS=DATACOUNT-15,0,aa3,80,0),COLORBB00BB;
STICKLINE(BARPOS=DATACOUNT-5,0,aa4,80,0),COLORBB0000;
DRAWTEXTEX(CLOSE,1,10,120,'報告時間: '),coloryellow;
DRAWTEXTEX(CLOSE,1,90,120,''+n1+'-'+nn1+'-'+nn2+'季報'),coloryellow;
DRAWTEXTEX(CLOSE,1,220,120,'20'+n2+'年報'),coloryellow;
DRAWTEXTEX(CLOSE,1,320,120,'20'+n3+'年報'),coloryellow;
DRAWTEXTEX(CLOSE,1,420,120,'20'+n4+'年報'),coloryellow;
DRAWTEXTEX(CLOSE,1,10,240,'每股收益: '),Colorred;
DRAWTEXTEX(CLOSE,1,90,240,NUMTOSTR(aa1,3)),Colorred;
DRAWTEXTEX(CLOSE,1,220,240,NUMTOSTR(aa2,3)),Colorred;
DRAWTEXTEX(CLOSE,1,320,240,NUMTOSTR(aa3,3)),Colorred;
DRAWTEXTEX(CLOSE,1,420,240,NUMTOSTR(aa4,3)),Colorred;
DRAWTEXTEX(CLOSE,1,10,360,'主營利潤: '),Color80DDFF;
DRAWTEXTEX(CLOSE,1,90,360,NUMTOSTR(bb1,3)),Color80DDFF;
DRAWTEXTEX(CLOSE,1,220,360,NUMTOSTR(bb2,3)),Color80DDFF;
DRAWTEXTEX(CLOSE,1,320,360,NUMTOSTR(bb3,3)),Color80DDFF;
DRAWTEXTEX(CLOSE,1,420,360,NUMTOSTR(bb4,3)),Color80DDFF;
DRAWTEXTEX(CLOSE,1,10,480,'每股凈資: '),ColorFFFF80;
DRAWTEXTEX(CLOSE,1,90,480,NUMTOSTR(cc1,2)),ColorFFFF80;
DRAWTEXTEX(CLOSE,1,220,480,NUMTOSTR(cc2,2)),ColorFFFF80;
DRAWTEXTEX(CLOSE,1,320,480,NUMTOSTR(cc3,2)),ColorFFFF80;
DRAWTEXTEX(CLOSE,1,420,480,NUMTOSTR(cc4,2)),ColorFFFF80;
DRAWTEXTEX(CLOSE,1,10,600,'凈資收益: '),Colorcccccc;
DRAWTEXTEX(CLOSE,1,90,600,NUMTOSTR(dd1,2)+'%'),Colorcccccc;
DRAWTEXTEX(CLOSE,1,220,600,NUMTOSTR(dd2,2)+'%'),Colorcccccc;
DRAWTEXTEX(CLOSE,1,320,600,NUMTOSTR(dd3,2)+'%'),Colorcccccc;
DRAWTEXTEX(CLOSE,1,420,600,NUMTOSTR(dd4,2)+'%'),Colorcccccc;
DRAWTEXTEX(CLOSE,1,10,720,'每股現金: '),ColorFF80FF;
DRAWTEXTEX(CLOSE,1,90,720,IF(ee1=0,'',NUMTOSTR(ee1,3))),ColorFF80FF;
DRAWTEXTEX(CLOSE,1,220,720,IF(ee2=0,'',NUMTOSTR(ee2,3))),ColorFF80FF;
DRAWTEXTEX(CLOSE,1,320,720,IF(ee3=0,'',NUMTOSTR(ee3,3))),ColorFF80FF;
DRAWTEXTEX(CLOSE,1,420,720,IF(ee4=0,'',NUMTOSTR(ee4,3))),ColorFF80FF;
DRAWTEXTEX(CLOSE,1,10,840,'每股公積: '),Color4080FF;
DRAWTEXTEX(CLOSE,1,90,840,NUMTOSTR(ff1,4)),Color4080FF;
DRAWTEXTEX(CLOSE,1,220,840,NUMTOSTR(ff2,4)),Color4080FF;
DRAWTEXTEX(CLOSE,1,320,840,NUMTOSTR(ff3,4)),Color4080FF;
DRAWTEXTEX(CLOSE,1,420,840,NUMTOSTR(ff4,4)),Color4080FF;
DRAWTEXTEX(CLOSE,1,10,960,'凈利潤率: '),ColorEEEEFF;
DRAWTEXTEX(CLOSE,1,90,960,NUMTOSTR(ii1,2)+'%'),ColorEEEEFF;
DRAWTEXTEX(CLOSE,1,220,960,NUMTOSTR(ii2,2)+'%'),ColorEEEEFF;
DRAWTEXTEX(CLOSE,1,320,960,NUMTOSTR(ii3,2)+'%'),ColorEEEEFF;
DRAWTEXTEX(CLOSE,1,420,960,NUMTOSTR(ii4,2)+'%'),ColorEEEEFF;
動態收益:(SUM(aa1,4)-aa2)/3,PRECISION2,ColorFFFFFF,LINETHICK;
靜態收益:aa2,Color00FFFF,PRECISION2,LINETHICK;
市凈率:CLOSE/cc1,ColorFF00FF,PRECISION2,LINETHICK;
動態市盈率:CLOSE/動態收益,PRECISION2,ColorFFFFFF,LINETHICK;
靜態市盈率:CLOSE/靜態收益,PRECISION2,Color00FFFF,LINETHICK;
DRAWTEXTEX(aa1>a01,1,180,0,'業績較同期增長'),Color0000FF;
DRAWTEXTEX(aa1<a01,1,180,0,'業績較同期下滑'),Color00FF00;
DRAWTEXT(BARPOS=DATACOUNT-48,0,' 季報\n'+NUMTOSTR(aa1,3)),PXUP60,ColorFFFFFF;
DRAWTEXT(BARPOS=DATACOUNT-38,0,' 同期\n'+NUMTOSTR(a01,3)),PXUP60,ColorFFFFFF;
DRAWTEXT(BARPOS=DATACOUNT-28,0,' 年報\n'+NUMTOSTR(aa2,3)),PXUP60,ColorFFFFFF;
DRAWTEXT(BARPOS=DATACOUNT-18,0,' 上年\n'+NUMTOSTR(aa3,3)),PXUP60,ColorFFFFFF;
DRAWTEXT(BARPOS=DATACOUNT-8,0,' 前年\n'+NUMTOSTR(aa4,3)),PXUP60,ColorFFFFF;

{程序化交易 www.kzuj.com.cn }

?

公式導入教程: 【通達信公式源碼導入方法教程】 【同花順公式源碼導入方法教程】 【大智慧新一代公式源碼導入方法教程】

?

 

有思路，想編寫各種指標公式，交易模型，選股公式，還原公式的朋友

可聯系技術人員 QQ: 262069696  或微信：cxhjy888 進行 有償收費 編寫！(注：由于人數限制，QQ或微信請選擇方便的一個聯系我們就行，加好友時請簡單備注下您的需求，否則無法通過。謝謝您！)

（怎么收費，代編流程等詳情請點擊查閱！）

(注：由于人數限制，QQ或微信請選擇方便的一個聯系我們就行，加好友時請簡單備注下您的需求，否則無法通過。謝謝您！)