分享

通达信双线支撑压力多功能主图指标公式

 淡看人生3rlkf5 2018-01-29
TT:=IF(ISLASTBAR,240/FROMOPEN,1);
NN:=120;
HH:=HHV(V*TT,NN);
LL:=LLV(V,NN);
最高:=CONST(HH);
最低:=CONST(LL);
最高2:=CONST(HHV(H,NN));
最低2:=CONST(LLV(L,NN));
PP:=IF((最高2*0.9-(最高2-最低2)*0.5)>CONST(LLV(L,20)),0.9,IF((最高2*0.9-(最高2-最低2)*0.5)>CONST(LLV(L,50)),0.7,0.6)),NODRAW;
RCC1:=最高2*0.9-(最高2-最低2)*PP;
最低3:=MIN(RCC1,最低2);
AA1:=最低3;
今日保护价:(REF(C,2)+REF(C,1)+O)/3,COLOR00FFFF,NODRAW;
顶点:IF(CURRBARSCOUNT<=60,CONST(IF(ISLASTBAR=1,HHV(H,BARSLAST(CURRBARSCOUNT=60)),1)),DRAWNULL),COLORRED,DOTLINE;
低点:IF(CURRBARSCOUNT<=60,CONST(IF(ISLASTBAR=1,LLV(L,BARSLAST(CURRBARSCOUNT=60)),1)),DRAWNULL),COLORMAGENTA,DOTLINE;
DRAWTEXT(ISLASTBAR,顶点,'顶点'),COLORRED;
DRAWTEXT(ISLASTBAR,低点,'低点'),COLORMAGENTA;
{输出概念、行业、地域文本:}
DRAWTEXT_FIX(C>0,0.01,0.004,0,DYBLOCK),COLOR00DDFF,LINETHICK2;
DRAWTEXT_FIX(C>0,0.06,0.004,0,HYBLOCK),COLOR2200FF,LINETHICK2;
DRAWTEXT_FIX(C>0,0.10,0.004,0,GNBLOCK),COLORFFCC00,LINETHICK2;
DRAWTEXT_FIX(1,0.38,0.004,0,FGBLOCK),COLORMAGENTA;
AAA1:=STRCAT('沪深总上涨数:',CON2STR(DYNAINFO(60),0));
AAA2:=STRCAT('沪深总下跌数:',CON2STR(DYNAINFO(61),0));
AAA3:=STRCAT('沪深总成交金额:',CON2STR(DYNAINFO(62)/100000000,0));
DRAWTEXT_FIX(ISLASTBAR,0.01,0.06,0,AAA1),COLORRED;
DRAWTEXT_FIX(ISLASTBAR,0.01,0.12,0,AAA2),COLORGREEN;
DRAWTEXT_FIX(ISLASTBAR,0.01,0.18,0,AAA3),COLORYELLOW;
{股本市值}
总股本:=STRCAT(STRCAT(' 总股本: ',CON2STR(TOTALCAPITAL/1000000,2)),'亿');
流通盘:=STRCAT(STRCAT(' 流通盘: ',CON2STR(CAPITAL/1000000,2)),'亿');
全流通:=STRCAT(' 全流通: ',CON2STR((CAPITAL/1000000)/(TOTALCAPITAL/1000000),2));
市值:=STRCAT(STRCAT(' 流通市值: ',CON2STR((CAPITAL/1000000)*C,2)),'亿');
股本市值:=STRCAT(' ',STRCAT(STRCAT(STRCAT(总股本,流通盘),全流通),市值));
DRAWTEXT_FIX(ISLASTBAR,0,1.2,0,股本市值),COLORYELLOW;
{业绩}
市盈率:=STRCAT('市盈率: ',CON2STR(DYNAINFO(39),2));
市净率:=STRCAT(' 市净率: ',CON2STR(C/FINANCE(34),2));
每股收益:=STRCAT(' 每股收益: ',CON2STR(FINANCE(38),2));
股值:=STRCAT(' ',STRCAT(STRCAT(市盈率,市净率),每股收益));
DRAWTEXT_FIX(ISLASTBAR,0.38,1.2,0,股值),COLORLIBLUE; {主图显示}
净资收益率:=STRCAT('净资收益率: ',CON2STR(FINANCE(29)/FINANCE(19)*100,2));
毛利率:=STRCAT(' 毛利率: ',CON2STR((FINANCE(20)-FINANCE(21))/FINANCE(20)*100,2));
主营利润率:=STRCAT(' 主营利润率 ',CON2STR(FINANCE(23)/FINANCE(20)*100,2));
当前业绩:=STRCAT(' ',STRCAT(STRCAT(净资收益率,毛利率),主营利润率));
DRAWTEXT_FIX(ISLASTBAR,0.62,1.2,0,当前业绩),COLORRED; {主图显示}
上涨家数:INDEXADV,COLOR0080FF,NODRAW;
下跌家数:INDEXDEC,COLORGREEN,NODRAW;
当前获利筹码:IF(WINNER(CLOSE),WINNER(CLOSE)*100,0),NODRAW,COLOR0080FF;
涨停:DYNAINFO(3)*1.1,COLORRED,NODRAW;
跌停:DYNAINFO(3)*0.9,COLORGREEN,NODRAW;

    本站是提供个人知识管理的网络存储空间,所有内容均由用户发布,不代表本站观点。请注意甄别内容中的联系方式、诱导购买等信息,谨防诈骗。如发现有害或侵权内容,请点击一键举报。
    转藏 分享 献花(0

    0条评论

    发表

    请遵守用户 评论公约