改版后 广通冷暖带 加入多项实用指标

指标加入了多项实用功能 可以不用F10便可在主图指标上查看个股基本资料 加入了涨停虚拟线 BS买卖点 沪深涨跌停家数统计指标 涨跌停k线标记等实用指标

MRSP:MA(C,1),COLORRED;

{虚拟涨停K线}

ZTKX:=IF(CURRBARSCOUNT=1,REF(CLOSE,1)*1.1,DRAWNULL),NODRAW;
 STICKLINE(CURRBARSCOUNT=1,ZTKX,MAX(OPEN,CLOSE),-1,-1),COLOR00C0C0;
 DRAWKLINE(HIGH,OPEN,LOW,CLOSE);

 DRAWBAND(MA(CLOSE,5),RGB(155,50,50),MA(CLOSE,10),RGB(83,123,68));
 DRAWKLINE(H,O,L,C);

DRAWBAND(MA(CLOSE,60),RGB(55,0,0),MA(CLOSE,120),RGB(0,91,0));
 DRAWKLINE(H,O,L,C);

AA:=CLOSE/REF(C,1)>=1.09;
 STICKLINE(AA,O,C,3,0),COLORYELLOW;

MA5:MA(CLOSE,5),COLORWHITE;
 MA10:MA(CLOSE,10),COLORYELLOW;
 MA20:MA(CLOSE,20),COLORMAGENTA;
 MA60:MA(CLOSE,60),COLORGREEN,LINETHICK1;
 MA120:MA(CLOSE,120),LINETHICK2,POINTDOT,COLORLIMAGENTA,LINETHICK1;
 MA240:MA(CLOSE,240),LINETHICK2,POINTDOT,COLORWHITE;

DRAWICON(CROSS(MA10,MA20),MA20,1); {10日上穿20日做记号}
DRAWICON(CROSS(MA20,MA60),MA60,1); {20日上穿60日做记号}
DRAWICON(CROSS(MA20,MA120),MA120,1); {20日上穿60日做记号}
DRAWICON(CROSS(MA20,MA240),MA240,1);{20日上穿120日做记号}
DRAWICON(CROSS(MA60,MA120),MA60,1); {60日上穿120日做记号}
DRAWICON(CROSS(MA60,MA240),MA240,1); {60日上穿240日做记号}
DRAWICON(CROSS(MA120,MA240),MA240,1);{120日上穿240日做记号}
 

TT:=240/FROMOPEN;
比:=TT;
 J12:=(HIGH - ((HIGH - LOW) / 3));
 J23:=(LOW + ((HIGH - LOW) / 3));
 AAA:=CONST(HHV(H,90));
 BBB:=CONST(LLV(L,100));

