软件名称：[B]箱体主图－－-应多位朋友邀请，今发放自用箱体主图，需要的请关注[/B]
软件类型：国产软件
运行环境：Win2000/WinXP/Win2003/WinVista
软件语言：简体中文
授权方式：共享软件
软件大小：4.00 KB
官方主页：Home Page
更新时间：2013-07-13 11:54:19
软件简介:

自从公布《自用多年的超级短线指标【抄底、逃顶、实站图、说明】》
http://www.70822.comhttp://www.70822.com/soft/sort013/sort05/down-58125.html
以来，得到许多朋友关心，

有不少瞄上了我用的主图指标，不敢独享，请朋友们拿去，希望能对大家有用!

 

通达信自用箱体主图指标公式

{基本面}
主营率:=STRCAT(' 主营率: ',CON2STR(IF(FINANCE(20)>0,FINANCE(23)/FINANCE(20)*100,-0),2));
净益率:=STRCAT(' 净益率: ',CON2STR(IF(FINANCE(19)>0,FINANCE(30)/FINANCE(19)*100,-0),2));
毛利率:=STRCAT(' 毛利率: ',CON2STR(IF(FINANCE(21)>0,(FINANCE(20)-FINANCE(21))/FINANCE(20)*100,-0),2));
总利润:=STRCAT(' 总利润: ',CON2STR(FINANCE(28)/100000000,2));
当前业绩:=STRCAT(STRCAT(STRCAT(净益率,毛利率),STRCAT(总利润,'亿')),主营率);

市盈率:=STRCAT(' 市盈率: ',CON2STR(IF(FINANCE(33)>0,C/FINANCE(33),-0),2));
净资产:=STRCAT(' 净资产: ',CON2STR(FINANCE(34),2));
总股本:=STRCAT(' 总股本: ',CON2STR(FINANCE(1)/100000000,2));
流通股:=STRCAT(' 流通股: ',CON2STR(FINANCE(7)/100000000,2));
股本市值:=STRCAT(STRCAT(STRCAT(市盈率,净资产),STRCAT(总股本,'亿股')),STRCAT(流通股,'亿股'));

DRAWTEXT_FIX(ISLASTBAR,0.005,0.01,0,当前业绩),COLORFF8080;
DRAWTEXT_FIX(ISLASTBAR,0.005,0.10,0,股本市值),COLOR888888;

{DRAWTEXT_FIX(1,0,0.3,0,'所属板块:'),COLORFF6000;}
DRAWTEXT_FIX(ISLASTBAR,0.025,0.19,0,HYBLOCK),COLORFF6000;
DRAWTEXT_FIX(ISLASTBAR,0.025,0.28,0,GNBLOCK),COLOR9F9F5F;

{涨占比:=STRCAT(' 涨占比: ',CON2STR(INDEXADV/(INDEXADV+INDEXDEC),2));
DRAWTEXT_FIX(ISLASTBAR,0.005,0.37,0,涨占比),COLORYELLOW;};

FD:=(C-REF(C,1))/REF(C,1)*100;
DF:=FD<-5;
DFAA:=BARSLAST(DF);
箱顶:DRAWLINE(DF,O,REF(DF,1),REF(O,1),1),COLORC08000,DOTLINE;
箱体突破:=CROSS(C,REF(O,DFAA));
STICKLINE(箱体突破 AND FD>8 ,C,O,3.1,0),COLORBLUE;
突破天数:BARSLAST(CROSS(C,REF(O,DFAA))),NODRAW;
TPAA:=突破天数;
突破力度:(REF(C,TPAA)-REF(C,TPAA+1))/REF(C,TPAA+1)*100,NODRAW;

MA10:MA(C,10),NODRAW,COLORCYAN;
VARCG:=MA10;
VARCF:=VARCG-(EMA(C,3)-VARCG);
NOTEXT:VARCG,LINETHICK2,COLOR00FF00;
NOTEXT2:IF(VARCG>VARCF,VARCG,DRAWNULL),LINETHICK2,COLORMAGENTA;

启动时间:=N;
结束时间:=DATE;
起点:=CONST(BARSLAST(DATE=启动时间)+1),COLORGREEN,NODRAW;
终点:=CONST(BARSLAST(DATE=结束时间)+1),COLORBROWN,NODRAW;

A1:=BACKSET(BARSTATUS=2,起点);
A2:=BACKSET(BARSTATUS=2,终点);

终点收盘:=REF(C,BARSLAST(CROSS(A2,0.5))),NODRAW;
起点收盘:=REF(C,BARSLAST(CROSS(A1,0.5))),NODRAW;

启动:DRAWLINE(CURRBARSCOUNT=起点,起点收盘,CURRBARSCOUNT=终点,起点收盘,0),COLORMAGENTA,CROSSDOT;
幅度:(终点收盘-起点收盘)/起点收盘*100,COLORRED,NODRAW;
抄底下影:=(MIN(CLOSE,OPEN)-LOW)/(HIGH-LOW);{长下影};
STICKLINE(抄底下影>0.67,C,O,3.1,0),COLORYELLOW;
STICKLINE(抄底下影>0.67,H,L,0,0),COLORYELLOW;

[url=http://www.70822.com/soft/sort013/sort05/down-64057.html]箱体主图－－-应多位朋友邀请，今发放自用箱体主图，需要的请关注[/url]