当前位置: 网站首页 > 股票软件公式 > 通达信公式 > 文章 当前位置: 通达信公式 > 文章

通达信源码精选:基本面主图,精准BS,分时趋势

点击: 次    来源:顶尖财经    作者:股市狙击 - 小 + 大

1、基本面主图

{基本面主图}
MID :  MA(CLOSE,26);
UPPER: MID + 2*STD(CLOSE,26);
LOWER: MID - 2*STD(CLOSE,26);
 
{-------------------------------------------------立体K线-----------------------------------------------}
STICKLINE(C>=O,C,O,3.4,0),COLOR0000AA;
STICKLINE(C>=O,C,O,3.0,0),COLOR0000BB ;
STICKLINE(C>=O,C,O,2.4,0),COLOR0000CC;
STICKLINE(C>=O,C,O,2.0,0),COLOR0000DD ;
STICKLINE(C>=O,C,O,1.6,0),COLOR0000EE;
STICKLINE(C>=O,C,O,1.2,0),COLOR0000FF;
STICKLINE(C>=O,C,O,0.6,0),COLOR0000FF;
STICKLINE(C>=O,H,L,0,0),COLORRED;
STICKLINE(C<=O,C,O,3.4,0),COLORAAAA00;
STICKLINE(C<=O,C,O,3.0,0),COLORBBBB00;
STICKLINE(C<=O,C,O,2.4,0),COLORCCCC00;
STICKLINE(C<=O,C,O,2.0,0),COLORDDDD00;
STICKLINE(C<=O,C,O,1.6,0),COLOREEEE00;
STICKLINE(C<=O,C,O,1.2,0),COLORFFFF00;
STICKLINE(C<=O,C,O,0.6,0),COLORFFFF00;
STICKLINE(C<=O,H,L,0,0),COLORFFFF00;
{-------------------------------------------------基本面----------------------------------------------}
{距形}
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;
{-----------------------------------------------------------------------------------------------------}
{-----------------------------------------------------------------------------------------------------};
{资金突破}
买线:=EMA(C,2);
卖线:=EMA(SLOPE(C,21)*20+C,42);
BU:=CROSS(买线,卖线);
SEL:=CROSS(卖线,买线);
Z1:=REF(HIGH,4)=HHV(HIGH,2*4+1);
Y1:=FILTER(Z1,3);
C1:=BACKSET(Y1,3+1);
D1:=FILTER(C1,3);
A2:=REF(LOW,3)=LLV(LOW,2*3+1);
V2:=FILTER(A2,3);
C2:=BACKSET(V2,3+1);
D2:=FILTER(C2,3);
E1:=(REF(LLV(LOW,2*3),1)+REF(HHV(HIGH,2*3),1))/2;
E2:=(HIGH+LOW)/2;
www58188com:DRAWNULL,COLORRED;
H1:=(D1 AND NOT(D2 AND E1>=E2)) OR ISLASTBAR=1 OR BARSCOUNT(CLOSE)=1;
H2:=D1 AND NOT(D2 AND E1>=E2);
L1:=D2 AND NOT(D1 AND E1=E2);
X1:=REF(BARSLAST(H1),1)+1;
DRAWTEXT_FIX(CURRBARSCOUNT=60,0.4,0.01,0,''),COLORGREEN;
F1:=BACKSET(H1 AND COUNT(L1,X1)>0,LLVBARS(IF(L1,LOW,10000),X1));
G1:=F1>REF(F1,1);
I1:=BACKSET(G1,2);
LD:=I1>REF(I1,1);
L2:=LD OR ISLASTBAR=1 OR BARSCOUNT(CLOSE)=1;
X2:=REF(BARSLAST(L2),1)+1;
F2:=BACKSET(L2 AND COUNT(H2,X2)>0,HHVBARS(IF(H2,HIGH,0),X2));
G2:=F2>REF(F2,1);
I2:=BACKSET(G2,2);
HD:=I2>REF(I2,1);
UU2:=BACKSET(ISLASTBAR=1,BARSLAST(HD)+1);
VV2:=UU2>REF(UU2,1);
WW2:=BACKSET(VV2,REF(BARSLAST(HD),1)+2);
XX2:=WW2>REF(WW2,1);
突破线:REF(H,BARSLAST(VV2));
持仓线:REF(H,BARSLAST(XX2));
TP1:=CROSS(C,突破线);
TP2:=CROSS(C,持仓线);
DRAWTEXT(TP1,0,'  突破突破线'),LINETHICK1,COLORYELLOW;
DRAWICON(TP1,C,1);
DRAWTEXT(TP2,O,'  突破持仓线'),LINETHICK1,COLORYELLOW;
DRAWICON(TP2,C,3);



2、精准BS

买线:EMA(C,5),COLOR000999;

卖线:EMA(SLOPE(C,21)*20+C,42),POINTDOT,COLORBLUE,LINETHICK3;  
BUY1:=CROSS(买线,卖线);
SEL1:=CROSS(卖线,买线);
DRAWTEXT(BUY1,LOW*0.95,'B  '),COLORRED,LINETHICK6;
DRAWTEXT(SEL1,HIGH*1.05,'S'),COLORGREEN,LINETHICK6;
STICKLINE(买线>=卖线,LOW,HIGH,0.1,1),COLORRED;
STICKLINE(买线>=卖线,CLOSE,OPEN,8,1),COLORRED;
STICKLINE(买线>=卖线,CLOSE,OPEN,10,1),COLORBROWN;
STICKLINE(买线<卖线,CLOSE,OPEN,10,0),COLORFFFF00;
STICKLINE(买线<卖线,CLOSE,OPEN,8,0),COLOR00FF00;
STICKLINE(买线<卖线,LOW,HIGH,0.1,1),COLOR00FF00;
STICKLINE(CROSS(买线,卖线) OR CROSS(卖线,买线),OPEN,CLOSE,6,0),COLORBLUE;
限制:=EMA((((H+C)/2+L+(C+L)/2)/3-EMA(LLV(((H+C)/2+L+(C+L)/2)/3,89),2))/(EMA(HHV (((H+C)/2+L+(C+L)/2)/3,21),2)-EMA(LLV(((H+C)/2+L+(C+L)/2)/3,89),2)),8)*100; 
平衡:=SMA(EMA(SMA((C+L)/2,3,1),3),5,1);
DRAWTEXT(FILTER(平衡>REF(平衡,1)AND HHV(MA((H+C)/2,13),10)<REF(HHV(MA((H+C)/2,13),10),1)AND((C+L)/2)>REF((C+L)/2,1),5)AND 限制<88,L*0.98,'    ------'),COLORCYAN;
{股民学院 www.58188.com 整理}