DRAWKLINE(H,O,L,C);
 T1{早晨之星}:=CONST(IF((REF(CLOSE,2)/REF(OPEN,2) < 0.95 AND REF(OPEN,1)
 < REF(CLOSE,2) AND ABS(REF(OPEN,1)-REF(CLOSE,1))/REF(CLOSE,1)<0.03 AND
 CLOSE/OPEN>1.05 AND CLOSE>REF(CLOSE,2)),1,0));
 T2{黄昏之星}:=CONST(IF((REF(CLOSE,2)/REF(OPEN,2) > 1.03 AND REF(OPEN,1)
 > REF(CLOSE,2) AND ABS(REF(OPEN,1)-REF(CLOSE,1))/REF(CLOSE,1)<0.02
 AND CLOSE/OPEN<0.97 AND CLOSE<REF(CLOSE,2)),1,0));
 T3{长十字}:=CONST(IF((CLOSE=OPEN AND HIGH/LOW >1.03),1,0));
 T4{垂死十字}:=CONST(IF((CLOSE=OPEN AND CLOSE=LOW AND CLOSE!=HIGH),1,0));
 T5{早晨十字星}:=CONST(IF((REF(CLOSE,2)/REF(OPEN,2) < 0.95 AND REF(OPEN,1)
 < REF(CLOSE,2) AND REF(OPEN,1)=REF(CLOSE,1) AND
 CLOSE/OPEN>1.05 AND CLOSE>REF(CLOSE,2)),1,0));
 T6{黄昏十字星}:=CONST(IF((REF(CLOSE,2)/REF(OPEN,2) > 1.05 AND REF(OPEN,1)
 > REF(CLOSE,2) AND REF(OPEN,1)=REF(CLOSE,1) AND
 CLOSE/OPEN<0.95 AND CLOSE<REF(CLOSE,2)),1,0));
 T7{射击之星}:=CONST(IF((MIN(OPEN,CLOSE)=LOW AND HIGH-LOW >
 3*(MAX(OPEN,CLOSE)-LOW) AND CLOSE > MA(CLOSE,5)),1,0));
 T8{倒转锤头}:=CONST(IF((MIN(OPEN,CLOSE)=LOW AND HIGH-LOW >
 3*(MAX(OPEN,CLOSE)-LOW) AND CLOSE < MA(CLOSE,5)),1,0));
 T9{锤头}:=CONST(IF((HIGH = MAX(OPEN,CLOSE) AND HIGH-LOW >
 3*(HIGH-MIN(OPEN,CLOSE)) AND CLOSE < MA(CLOSE,5)),1,0));
 T10{吊颈}:=CONST(IF((HIGH = MAX(OPEN,CLOSE) AND HIGH-LOW >
 3*(HIGH-MIN(OPEN,CLOSE)) AND CLOSE>MA(CLOSE,5)),1,0));
 T11{穿头破脚}:=CONST(IF(((REF(CLOSE,1)/REF(OPEN,1)>1.03 AND CLOSE/OPEN<0.96
 AND CLOSE<REF(OPEN,1)
 AND OPEN>REF(CLOSE,1))OR (REF(CLOSE,1)/REF(OPEN,1)<0.97 AND CLOSE/OPEN>1.04
 AND CLOSE>REF(OPEN,1) AND OPEN<REF(CLOSE,1))),1,0));
 T12{乌云盖顶}:=CONST(IF((REF(CLOSE,1)/REF(OPEN,1)>1.03 AND CLOSE/OPEN<0.97
 AND OPEN>REF(CLOSE,1) AND CLOSE<REF(CLOSE,1)),1,0));
 T13{曙光初现}:=CONST(IF((REF(CLOSE,1)/REF(OPEN,1)<0.97 AND CLOSE/OPEN>1.03
 AND OPEN<REF(CLOSE,1) AND CLOSE>REF(CLOSE,1)),1,0));
 T14{身怀六甲}:=CONST(IF((ABS(REF(CLOSE,1)-REF(OPEN,1))/REF(CLOSE,1) > 0.04
 AND ABS(CLOSE-OPEN)/CLOSE<0.005 AND
 MAX(CLOSE,OPEN) < MAX(REF(CLOSE,1),REF(OPEN,1)) AND MIN(CLOSE,OPEN)
 > MIN(REF(CLOSE,1),REF(OPEN,1))),1,0));
 T15{十字胎}:=CONST(IF((ABS(REF(CLOSE,1)-REF(OPEN,1))/REF(CLOSE,1) > 0.04
 AND CLOSE=OPEN AND
 CLOSE < MAX(REF(CLOSE,1),REF(OPEN,1)) AND CLOSE > MIN(REF(CLOSE,1)
 ,REF(OPEN,1))),1,0));{好股票网 http://www.goodgupiao.com 整理}
T16{平顶}:=CONST(IF((ABS(HIGH-REF(HIGH,1))/HIGH<0.001),1,0));
 T17{平底}:=CONST(IF(((ABS(LOW-REF(LOW,1))/LOW<0.001 AND ABS(REF(LOW,1)
 -REF(LOW,2))/REF(LOW,1)<=0.001)),1,0));
 T18{大阳烛}:=CONST(IF((CLOSE/OPEN>1.05 AND HIGH/LOW < CLOSE/OPEN+0.018),1,0));
 T19{三个白武士}:=CONST(IF((REF(CLOSE,2)>REF(OPEN,2) AND REF(CLOSE,1)
 >REF(OPEN,1) AND CLOSE>OPEN
 AND REF(CLOSE,1)>REF(CLOSE,2) AND CLOSE>REF(CLOSE,1)),1,0));
 T20{双飞乌鸦}:=CONST(IF((REF(CLOSE,1)<REF(OPEN,1) AND CLOSE<OPEN
 AND CLOSE/OPEN<0.98),1,0));
 T21{孕育线}:=CONST(IF((REF(CLOSE,2)>REF(OPEN,2) AND (REF(CLOSE,2)
 -REF(OPEN,2))/REF(OPEN,2)>=2/100 AND REF(OPEN,1)>=REF(CLOSE,1)
 AND (REF(OPEN,1)-REF(CLOSE,1))/REF(CLOSE,1)<=2/100 AND REF(OPEN,1)
 <=REF(CLOSE,2) AND REF(CLOSE,1)>=REF(OPEN,2) AND C>=OPEN
 AND (CLOSE-OPEN)/OPEN>=2/100 AND CLOSE>=REF(OPEN,1) AND OPEN<=REF(CLOSE,1)
 AND (MAX(CLOSE,REF(C,2))-MIN(CLOSE,REF(CLOSE,2)))/MIN(CLOSE,REF(CLOSE,2))
 <=1/100),1,0));

 {DRAWTEXT_FIX(ISLASTBAR,0,0,0,GNBLOCK),COLORYELLOW;}{概念板块左上角}
DRAWTEXT_FIX(ISLASTBAR,0,28,0,GNBLOCK),COLOR0099CC;{板块概念左下角}
DRAWTEXT_FIX(1,0.34,28,0,HYBLOCK)COLOR0099CC;{所属行业左下角}
DRAWTEXT_FIX(1,0.40,28,0,DYBLOCK)COLOR0099CC;{所属地区左下角}
DRAWTEXT_FIX(1,0.48,28,0,EXTERNSTR(0,2))COLOR0099CC;{主题投资左下角};

{-----------------------------------------------------------------------------------------------------}
 {-------------------------------------------------基本面----------------------------------------------}
 {距形}
 {DRAWRECTREL(0,0,378,348,RGB(36,36,36))NOFRAME;}
 {基本资料}
品种类型:=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,'基本资料：'),COLORFFCC99;
 DRAWTEXT_FIX(1,0.008,0.05,0,'品种类型：'),COLOR99CCFF;
 DRAWTEXT_FIX(1,0.008,0.09,0,'行业板块：'),COLOR99CCFF;
 DRAWTEXT_FIX(1,0.008,0.13,0,'上市天数：'),COLOR99CCFF;
 DRAWTEXT_FIX(1,0.008,0.17,0,'股东人数：'),COLOR99CCFF;
 DRAWTEXT_FIX(1,0.008,0.21,0,'人均持股：'),COLOR99CCFF;
 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;{行业板块}
