分时买点决策系统(大智慧)，使用专业财务数据做基本面选股(大智慧)

分时买点决策系统(大智慧)

input:N(60,1,111);

a1:=INDEXC;

a2:=INDEXO;

a3:=DISPstATUS=1;

a4:=BArslAST(a3);

a5:=(REF(a1,a4))/(REF(CLOSE,a4));

a6:=IF(a3,CLOSE,(REF(CLOSE,a4)));

a7:=IF(a3,(a1/a5),(REF((a1/a5),a4)));

a8:=a6-a7;

a9:=a2/a5;

a10:=INDEXH/a5;

a11:=INDEXL/a5;

a12:=(CLOSE>OPEN)OR((CLOSE=OPEN)AND(CLOSE>(REF(CLOSE,1))));

a13:=(a1>a2)OR((a1=a2)AND(a1>(REF(a1,1))));

大盘:STICKLINE(a13,(a10 +a8),(a11 +a8),0,0),colorRed;

STICKLINE(a13,((a1/a5) +a8),(a9 +a8),5,0),colorRed;

STICKLINE(NOT(a13),(a11+a8),(a10+a8),0,0),colorGreen;

STICKLINE(NOT(a13),((a1/a5)+a8),(a9+a8),5,0),colorGreen;

PARTLINE(CLOSE,CLOSE>(a1/a5),RGB(255,0,0)),linethick2,colorRed;

PARTLINE(CLOSE,CLOSE>(a1/a5)AND(CLOSE<(REF(CLOSE,1))),RGB(255,0,255)),linethick2,colormagenta;

PARTLINE(CLOSE,(CLOSE>(a1/a5)AND((MA(CLOSE,30))>(REF((MA(CLOSE,30)),1))))AND((MA((a1/a5),30))<(REF((MA((a1/a5),30)),1))),RGB(255,255,0)),linethick2,colorYellow;

STICKLINE((((REF(a1,1))<(REF(a2,1))) AND(a1>(REF(a1,1)))),((a1/a5)+a8),CLOSE,1,1),Color606060;

STICKLINE((((REF(a1,1))>(REF(a2,1)))AND(a1<(REF(a1,1)))),((a1/a5)+a8),CLOSE,1,1),Color606060;

a14:=MA(CLOSE,10);

a15:=(((ema(CLOSE,5))*7)+((EMA(CLOSE,10))* 3))/10;

a16:=((SMA((MAX((CLOSE-(REF(CLOSE,1))),0)),6,1))/(SMA(Abs((CLOSE-(REF(CLOSE,1)))),6,1)))* 100;

DRAWTEXT(((DATE >700101)AND(crOSS(84,a16))),HIGH,'▼'),colorGreen;

a17:=(((2*CLOSE)+HIGH)+LOW)/4;

a18:=LLV(LOW,34);

a19:=HHV(HIGH,34);

a20:=EMA((((a17-a18)/(a19-a18))*100),6);

a21:=EMA(((0.667*(REF(a20,1)))+(0.333*a20)),4);

a22:=LLV(LOW,120);

a23:=HHV(HIGH,120);

a24:=a23-a22;

a25:=HHVBARS(CLOSE,N);

REF(CLOSE,a25),POINTDOT,ColorFF0000;

突破:FILTER(((CROSS(CLOSE,((REF(REF(CLOSE,a25),1))*1.001)))AND(REF((a25>= 5),1))),10),POINTDOT,linethick0;

STICKLINE(突破,(CLOSE*0.99),CLOSE,5,0),ColorF600A9;

DRAWTEXT((((SUM((突破>0),0))=1)AND 突破),(CLOSE*0.99),'最佳买点'),colorWhite;

DRAWTEXT((((SUM((突破>0),0))=2)AND 突破),(CLOSE*0.99),'次佳买点'),colorWhite;

DRAWTEXT((((SUM((突破>0),0))=3)AND 突破),(CLOSE*0.99),'理想买点'),colorWhite;

DRAWTEXT((((SUM((突破> 0),0))=4)AND 突破),(CLOSE * 0.99),'及格买点'),colorWhite;

DRAWTEXT((((SUM((突破> 0),0))>=5) AND 突破),(CLOSE * 0.99),'突破'),colorWhite;

a26:=(CLOSE<(a1/a5))AND(CROSS(80,a16));

DRAWICON(a26,CLOSE,8);

DRAWICON((CLOSE>(a1/a5)AND(CROSS(a16,17))),CLOSE,7);

DRAWICON((CROSS(a16,10)),CLOSE,7);

DRAWICON((CROSS(90,a16)),CLOSE,8);

DRAWICON((CROSS(CLOSE,(a1/a5))),CLOSE,11);

DRAWTEXT(((IF(((((((COUNT((CLOSE<(REF(CLOSE,1))),8))/8)>0.3) AND(COUNT((a20>a21),3)))AND((REF(LOW,1))=a22))AND(CLOSE> OPEN)),1,0))AND(CROSS(a16,15))),LOW,'★小底'),ColorFF8080;

a27:=DYNAINFO(3);

a28:=SMA(CLOSE,2,1);

a29:=SMA(CLOSE,6,1);

a30:=2*(a28-a29);

DRAWTEXTABS(10,200,'■所属板块：'+BKNAME),ColorYELLOW,linethick1;

流通盘大小:=FINANCE2(37)/1000000*100;

