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; |
|
来自: 淡看人生3rlkf5 > 《待分类》