DRAWTEXT_FIX(1,0.050,0.13,0,CON2STR(上市天数,0)),COLORWHITE;{数值}
DRAWTEXT_FIX(1,0.050,0.17,0,CON2STR(股东人数,0)),COLORWHITE;
 DRAWTEXT_FIX(1,0.050,0.21,0,CON2STR(人均持股,0)),COLORWHITE;
 DRAWTEXT_FIX(1,0.083,0.13,0,'天'),COLORWHITE;{单位}
DRAWTEXT_FIX(1,0.083,0.17,0,'人'),COLORWHITE;
 DRAWTEXT_FIX(1,0.083,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,'业绩资料：'),COLORFFCC99;
 DRAWTEXT_FIX(1,0.105,0.05,0,'净资产收益率：'),COLOR99CCFF;
 DRAWTEXT_FIX(1,0.105,0.09,0,'主营业务利润率：'),COLOR99CCFF;
 DRAWTEXT_FIX(1,0.105,0.13,0,'现金流动负债比：'),COLOR99CCFF;
 DRAWTEXT_FIX(1,0.105,0.17,0,'主营收入同比：'),COLOR99CCFF;
 DRAWTEXT_FIX(1,0.105,0.21,0,'净利润同比：'),COLOR99CCFF;
 DRAWTEXT_FIX(1,0.174,0.05,0,STRCAT(VAR2STR(净资收益率,2),' %')),COLORCYAN;
 DRAWTEXT_FIX(1,0.174,0.09,0,STRCAT(VAR2STR(主营利润率,2),' %')),COLORCYAN;
 DRAWTEXT_FIX(1,0.174,0.13,0,CON2STR(现金负债比,2)),COLORCYAN;
 DRAWTEXT_FIX(1,0.174,0.17,0,STRCAT(VAR2STR(主营收入同比,0),' %')),COLORCYAN;
 DRAWTEXT_FIX(1,0.174,0.21,0,STRCAT(VAR2STR(净利润同比,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.213,0.01,0,'财务资料(1)：'),COLORFFCC99;
 DRAWTEXT_FIX(1,0.213,0.05,0,'每股收益(近)：'),COLOR99CCFF;
 DRAWTEXT_FIX(1,0.213,0.09,0,'每股收益(年)：'),COLOR99CCFF;
 DRAWTEXT_FIX(1,0.213,0.13,0,'每股净资产：'),COLOR99CCFF;
 DRAWTEXT_FIX(1,0.213,0.17,0,'每股未分配：'),COLOR99CCFF;
 DRAWTEXT_FIX(1,0.213,0.21,0,'每股公积金：'),COLOR99CCFF;
 DRAWTEXT_FIX(1,0.284,0.05,1,CON2STR(每股收益,2)),COLOR99CCFF;
 DRAWTEXT_FIX(1,0.284,0.09,1,CON2STR(每股收益年,2)),COLOR99CCFF;
 DRAWTEXT_FIX(1,0.284,0.13,1,CON2STR(每股净资产,2)),COLOR99CCFF;
 DRAWTEXT_FIX(1,0.284,0.17,1,CON2STR(每股未分配,2)),COLOR99CCFF;
 DRAWTEXT_FIX(1,0.284,0.21,1,CON2STR(每股公积金,2)),COLOR99CCFF;
 {财务(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.299,0.01,0,'财务资料(2)：'),COLORFFCC99;
 DRAWTEXT_FIX(1,0.299,0.05,0,'市盈率：'),COLOR99CCFF;
 DRAWTEXT_FIX(1,0.299,0.09,0,'市销率：'),COLOR99CCFF;
 DRAWTEXT_FIX(1,0.299,0.13,0,'市净率：'),COLOR99CCFF;
 DRAWTEXT_FIX(1,0.299,0.17,0,'毛利率：'),COLOR99CCFF;
 DRAWTEXT_FIX(1,0.299,0.21,0,'净利润率：'),COLOR99CCFF;
 DRAWTEXT_FIX(1,0.358,0.05,1,CON2STR(市盈率,2)),COLOR99CCFF;
 DRAWTEXT_FIX(1,0.358,0.09,1,CON2STR(市销率,2)),COLOR99CCFF;
 DRAWTEXT_FIX(1,0.358,0.13,1,CON2STR(市净率,2)),COLOR99CCFF;
 DRAWTEXT_FIX(1,0.358,0.17,1,CON2STR(毛利率,2)),COLOR99CCFF;
 DRAWTEXT_FIX(1,0.358,0.21,1,CON2STR(净利润率,2)),COLOR99CCFF;
 {{财务(4)}
经营现金流量:=FINANCE(25)/10000;
资产负债率:=FINANCE(9);
应收帐款:=FINANCE(22)/10000;
 DRAWTEXT_FIX(1,0.375,0.01,0,'财务资料(3)：'),COLORFFCC99;
 DRAWTEXT_FIX(1,0.375,0.05,0,'资产负债率：'),COLOR99CCFF;
 DRAWTEXT_FIX(1,0.460,0.05,1,STRCAT(CON2STR(资产负债率,2),' %')),COLOR99CCFF;
 DRAWTEXT_FIX(1,0.375,0.09,0,STRCAT('经营现金流量：',STRCAT(VAR2STR(经营现金流量,0),' 万元'))),COLOR99CCFF;
 DRAWTEXT_FIX(1,0.375,0.13,0,STRCAT('应收帐款：',STRCAT(VAR2STR(应收帐款,0),' 万元'))),COLOR99CCFF;
 {-----------------------------------------------------------------------------------------------------}
 {-----------------------------------------------------------------------------------------------------};

 {沪深_上涨_下跌_具体数据}
上涨家数:=STRCAT('▇沪深上涨家数:',CON2STR(DYNAINFO(60),0));
下跌家数:=STRCAT('▇沪深下跌家数:',CON2STR(DYNAINFO(61),0));
上涨百分比:=DYNAINFO(60)/(DYNAINFO(60)+DYNAINFO(61))*100;
下跌百分比:=DYNAINFO(61)/(DYNAINFO(60)+DYNAINFO(61))*100;
 DRAWTEXT_FIX(1,0.45,0,0,上涨家数),COLORRED;
 DRAWTEXT_FIX(1,0.57,0,0,STRCAT(STRCAT('(',VAR2STR(上涨百分比,2)),'%)')),COLORRED;
 DRAWTEXT_FIX(1,0.65,0,0,下跌家数),COLORGREEN;
 DRAWTEXT_FIX(1,0.77,0,0,STRCAT(STRCAT('(',VAR2STR(下跌百分比,2)),'%)')),COLORGREEN;

 VAR1 := IF((((C - REF(C,1)) * 100) / REF(C,1)) >= (10 - ((0.01 * 100) / REF(OPEN,1))),1,0);
 STICKLINE(VAR1,OPEN,C,1,0),COLORYELLOW;
 VAR2 := ((C - REF(C,1)) / REF(C,1)) * 100;
 STICKLINE(VAR2 < -9.9,OPEN,C,1,0),COLORBLUE;

买线:=EMA(C,2);
卖线:=EMA(SLOPE(C,21)*20+C,42);
 BU:=CROSS(买线,卖线);
SEL:=CROSS(卖线,买线);
 {DRAWICON(BU,L-0.1,1);}
 {DRAWICON(SEL,H+0.1,2);}
 DRAWTEXT(BU,L-0.1,'▲B'),COLORRED;
 DRAWTEXT(SEL,H+0.1,'◆S'),COLORGREEN;