DRAWTEXTABS(280,220,'流通盘大小：'+NUMTOSTRN(流通盘大小,2)+'亿'),LINETHICK1,ColorYELLOW;

每股收益:=FINANCE2(3);

每股市盈率:=DYNAINFO(39);

每股净资产:=FINANCE2(4);

销售毛利率:=FINANCE2(12);

主营收入同比:=FINANCE2(11);

净利润同比增长:=FINANCE2(10);

DRAWTEXTABS(170,220,'每股收益:'+NUMTOSTRN(每股收益,2)+'元'),COLOR00FF00;

DRAWTEXTABS(170,240,'每股市盈率:'+NUMTOSTRN(每股市盈率,1)+'倍'),COLORRED;

DRAWTEXTABS(170,260,'每股净资产:'+NUMTOSTRN(每股净资产,2)+'元'),COLORRED;

DRAWTEXTABS(20,220,'销售毛利率：'+NUMTOSTRN(销售毛利率,2)+'%'),LINETHICK1,COLOR00FF00;

DRAWTEXTABS(20,240,'主营收入同比增长：'+NUMTOSTRN(主营收入同比,2)+'%'),LINETHICK1,COLOR00FF00;

DRAWTEXTABS(20,260,'净利润同比增长：'+NUMTOSTRN(净利润同比增长,2)+'%'),LINETHICK1,COLOR00FF00;

使用专业财务数据做基本面选股(大智慧)

经典基本面选股1---比乔斯基市净率选股。SETPFFIN(00001);{仅调用历年年报数据}

var1:=DYNAINFO(58)<4;{市净率小于4}

var2:=PFFIN(1658,0)>0;{总资产报酬率大于0}

var3:=PFFIN(1310,0)>0;{经营现金流量净额大于0}

var4:=PFFIN(1658,0)>PFFIN(1658,1);{总资产报酬率大于上一年}

var5:=PFFIN(1310,0)>PFFIN(1273,0);{经营性现金流净额大于净利润}

var6:=PFFIN(1409,0)<PFFIN(1409,1);{长期负债比率较上上个财政年度要低}

var7:=PFFIN(1401,0)>PFFIN(1401,1);{流动比率较上上个财政年度要高}

var8:=PFFIN(1107,0)<=PFFIN(1107,1);{

股本等于或者小于上上个财政年度的股本}var9:=PFFIN(1659,0)>PFFIN(1659,1);{销售毛利率比上上个财政年度要高}

var10:=PFFIN(1460,0)>PFFIN(1460,1);{总资产周转率较上上个财政年度要高}

VAR1 AND VAR2 AND VAR3 AND VAR4 AND VAR5 AND VAR6 AND VAR6 AND VAR8 AND VAR9 AND VAR10;

根据一发千钧老师高送转条件用专业财务数据做大智慧选股公式，共选出41只票。

T1:=PFFIN(1004,0)>5;{每股净资产大于5元}

T2:=PFFIN(1005,0)>1;{每股公积金大于1元}

T3:=PFFIN(1006,0)>0.5;{每股未分配

利润大于0.5元}T4:=PFFIN(1003,0)>0.5;{每股现金流大于0.5元}

总股本:=FINANCE2(35)/10000;

流通股:=FINANCE2(37)/10000;

XG:T1 AND T2 AND T3 AND T4 AND 总股本<10 AND 流通股<3;

经典基本面选股2---莫伦卡选股。{以下参数略微放宽了一些了，主要是为了增加选多可选的股票}

SETPFFIN(00001);{仅调用历年年报数据}

var1:=(PFFIN(1002,0)+PFFIN(1002,1)+PFFIN(1002,2)+PFFIN(1002,3)+PFFIN(1002,4))/5>14 ;{过去5年来平均净资产

收益率高于14%}var2:=DYNAINFO(39)<=30 and DYNAINFO(39)>0;{

市盈率低于30 并且大于 0}var3:=PFFIN(1273,0)>PFFIN(1273,4);{最新期的净利润大于5年前的净利润}

var4:=PFFIN(1310,0)>0;{经营现金流为正}

var1 and var2 and var3 and var4;

经典基本面选股3---本杰明.格拉汉姆-进取型选股。

SETPFFIN(00001);{仅调用历年年报数据}

var1:=DYNAINFO(39)<=40;{默认

行业市盈率均值为50，在所有股票中，市盈率或本益比排在在最低的10%之内}

var2:=PFFIN(1401,0)>1.5;{流动比率不低于1.5}

var3:=PFFIN(1105,0)/PFFIN(1310,0)>0 AND PFFIN(1105,0)/PFFIN(1310,0)<1.1 ;{长期负债对营运

资金的比率大于0且小于110}var4:=PFFIN(1273,0)>0 AND PFFIN(1273,1)>0 AND PFFIN(1273,2)>0 AND PFFIN(1273,3)>0AND PFFIN(1273,4)>0;{在过去的五个会计年度内以及最近的12个月内，每股盈利均为正数}

var5:=PFFIN(1111,0)>0;{下一年度公司打算分配红利（显示出红利为正）}

var6:=PFFIN(1273,0)>PFFIN(1273,4);{最近一个会计年度内的每股盈利大于五年前的数值}

var7:=DYNAINFO(58)<5;{市净率不高于1.2，这里适当放宽标准到5}

var1 and var2 and var3 and var4 and var5 and var6 and var7 ;{联合选股条件};