3、分时趋势

{分时趋势}
A1:=SUM(IF(CLOSE>REF(CLOSE,1),VOL/CAPITAL*100,IF(CLOSE<REF(CLOSE,1),-VOL/CAPITAL*100,0)),0);
成交额:=V*C/100,NODRAW;
A2:=SUM((IF(((成交额/8>20) AND (CLOSE>(REF(CLOSE,1)))),成交额,0)),0);
A3:=SUM((IF(((成交额/8>20) AND (CLOSE<(REF(CLOSE,1)))),成交额,0)),0);
A4:=SUM((IF(((成交额/8<20) AND (CLOSE>(REF(CLOSE,1)))),成交额,0)),0);
A5:=SUM((IF(((成交额/8<20) AND (CLOSE<(REF(CLOSE,1)))),成交额,0)),0);
A6:=((A2+A3)+A4)+A5;
A7:=IF((ISLASTBAR),((100*A2)/A6),0);
A8:=IF((ISLASTBAR),((100*A3)/A6),0);
A9:=IF((ISLASTBAR),((100*A4)/A6),0);
A10:=IF((ISLASTBAR),((100*A5)/A6),0);
机买:(A2),LINETHICK4,COLORRED;
机卖:(A3),LINETHICK4,COLORCYAN;
操盘:机买-机卖,NODRAW;
散买:(A4),COLOR5555FF;
散卖:(A5),COLOR55FF55;
散户进出:=散买-散卖,NODRAW;
抄底:IF(CROSS(A2,A3),10,0),LINETHICK3,COLORMAGENTA;
闪电买入:DRAWTEXT(CROSS(操盘,抄底 AND A3),操盘*0.68,'买'),LINETHICK3,COLORYELLOW;
强势:((100*A2)/A6>50);
STICKLINE(强势,机买*1.02,机买*1.1,1,0),COLORYELLOW;
拉升:((100*A2)/A6-(100*A3)/A6)>18 AND (100*A2)/A6-(100*A5)/A6>18;
STICKLINE(拉升,机买*1.1,机买*1.2,1,0),COLORRED;
DRAWTEXT(ISLASTBAR=1,机买*0.95,''),LINETHICK2,COLORRED;
DRAWTEXT(ISLASTBAR=1,机卖*0.95,''),LINETHICK2,COLORFFFF55;
Q:=BETWEEN(C/(SUM(AMOUNT,BARSCOUNT(C))/SUM(VOL*100,BARSCOUNT(C))),1.05,0.95);
Q2:=IF(Q=0,MA(C,BARSCOUNT(C)),(SUM(AMOUNT,BARSCOUNT(C))/SUM(VOL*100,BARSCOUNT(C))));
DRAWICON(CROSS((C/Q2),1.03),机买,5);
DD1:=1;
AAA1:=STRCAT(STRCAT('机构买入',CON2STR((100*A2)/A6,0)),'%');
AAA2:=STRCAT(STRCAT('机构卖出',CON2STR((100*A3)/A6,0)),'%');
AAA0:=STRCAT(STRCAT('机构总买入',CON2STR((100*(A2-A3))/A6,0)),'%');
AAA3:=STRCAT(STRCAT('散户买入',CON2STR((100*A4)/A6,0)),'%');
AAA4:=STRCAT(STRCAT('散户卖出',CON2STR((100*A5)/A6,0)),'%');
AAA5:=STRCAT(STRCAT('散户总买入',CON2STR((100*(A4-A5))/A6,0)),'%');
DRAWTEXT_FIX(DD1=1,0.01,0.05,0,AAA1),COLORRED;
DRAWTEXT_FIX(DD1=1,0.01,0.25,0,AAA2),COLORCYAN;
DRAWTEXT_FIX(DD1=1,0.01,0.40,0,AAA3),COLORLIRED;
DRAWTEXT_FIX(DD1=1,0.01,0.55,0,AAA4),COLORGREEN;
DRAWTEXT_FIX(DD1=1,0.01,0.70,0,AAA0),LINETHICK5,COLORMAGENTA;
DRAWTEXT_FIX(DD1=1,0.01,0.85,0,AAA5),LINETHICK5,COLORGREEN;
主力净买额:=(操盘+散户进出)/成交额,NODRAW;
AAA6:=STRCAT(STRCAT('主力净买额',CON2STR(主力净买额,0)),'%');
DRAWTEXT_FIX(DD1=1,0.53,0.30,0,AAA6),COLORWHITE;
DRAWTEXT_FIX(1,0.00,0.00,0,'        擒妖抓牛WWW.58188.COM '),COLORYELLOW; 
HJ_1:=REF(CLOSE,1);

上一篇:通达信源码精选:多空转换KDJ,新MACD,变色K线

下一篇:通达信源码精选:MACD高低点划线,分时多空,进场副图