无未来准确率高的通达信指标公式 通达信多财务信息主图公式源码(2)

    
IF(MAB>=REF(MAB,1),MAB,DRAWNULL),COLORRED,LINETHICK2;
IF(MAB<REF(MAB,1),MAB,DRAWNULL),COLORGREEN,LINETHICK2;
VAR2:=(2*CLOSE+HIGH+LOW)/4;
VAR3:=IF(YEAR>=2099 AND MONTH>2,0,1);
VAR4:=LLV(LOW,5);
VAR5:=HHV(HIGH,4);
VAR6:=EMA((VAR2-VAR4)/(VAR5-VAR4)*100,4)*VAR3;
VAR7:=EMA(0.667*REF(VAR6,1)+0.333* VAR6,2)*VAR3;
AAA:= MAA>=REF(MAA,1);{C>=MAA;}
BBB:= MAA<REF(MAA,1);{ C<MAA;}
DDD:=MAB>=REF(MAB,1);
EEE:=MAB<REF(MAB,1);
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));（股票知识网zhishi.southmoney.com）